The following lines contain the word 'select', 'insert', 'update' or 'delete':
Select Count(*)
From SO_DROP_SHIP_SOURCES
Where Drop_Ship_Source_ID = P_Drop_Ship_Source_ID ;
Procedure Insert_SO_Drop_Ship_Sources (P_Drop_Ship_Source_ID In Number,
P_Header_ID In Number,
P_Line_ID In Number,
P_Org_ID In Number,
P_Destination_Organization_ID In Number,
P_Requisition_Header_ID In Number,
P_Requisition_Line_ID In Number,
P_PO_Header_ID In Number,
P_PO_Line_ID In Number,
P_Line_Location_ID In Number, P_PO_Release_ID In Number
Default Null)
IS
Begin
Insert Into SO_Drop_Ship_Sources
(
Drop_Ship_Source_ID,
Header_ID,
Line_ID,
Org_ID,
Destination_Organization_ID,
Requisition_Header_ID,
Requisition_Line_ID,
PO_Header_ID,
PO_Line_ID,
Line_Location_ID,
PO_Release_ID,
Creation_Date,
Created_By,
Last_Update_Date,
Last_Updated_By
)
Values
(
P_Drop_Ship_Source_ID,
P_Header_ID,
P_Line_ID,
P_Org_ID,
P_Destination_Organization_ID,
P_Requisition_Header_ID,
P_Requisition_Line_ID,
P_PO_Header_ID,
P_PO_Line_ID,
P_Line_Location_ID,
P_PO_Release_ID,
Trunc(Sysdate),
Nvl(To_Number(FND_PROFILE.VALUE('USER_ID')),-1),
Trunc(Sysdate),
Nvl(To_Number(FND_PROFILE.VALUE('USER_ID')),-1)
);
End Insert_SO_Drop_Ship_Sources;
Procedure Update_Req_Info(P_API_Version In Number,
P_Return_Status Out Varchar2,
P_Msg_Count Out Number,
P_MSG_Data Out Varchar2,
P_Interface_Source_Code In Varchar2,
P_Interface_Source_Line_ID In Number,
P_Requisition_Header_ID In Number,
P_Requisition_Line_ID In Number) Is
L_API_Name Constant Varchar2(30) := 'UPDATE_REQ_INFO';
Select Drop_Ship_Source_ID,
Header_ID,
Line_ID,
Org_ID,
Destination_Organization_ID,
Requisition_Header_ID,
Requisition_Line_ID,
PO_Header_ID,
PO_Line_ID
From SO_Drop_Ship_Sources
Where Drop_Ship_source_ID = P_Interface_Source_Line_ID
For Update of Requisition_Header_ID;
SavePoint Update_Req_Info_GRP;
Rollback to Update_Req_INfo_GRP;
If G_Requisition_Header_ID Is Null Then -- Requisition being updated for the
-- first time
Update SO_Drop_Ship_Sources
Set Requisition_Header_ID = P_Requisition_Header_ID,
Requisition_LIne_ID = P_Requisition_Line_ID,
Last_Update_Date = Trunc(Sysdate),
Last_Updated_By = Nvl(To_Number(FND_PROFILE.VALUE('USER_ID')),-1)
Where Current of L_SO_Drop_Ship_SOurce_Csr;
Insert_SO_Drop_Ship_Sources ( P_Drop_Ship_Source_ID => G_Drop_Ship_Source_ID,
P_Header_ID => G_Header_ID,
P_Line_ID => G_Line_ID,
P_Org_ID => G_Org_ID,
P_Destination_Organization_ID =>
G_Destination_Organization_ID,
P_Requisition_Header_ID =>
P_Requisition_Header_ID,
P_Requisition_LIne_ID => P_Requisition_Line_ID,
P_PO_Header_ID => Null,
P_PO_Line_ID => Null,
P_Line_Location_ID => Null);
Rollback to Update_Req_INfo_Grp;
End Update_Req_Info;
Procedure Update_All_Reqs_In_Process(P_API_Version In Number,
P_Return_Status Out Varchar2,
P_Msg_Count Out Number,
P_MSG_Data Out Varchar2,
P_Requisition_Header_ID In Number,
P_Request_Id In Number,
P_Process_Flag In Varchar2) Is
L_API_Name Constant Varchar2(30) := 'UPDATE_ALL_REQS_IN_PROCESS';
Select Interface_Source_COde,Interface_source_line_id,
requisition_header_id,requisition_line_id
from po_requisitions_interface
WHERE requisition_header_id = P_Requisition_Header_ID
AND process_flag = P_Process_Flag
AND request_id = P_Request_Id;
SavePoint UPDATE_ALL_REQS_IN_PROCESS;
Update_Req_Info(1.0,
L_Return_Status,
L_Msg_Count,
L_MSG_Data,
L_Interface_Source_Code,
L_Interface_Source_Line_ID,
L_Requisition_Header_ID,
L_Requisition_Line_ID);
Rollback to UPDATE_ALL_REQS_IN_PROCESS;
End Update_All_Reqs_In_Process;
Procedure Update_PO_Info ( P_API_Version In Number,
P_Return_Status Out Varchar2,
P_Msg_Count Out Number,
P_MSG_Data Out Varchar2,
P_Req_Header_ID In Number,
P_Req_Line_ID In Number,
P_PO_Header_Id In Number,
P_PO_Line_Id In Number,
P_Line_Location_ID In Number,
P_PO_Release_ID In Number
Default Null) Is
L_API_Name Constant Varchar2(30) := 'UPDATE_PO_INFO';
Select Drop_Ship_Source_ID,
Header_ID,
Line_ID,
Org_ID,
Destination_Organization_ID,
Requisition_Header_ID,
Requisition_Line_ID,
PO_Header_ID,
PO_Line_ID
From SO_Drop_Ship_Sources
Where Requisition_Line_ID = P_Req_Line_ID
And Requisition_Header_ID = P_Req_Header_ID
For Update of PO_Header_ID;
SavePoint Update_PO_Info_GRP;
If G_Requisition_Header_ID Is Not Null -- PO being updated for the
And G_PO_Header_ID Is Null Then -- first time
Update SO_Drop_Ship_Sources
Set PO_Header_ID = P_PO_Header_ID,
PO_Line_ID = P_PO_Line_ID,
Line_Location_ID = P_Line_Location_ID,
PO_Release_ID = Nvl(P_PO_Release_Id,PO_Release_ID),
Last_Update_Date = Trunc(Sysdate),
Last_Updated_By = Nvl(To_Number(FND_PROFILE.VALUE('USER_ID')),-1)
Where Current of L_SO_Drop_Ship_Source_Csr;
Insert_SO_Drop_Ship_Sources (P_Drop_Ship_Source_ID => G_Drop_Ship_Source_ID,
P_Header_ID => G_Header_ID,
P_Line_ID => G_Line_ID,
P_Org_ID => G_Org_ID,
P_Destination_Organization_ID =>
G_Destination_Organization_ID,
P_Requisition_Header_ID =>
G_Requisition_Header_ID,
P_Requisition_Line_ID => G_Requisition_Line_ID,
P_PO_Header_ID => P_PO_Header_ID,
P_PO_Line_ID => P_PO_Line_ID,
P_Line_Location_ID => P_Line_Location_ID,
P_PO_Release_Id => P_PO_Release_ID);
Rollback to Update_PO_Info_GRP;
End Update_PO_Info;
Select Line_Id
From SO_Drop_Ship_Sources
Where Requisition_Line_ID = P_Req_Line_ID;
Select Line_Id
From SO_Drop_Ship_Sources
Where Line_Location_Id = P_PO_Line_Location_ID;