[Home] [Help]
172:
173:
174: v_log_file_name VARCHAR2(50) := 'jai_ap_ida_t3.log';
175: v_utl_location VARCHAR2(512);
176: v_myfilehandle UTL_FILE.FILE_TYPE;
177: v_debug CHAR(1) := 'N';
178:
179: lv_rcpt_tax_exists VARCHAR2(1) := NULL; --Added for Bug #12886913
180: lv_po_tax_exists VARCHAR2(1) := NULL; --Added for Bug #12886913
231: 10. 08-apr-2003 Aparajita for bug#2851123. Version#615.4
232: The request JAINDIST was submitted wrongly. The seventh parameter in the submit request has to be the po distributions id. It was being passed as transactions id in receipt matching cases.
233:
234: 11. 11-sep-2003 Vijay Shankar for bug#3138227. Version#616.1
235: The utl file related code is failing which is stopping the transaction to continue. If the utl file
236: opening fails, then v_debug has to be made 'N' so that the transaction goes on without any error
237:
238: 12 29-Nov-2004 Sanjikum for 4035297. Version 115.1
239: Changed the 'INR' check. Added the call to JA_IN_UTIL.CHECK_JAI_EXISTS
334: lv_name VARCHAR2 (10);
335: BEGIN
336: pv_return_code := jai_constants.successful ;
337: -- Modified by Brathod for SQL Literals
338: lv_name := 'utl_file_dir';
339: SELECT DECODE(SUBSTR (value,1,INSTR(value,',') -1),NULL,
340: Value,SUBSTR (value,1,INSTR(value,',') -1)) INTO v_utl_location
341: FROM v$parameter
342: WHERE name = lv_name;
340: Value,SUBSTR (value,1,INSTR(value,',') -1)) INTO v_utl_location
341: FROM v$parameter
342: WHERE name = lv_name;
343:
344: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location, v_log_file_name ,'A');
345: UTL_FILE.PUT_LINE(v_myfilehandle, '********* Start TdsTemp_AfterInsert_Trg ('||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS') ||') *********');
346:
347: EXCEPTION
348: WHEN OTHERS THEN
341: FROM v$parameter
342: WHERE name = lv_name;
343:
344: v_myfilehandle := UTL_FILE.FOPEN(v_utl_location, v_log_file_name ,'A');
345: UTL_FILE.PUT_LINE(v_myfilehandle, '********* Start TdsTemp_AfterInsert_Trg ('||TO_CHAR(SYSDATE,'DD/MM/RRRR HH24:MI:SS') ||') *********');
346:
347: EXCEPTION
348: WHEN OTHERS THEN
349: v_debug := 'N';
483:
484: /* Added for Bug #12886913 *//*Start*/
485:
486: IF v_debug = 'Y' THEN
487: UTL_FILE.PUT_LINE(v_myfilehandle, 'invoice_id -> '|| pr_new.invoice_id
488: ||', po_distribution_id -> ' ||pr_new.po_distribution_id
489: || ', line_type_lookup_code -> ' ||pr_new.line_type_lookup_code
490: || ', amount -> ' ||pr_new.amount
491: || ', line_type_lookup_code -> ' ||pr_new.line_type_lookup_code
756: END IF;
757:
758:
759: IF v_debug = 'Y' THEN
760: UTL_FILE.PUT_LINE(v_myfilehandle, 'invoice_id -> '|| pr_new.invoice_id
761: ||', po_distribution_id -> ' ||pr_new.po_distribution_id
762: || ', line_type_lookup_code -> ' ||pr_new.line_type_lookup_code
763: || ', amount -> ' ||pr_new.amount
764: || ', line_type_lookup_code -> ' ||pr_new.line_type_lookup_code
766: || ', v_receipt_num -> ' ||v_receipt_num
767: || ', v_receipt_code -> ' ||v_receipt_code
768: || ', v_rematching -> ' ||v_rematching
769: );
770: UTL_FILE.PUT_LINE(v_myfilehandle, ', rcv_transaction_id -> ' ||pr_new.rcv_transaction_id
771: || ', amount -> ' ||pr_new.amount
772: || ', org_id -> ' ||pr_new.org_id
773: || ', v_source -> ' ||v_source
774: );
832: );
833: END IF; -- ITEM_TO_PO
834: ----------------------------------------------------------------------
835: IF v_debug = 'Y' THEN
836: UTL_FILE.fclose(v_myfilehandle);
837: END IF;
838: /* Added an exception block by Ramananda for bug#4570303 */
839: EXCEPTION
840: /* Added for bug 12886913 */ /* Start */