The following lines contain the word 'select', 'insert', 'update' or 'delete':
/*INSERT INTO MTL_INV_PACKSLIPS
(PACKSLIP_NUMBER
,PACKSLIP_DATE
,SHIPMENT_HEADER_ID)
VALUES (C_PACKSLIP_NUM
,SYSDATE
,SHIP_HEADER_ID);*/null;
SELECT
MTL_INV_PACKSLIPS_S.NEXTVAL
INTO PACKSLIP_NUM
FROM
SYS.DUAL;
SELECT
SET_OF_BOOKS_ID
FROM
AP_SYSTEM_PARAMETERS;
SELECT
ZR.REGISTRATION_NUMBER
INTO L_DEF_TAX_REG_NO
FROM
ZX_PARTY_TAX_PROFILE ZPTP,
ZX_REGISTRATIONS ZR,
XLE_ASSOCIATIONS_V XAV
WHERE ZPTP.PARTY_TAX_PROFILE_ID = ZR.PARTY_TAX_PROFILE_ID
AND ZR.DEFAULT_REGISTRATION_FLAG = 'Y'
AND ZPTP.PARTY_ID = XAV.LEGAL_PARTY_ID
AND ZPTP.PARTY_TYPE_CODE = 'LEGAL_ESTABLISHMENT'
AND XAV.ENTITY_ID = P_ISSUING_ORG
AND XAV.ENTITY_TYPE = 'INVENTORY_ORGANIZATION';
SELECT
ZR.REGISTRATION_NUMBER
INTO L_DEF_TAX_REG_NO
FROM
XLE_ETB_PROFILES XEP,
ZX_PARTY_TAX_PROFILE ZPTP,
ZX_REGISTRATIONS ZR,
ORG_ORGANIZATION_DEFINITIONS OOD
WHERE ZPTP.PARTY_TAX_PROFILE_ID = ZR.PARTY_TAX_PROFILE_ID
AND ZR.DEFAULT_REGISTRATION_FLAG = 'Y'
AND ZPTP.PARTY_ID = XEP.PARTY_ID
AND ZPTP.PARTY_TYPE_CODE = 'LEGAL_ESTABLISHMENT'
AND XEP.LEGAL_ENTITY_ID = OOD.LEGAL_ENTITY
AND XEP.MAIN_ESTABLISHMENT_FLAG = 'Y'
AND OOD.ORGANIZATION_ID = P_ISSUING_ORG;