The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
STRUCTURE_ID
INTO L_P_STRUCT_NUM
FROM
MTL_DEFAULT_SETS_VIEW
WHERE FUNCTIONAL_AREA_ID = 2;
SELECT
TRANSACTION_TYPE
INTO L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS
WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
AUTO_TRANSACT_CODE,
TRANSACTION_TYPE
INTO L_AUTO_TRANSACT_CODE,L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS_INTERFACE
WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
BLIND_RECEIVING_FLAG
INTO L_BLIND_RECEIVING_FLAG
FROM
RCV_PARAMETERS
WHERE ORGANIZATION_ID = RRP_ORGANIZATION_ID;
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'TYPE';
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'DOCUMENT TYPE';
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'SHIPMENT NUMBER';
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'DOCUMENT NUMBER';
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'BUYER';
SELECT
DISPLAYED_FIELD
INTO L_DISPLAYED_FIELD
FROM
PO_LOOKUP_CODES
WHERE LOOKUP_TYPE = 'POXDLPDT TRANSLATE'
AND LOOKUP_CODE = 'PREPARER';
SELECT
TRANSACTION_TYPE
INTO L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS
WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
AUTO_TRANSACT_CODE
INTO L_AUTO_TRANSACT_CODE
FROM
RCV_TRANSACTIONS_INTERFACE
WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
USER_ENTERED_FLAG,
TRANSACTION_TYPE
INTO L_USER_ENTERED_FLAG,L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS
WHERE PARENT_TRANSACTION_ID = RRP_TRANSACTION_ID;
RETURN ('SELECT WE.WIP_ENTITY_NAME Work_Order
, to_char(null) Line
, WRO.DATE_REQUIRED Date_Required
, SUM(NVL(WRO.QUANTITY_ISSUED,0)) Quantity_Issued
, SUM(NVL(WRO.REQUIRED_QUANTITY,0)) Quantity_Required
, NVL(MOQ2.TRANSACTION_QUANTITY,0) Quantity_On_Hand
, ''D'' Processing_Mode');
RETURN ('SELECT WE.WIP_ENTITY_NAME Work_Order
, WL.LINE_CODE Line
, WRO.DATE_REQUIRED Date_Required
, SUM(WRO.QUANTITY_ISSUED) Quantity_Issued
, SUM((LEAST(BCD.NEXT_SEQ_NUM + WRS.PROCESSING_WORK_DAYS,BCD1.NEXT_SEQ_NUM + MSI.POSTPROCESSING_LEAD_TIME)
- GREATEST(BCD.NEXT_SEQ_NUM,BCD1.NEXT_SEQ_NUM))
* WRO.QUANTITY_PER_ASSEMBLY * WRS.DAILY_PRODUCTION_RATE )
/* this is raw quantity required */
+ -1 * SUM(WRO.QUANTITY_ISSUED -
GREATEST((BCD1.NEXT_SEQ_NUM-BCD.NEXT_SEQ_NUM),0)
*WRO.QUANTITY_PER_ASSEMBLY * WRS.DAILY_PRODUCTION_RATE)
/* this is the quantity ahead behind after taking care of the negative sign as quantity ahead behind
will always be calulated as negative*/
Quantity_Required
, NVL(MOQ2.TRANSACTION_QUANTITY,0) Quantity_On_Hand
, ''R'' Processing_Mode');
FUNCTION WIP_SELECT_DISTFORMULA RETURN VARCHAR2 IS
BEGIN
IF (P_WIP_STATUS = 'I') THEN
RETURN (', we.wip_entity_name job_or_schedule
, wl.line_code line
, wn.operation_seq_num op_seq
, bd.department_code department');
END WIP_SELECT_DISTFORMULA;
SELECT
TRANSACTION_TYPE
INTO L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS
WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
TRANSACTION_TYPE
INTO L_TRANSACTION_TYPE
FROM
RCV_TRANSACTIONS_INTERFACE
WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
SELECT
QUANTITY_RECEIVED,
UNIT_OF_MEASURE
INTO QTY,L_UOM
FROM
RCV_SHIPMENT_LINES
WHERE SHIPMENT_LINE_ID = RRP_SHIPMENT_LINE_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = ITEM_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = ITEM_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = LONG_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = LONG_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = TRX_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = TRX_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = PO_HEADER_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = PO_HEADER_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = PO_LINE_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = PO_LINE_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = REQ_HEADER_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = REQ_HEADER_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = REQ_LINE_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = REQ_LINE_NOTE_MEDIA_ID;
SELECT
SHORT_TEXT
INTO SHORT_NOTE
FROM
FND_DOCUMENTS_SHORT_TEXT
WHERE MEDIA_ID = SHIPMENT_NOTE_MEDIA_ID;
SELECT
LONG_TEXT
INTO LONG_NOTE
FROM
FND_DOCUMENTS_LONG_TEXT
WHERE MEDIA_ID = SHIPMENT_NOTE_MEDIA_ID;
SELECT
ORGANIZATION_NAME
INTO L_ORG_DISPLAYED
FROM
ORG_ORGANIZATION_DEFINITIONS
WHERE ORGANIZATION_ID = P_ORG_ID;
SELECT
DISTINCT
MANUAL_RECEIPT_NUM_TYPE
INTO NUMBERING_TYPE
FROM
RCV_RECEIVING_PARAMETERS_V
WHERE ORGANIZATION_ID = P_ORG_ID;
P_WIP_SELECT_DIST := ' we.wip_entity_name job_or_schedule
, wl.line_code line
, wn.operation_seq_num op_seq
, bd.department_code department ';
P_UNION_UPPER_UPPER := 'SELECT WE.WIP_ENTITY_NAME Work_Order
, to_char(null) Line
, WRO.DATE_REQUIRED Date_Required
, SUM(NVL(WRO.QUANTITY_ISSUED,0)) Quantity_Issued
, SUM(NVL(WRO.REQUIRED_QUANTITY,0)) Quantity_Required
, ''D'' ';
P_UNION_LOWER_UPPER := 'SELECT WE.WIP_ENTITY_NAME Work_Order
, WL.LINE_CODE Line
, WRO.DATE_REQUIRED Date_Required
, SUM(WRO.QUANTITY_ISSUED) Quantity_Issued
, SUM((LEAST(BCD.NEXT_SEQ_NUM + WRS.PROCESSING_WORK_DAYS,BCD1.NEXT_SEQ_NUM + MSI.POSTPROCESSING_LEAD_TIME)
- GREATEST(BCD.NEXT_SEQ_NUM,BCD1.NEXT_SEQ_NUM))
* WRO.QUANTITY_PER_ASSEMBLY * WRS.DAILY_PRODUCTION_RATE )
/* this is raw quantity required */
+ -1 * SUM(WRO.QUANTITY_ISSUED -
GREATEST((BCD1.NEXT_SEQ_NUM-BCD.NEXT_SEQ_NUM),0)
*WRO.QUANTITY_PER_ASSEMBLY * WRS.DAILY_PRODUCTION_RATE)
/* this is the quantity ahead behind after taking care of the negative sign as quantity ahead behind
will always be calulated as negative*/
Quantity_Required
, ''R'' Processing_Mode';
SELECT
SUM(NVL(QUANTITY
,0))
INTO QUANTITY_ON_HAND
FROM
MTL_ITEM_QUANTITIES_VIEW
WHERE INVENTORY_ITEM_ID = JOIN_ITEM_ID
AND ORGANIZATION_ID = JOIN_ORGANIZATION_ID;
SELECT
CONCATENATED_SEGMENTS
INTO L_LOCATOR
FROM
MTL_ITEM_LOCATIONS_KFV
WHERE INVENTORY_LOCATION_ID = LOCATOR_ID1;