The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
'[' || TEST_DESC || ']'
INTO ASSAYDESC
FROM
GMD_QC_TESTS
WHERE TEST_CODE = ASSAY_CODE;
SELECT
TEXT
FROM
QC_TEXT_TBL
WHERE TEXT_CODE = TEXT_CODECF
AND LINE_NO <> - 1
AND LANG_CODE = USERENV('LANG');
SELECT
TEST_UOM
INTO UNITCODE
FROM
GMD_SPEC_TESTS_B
WHERE SPEC_ID = SPEC
AND TEST_ID = QCASSY_TYP_ID;
SELECT
TEXT
FROM
QC_TEXT_TBL
WHERE TEXT_CODE = TEXT_CODE_V
AND LINE_NO <> - 1
AND LANG_CODE = 'US';
SELECT
DISTINCT
GISV.START_DATE
INTO FROMDATE
FROM
GMD_SAMPLES GS,
GMD_SAMPLING_EVENTS GSE,
GMD_INVENTORY_SPEC_VRS GISV,
GMD_EVENT_SPEC_DISP GES
WHERE SAMPLE_NO = SAMPLE_NO_V
AND GS.SAMPLING_EVENT_ID = GSE.SAMPLING_EVENT_ID
AND GSE.SAMPLING_EVENT_ID = GES.SAMPLING_EVENT_ID
AND GES.SPEC_USED_FOR_LOT_ATTRIB_IND = 'Y'
AND GES.SPEC_VR_ID = GISV.SPEC_VR_ID;
SELECT
DISTINCT
GISV.START_DATE
INTO FROMDATE
FROM
GMD_SAMPLES GS,
GMD_SAMPLING_EVENTS GSE,
GMD_INVENTORY_SPEC_VRS GISV,
GMD_EVENT_SPEC_DISP GES
WHERE SAMPLE_NO = SAMPLE_NO_V
AND GS.SAMPLING_EVENT_ID = GSE.SAMPLING_EVENT_ID
AND GSE.SAMPLING_EVENT_ID = GES.SAMPLING_EVENT_ID
AND GES.SPEC_USED_FOR_LOT_ATTRIB_IND = 'Y'
AND GES.SPEC_VR_ID = GISV.SPEC_VR_ID;
SELECT
MIN_VALUE_NUM
INTO MINVAILD
FROM
GMD_QC_TESTS_B
WHERE TEST_CODE = ASSAY_CODE;
SELECT
MAX_VALUE_NUM
INTO MAXVAILD
FROM
GMD_QC_TESTS_B
WHERE TEST_CODE = ASSAY_CODE;
SELECT
DISTINCT
GISV.END_DATE
INTO TODATE
FROM
GMD_SAMPLES GS,
GMD_SAMPLING_EVENTS GSE,
GMD_INVENTORY_SPEC_VRS GISV,
GMD_EVENT_SPEC_DISP GES
WHERE SAMPLE_NO = SAMPLE_NO_V
AND GS.SAMPLING_EVENT_ID = GSE.SAMPLING_EVENT_ID
AND GSE.SAMPLING_EVENT_ID = GES.SAMPLING_EVENT_ID
AND GES.SPEC_USED_FOR_LOT_ATTRIB_IND = 'Y'
AND GES.SPEC_VR_ID = GISV.SPEC_VR_ID;
SELECT
DISTINCT
CONCATENATED_SEGMENTS
INTO L_FROM_ITEM
FROM
MTL_SYSTEM_ITEMS_KFV
WHERE INVENTORY_ITEM_ID = FROM_ITEM;
SELECT
DISTINCT
CONCATENATED_SEGMENTS
INTO L_TO_ITEM
FROM
MTL_SYSTEM_ITEMS_KFV
WHERE INVENTORY_ITEM_ID = TO_ITEM;
SELECT
CONCATENATED_SEGMENTS
INTO LOCATOR
FROM
MTL_ITEM_LOCATIONS_KFV
WHERE INVENTORY_LOCATION_ID = FROM_LOCATOR;
SELECT
CONCATENATED_SEGMENTS
INTO LOCATOR
FROM
MTL_ITEM_LOCATIONS_KFV
WHERE INVENTORY_LOCATION_ID = TO_LOCATOR;
SELECT
MEANING
INTO INCLUDE1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '0'
AND LOOKUP_TYPE = 'QC_INCLUDE';
SELECT
MEANING
INTO INCLUDE1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '1'
AND LOOKUP_TYPE = 'QC_INCLUDE';
SELECT
MEANING
INTO PRINT1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '0'
AND LOOKUP_TYPE = 'QC_PRINT';
SELECT
MEANING
INTO PRINT1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '1'
AND LOOKUP_TYPE = 'QC_PRINT';
SELECT
MEANING
INTO PRINT1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '2'
AND LOOKUP_TYPE = 'QC_PRINT';
SELECT
MEANING
INTO PRINT1
FROM
GEM_LOOKUPS
WHERE LOOKUP_CODE = '3'
AND LOOKUP_TYPE = 'QC_PRINT';
SELECT
MEANING
INTO TEMP1
FROM
FND_LOOKUP_VALUES
WHERE LOOKUP_TYPE = 'GMD_QC_YES_NO'
AND LOOKUP_CODE = NVL(ACCEPT_ANYWAY
,'N')
AND LANGUAGE = USERENV('LANG');
SELECT
MEANING
INTO TEMP2
FROM
FND_LOOKUP_VALUES
WHERE LOOKUP_TYPE = 'GMD_QC_YES_NO'
AND LOOKUP_CODE = NVL(FINAL_MARK
,'N')
AND LANGUAGE = USERENV('LANG');
SELECT
MEANING
INTO TEMP3
FROM
FND_LOOKUP_VALUES
WHERE LOOKUP_TYPE = 'GMD_QC_YES_NO'
AND LOOKUP_CODE = NVL(IN_SPEC_IND
,'N')
AND LANGUAGE = USERENV('LANG');
SELECT
DISPLAY_LABEL_NUMERIC_RANGE
INTO ASSAYVALUE
FROM
GMD_QC_TEST_VALUES
WHERE TEST_ID = QCASSY_TYP_ID
AND ( MIN_NUM <= NUM_RESULT
OR MIN_NUM IS NULL )
AND ( MAX_NUM >= NUM_RESULT
OR MAX_NUM IS NULL );
SELECT
DISTINCT
TEST_TYPE
INTO ASSAYTYPE
FROM
GMD_QC_TESTS_B
WHERE TEST_CODE = ASSAY_CODE;
SELECT
DISPLAY_LABEL_NUMERIC_RANGE
INTO ASSAYVALUE
FROM
GMD_QC_TEST_VALUES
WHERE TEST_ID = QCASSY_TYP_ID
AND ( MIN_NUM <= TARGETSPECCF
OR MIN_NUM IS NULL )
AND ( MAX_NUM >= TARGETSPECCF
OR MAX_NUM IS NULL );
SELECT
DISPLAY_LABEL_NUMERIC_RANGE
INTO ASSAYVALUE
FROM
GMD_QC_TEST_VALUES
WHERE TEST_ID = QCASSY_TYP_ID
AND ( MIN_NUM <= MIN_SPECCF
OR MIN_NUM IS NULL )
AND ( MAX_NUM >= MIN_SPECCF
OR MAX_NUM IS NULL );
SELECT
DISPLAY_LABEL_NUMERIC_RANGE
INTO ASSAYVALUE
FROM
GMD_QC_TEST_VALUES
WHERE TEST_ID = QCASSY_TYP_ID
AND ( MIN_NUM <= MAX_SPECCF
OR MIN_NUM IS NULL )
AND ( MAX_NUM >= MAX_SPECCF
OR MAX_NUM IS NULL );
SELECT
TEXT_CODE
INTO TEXTCODE
FROM
GMD_SPECIFICATIONS_B
WHERE SPEC_ID = SPEC
AND DELETE_MARK = 0;
SELECT
DISTINCT
ORGANIZATION_CODE
INTO ORG_CODE
FROM
MTL_PARAMETERS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID;
SELECT
CONCATENATED_SEGMENTS
INTO LOCATOR
FROM
MTL_ITEM_LOCATIONS_KFV
WHERE INVENTORY_LOCATION_ID = LOCATOR_ID;