DBA Data[Home] [Help]

APPS.JL_ZZ_AP_MONOTRIB_AWT_PKG dependencies on FND_FILE

Line 125: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE MONOTRIBUTA SUPPLIER LOOP : SUPPLIER NAME - ' ||c_supp_rec(i_supp).SUPPLIER_NAME);

121: v_threshold_met := 'N';
122: v_update_supp_appl := 'N';
123:
124: IF p_debug_log = 'Y' THEN
125: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE MONOTRIBUTA SUPPLIER LOOP : SUPPLIER NAME - ' ||c_supp_rec(i_supp).SUPPLIER_NAME);
126: END IF;
127:
128:
129: IF (c_supp_rec(i_supp).simplif_regime_cont_type = 'GOODS') THEN

Line 131: FND_FILE.put_line( FND_FILE.LOG, 'ERROR : THRESHOLD value for "GOODS" Contributor type is not defined for Date:'||P_REPORT_DATE);

127:
128:
129: IF (c_supp_rec(i_supp).simplif_regime_cont_type = 'GOODS') THEN
130: IF (p_goods_supp_thld = 0) THEN
131: FND_FILE.put_line( FND_FILE.LOG, 'ERROR : THRESHOLD value for "GOODS" Contributor type is not defined for Date:'||P_REPORT_DATE);
132: v_threshold_chk := 0;
133: ELSE
134: v_threshold_amt := p_goods_supp_thld;
135: END IF;

Line 138: FND_FILE.put_line( FND_FILE.LOG, 'ERROR : THRESHOLD value for "SERVICES" Contributor type is not defined for Date:'||P_REPORT_DATE);

134: v_threshold_amt := p_goods_supp_thld;
135: END IF;
136: ELSIF (c_supp_rec(i_supp).simplif_regime_cont_type = 'SERVICES') THEN
137: IF (p_service_supp_thld = 0) THEN
138: FND_FILE.put_line( FND_FILE.LOG, 'ERROR : THRESHOLD value for "SERVICES" Contributor type is not defined for Date:'||P_REPORT_DATE);
139: v_threshold_chk := 0;
140: ELSE
141: v_threshold_amt := p_service_supp_thld;
142: END IF;

Line 172: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE DERIVING TO_DATE and FROM_DATE '|| SQLCODE || 'ERROR ' || SQLERRM);

168: v_to_date := NULL;
169: v_from_date := NULL;
170:
171: IF (p_debug_log = 'Y') THEN
172: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE DERIVING TO_DATE and FROM_DATE '|| SQLCODE || 'ERROR ' || SQLERRM);
173: END IF;
174: END;
175:
176: -----------------------------------------------------------------------------------------------------------

Line 208: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE INVOICE LOOP : INVOICE ID '|| c_supp_inv(inv_rec).INVOICE_ID);

204:
205: FOR inv_rec IN 1..c_supp_inv.COUNT
206: LOOP --for loop of inv_rec
207: IF p_debug_log = 'Y' THEN
208: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE INVOICE LOOP : INVOICE ID '|| c_supp_inv(inv_rec).INVOICE_ID);
209: END IF;
210:
211:
212: ---- Logic to check if Running sum of Monotributa Supplier Invoices reached Threshold or not

Line 218: FND_FILE.put_line( FND_FILE.LOG, 'Invoice_amount without awt and tax : '|| c_supp_inv(inv_rec).INVOICE_AMT);

214: IF v_running_amount >= v_threshold_amt THEN
215: v_threshold_met := 'Y';
216: END IF;
217: IF p_debug_log = 'Y' THEN
218: FND_FILE.put_line( FND_FILE.LOG, 'Invoice_amount without awt and tax : '|| c_supp_inv(inv_rec).INVOICE_AMT);
219: FND_FILE.put_line( FND_FILE.LOG, 'Running sum : '|| v_running_amount);
220: END IF;
221: ---- Logic to derive Invoice Amount and Invoice amount excluding tax
222: BEGIN

Line 219: FND_FILE.put_line( FND_FILE.LOG, 'Running sum : '|| v_running_amount);

215: v_threshold_met := 'Y';
216: END IF;
217: IF p_debug_log = 'Y' THEN
218: FND_FILE.put_line( FND_FILE.LOG, 'Invoice_amount without awt and tax : '|| c_supp_inv(inv_rec).INVOICE_AMT);
219: FND_FILE.put_line( FND_FILE.LOG, 'Running sum : '|| v_running_amount);
220: END IF;
221: ---- Logic to derive Invoice Amount and Invoice amount excluding tax
222: BEGIN
223: SELECT DECODE(ai.invoice_currency_code,'ARS',ai.invoice_amount,ai.base_amount),

Line 238: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE FETCHING INVOICE AMT '|| SQLCODE || 'ERROR ' || SQLERRM);

234: GROUP BY DECODE(ai.invoice_currency_code,'ARS',ai.invoice_amount,ai.base_amount);
235:
236: EXCEPTION
237: WHEN OTHERS THEN
238: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE FETCHING INVOICE AMT '|| SQLCODE || 'ERROR ' || SQLERRM);
239: END;
240: v_inv_amt_without_tax := v_inv_amt - v_inv_tax_amt;
241: /*---------------------------------------------------------------------------------------------------------
242: ----Logic for inserting Date into TEMP table

Line 317: FND_FILE.put_line( FND_FILE.LOG, 'INVOICE APPLICABILITY UPDATED SUCCESSFULLY FOR INVOICE ID : '|| c_supp_inv(inv_rec).invoice_id);

313: IF c_supp_inv(inv_rec).invoice_status = 'N' THEN
314: --call of procedure to update the invoice withholding distribution
315: Update_Monotrib_Inv_Distrib_Wh(c_supp_inv(inv_rec).invoice_id, c_supp_rec(i_supp).SUPPLIER_ID);
316: IF p_debug_log = 'Y' THEN
317: FND_FILE.put_line( FND_FILE.LOG, 'INVOICE APPLICABILITY UPDATED SUCCESSFULLY FOR INVOICE ID : '|| c_supp_inv(inv_rec).invoice_id);
318: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
319: END IF;
320: v_supp_monotrib_status := 'Y';
321: v_supp_update_status := 'Y';

Line 318: FND_FILE.put_line( FND_FILE.LOG, '*******************************');

314: --call of procedure to update the invoice withholding distribution
315: Update_Monotrib_Inv_Distrib_Wh(c_supp_inv(inv_rec).invoice_id, c_supp_rec(i_supp).SUPPLIER_ID);
316: IF p_debug_log = 'Y' THEN
317: FND_FILE.put_line( FND_FILE.LOG, 'INVOICE APPLICABILITY UPDATED SUCCESSFULLY FOR INVOICE ID : '|| c_supp_inv(inv_rec).invoice_id);
318: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
319: END IF;
320: v_supp_monotrib_status := 'Y';
321: v_supp_update_status := 'Y';
322: Insert_temp_data( c_supp_rec(i_supp).SUPPLIER_NAME,

Line 339: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED: Scenario where no unpaid Invoice Existed ');

335: v_inv_amt_without_tax,
336: v_threshold_Met );
337: ELSE --BUG 9792829
338: IF p_debug_log = 'Y' THEN
339: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED: Scenario where no unpaid Invoice Existed ');
340: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
341: END IF;
342: v_supp_monotrib_status := 'Y';
343: v_supp_update_status := 'Y';

Line 340: FND_FILE.put_line( FND_FILE.LOG, '*******************************');

336: v_threshold_Met );
337: ELSE --BUG 9792829
338: IF p_debug_log = 'Y' THEN
339: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED: Scenario where no unpaid Invoice Existed ');
340: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
341: END IF;
342: v_supp_monotrib_status := 'Y';
343: v_supp_update_status := 'Y';
344: Insert_temp_data( c_supp_rec(i_supp).SUPPLIER_NAME,

Line 390: FND_FILE.put_line( FND_FILE.LOG,'Supplier is already subjected to Simplified Regime Special Tax');

386: END LOOP; -- end of invoice cursor "Monotrib_Supp_Inv"
387: CLOSE monotrib_supp_inv;
388: ---- If the Supplier is already subjected to Special Withholding Tax
389: ELSE -- if v_flag <> 0
390: FND_FILE.put_line( FND_FILE.LOG,'Supplier is already subjected to Simplified Regime Special Tax');
391: v_supp_monotrib_status := 'Y';
392: Insert_temp_data(c_supp_rec(i_supp).SUPPLIER_NAME,
393: c_supp_rec(i_supp).SUPPLIER_ID,
394: c_supp_rec(i_supp).TAXPAYER_ID,

Line 412: FND_FILE.put_line( FND_FILE.LOG,'Returning TRUE');

408: END IF; -- end of v_flag check
409:
410: END LOOP; --supplier loop end
411: RETURN (TRUE);
412: FND_FILE.put_line( FND_FILE.LOG,'Returning TRUE');
413: EXCEPTION
414: WHEN OTHERS THEN
415: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED IN BEFORE REPORT FUNCTION '|| SQLCODE || 'ERROR ' || SQLERRM);
416: RETURN (FALSE);

Line 415: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED IN BEFORE REPORT FUNCTION '|| SQLCODE || 'ERROR ' || SQLERRM);

411: RETURN (TRUE);
412: FND_FILE.put_line( FND_FILE.LOG,'Returning TRUE');
413: EXCEPTION
414: WHEN OTHERS THEN
415: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED IN BEFORE REPORT FUNCTION '|| SQLCODE || 'ERROR ' || SQLERRM);
416: RETURN (FALSE);
417: END BeforeReport;
418:
419: -------------------------------------------------------------

Line 482: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE INSERTING INTO TEMP TABLE '|| SQLCODE || 'ERROR ' || SQLERRM);

478: P_threshold_Met);
479:
480: EXCEPTION
481: WHEN OTHERS THEN
482: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE INSERTING INTO TEMP TABLE '|| SQLCODE || 'ERROR ' || SQLERRM);
483: RAISE;
484: END Insert_temp_data;
485:
486: -----------------------------------------------------------------------------------------------------------------

Line 520: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE SUPPLIER APPLICABILITY UPDATE ROUTINE FOR SUPPLIER ID : '|| P_Supplier_Id);

516: fnd_profile.get('ORG_ID',v_Org_Id);
517: Applicability_Chngd_flag := 'N';
518:
519: IF p_debug_log = 'Y' THEN
520: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE SUPPLIER APPLICABILITY UPDATE ROUTINE FOR SUPPLIER ID : '|| P_Supplier_Id);
521: END IF;
522:
523: FOR c_rec IN awt_types LOOP
524: SELECT tax_id, name

Line 597: FND_FILE.put_line( FND_FILE.LOG, '*******************************');

593: v_org_id
594: );
595: Applicability_Chngd_flag := 'Y';
596: IF p_debug_log = 'Y' THEN
597: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
598: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);
599: END IF;
600:
601: ELSE

Line 598: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);

594: );
595: Applicability_Chngd_flag := 'Y';
596: IF p_debug_log = 'Y' THEN
597: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
598: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);
599: END IF;
600:
601: ELSE
602: UPDATE JL_ZZ_AP_SUPP_AWT_TYPES SET WH_SUBJECT_FLAG = 'Y'

Line 654: FND_FILE.put_line( FND_FILE.LOG, '*******************************');

650: );
651: END IF;
652: Applicability_Chngd_flag := 'Y';
653: IF p_debug_log = 'Y' THEN
654: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
655: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);
656: END IF;
657: END IF;
658:

Line 655: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);

651: END IF;
652: Applicability_Chngd_flag := 'Y';
653: IF p_debug_log = 'Y' THEN
654: FND_FILE.put_line( FND_FILE.LOG, '*******************************');
655: FND_FILE.put_line( FND_FILE.LOG, 'SUPPLIER APPLICABILITY UPDATED SUCCESSFULLY FOR SUPPLIER ID : '|| P_Supplier_Id);
656: END IF;
657: END IF;
658:
659: END LOOP;

Line 664: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING SUPPLIER APPLICABILITY '|| SQLCODE || 'ERROR ' || SQLERRM);

660:
661: EXCEPTION
662: WHEN OTHERS THEN
663: Applicability_Chngd_flag := 'N';
664: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING SUPPLIER APPLICABILITY '|| SQLCODE || 'ERROR ' || SQLERRM);
665: RAISE;
666: END Update_Supplier_Applicability;
667:
668:

Line 687: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE MONOTRIBUTO UNPAID INVOICE UPDATE PROCEDURE : '|| p_vendor_id ||'-'|| p_invoice_id);

683:
684: BEGIN
685:
686: IF p_debug_log = 'Y' THEN
687: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE MONOTRIBUTO UNPAID INVOICE UPDATE PROCEDURE : '|| p_vendor_id ||'-'|| p_invoice_id);
688: END IF;
689:
690: FOR db_reg IN Invoice_Distrib LOOP
691: -------------------------------------------------------------------

Line 718: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING INVOICE DISTRIBUTION FOR AWT '|| SQLCODE || 'ERROR ' || SQLERRM);

714: END LOOP;
715:
716: EXCEPTION
717: WHEN OTHERS THEN
718: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING INVOICE DISTRIBUTION FOR AWT '|| SQLCODE || 'ERROR ' || SQLERRM);
719: RAISE;
720: END Update_Monotrib_Inv_Distrib_Wh;
721:
722:

Line 770: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE : '|| p_vendor_id ||'-'|| p_invoice_id);

766:
767:
768: BEGIN
769: IF p_debug_log = 'Y' THEN
770: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE : '|| p_vendor_id ||'-'|| p_invoice_id);
771: END IF;
772:
773:
774: ------------------------------------------------------------------------------------------

Line 778: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Inside Loop db_reg');

774: ------------------------------------------------------------------------------------------
775: -- Loop for each Supplier Withholding Type
776: ------------------------------------------------------------------------------------------
777: FOR db_reg IN Supp_Wh_Types(p_vendor_id) LOOP
778: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Inside Loop db_reg');
779: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" AWT Code '||db_reg.awt_type_code);
780: ---------------------------------------------------------------------------------
781: -- The cursor verify the Supplier Withholding Applicability
782: -- Each Supp Withholding Type in the Cursor needs to be check.

Line 779: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" AWT Code '||db_reg.awt_type_code);

775: -- Loop for each Supplier Withholding Type
776: ------------------------------------------------------------------------------------------
777: FOR db_reg IN Supp_Wh_Types(p_vendor_id) LOOP
778: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Inside Loop db_reg');
779: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" AWT Code '||db_reg.awt_type_code);
780: ---------------------------------------------------------------------------------
781: -- The cursor verify the Supplier Withholding Applicability
782: -- Each Supp Withholding Type in the Cursor needs to be check.
783: -- Company Agent says if the company have to withhold by this Withholding Type.

Line 786: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Company validation success');

782: -- Each Supp Withholding Type in the Cursor needs to be check.
783: -- Company Agent says if the company have to withhold by this Withholding Type.
784: ---------------------------------------------------------------------------------
785: IF ( JL_ZZ_AP_AWT_DEFAULT_PKG.Company_Agent(db_reg.awt_type_code,p_Invoice_Id)) THEN
786: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Company validation success');
787: ----------------------------------------------------------------------------
788: -- Validate the withholding type is according to distribution line.
789: ----------------------------------------------------------------------------
790: IF JL_ZZ_AP_AWT_DEFAULT_PKG.Validate_Line_Type(p_line_type, db_reg.tax_id) THEN

Line 791: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - LineType Validation Success');

787: ----------------------------------------------------------------------------
788: -- Validate the withholding type is according to distribution line.
789: ----------------------------------------------------------------------------
790: IF JL_ZZ_AP_AWT_DEFAULT_PKG.Validate_Line_Type(p_line_type, db_reg.tax_id) THEN
791: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - LineType Validation Success');
792: -----------------------------------------------------------------------
793: -- Get the information from Zone, Province and City
794: -----------------------------------------------------------------------
795: JL_ZZ_AP_AWT_DEFAULT_PKG.Province_Zone_City

Line 803: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Jurisdiction Type '||db_reg.jurisdiction_type);

799: ,v_hr_city ); -- OUT NOCOPY
800: -----------------------------------------------------------------------
801: -- Validate the Jurisdiction
802: -----------------------------------------------------------------------
803: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - Jurisdiction Type '||db_reg.jurisdiction_type);
804: IF ( db_reg.jurisdiction_type = 'PROVINCIAL') THEN
805: --------------------------------------------------------------------
806: -- Verify if the Withholding Tax for the Province is TERRITORY
807: --------------------------------------------------------------------

Line 809: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - WTax is TERRITORY');

805: --------------------------------------------------------------------
806: -- Verify if the Withholding Tax for the Province is TERRITORY
807: --------------------------------------------------------------------
808: IF JL_ZZ_AP_AWT_DEFAULT_PKG.Ver_Territorial_Flag (db_reg.province_code) THEN
809: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - WTax is TERRITORY');
810: -----------------------------------------------------------------
811: -- Validate if the Ship to Location from Inv Dis Line is in the province.
812: -----------------------------------------------------------------
813: IF db_reg.province_code = v_hr_province THEN

Line 814: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - PROVINCIAL Before Insert');

810: -----------------------------------------------------------------
811: -- Validate if the Ship to Location from Inv Dis Line is in the province.
812: -----------------------------------------------------------------
813: IF db_reg.province_code = v_hr_province THEN
814: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - PROVINCIAL Before Insert');
815: JL_ZZ_AP_AWT_DEFAULT_PKG.Insert_AWT_Default
816: (p_Invoice_Id
817: , p_inv_dist_id
818: , db_reg. supp_awt_code_id

Line 824: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - WTax is NOT TERRITORY');

820: , db_reg.org_id );
821:
822: END IF;
823: ELSE -- v_territorial_flag = 'N' is Country Wide
824: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - WTax is NOT TERRITORY');
825: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - PROVINCIAL Before Insert');
826: JL_ZZ_AP_AWT_DEFAULT_PKG.Insert_AWT_Default
827: (p_Invoice_Id
828: , p_inv_dist_id

Line 825: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - PROVINCIAL Before Insert');

821:
822: END IF;
823: ELSE -- v_territorial_flag = 'N' is Country Wide
824: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - WTax is NOT TERRITORY');
825: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - PROVINCIAL Before Insert');
826: JL_ZZ_AP_AWT_DEFAULT_PKG.Insert_AWT_Default
827: (p_Invoice_Id
828: , p_inv_dist_id
829: , db_reg. supp_awt_code_id

Line 839: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - ZONAL Before Insert');

835: ---------------------------------------------------------------
836: -- The name of the zone is taken from AP_TAX_CODES Global Att 7
837: ---------------------------------------------------------------
838: IF db_reg.global_attribute7 = v_hr_zone THEN
839: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - ZONAL Before Insert');
840: JL_ZZ_AP_AWT_DEFAULT_PKG.Insert_AWT_Default
841: (p_Invoice_Id
842: , p_inv_dist_id
843: , db_reg. supp_awt_code_id

Line 854: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - MUNICIPAL Before Insert');

850: ---------------------------------------------------------------
851: -- Compare the Withholding Type City with the city in the line
852: ---------------------------------------------------------------
853: IF db_reg.city_code = v_hr_city THEN
854: FND_FILE.put_line( FND_FILE.LOG, 'INSIDE "Monotrib_Wh_Def_Line" PROCEDURE - MUNICIPAL Before Insert');
855: JL_ZZ_AP_AWT_DEFAULT_PKG.Insert_AWT_Default
856: (p_Invoice_Id
857: , p_inv_dist_id
858: , db_reg. supp_awt_code_id

Line 879: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING INVOICE DISTRIBUTION FOR AWT 1 '|| SQLCODE || 'ERROR ' || SQLERRM);

875: END IF;--withholding applicability
876: END LOOP; -- Loop for each Supplier Withholding Type
877: EXCEPTION
878: WHEN OTHERS THEN
879: FND_FILE.put_line( FND_FILE.LOG,'AN ERROR IS ENCOUNTERED WHILE CHANGING INVOICE DISTRIBUTION FOR AWT 1 '|| SQLCODE || 'ERROR ' || SQLERRM);
880: RAISE;
881: END Monotrib_Wh_Def_Line;
882:
883: FUNCTION AfterReport