eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKE_DELIVERABLE_BILLING_PVT dependencies on FND_LOG

Line 137: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

133: ) IS
134: l_api_name CONSTANT VARCHAR2(30) := ' Update_Event_References';
135: BEGIN
136:
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

Line 138: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating event reference...');

134: l_api_name CONSTANT VARCHAR2(30) := ' Update_Event_References';
135: BEGIN
136:
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

Line 139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event ID = ' || P_Event_ID);

135: BEGIN
136:
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

Line 256: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

252: OPEN EventID;
253: FETCH EventID INTO L_Event_ID;
254: CLOSE EventID;
255:
256: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
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:

Line 257: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversal Event ID = ' || L_Event_ID);

253: FETCH EventID INTO L_Event_ID;
254: CLOSE EventID;
255:
256: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
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

Line 258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversal Event Num = ' || L_Event_Num);

254: CLOSE EventID;
255:
256: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
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

Line 439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

435:
436:
437: l_api_name CONSTANT VARCHAR2(30) := 'Create_Billing_Event';
438: BEGIN
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating Billing Event ...');
441: END IF;
442: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
443:

Line 440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating Billing Event ...');

436:
437: l_api_name CONSTANT VARCHAR2(30) := 'Create_Billing_Event';
438: BEGIN
439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating Billing Event ...');
441: END IF;
442: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
443:
444: --

Line 477: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

473: --
474: -- 1. Make sure billing event level is consistent with previous
475: -- events
476: --
477: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
478: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Check Previous Event Level');
479: END IF;
480:
481: IF ( Event_Level( BillInfoRec.Bill_Project_ID

Line 478: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Check Previous Event Level');

474: -- 1. Make sure billing event level is consistent with previous
475: -- events
476: --
477: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
478: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Check Previous Event Level');
479: END IF;
480:
481: IF ( Event_Level( BillInfoRec.Bill_Project_ID
482: , BillInfoRec.Pa_Event_ID ) = 'PROJECT'

Line 489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

485: FND_MSG_PUB.add;
486: X_Return_Status := FND_API.G_RET_STS_ERROR;
487: END IF;
488:
489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Type = ' || BillInfoRec.Bill_Event_Type);
491: END IF;
492:
493: IF ( BillInfoRec.Bill_Event_Type IS NULL ) THEN

Line 490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Type = ' || BillInfoRec.Bill_Event_Type);

486: X_Return_Status := FND_API.G_RET_STS_ERROR;
487: END IF;
488:
489: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Type = ' || BillInfoRec.Bill_Event_Type);
491: END IF;
492:
493: IF ( BillInfoRec.Bill_Event_Type IS NULL ) THEN
494: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 500: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

496: FND_MSG_PUB.add;
497: X_Return_Status := FND_API.G_RET_STS_ERROR;
498: END IF;
499:
500: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Description = ' || BillInfoRec.Bill_Description);
502: END IF;
503:
504: IF ( BillInfoRec.Bill_Description IS NULL ) THEN

Line 501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Description = ' || BillInfoRec.Bill_Description);

497: X_Return_Status := FND_API.G_RET_STS_ERROR;
498: END IF;
499:
500: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Description = ' || BillInfoRec.Bill_Description);
502: END IF;
503:
504: IF ( BillInfoRec.Bill_Description IS NULL ) THEN
505: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 511: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

507: FND_MSG_PUB.add;
508: X_Return_Status := FND_API.G_RET_STS_ERROR;
509: END IF;
510:
511: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
512: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Bill Amount = ' || BillInfoRec.Bill_Amount);
513: END IF;
514:
515: IF ( BillInfoRec.Bill_Amount IS NULL ) THEN

Line 512: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Bill Amount = ' || BillInfoRec.Bill_Amount);

508: X_Return_Status := FND_API.G_RET_STS_ERROR;
509: END IF;
510:
511: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
512: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Bill Amount = ' || BillInfoRec.Bill_Amount);
513: END IF;
514:
515: IF ( BillInfoRec.Bill_Amount IS NULL ) THEN
516: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 522: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

518: FND_MSG_PUB.add;
519: X_Return_Status := FND_API.G_RET_STS_ERROR;
520: END IF;
521:
522: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Revenue Amount = ' || BillInfoRec.Revenue_Amount);
524: END IF;
525:
526: IF ( BillInfoRec.Revenue_Amount IS NULL ) THEN

Line 523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Revenue Amount = ' || BillInfoRec.Revenue_Amount);

519: X_Return_Status := FND_API.G_RET_STS_ERROR;
520: END IF;
521:
522: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Revenue Amount = ' || BillInfoRec.Revenue_Amount);
524: END IF;
525:
526: IF ( BillInfoRec.Revenue_Amount IS NULL ) THEN
527: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

529: FND_MSG_PUB.add;
530: X_Return_Status := FND_API.G_RET_STS_ERROR;
531: END IF;
532:
533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Organization ID = ' || BillInfoRec.Bill_Organization_ID);
535: END IF;
536: IF ( BillInfoRec.Bill_Organization_ID IS NULL ) THEN
537: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Organization ID = ' || BillInfoRec.Bill_Organization_ID);

530: X_Return_Status := FND_API.G_RET_STS_ERROR;
531: END IF;
532:
533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Organization ID = ' || BillInfoRec.Bill_Organization_ID);
535: END IF;
536: IF ( BillInfoRec.Bill_Organization_ID IS NULL ) THEN
537: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');
538: fnd_message.set_token('VALUE' , 'BILL_ORGANIZATION_ID');

Line 543: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

539: FND_MSG_PUB.add;
540: X_Return_Status := FND_API.G_RET_STS_ERROR;
541: END IF;
542:
543: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project ID = ' || BillInfoRec.Bill_Project_ID);
545: END IF;
546:
547: IF ( BillInfoRec.Bill_Project_ID IS NULL ) THEN

Line 544: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project ID = ' || BillInfoRec.Bill_Project_ID);

540: X_Return_Status := FND_API.G_RET_STS_ERROR;
541: END IF;
542:
543: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project ID = ' || BillInfoRec.Bill_Project_ID);
545: END IF;
546:
547: IF ( BillInfoRec.Bill_Project_ID IS NULL ) THEN
548: fnd_message.set_name('OKE' , 'OKE_API_MISSING_VALUE');

Line 554: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

550: FND_MSG_PUB.add;
551: X_Return_Status := FND_API.G_RET_STS_ERROR;
552: END IF;
553:
554: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
555: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Task ID = ' || BillInfoRec.Bill_Task_ID);
556: END IF;
557: IF ( X_Return_Status <> FND_API.G_RET_STS_SUCCESS ) THEN
558: RAISE FND_API.G_EXC_ERROR;

Line 555: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Task ID = ' || BillInfoRec.Bill_Task_ID);

551: X_Return_Status := FND_API.G_RET_STS_ERROR;
552: END IF;
553:
554: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
555: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Task ID = ' || BillInfoRec.Bill_Task_ID);
556: END IF;
557: IF ( X_Return_Status <> FND_API.G_RET_STS_SUCCESS ) THEN
558: RAISE FND_API.G_EXC_ERROR;
559: END IF;

Line 612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

608:
609: --
610: -- PA Event has previously been created
611: --
612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Previously Created ...');
614: END IF;
615:
616: Update_Billing_Event

Line 613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Previously Created ...');

609: --
610: -- PA Event has previously been created
611: --
612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Previously Created ...');
614: END IF;
615:
616: Update_Billing_Event
617: ( P_Commit => FND_API.G_FALSE

Line 688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

684: ELSIF ( X_return_status = FND_API.G_RET_STS_ERROR ) THEN
685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687:
688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');
690: END IF;
691:
692: UPDATE oke_k_billing_events

Line 689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');

685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687:
688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');
690: END IF;
691:
692: UPDATE oke_k_billing_events
693: SET initiated_flag = 'Y'

Line 702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

698: ELSE
699: --
700: -- PA Event has not yet been created
701: --
702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Not Previously Created ...');
704: END IF;
705: Create_Billing_Event
706: ( P_Commit => FND_API.G_FALSE

Line 703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Not Previously Created ...');

699: --
700: -- PA Event has not yet been created
701: --
702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Not Previously Created ...');
704: END IF;
705: Create_Billing_Event
706: ( P_Commit => FND_API.G_FALSE
707: , P_Event_Type => BillInfoRec.Bill_Event_Type

Line 778: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

774: ELSIF ( X_return_status = FND_API.G_RET_STS_ERROR ) THEN
775: RAISE FND_API.G_EXC_ERROR;
776: END IF;
777:
778: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
779: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');
780: END IF;
781:
782: UPDATE oke_k_billing_events

Line 779: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');

775: RAISE FND_API.G_EXC_ERROR;
776: END IF;
777:
778: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
779: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating deliverable with event info ...');
780: END IF;
781:
782: UPDATE oke_k_billing_events
783: SET pa_event_id = L_Event_ID

Line 787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

783: SET pa_event_id = L_Event_ID
784: ,initiated_flag = 'Y'
785: WHERE billing_event_id = P_Event_ID;
786:
787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Successful completion ...');
789: END IF;
790: X_Event_ID := L_Event_ID;
791:

Line 788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Successful completion ...');

784: ,initiated_flag = 'Y'
785: WHERE billing_event_id = P_Event_ID;
786:
787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Successful completion ...');
789: END IF;
790: X_Event_ID := L_Event_ID;
791:
792: END IF;

Line 932: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

928: OPEN EventID;
929: FETCH EventID INTO X_Event_ID;
930: CLOSE EventID;
931:
932: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating PA billing event ...');
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;

Line 933: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating PA billing event ...');

929: FETCH EventID INTO X_Event_ID;
930: CLOSE EventID;
931:
932: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating PA billing event ...');
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:

Line 934: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event ID = ' || X_Event_ID);

930: CLOSE EventID;
931:
932: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating PA billing event ...');
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

Line 935: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event Num = ' || X_Event_Num);

931:
932: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating PA billing event ...');
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

Line 1012: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1008: , X_Product_Code => 'OKE'
1009: , X_event_reference => X_Event_Id
1010: );
1011:
1012: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1013: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating additional billing info ...');
1014: END IF;
1015: Update_Event_References
1016: ( P_Event_ID => X_Event_ID

Line 1013: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating additional billing info ...');

1009: , X_event_reference => X_Event_Id
1010: );
1011:
1012: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1013: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating additional billing info ...');
1014: END IF;
1015: Update_Event_References
1016: ( P_Event_ID => X_Event_ID
1017: , P_Contract_Num => P_Contract_Num

Line 1047: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1043: --
1044: FND_MSG_PUB.Count_And_Get( P_Count => X_Msg_Count
1045: , P_Data => X_Msg_Data );
1046:
1047: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1048: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Billing event created ...');
1049: END IF;
1050:
1051: EXCEPTION

Line 1048: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Billing event created ...');

1044: FND_MSG_PUB.Count_And_Get( P_Count => X_Msg_Count
1045: , P_Data => X_Msg_Data );
1046:
1047: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1048: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Billing event created ...');
1049: END IF;
1050:
1051: EXCEPTION
1052: WHEN FND_API.G_EXC_ERROR THEN

Line 1167: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1163: l_api_name CONSTANT VARCHAR2(30) := 'Update_Billing_Event';
1164:
1165: BEGIN
1166:
1167: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating Billing Event ...');
1169: END IF;
1170:
1171: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

Line 1168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating Billing Event ...');

1164:
1165: BEGIN
1166:
1167: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Updating Billing Event ...');
1169: END IF;
1170:
1171: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
1172:

Line 1196: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1192:
1193: -- Event has already been billed, need to cancel previous entry
1194: -- and create a new one.
1195: --
1196: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1197: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event already processed in PA:');
1198: END IF;
1199:
1200: --

Line 1197: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event already processed in PA:');

1193: -- Event has already been billed, need to cancel previous entry
1194: -- and create a new one.
1195: --
1196: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1197: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event already processed in PA:');
1198: END IF;
1199:
1200: --
1201: -- A Law 05/15/2001

Line 1213: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1209: FND_MESSAGE.set_token('EVENT' , L_Event_Num);
1210: FND_MSG_PUB.add;
1211: RAISE FND_API.G_EXC_ERROR;
1212:
1213: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1214: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversing billed entry ...');
1215: END IF;
1216:
1217: Revert_Billing_Event

Line 1214: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversing billed entry ...');

1210: FND_MSG_PUB.add;
1211: RAISE FND_API.G_EXC_ERROR;
1212:
1213: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1214: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Reversing billed entry ...');
1215: END IF;
1216:
1217: Revert_Billing_Event
1218: ( P_Event_ID => P_Event_ID

Line 1222: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1218: ( P_Event_ID => P_Event_ID
1219: , P_Event_Date => P_Event_Date
1220: );
1221:
1222: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1223: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating revised entry ...');
1224: END IF;
1225:
1226: Create_Billing_Event

Line 1223: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating revised entry ...');

1219: , P_Event_Date => P_Event_Date
1220: );
1221:
1222: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1223: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Creating revised entry ...');
1224: END IF;
1225:
1226: Create_Billing_Event
1227: ( P_Commit => FND_API.G_FALSE

Line 1310: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1306: -- Event has not been billed, only need to update event
1307: -- information
1308: --
1309:
1310: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
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:

Line 1311: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Event not yet processed in PA; update existing ...');

1307: -- information
1308: --
1309:
1310: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
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

Line 1928: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1924: x_Bill_Trans_Bill_Amount := BillInfoRec.Bill_Amount;
1925: x_Bill_Trans_rev_Amount := BillInfoRec.Revenue_Amount;
1926:
1927:
1928: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1929: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Currency = ' || l_project_currency_code);
1930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Rate Type = ' || l_project_bil_rate_type);
1931: END IF;
1932: x_Project_Currency_Code := l_project_currency_code;

Line 1929: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Currency = ' || l_project_currency_code);

1925: x_Bill_Trans_rev_Amount := BillInfoRec.Revenue_Amount;
1926:
1927:
1928: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1929: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Currency = ' || l_project_currency_code);
1930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Rate Type = ' || l_project_bil_rate_type);
1931: END IF;
1932: x_Project_Currency_Code := l_project_currency_code;
1933: IF ( BillInfoRec.Bill_Currency_Code <> l_project_currency_code ) THEN

Line 1930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Rate Type = ' || l_project_bil_rate_type);

1926:
1927:
1928: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1929: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Currency = ' || l_project_currency_code);
1930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Rate Type = ' || l_project_bil_rate_type);
1931: END IF;
1932: x_Project_Currency_Code := l_project_currency_code;
1933: IF ( BillInfoRec.Bill_Currency_Code <> l_project_currency_code ) THEN
1934: x_Project_Rate_Type := l_project_bil_rate_type;

Line 1946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1942: x_Project_Rev_Exchange_Rate := NULL;
1943: x_Project_Revenue_Amount := NULL;
1944:
1945:
1946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Currency = ' || l_projfunc_currency_code);
1948: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Rate Type = ' || l_projfunc_bil_rate_type);
1949: END IF;
1950: x_ProjFunc_Currency_Code := l_projfunc_currency_code;

Line 1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Currency = ' || l_projfunc_currency_code);

1943: x_Project_Revenue_Amount := NULL;
1944:
1945:
1946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Currency = ' || l_projfunc_currency_code);
1948: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Rate Type = ' || l_projfunc_bil_rate_type);
1949: END IF;
1950: x_ProjFunc_Currency_Code := l_projfunc_currency_code;
1951: IF ( BillInfoRec.Bill_Currency_Code <> l_projfunc_currency_code ) THEN

Line 1948: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Rate Type = ' || l_projfunc_bil_rate_type);

1944:
1945:
1946: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Currency = ' || l_projfunc_currency_code);
1948: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Project Func Rate Type = ' || l_projfunc_bil_rate_type);
1949: END IF;
1950: x_ProjFunc_Currency_Code := l_projfunc_currency_code;
1951: IF ( BillInfoRec.Bill_Currency_Code <> l_projfunc_currency_code ) THEN
1952: x_ProjFunc_Rate_Type := l_projfunc_bil_rate_type;

Line 1991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1987: end if;
1988: x_Invproc_Rate_Date := NULL;
1989: x_Invproc_Exchange_Rate := NULL;
1990:
1991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Currency = ' || x_invproc_currency_code);
1993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Rate Type = ' || x_invproc_rate_type);
1994: END IF;
1995: x_Revproc_Currency_Code := l_revproc_currency_code;

Line 1992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Currency = ' || x_invproc_currency_code);

1988: x_Invproc_Rate_Date := NULL;
1989: x_Invproc_Exchange_Rate := NULL;
1990:
1991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Currency = ' || x_invproc_currency_code);
1993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Rate Type = ' || x_invproc_rate_type);
1994: END IF;
1995: x_Revproc_Currency_Code := l_revproc_currency_code;
1996: x_Revproc_Rate_Type := x_projfunc_rate_type;

Line 1993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Rate Type = ' || x_invproc_rate_type);

1989: x_Invproc_Exchange_Rate := NULL;
1990:
1991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Currency = ' || x_invproc_currency_code);
1993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Inv Proc Rate Type = ' || x_invproc_rate_type);
1994: END IF;
1995: x_Revproc_Currency_Code := l_revproc_currency_code;
1996: x_Revproc_Rate_Type := x_projfunc_rate_type;
1997: x_Revproc_Rate_Date := NULL;

Line 2000: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1996: x_Revproc_Rate_Type := x_projfunc_rate_type;
1997: x_Revproc_Rate_Date := NULL;
1998: x_Revproc_Exchange_Rate := NULL;
1999:
2000: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Currency = ' || x_revproc_currency_code);
2002: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Rate Type = ' || x_revproc_rate_type);
2003: END IF;
2004: x_Inv_Gen_Rejection_Code := NULL;

Line 2001: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Currency = ' || x_revproc_currency_code);

1997: x_Revproc_Rate_Date := NULL;
1998: x_Revproc_Exchange_Rate := NULL;
1999:
2000: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Currency = ' || x_revproc_currency_code);
2002: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Rate Type = ' || x_revproc_rate_type);
2003: END IF;
2004: x_Inv_Gen_Rejection_Code := NULL;
2005:

Line 2002: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Rate Type = ' || x_revproc_rate_type);

1998: x_Revproc_Exchange_Rate := NULL;
1999:
2000: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Currency = ' || x_revproc_currency_code);
2002: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Rev Proc Rate Type = ' || x_revproc_rate_type);
2003: END IF;
2004: x_Inv_Gen_Rejection_Code := NULL;
2005:
2006: EXCEPTION