DBA Data[Home] [Help]

APPS.OKE_DELIVERABLE_BILLING_PVT dependencies on PA_EVENTS

Line 50: FROM pa_events

46: -- Cursor to get Event Number
47: --
48: CURSOR NextEventNum ( C_Proj_ID NUMBER , C_Task_ID NUMBER ) IS
49: SELECT NVL(MAX(Event_Num) , 0) + 1
50: FROM pa_events
51: WHERE Project_ID = C_Proj_ID
52: AND Nvl(Task_ID,-1)= NVL(C_Task_ID,-1);
53:
54: --

Line 97: FROM pa_events

93: ) RETURN VARCHAR2 IS
94:
95: CURSOR c IS
96: SELECT DECODE(task_id , NULL , 'PROJECT' , 'TASK')
97: FROM pa_events
98: WHERE project_id = P_Project_ID
99: AND event_id <> P_Event_ID;
100: Dummy VARCHAR2(10) := NULL;
101:

Line 141: UPDATE pa_events

137: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
138: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating event reference...');
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event ID = ' || P_Event_ID);
140: END IF;
141: UPDATE pa_events
142: SET quantity_billed = P_Bill_Quantity
143: , uom_code = P_UOM
144: , inventory_org_id = P_Org_ID
145: , inventory_item_id = P_Item_ID

Line 233: FROM pa_events

229: , Revproc_Rate_Type
230: , Revproc_Rate_Date
231: , Revproc_Exchange_Rate
232: , Inv_Gen_Rejection_Code
233: FROM pa_events
234: WHERE event_id = C_Event_ID;
235: EvInfoRec EventInfo%rowtype;
236:
237: CURSOR EventID IS

Line 238: SELECT pa_events_s.nextval

234: WHERE event_id = C_Event_ID;
235: EvInfoRec EventInfo%rowtype;
236:
237: CURSOR EventID IS
238: SELECT pa_events_s.nextval
239: FROM dual;
240:
241: BEGIN
242:

Line 261: PA_EVENTS_PKG.Insert_Row

257: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversal Event ID = ' || L_Event_ID);
258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversal Event Num = ' || L_Event_Num);
259: END IF;
260:
261: PA_EVENTS_PKG.Insert_Row
262: ( X_ROWID => L_RowID
263: , X_EVENT_ID => L_Event_ID
264: , X_TASK_ID => EvInfoRec.Task_ID
265: , X_EVENT_NUM => L_Event_Num

Line 397: SELECT 'X'FROM PA_EVENTS

393: L_Result VARCHAR2(1);
394:
395:
396: CURSOR C(P_ID NUMBER) IS
397: SELECT 'X'FROM PA_EVENTS
398: WHERE EVENT_ID = P_ID;
399:
400: L_Bill_Trans_Currency_Code VARCHAR2(15);
401: L_Bill_Trans_Bill_Amount NUMBER;

Line 906: SELECT pa_events_s.nextval

902: L_UserID NUMBER := FND_GLOBAL.User_ID;
903: L_LoginID NUMBER := FND_GLOBAL.Login_ID;
904: l_api_name CONSTANT VARCHAR2(30) := 'Update_Billing_Event';
905: CURSOR EventID IS
906: SELECT pa_events_s.nextval
907: FROM dual;
908:
909: BEGIN
910:

Line 938: PA_EVENTS_PKG.Insert_Row

934: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event ID = ' || X_Event_ID);
935: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Num = ' || X_Event_Num);
936: END IF;
937:
938: PA_EVENTS_PKG.Insert_Row
939: ( X_ROWID => L_RowID
940: , X_EVENT_ID => X_Event_ID
941: , X_TASK_ID => P_Task_ID
942: , X_EVENT_NUM => X_Event_Num

Line 1149: FROM pa_events

1145: , project_id
1146: , revenue_distributed_flag
1147: , rowid
1148: , bill_amount
1149: FROM pa_events
1150: WHERE event_id = P_Event_ID;
1151:
1152:
1153:

Line 1187: IF ( PA_EVENTS_PKG.Is_Event_Billed

1183: CLOSE EventNum;
1184:
1185:
1186:
1187: IF ( PA_EVENTS_PKG.Is_Event_Billed
1188: ( L_Project_ID
1189: , P_Task_ID
1190: , L_Event_Num
1191: , L_Bill_Amount ) = 'Y')THEN

Line 1315: UPDATE pa_events

1311: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event not yet processed in PA; update existing ...');
1312: END IF;
1313:
1314:
1315: UPDATE pa_events
1316: SET last_update_date = sysdate
1317: , last_updated_by = FND_GLOBAL.User_ID
1318: , last_update_login = FND_GLOBAL.Login_ID
1319: , event_type = nvl( P_Event_Type , event_type )

Line 1645: FROM pa_events

1641: , project_id
1642: , task_id
1643: , rowid
1644: , bill_amount
1645: FROM pa_events
1646: WHERE event_id = l_pa_event_id;
1647:
1648: BEGIN
1649:

Line 1663: IF ( PA_EVENTS_PKG.Is_Event_Billed

1659: CLOSE EventNum;
1660:
1661: IF L_RowID IS NOT NULL THEN
1662:
1663: IF ( PA_EVENTS_PKG.Is_Event_Billed
1664: ( L_Project_ID
1665: , L_Task_ID
1666: , L_Event_Num
1667: , L_Bill_Amount ) = 'Y')

Line 1674: PA_EVENTS_PKG.Delete_Row(X_Rowid => l_rowid);

1670: FND_MESSAGE.set_token('EVENT' , L_Event_Num);
1671: FND_MSG_PUB.add;
1672: RAISE FND_API.G_EXC_ERROR;
1673: ELSE
1674: PA_EVENTS_PKG.Delete_Row(X_Rowid => l_rowid);
1675: END IF;
1676: END IF;
1677: END IF;
1678: