[Home] [Help]
288: close c_get_context;
289: --End bug#8232976
290: lv_projects_flag := is_this_projects_context(lv_invoice_context);
291: if lv_called_from = gv_projects_invoices
292: and lv_projects_flag = jai_constants.no
293: then
294: -- no need to process this customer trx
295: goto continue_with_next;
296:
294: -- no need to process this customer trx
295: goto continue_with_next;
296:
297: elsif lv_called_from <> gv_projects_invoices
298: and lv_projects_flag = jai_constants.yes
299: then
300: -- no need to process this customer trx
301: goto continue_with_next;
302: end if;
367: , xv_process_flag => lv_process_status
368: , xv_process_message => lv_process_message);
369: END IF;
370:
371: IF lv_process_status <> jai_constants.successful
372: THEN
373: RAISE error_from_called_unit;
374: END IF; -- lv_process_status <> 'SS'
375: -----------------------------------------------------------------------
474: SELECT cust_trx_line_gl_dist_id
475: FROM ra_cust_trx_line_gl_dist_all
476: WHERE customer_trx_id = cp_customer_trx_id
477: AND account_class = lv_account_class_rec --'REC'
478: AND latest_rec_flag = jai_constants.yes; --'Y';
479:
480: /* Ramananda for bug#5219225. */
481: lv_object_name user_procedures.object_name%type ;
482: lv_procedure_name user_procedures.procedure_name%type ;
483: ln_exists NUMBER := 0 ;
484: lv_sqlstmt VARCHAR2(2000) ;
485:
486: BEGIN
487: p_process_status := jai_constants.successful;
488: p_process_message := NULL;
489:
490: --get the cust_trx_line_gl_dist_id for the REC row from ra_cust_trx_line_gl_dist_all
491: open cur_gl_dist(p_customer_trx_id);
577: /* Ramananda for bug#5219225. END */
578:
579: EXCEPTION
580: WHEN OTHERS THEN
581: p_process_status := jai_constants.unexpected_error;
582: p_process_message := SUBSTR(SQLERRM,1,300);
583: END maintain_mrc;
584: --=========================================================================================--
585: --This procedure maintains the history of ar_receivable_applications_all in jai_ar_rec_appl_audits
605: ld_last_update_date jai_ar_payment_audits.last_update_date%TYPE;
606: ln_last_update_login jai_ar_payment_audits.last_update_login%TYPE;
607:
608: BEGIN
609: p_process_status := jai_constants.successful;
610: p_process_message := NULL;
611:
612: --set the values for WHO columns
613: ln_last_updated_by := TO_NUMBER(fnd_profile.value('USER_ID'));
689:
690: END IF;
691: EXCEPTION
692: WHEN OTHERS THEN
693: p_process_status := jai_constants.unexpected_error;
694: p_process_message := SUBSTR(SQLERRM,1,300);
695: END maintain_applications;
696:
697: --=========================================================================================--
723: ln_last_updated_by jai_ar_payment_audits.last_updated_by%TYPE;
724: ld_last_update_date jai_ar_payment_audits.last_update_date%TYPE;
725: ln_last_update_login jai_ar_payment_audits.last_update_login%TYPE;
726: BEGIN
727: p_process_status := jai_constants.successful;
728: p_process_message := NULL;
729:
730: --set the values for WHO columns
731: ln_last_updated_by := TO_NUMBER(fnd_profile.value('USER_ID'));
842:
843: END IF;
844: EXCEPTION
845: WHEN OTHERS THEN
846: p_process_status := jai_constants.unexpected_error;
847: p_process_message := SUBSTR(SQLERRM,1,300);
848: END maintain_schedules;
849:
850: PROCEDURE insert_trx_line_gl_dist(p_account_class IN ra_cust_trx_line_gl_dist_all.account_class%TYPE,
890: lv_sqlstmt VARCHAR2(2000);
891:
892: ln_cust_trx_line_gl_dist_id ra_cust_trx_line_gl_dist_all.cust_trx_line_gl_dist_id%TYPE;
893: BEGIN
894: p_process_status := jai_constants.successful;
895: p_process_message := NULL;
896:
897: --get the value for cust_trx_line_gl_dist_id
898: OPEN cur_gl_seq;
964: /* Ramananda for bug#5219225. END */
965:
966: EXCEPTION
967: WHEN OTHERS THEN
968: p_process_status := jai_constants.unexpected_error;
969: p_process_message := SUBSTR(SQLERRM,1,300);
970: END insert_trx_line_gl_dist;
971: PROCEDURE insert_trx_lines(p_extended_amount IN ra_customer_trx_lines_all.extended_amount%TYPE,
972: p_taxable_amount IN ra_customer_trx_lines_all.taxable_amount%TYPE,
991: p_process_status OUT NOCOPY VARCHAR2,
992: p_process_message OUT NOCOPY VARCHAR2)
993: IS
994: BEGIN
995: p_process_status := jai_constants.successful;
996: p_process_message := NULL;
997:
998: INSERT INTO RA_CUSTOMER_TRX_LINES_ALL ( extended_amount,
999: taxable_amount,
1036: p_interface_line_attribute6,
1037: p_interface_line_attribute3);
1038: EXCEPTION
1039: WHEN OTHERS THEN
1040: p_process_status := jai_constants.unexpected_error;
1041: p_process_message := SUBSTR(SQLERRM,1,300);
1042: END insert_trx_lines;
1043:
1044:
1086: WHERE object_name = cp_object_name
1087: AND procedure_name = cp_procedure_name ;
1088:
1089: BEGIN
1090: p_process_status := jai_constants.successful;
1091: p_process_message := NULL;
1092:
1093: /* Ramananda for bug#5219225. START */
1094: lv_object_name := 'AR_MRC_ENGINE' ;
1146: AND line_type IN ('TAX','FREIGHT');
1147:
1148: EXCEPTION
1149: WHEN OTHERS THEN
1150: p_process_status := jai_constants.unexpected_error;
1151: p_process_message := SUBSTR(SQLERRM,1,300);
1152: END delete_trx_data;
1153:
1154:
1532: IF p_debug = 'Y' THEN
1533: fnd_file.put_line(FND_FILE.LOG, 'Before pre_validation');
1534: END IF;
1535:
1536: IF lv_process_status <> jai_constants.successful THEN
1537: p_process_status := lv_process_status;
1538: p_process_message := lv_process_message;
1539: goto EXIT_POINT;
1540: END IF;
1576: IF p_debug = 'Y' THEN
1577: fnd_file.put_line(FND_FILE.LOG, 'After delete_trx_data');
1578: END IF;
1579:
1580: IF lv_process_status <> jai_constants.successful THEN
1581: p_process_status := lv_process_status;
1582: p_process_message := lv_process_message;
1583: goto EXIT_POINT;
1584: END IF;
1700: IF p_debug = 'Y' THEN
1701: fnd_file.put_line(FND_FILE.LOG, 'In loop cur_temp_lines_insert - after insert_trx_lines');
1702: END IF;
1703:
1704: IF lv_process_status <> jai_constants.successful THEN
1705: p_process_status := lv_process_status;
1706: p_process_message := lv_process_message;
1707: goto EXIT_POINT;
1708: END IF;
1758: END IF;
1759:
1760:
1761:
1762: IF lv_process_status <> jai_constants.successful THEN
1763: p_process_status := lv_process_status;
1764: p_process_message := lv_process_message;
1765: goto EXIT_POINT;
1766: END IF;
1809: WHERE customer_trx_id = p_customer_trx_id
1810: AND account_class = lv_account_class_rec --'REC'
1811: AND latest_rec_flag = 'Y';
1812:
1813: IF lv_process_status <> jai_constants.successful THEN
1814:
1815: p_process_status := lv_process_status;
1816: p_process_message := lv_process_message;
1817: goto EXIT_POINT;
1856: p_payment_audit_id => ln_payment_audit_id,
1857: p_process_status => lv_process_status,
1858: p_process_message => lv_process_message);
1859:
1860: IF lv_process_status <> jai_constants.successful THEN
1861: p_process_status := lv_process_status;
1862: p_process_message := lv_process_message;
1863: goto EXIT_POINT;
1864: END IF;
1886: p_payment_audit_id => ln_payment_audit_id,
1887: p_process_status => lv_process_status,
1888: p_process_message => lv_process_message);
1889:
1890: IF lv_process_status <> jai_constants.successful THEN
1891: p_process_status := lv_process_status;
1892: p_process_message := lv_process_message;
1893: goto EXIT_POINT;
1894: END IF;
2016: p_payment_audit_id => ln_payment_audit_id,
2017: p_process_status => lv_process_status,
2018: p_process_message => lv_process_message);
2019:
2020: IF lv_process_status <> jai_constants.successful THEN
2021: p_process_status := lv_process_status;
2022: p_process_message := lv_process_message;
2023: goto EXIT_POINT;
2024: END IF;
2065: p_payment_audit_id => ln_payment_audit_id,
2066: p_process_status => lv_process_status,
2067: p_process_message => lv_process_message);
2068:
2069: IF lv_process_status <> jai_constants.successful THEN
2070: p_process_status := lv_process_status;
2071: p_process_message := lv_process_message;
2072: goto EXIT_POINT;
2073: END IF;
2094: p_rec_appl_audit_id => ln_rec_appl_audit_id,
2095: p_process_status => lv_process_status,
2096: p_process_message => lv_process_message);
2097:
2098: IF lv_process_status <> jai_constants.successful THEN
2099: p_process_status := lv_process_status;
2100: p_process_message := lv_process_message;
2101: goto EXIT_POINT;
2102: END IF;
2142: p_rec_appl_audit_id => ln_rec_appl_audit_id,
2143: p_process_status => lv_process_status,
2144: p_process_message => lv_process_message);
2145:
2146: IF lv_process_status <> jai_constants.successful THEN
2147: p_process_status := lv_process_status;
2148: p_process_message := lv_process_message;
2149: goto EXIT_POINT;
2150: END IF;
2158: END IF;
2159:
2160: ELSE --over_application condition
2161: p_process_message := 'CM : Allow Over application on invoice is not allowed , hence not processing the taxes on the credit memo';
2162: p_process_status := jai_constants.expected_error;
2163:
2164: goto EXIT_POINT;
2165:
2166: END IF ;
2217: p_payment_audit_id => ln_payment_audit_id,
2218: p_process_status => lv_process_status,
2219: p_process_message => lv_process_message);
2220:
2221: IF lv_process_status <> jai_constants.successful THEN
2222: p_process_status := lv_process_status;
2223: p_process_message := lv_process_message;
2224: goto EXIT_POINT;
2225: END IF;
2270: p_process_message => lv_process_message);
2271:
2272: fnd_file.put_line(FND_FILE.LOG, 'Out ln_payment_audit_id '||ln_payment_audit_id);
2273:
2274: IF lv_process_status <> jai_constants.successful THEN
2275: p_process_status := lv_process_status;
2276: p_process_message := lv_process_message;
2277: goto EXIT_POINT;
2278: END IF;
2295: p_called_from => 7/13/2007,
2296: p_process_status => lv_process_status,
2297: p_process_message => lv_process_message);
2298:
2299: IF lv_process_status <> jai_constants.successful THEN
2300: p_process_status := lv_process_status;
2301: p_process_message := lv_process_message;
2302: goto EXIT_POINT;
2303: END IF;
2308: EXCEPTION
2309: WHEN resource_busy THEN
2310: fnd_file.put_line(FND_FILE.LOG,'Resource Busy,record '||p_customer_trx_id||' has been locked by another resource');
2311: p_process_message:= ' Resource Busy,record '||p_customer_trx_id||' has been locked by another resource ';
2312: p_process_status := jai_constants.unexpected_error;
2313:
2314: WHEN LOCALIZATION_TAX_NOT_DEFINED THEN
2315: fnd_file.put_line(FND_FILE.LOG,' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ');
2316: p_process_message:= ' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ';
2313:
2314: WHEN LOCALIZATION_TAX_NOT_DEFINED THEN
2315: fnd_file.put_line(FND_FILE.LOG,' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ');
2316: p_process_message:= ' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ';
2317: p_process_status := jai_constants.expected_error;
2318:
2319: WHEN ROUNDING_ACCOUNT_NOT_DEFINED THEN
2320: fnd_file.put_line(FND_FILE.LOG, lv_process_message );
2321: p_process_message := lv_process_message;
2322: p_process_status := lv_process_status;
2323:
2324: WHEN OTHERS THEN
2325: fnd_file.put_line(FND_FILE.LOG,sqlerrm);
2326: p_process_status := jai_constants.unexpected_error;
2327: p_process_message :=SUBSTR(SQLERRM,1,120);
2328:
2329: UPDATE JAI_AR_TRX_INS_LINES_T
2330: SET error_flag = 'R',
2482: WHERE TO_CHAR(RMA_NUMBER) IN (SELECT INTERFACE_HEADER_ATTRIBUTE1 FROM RA_CUSTOMER_TRX_ALL
2483: WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID)
2484: AND Rma_line_id in ( Select RMA_LINE_ID from JAI_OM_OE_RMA_TAXES a,JAI_CMN_TAXES_ALL b
2485: Where a.tax_id = b.tax_id
2486: AND b.tax_type = jai_constants.tax_type_freight );
2487:
2488: --added 12-Mar-2002
2489: CURSOR tax_type IS SELECT b.tax_type t_type,a.customer_trx_line_id line_id
2490: FROM JAI_AR_TRX_TAX_LINES A , JAI_CMN_TAXES_ALL B
2691: DELETE JAI_AR_TRX_INS_LINES_T
2692: WHERE customer_trx_id = P_CUSTOMER_TRX_ID
2693: and link_to_cust_trx_line_id = P_LINK_LINE_ID
2694: and customer_trx_line_id = tax_type_rec.line_id
2695: and tax_type_rec.t_type <> jai_constants.tax_type_freight;
2696: v_sql_num :=8;
2697: v_sql_count := SQL%ROWCOUNT;
2698: END IF;
2699: END LOOP;
3311: -- following function added for bug#6012570 (5876390) --> revoked the comments, 6012570
3312: function is_this_projects_context(pv_context in varchar2) return varchar2 is
3313: begin
3314: if jai_ar_rctla_trigger_pkg.is_this_projects_context(pv_context) then
3315: return jai_constants.yes;
3316: else
3317: return jai_constants.no;
3318: end if;
3319: end is_this_projects_context;
3313: begin
3314: if jai_ar_rctla_trigger_pkg.is_this_projects_context(pv_context) then
3315: return jai_constants.yes;
3316: else
3317: return jai_constants.no;
3318: end if;
3319: end is_this_projects_context;
3320: -- End commented by kunkumar for bug#6066813*/, revoked the comments, 6012570
3321:
3398: FROM
3399: jai_rgm_definitions rgm_def
3400: , jai_rgm_registrations tax_rgm
3401: , jai_rgm_registrations acc_rgm
3402: WHERE regime_code IN (jai_constants.service_regime,jai_constants.vat_regime)
3403: AND tax_rgm.regime_id = rgm_def.regime_id
3404: AND tax_rgm.registration_type = jai_constants.regn_type_tax_types
3405: AND tax_rgm.attribute_code = pv_tax_type
3406: AND tax_rgm.regime_id = acc_rgm.regime_id
3400: , jai_rgm_registrations tax_rgm
3401: , jai_rgm_registrations acc_rgm
3402: WHERE regime_code IN (jai_constants.service_regime,jai_constants.vat_regime)
3403: AND tax_rgm.regime_id = rgm_def.regime_id
3404: AND tax_rgm.registration_type = jai_constants.regn_type_tax_types
3405: AND tax_rgm.attribute_code = pv_tax_type
3406: AND tax_rgm.regime_id = acc_rgm.regime_id
3407: AND acc_rgm.registration_type = jai_constants.regn_type_accounts
3408: AND acc_rgm.attribute_code = jai_constants.recovery_interim
3403: AND tax_rgm.regime_id = rgm_def.regime_id
3404: AND tax_rgm.registration_type = jai_constants.regn_type_tax_types
3405: AND tax_rgm.attribute_code = pv_tax_type
3406: AND tax_rgm.regime_id = acc_rgm.regime_id
3407: AND acc_rgm.registration_type = jai_constants.regn_type_accounts
3408: AND acc_rgm.attribute_code = jai_constants.recovery_interim
3409: AND acc_rgm.parent_registration_id = tax_rgm.registration_id;
3410:
3411: ln_tax_acc_id := ln_tax_rgm_acc_id;
3404: AND tax_rgm.registration_type = jai_constants.regn_type_tax_types
3405: AND tax_rgm.attribute_code = pv_tax_type
3406: AND tax_rgm.regime_id = acc_rgm.regime_id
3407: AND acc_rgm.registration_type = jai_constants.regn_type_accounts
3408: AND acc_rgm.attribute_code = jai_constants.recovery_interim
3409: AND acc_rgm.parent_registration_id = tax_rgm.registration_id;
3410:
3411: ln_tax_acc_id := ln_tax_rgm_acc_id;
3412: EXCEPTION