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.PJM_TRANSFER_CHARGES_PKG dependencies on PJM_CONC

Line 231: PJM_CONC.put_line(fnd_message_cache.get);

227: Current_Time := sysdate;
228: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
229: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
230: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
231: PJM_CONC.put_line(fnd_message_cache.get);
232: PJM_CONC.new_line(1);
233: EXCEPTION
234: WHEN OTHERS THEN
235: NULL;

Line 232: PJM_CONC.new_line(1);

228: fnd_message_cache.set_name('FND' , 'UTIL-CURRENT TIME');
229: fnd_message_cache.set_token('DATE' , fnd_date.date_to_displaydate(Current_Time));
230: fnd_message_cache.set_token('TIME' , to_char(Current_Time , 'HH24:MI:SS'));
231: PJM_CONC.put_line(fnd_message_cache.get);
232: PJM_CONC.new_line(1);
233: EXCEPTION
234: WHEN OTHERS THEN
235: NULL;
236: END Timestamp;

Line 626: PJM_CONC.put_line(fnd_message.get || ' ...');

622: l_uom := 'DOLLARS'; -- bug 4145856
623:
624:
625: fnd_message.set_name('PJM','CONC-APINV IPV Transfer');
626: PJM_CONC.put_line(fnd_message.get || ' ...');
627: PJM_CONC.new_line(1);
628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);

Line 627: PJM_CONC.new_line(1);

623:
624:
625: fnd_message.set_name('PJM','CONC-APINV IPV Transfer');
626: PJM_CONC.put_line(fnd_message.get || ' ...');
627: PJM_CONC.new_line(1);
628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);
631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);

Line 629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);

625: fnd_message.set_name('PJM','CONC-APINV IPV Transfer');
626: PJM_CONC.put_line(fnd_message.get || ' ...');
627: PJM_CONC.new_line(1);
628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);
631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);
632: PJM_CONC.put_line('[SUBMIT_TRX_IMPORT] = ' || X_Submit_Trx_Import);
633:

Line 630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);

626: PJM_CONC.put_line(fnd_message.get || ' ...');
627: PJM_CONC.new_line(1);
628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);
631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);
632: PJM_CONC.put_line('[SUBMIT_TRX_IMPORT] = ' || X_Submit_Trx_Import);
633:
634: l_request_id := fnd_global.conc_request_id;

Line 631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);

627: PJM_CONC.new_line(1);
628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);
631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);
632: PJM_CONC.put_line('[SUBMIT_TRX_IMPORT] = ' || X_Submit_Trx_Import);
633:
634: l_request_id := fnd_global.conc_request_id;
635: l_user_id := fnd_global.user_id;

Line 632: PJM_CONC.put_line('[SUBMIT_TRX_IMPORT] = ' || X_Submit_Trx_Import);

628:
629: PJM_CONC.put_line('[PROJECT_ID] = ' || X_Project_Id);
630: PJM_CONC.put_line('[START_DATE] = ' || X_Start_Date);
631: PJM_CONC.put_line('[END_DATE] = ' || X_End_Date);
632: PJM_CONC.put_line('[SUBMIT_TRX_IMPORT] = ' || X_Submit_Trx_Import);
633:
634: l_request_id := fnd_global.conc_request_id;
635: l_user_id := fnd_global.user_id;
636: l_Start_Date := fnd_date.canonical_to_date(X_Start_Date);

Line 639: PJM_CONC.put_line('[REQUEST_ID] = ' || l_request_id);

635: l_user_id := fnd_global.user_id;
636: l_Start_Date := fnd_date.canonical_to_date(X_Start_Date);
637: l_End_Date := fnd_date.canonical_to_date(X_End_Date);
638:
639: PJM_CONC.put_line('[REQUEST_ID] = ' || l_request_id);
640: PJM_CONC.new_line(1);
641:
642: l_IPV_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV IPV');
643: l_ERV_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV ERV');

Line 640: PJM_CONC.new_line(1);

636: l_Start_Date := fnd_date.canonical_to_date(X_Start_Date);
637: l_End_Date := fnd_date.canonical_to_date(X_End_Date);
638:
639: PJM_CONC.put_line('[REQUEST_ID] = ' || l_request_id);
640: PJM_CONC.new_line(1);
641:
642: l_IPV_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV IPV');
643: l_ERV_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV ERV');
644: l_Freight_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV FREIGHT');

Line 649: PJM_CONC.put_line('Batch_Name = ' || l_batch_name);

645: l_Tax_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV TAX');
646: l_Misc_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV MISC');
647: l_Batch_Name := Batch_Name;
648:
649: PJM_CONC.put_line('Batch_Name = ' || l_batch_name);
650: PJM_CONC.new_line(1);
651:
652: ----------------------------------------------------------------------
653: -- Loop for transfering Variances from Invoice_Distribution_All to

Line 650: PJM_CONC.new_line(1);

646: l_Misc_Exp_Comment := fnd_message.get_string('PJM','CONC-APINV MISC');
647: l_Batch_Name := Batch_Name;
648:
649: PJM_CONC.put_line('Batch_Name = ' || l_batch_name);
650: PJM_CONC.new_line(1);
651:
652: ----------------------------------------------------------------------
653: -- Loop for transfering Variances from Invoice_Distribution_All to
654: -- PA_Transaction_Interface_All

Line 658: PJM_CONC.put_line(fnd_message.get || ' ...');

654: -- PA_Transaction_Interface_All
655: ----------------------------------------------------------------------
656:
657: fnd_message.set_name('PJM','CONC-APINV Start Loop');
658: PJM_CONC.put_line(fnd_message.get || ' ...');
659:
660: Timestamp;
661:
662: if (x_project_id is not null) then

Line 705: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);

701: , PoRec.Destination_Type_Code
702: , InvRec.Project_Id );
703: END IF;
704:
705: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
706: PJM_CONC.put_line(' line_num .............. '||
707: InvRec.Invoice_Distribution_Id);
708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

Line 706: PJM_CONC.put_line(' line_num .............. '||

702: , InvRec.Project_Id );
703: END IF;
704:
705: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
706: PJM_CONC.put_line(' line_num .............. '||
707: InvRec.Invoice_Distribution_Id);
708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
710: PJM_CONC.put_line(' expenditure_org_id .... '||

Line 708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);

704:
705: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
706: PJM_CONC.put_line(' line_num .............. '||
707: InvRec.Invoice_Distribution_Id);
708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
710: PJM_CONC.put_line(' expenditure_org_id .... '||
711: InvRec.Expenditure_Organization_ID);
712:

Line 709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

705: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
706: PJM_CONC.put_line(' line_num .............. '||
707: InvRec.Invoice_Distribution_Id);
708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
710: PJM_CONC.put_line(' expenditure_org_id .... '||
711: InvRec.Expenditure_Organization_ID);
712:
713: Timestamp;

Line 710: PJM_CONC.put_line(' expenditure_org_id .... '||

706: PJM_CONC.put_line(' line_num .............. '||
707: InvRec.Invoice_Distribution_Id);
708: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
709: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
710: PJM_CONC.put_line(' expenditure_org_id .... '||
711: InvRec.Expenditure_Organization_ID);
712:
713: Timestamp;
714:

Line 730: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);

726: ( invrec.line_type_lookup_code
727: , invrec.project_id
728: , invrec.expenditure_organization_id );
729:
730: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
731: PJM_CONC.put_line(' Charge amount ............ '||
732: InvRec.charge_amount);
733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
734: PJM_CONC.put_line(' expenditure_comment ... '||

Line 731: PJM_CONC.put_line(' Charge amount ............ '||

727: , invrec.project_id
728: , invrec.expenditure_organization_id );
729:
730: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
731: PJM_CONC.put_line(' Charge amount ............ '||
732: InvRec.charge_amount);
733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
734: PJM_CONC.put_line(' expenditure_comment ... '||
735: InvRec.Expenditure_Comment);

Line 733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);

729:
730: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
731: PJM_CONC.put_line(' Charge amount ............ '||
732: InvRec.charge_amount);
733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
734: PJM_CONC.put_line(' expenditure_comment ... '||
735: InvRec.Expenditure_Comment);
736: PJM_CONC.new_line(1);
737:

Line 734: PJM_CONC.put_line(' expenditure_comment ... '||

730: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
731: PJM_CONC.put_line(' Charge amount ............ '||
732: InvRec.charge_amount);
733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
734: PJM_CONC.put_line(' expenditure_comment ... '||
735: InvRec.Expenditure_Comment);
736: PJM_CONC.new_line(1);
737:
738:

Line 736: PJM_CONC.new_line(1);

732: InvRec.charge_amount);
733: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
734: PJM_CONC.put_line(' expenditure_comment ... '||
735: InvRec.Expenditure_Comment);
736: PJM_CONC.new_line(1);
737:
738:
739: ---------------------------------------------------------------------
740: -- Set Expenditure Comment

Line 795: PJM_CONC.put_line('... ' || fnd_message.get);

791: -- Insert into PA_TRANSACTION_INTERFACES table
792: ----------------------------------------------------------------------
793:
794: fnd_message.set_name('PJM','CONC-APINV Insert');
795: PJM_CONC.put_line('... ' || fnd_message.get);
796:
797: if not ( InvRec.Dist_Code_Combination_Id is not null AND
798: nvl(nvl(InvRec.Base_Charge_Amount,
799: InvRec.Charge_Amount) , 0) <> 0 ) then

Line 801: PJM_CONC.put_line('...... Charge amount not available, skipping...');

797: if not ( InvRec.Dist_Code_Combination_Id is not null AND
798: nvl(nvl(InvRec.Base_Charge_Amount,
799: InvRec.Charge_Amount) , 0) <> 0 ) then
800:
801: PJM_CONC.put_line('...... Charge amount not available, skipping...');
802: -- Mark skipped record to 'G'
803: UPDATE AP_Invoice_Distributions_all
804: SET pa_addition_flag = 'G'
805: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 812: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');

808: and Invoice_Distribution_Id = InvRec.Invoice_Distribution_Id);
809:
810: elsif ( l_Exp_Type is null) then
811:
812: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');
813: -- Mark skipped record to 'G'
814: UPDATE AP_Invoice_Distributions_all
815: SET pa_addition_flag = 'G'
816: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 917: PJM_CONC.put_line('...... Processing IPV, ERV, Tax Variances');

913: select next_day( trunc(InvRec.Expenditure_Item_Date)-1, l_week_ending_day )
914: into l_week_ending
915: from dual;
916:
917: PJM_CONC.put_line('...... Processing IPV, ERV, Tax Variances');
918:
919: -- Insert for all the charges
920:
921: INSERT INTO pa_transaction_interface_all

Line 1014: PJM_CONC.put_line('... ' || fnd_message.get);

1010: -- Update pa_addition_flag to 'Y' for successful invoice distributions
1011: ----------------------------------------------------------------------
1012:
1013: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1014: PJM_CONC.put_line('... ' || fnd_message.get);
1015: PJM_CONC.new_line(1);
1016:
1017: l_progress := 80;
1018:

Line 1015: PJM_CONC.new_line(1);

1011: ----------------------------------------------------------------------
1012:
1013: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1014: PJM_CONC.put_line('... ' || fnd_message.get);
1015: PJM_CONC.new_line(1);
1016:
1017: l_progress := 80;
1018:
1019: UPDATE AP_Invoice_Distributions_all

Line 1072: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);

1068: , PoRec.Destination_Type_Code
1069: , InvRec.Project_Id );
1070: END IF;
1071:
1072: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1073: PJM_CONC.put_line(' line_num .............. '||
1074: InvRec.Invoice_Distribution_Id);
1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

Line 1073: PJM_CONC.put_line(' line_num .............. '||

1069: , InvRec.Project_Id );
1070: END IF;
1071:
1072: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1073: PJM_CONC.put_line(' line_num .............. '||
1074: InvRec.Invoice_Distribution_Id);
1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1077: PJM_CONC.put_line(' expenditure_org_id .... '||

Line 1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);

1071:
1072: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1073: PJM_CONC.put_line(' line_num .............. '||
1074: InvRec.Invoice_Distribution_Id);
1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1077: PJM_CONC.put_line(' expenditure_org_id .... '||
1078: InvRec.Expenditure_Organization_ID);
1079:

Line 1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

1072: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1073: PJM_CONC.put_line(' line_num .............. '||
1074: InvRec.Invoice_Distribution_Id);
1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1077: PJM_CONC.put_line(' expenditure_org_id .... '||
1078: InvRec.Expenditure_Organization_ID);
1079:
1080: Timestamp;

Line 1077: PJM_CONC.put_line(' expenditure_org_id .... '||

1073: PJM_CONC.put_line(' line_num .............. '||
1074: InvRec.Invoice_Distribution_Id);
1075: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1076: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1077: PJM_CONC.put_line(' expenditure_org_id .... '||
1078: InvRec.Expenditure_Organization_ID);
1079:
1080: Timestamp;
1081:

Line 1097: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);

1093: ( invrec.line_type_lookup_code
1094: , invrec.project_id
1095: , invrec.expenditure_organization_id );
1096:
1097: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1098: PJM_CONC.put_line(' Charge amount ............ '||
1099: InvRec.charge_amount);
1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1101: PJM_CONC.put_line(' expenditure_comment ... '||

Line 1098: PJM_CONC.put_line(' Charge amount ............ '||

1094: , invrec.project_id
1095: , invrec.expenditure_organization_id );
1096:
1097: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1098: PJM_CONC.put_line(' Charge amount ............ '||
1099: InvRec.charge_amount);
1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1101: PJM_CONC.put_line(' expenditure_comment ... '||
1102: InvRec.Expenditure_Comment);

Line 1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);

1096:
1097: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1098: PJM_CONC.put_line(' Charge amount ............ '||
1099: InvRec.charge_amount);
1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1101: PJM_CONC.put_line(' expenditure_comment ... '||
1102: InvRec.Expenditure_Comment);
1103: PJM_CONC.new_line(1);
1104:

Line 1101: PJM_CONC.put_line(' expenditure_comment ... '||

1097: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1098: PJM_CONC.put_line(' Charge amount ............ '||
1099: InvRec.charge_amount);
1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1101: PJM_CONC.put_line(' expenditure_comment ... '||
1102: InvRec.Expenditure_Comment);
1103: PJM_CONC.new_line(1);
1104:
1105:

Line 1103: PJM_CONC.new_line(1);

1099: InvRec.charge_amount);
1100: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1101: PJM_CONC.put_line(' expenditure_comment ... '||
1102: InvRec.Expenditure_Comment);
1103: PJM_CONC.new_line(1);
1104:
1105:
1106: ---------------------------------------------------------------------
1107: -- Set Expenditure Comment

Line 1163: PJM_CONC.put_line('... ' || fnd_message.get);

1159: -- Insert into PA_TRANSACTION_INTERFACES table
1160: ----------------------------------------------------------------------
1161:
1162: fnd_message.set_name('PJM','CONC-APINV Insert');
1163: PJM_CONC.put_line('... ' || fnd_message.get);
1164:
1165: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1166: nvl(nvl(InvRec.Base_Charge_Amount,
1167: InvRec.Charge_Amount) , 0) <> 0 ) then

Line 1169: PJM_CONC.put_line('...... Charge amount not available, skipping...');

1165: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1166: nvl(nvl(InvRec.Base_Charge_Amount,
1167: InvRec.Charge_Amount) , 0) <> 0 ) then
1168:
1169: PJM_CONC.put_line('...... Charge amount not available, skipping...');
1170: -- Mark skipped record to 'G'
1171: UPDATE AP_Invoice_Distributions_all
1172: SET pa_addition_flag = 'G'
1173: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 1180: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');

1176: and Invoice_Distribution_Id = InvRec.Invoice_Distribution_Id);
1177:
1178: elsif ( l_Exp_Type is null) then
1179:
1180: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');
1181: -- Mark skipped record to 'G'
1182: UPDATE AP_Invoice_Distributions_all
1183: SET pa_addition_flag = 'G'
1184: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 1285: PJM_CONC.put_line('...... Processing Special Charge');

1281: select next_day( trunc(InvRec.Expenditure_Item_Date)-1, l_week_ending_day )
1282: into l_week_ending
1283: from dual;
1284:
1285: PJM_CONC.put_line('...... Processing Special Charge');
1286:
1287: -- Insert for all the charges
1288:
1289: INSERT INTO pa_transaction_interface_all

Line 1382: PJM_CONC.put_line('... ' || fnd_message.get);

1378: -- Update pa_addition_flag to 'Y' for successful invoice distributions
1379: ----------------------------------------------------------------------
1380:
1381: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1382: PJM_CONC.put_line('... ' || fnd_message.get);
1383: PJM_CONC.new_line(1);
1384:
1385: l_progress := 88;
1386:

Line 1383: PJM_CONC.new_line(1);

1379: ----------------------------------------------------------------------
1380:
1381: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1382: PJM_CONC.put_line('... ' || fnd_message.get);
1383: PJM_CONC.new_line(1);
1384:
1385: l_progress := 88;
1386:
1387: UPDATE AP_Invoice_Distributions_all

Line 1449: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);

1445: , PoRec.Destination_Type_Code
1446: , InvRec.Project_Id );
1447: END IF;
1448:
1449: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1450: PJM_CONC.put_line(' line_num .............. '||
1451: InvRec.Invoice_Distribution_Id);
1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

Line 1450: PJM_CONC.put_line(' line_num .............. '||

1446: , InvRec.Project_Id );
1447: END IF;
1448:
1449: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1450: PJM_CONC.put_line(' line_num .............. '||
1451: InvRec.Invoice_Distribution_Id);
1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1454: PJM_CONC.put_line(' expenditure_org_id .... '||

Line 1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);

1448:
1449: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1450: PJM_CONC.put_line(' line_num .............. '||
1451: InvRec.Invoice_Distribution_Id);
1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1454: PJM_CONC.put_line(' expenditure_org_id .... '||
1455: InvRec.Expenditure_Organization_ID);
1456:

Line 1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

1449: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1450: PJM_CONC.put_line(' line_num .............. '||
1451: InvRec.Invoice_Distribution_Id);
1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1454: PJM_CONC.put_line(' expenditure_org_id .... '||
1455: InvRec.Expenditure_Organization_ID);
1456:
1457: Timestamp;

Line 1454: PJM_CONC.put_line(' expenditure_org_id .... '||

1450: PJM_CONC.put_line(' line_num .............. '||
1451: InvRec.Invoice_Distribution_Id);
1452: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1453: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1454: PJM_CONC.put_line(' expenditure_org_id .... '||
1455: InvRec.Expenditure_Organization_ID);
1456:
1457: Timestamp;
1458:

Line 1474: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);

1470: ( invrec.line_type_lookup_code
1471: , invrec.project_id
1472: , invrec.expenditure_organization_id );
1473:
1474: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1475: PJM_CONC.put_line(' Charge amount ............ '||
1476: InvRec.charge_amount);
1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1478: PJM_CONC.put_line(' expenditure_comment ... '||

Line 1475: PJM_CONC.put_line(' Charge amount ............ '||

1471: , invrec.project_id
1472: , invrec.expenditure_organization_id );
1473:
1474: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1475: PJM_CONC.put_line(' Charge amount ............ '||
1476: InvRec.charge_amount);
1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1478: PJM_CONC.put_line(' expenditure_comment ... '||
1479: InvRec.Expenditure_Comment);

Line 1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);

1473:
1474: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1475: PJM_CONC.put_line(' Charge amount ............ '||
1476: InvRec.charge_amount);
1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1478: PJM_CONC.put_line(' expenditure_comment ... '||
1479: InvRec.Expenditure_Comment);
1480: PJM_CONC.new_line(1);
1481:

Line 1478: PJM_CONC.put_line(' expenditure_comment ... '||

1474: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1475: PJM_CONC.put_line(' Charge amount ............ '||
1476: InvRec.charge_amount);
1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1478: PJM_CONC.put_line(' expenditure_comment ... '||
1479: InvRec.Expenditure_Comment);
1480: PJM_CONC.new_line(1);
1481:
1482: ---------------------------------------------------------------------

Line 1480: PJM_CONC.new_line(1);

1476: InvRec.charge_amount);
1477: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1478: PJM_CONC.put_line(' expenditure_comment ... '||
1479: InvRec.Expenditure_Comment);
1480: PJM_CONC.new_line(1);
1481:
1482: ---------------------------------------------------------------------
1483: -- Set Expenditure Comment
1484: ---------------------------------------------------------------------

Line 1538: PJM_CONC.put_line('... ' || fnd_message.get);

1534: -- Insert into PA_TRANSACTION_INTERFACES table
1535: ----------------------------------------------------------------------
1536:
1537: fnd_message.set_name('PJM','CONC-APINV Insert');
1538: PJM_CONC.put_line('... ' || fnd_message.get);
1539:
1540: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1541: nvl(nvl(InvRec.Base_Charge_Amount,
1542: InvRec.Charge_Amount) , 0) <> 0 ) then

Line 1544: PJM_CONC.put_line('...... Charge amount not available, skipping...');

1540: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1541: nvl(nvl(InvRec.Base_Charge_Amount,
1542: InvRec.Charge_Amount) , 0) <> 0 ) then
1543:
1544: PJM_CONC.put_line('...... Charge amount not available, skipping...');
1545: -- Mark skipped record to 'G'
1546: UPDATE AP_Invoice_Distributions_all
1547: SET pa_addition_flag = 'G'
1548: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 1555: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');

1551: and Invoice_Distribution_Id = InvRec.Invoice_Distribution_Id);
1552:
1553: elsif ( l_Exp_Type is null) then
1554:
1555: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');
1556: -- Mark skipped record to 'G'
1557: UPDATE AP_Invoice_Distributions_all
1558: SET pa_addition_flag = 'G'
1559: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 1660: PJM_CONC.put_line('...... Processing IPV, ERV, Tax Variances');

1656: select next_day( trunc(InvRec.Expenditure_Item_Date)-1, l_week_ending_day )
1657: into l_week_ending
1658: from dual;
1659:
1660: PJM_CONC.put_line('...... Processing IPV, ERV, Tax Variances');
1661:
1662: -- Insert for Charges
1663: INSERT INTO pa_transaction_interface_all
1664: (transaction_source,

Line 1756: PJM_CONC.put_line('... ' || fnd_message.get);

1752: -- Update pa_addition_flag to 'Y' for successful invoice distributions
1753: ----------------------------------------------------------------------
1754:
1755: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1756: PJM_CONC.put_line('... ' || fnd_message.get);
1757: PJM_CONC.new_line(1);
1758:
1759: l_progress := 160;
1760:

Line 1757: PJM_CONC.new_line(1);

1753: ----------------------------------------------------------------------
1754:
1755: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
1756: PJM_CONC.put_line('... ' || fnd_message.get);
1757: PJM_CONC.new_line(1);
1758:
1759: l_progress := 160;
1760:
1761: UPDATE AP_Invoice_Distributions_all

Line 1813: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);

1809: , PoRec.Destination_Type_Code
1810: , InvRec.Project_Id );
1811: END IF;
1812:
1813: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1814: PJM_CONC.put_line(' line_num .............. '||
1815: InvRec.Invoice_Distribution_Id);
1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

Line 1814: PJM_CONC.put_line(' line_num .............. '||

1810: , InvRec.Project_Id );
1811: END IF;
1812:
1813: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1814: PJM_CONC.put_line(' line_num .............. '||
1815: InvRec.Invoice_Distribution_Id);
1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1818: PJM_CONC.put_line(' expenditure_org_id .... '||

Line 1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);

1812:
1813: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1814: PJM_CONC.put_line(' line_num .............. '||
1815: InvRec.Invoice_Distribution_Id);
1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1818: PJM_CONC.put_line(' expenditure_org_id .... '||
1819: InvRec.Expenditure_Organization_ID);
1820:

Line 1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);

1813: PJM_CONC.put_line(' invoice_id ............ '||InvRec.Invoice_Id);
1814: PJM_CONC.put_line(' line_num .............. '||
1815: InvRec.Invoice_Distribution_Id);
1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1818: PJM_CONC.put_line(' expenditure_org_id .... '||
1819: InvRec.Expenditure_Organization_ID);
1820:
1821: Timestamp;

Line 1818: PJM_CONC.put_line(' expenditure_org_id .... '||

1814: PJM_CONC.put_line(' line_num .............. '||
1815: InvRec.Invoice_Distribution_Id);
1816: PJM_CONC.put_line(' project_id ............ '||InvRec.Project_ID);
1817: PJM_CONC.put_line(' task_id ............... '||l_Task_Id);
1818: PJM_CONC.put_line(' expenditure_org_id .... '||
1819: InvRec.Expenditure_Organization_ID);
1820:
1821: Timestamp;
1822:

Line 1838: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);

1834: ( invrec.line_type_lookup_code
1835: , invrec.project_id
1836: , invrec.expenditure_organization_id );
1837:
1838: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1839: PJM_CONC.put_line(' Charge amount ............ '||
1840: InvRec.charge_amount);
1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1842: PJM_CONC.put_line(' expenditure_comment ... '||

Line 1839: PJM_CONC.put_line(' Charge amount ............ '||

1835: , invrec.project_id
1836: , invrec.expenditure_organization_id );
1837:
1838: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1839: PJM_CONC.put_line(' Charge amount ............ '||
1840: InvRec.charge_amount);
1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1842: PJM_CONC.put_line(' expenditure_comment ... '||
1843: InvRec.Expenditure_Comment);

Line 1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);

1837:
1838: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1839: PJM_CONC.put_line(' Charge amount ............ '||
1840: InvRec.charge_amount);
1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1842: PJM_CONC.put_line(' expenditure_comment ... '||
1843: InvRec.Expenditure_Comment);
1844: PJM_CONC.new_line(1);
1845:

Line 1842: PJM_CONC.put_line(' expenditure_comment ... '||

1838: PJM_CONC.put_line(' Invoice line type is .. '||invrec.line_type_lookup_code);
1839: PJM_CONC.put_line(' Charge amount ............ '||
1840: InvRec.charge_amount);
1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1842: PJM_CONC.put_line(' expenditure_comment ... '||
1843: InvRec.Expenditure_Comment);
1844: PJM_CONC.new_line(1);
1845:
1846: ---------------------------------------------------------------------

Line 1844: PJM_CONC.new_line(1);

1840: InvRec.charge_amount);
1841: PJM_CONC.put_line(' Charge expenditure_type .. '||l_exp_type);
1842: PJM_CONC.put_line(' expenditure_comment ... '||
1843: InvRec.Expenditure_Comment);
1844: PJM_CONC.new_line(1);
1845:
1846: ---------------------------------------------------------------------
1847: -- Set Expenditure Comment
1848: ---------------------------------------------------------------------

Line 1903: PJM_CONC.put_line('... ' || fnd_message.get);

1899: -- Insert into PA_TRANSACTION_INTERFACES table
1900: ----------------------------------------------------------------------
1901:
1902: fnd_message.set_name('PJM','CONC-APINV Insert');
1903: PJM_CONC.put_line('... ' || fnd_message.get);
1904:
1905: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1906: nvl(nvl(InvRec.Base_Charge_Amount,
1907: InvRec.Charge_Amount) , 0) <> 0 ) then

Line 1909: PJM_CONC.put_line('...... Charge amount not available, skipping...');

1905: if not ( InvRec.Dist_Code_Combination_Id is not null AND
1906: nvl(nvl(InvRec.Base_Charge_Amount,
1907: InvRec.Charge_Amount) , 0) <> 0 ) then
1908:
1909: PJM_CONC.put_line('...... Charge amount not available, skipping...');
1910: -- Mark skipped record to 'G'
1911: UPDATE AP_Invoice_Distributions_all
1912: SET pa_addition_flag = 'G'
1913: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 1920: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');

1916: and Invoice_Distribution_Id = InvRec.Invoice_Distribution_Id);
1917:
1918: elsif ( l_Exp_Type is null) then
1919:
1920: PJM_CONC.put_line('...... Inv Org not setup to transfer charges, skipping...');
1921: -- Mark skipped record to 'G'
1922: UPDATE AP_Invoice_Distributions_all
1923: SET pa_addition_flag = 'G'
1924: WHERE invoice_distribution_id = ( select nvl(related_id, charge_applicable_to_dist_id)

Line 2025: PJM_CONC.put_line('...... Processing Special Charges');

2021: select next_day( trunc(InvRec.Expenditure_Item_Date)-1, l_week_ending_day )
2022: into l_week_ending
2023: from dual;
2024:
2025: PJM_CONC.put_line('...... Processing Special Charges');
2026:
2027: -- Insert for Charges
2028: INSERT INTO pa_transaction_interface_all
2029: (transaction_source,

Line 2121: PJM_CONC.put_line('... ' || fnd_message.get);

2117: -- Update pa_addition_flag to 'Y' for successful invoice distributions
2118: ----------------------------------------------------------------------
2119:
2120: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
2121: PJM_CONC.put_line('... ' || fnd_message.get);
2122: PJM_CONC.new_line(1);
2123:
2124: l_progress := 168;
2125:

Line 2122: PJM_CONC.new_line(1);

2118: ----------------------------------------------------------------------
2119:
2120: fnd_message.set_name('PJM','CONC-APINV Flag Comp');
2121: PJM_CONC.put_line('... ' || fnd_message.get);
2122: PJM_CONC.new_line(1);
2123:
2124: l_progress := 168;
2125:
2126: UPDATE AP_Invoice_Distributions_all

Line 2150: PJM_CONC.put_line(fnd_message.get || ' ...');

2146: END IF; -- End of both with project specified or without conditions
2147:
2148: COMMIT;
2149: fnd_message.set_name('PJM','CONC-APINV Finish Loop');
2150: PJM_CONC.put_line(fnd_message.get || ' ...');
2151: PJM_CONC.new_line(1);
2152:
2153: Timestamp;
2154:

Line 2151: PJM_CONC.new_line(1);

2147:
2148: COMMIT;
2149: fnd_message.set_name('PJM','CONC-APINV Finish Loop');
2150: PJM_CONC.put_line(fnd_message.get || ' ...');
2151: PJM_CONC.new_line(1);
2152:
2153: Timestamp;
2154:
2155: l_progress := 169;

Line 2165: retcode := PJM_CONC.G_conc_success;

2161: l_transaction_source,
2162: l_Batch_Name);
2163: end if;
2164:
2165: retcode := PJM_CONC.G_conc_success;
2166: return;
2167:
2168:
2169: EXCEPTION

Line 2172: retcode := PJM_CONC.G_conc_failure;

2168:
2169: EXCEPTION
2170: when OTHERS then
2171: errbuf := 'IPV-'||l_progress||': '||sqlerrm;
2172: retcode := PJM_CONC.G_conc_failure;
2173: return;
2174:
2175: END Transfer_Charges_TO_PA;
2176: