126: FOR rec_import_trans IN get_import_trans_cur
127: LOOP
128:
129: IF rec_import_trans.import_status = GV_IMPORT_SUCCESS THEN
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, rec_import_trans.transaction_num || ' + '
131: || rec_import_trans.transaction_line_num|| ' Import Success.');
132: ELSE
133: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, rec_import_trans.transaction_num || ' + '
134: || rec_import_trans.transaction_line_num|| ' Import with Error.');
129: IF rec_import_trans.import_status = GV_IMPORT_SUCCESS THEN
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, rec_import_trans.transaction_num || ' + '
131: || rec_import_trans.transaction_line_num|| ' Import Success.');
132: ELSE
133: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, rec_import_trans.transaction_num || ' + '
134: || rec_import_trans.transaction_line_num|| ' Import with Error.');
135:
136: FOR rec_error IN get_error_cur(rec_import_trans.interface_line_id)
137: LOOP
150: lv_err_message := FND_MESSAGE.GET;
151: IF lv_err_message IS NULL THEN
152: lv_err_message := rec_error.error_message;
153: END IF;
154: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' '||lv_err_message);
155: END LOOP;
156: END IF;
157: END LOOP;
158: END generate_output_report;
378: )
379: IS
380: BEGIN
381:
382: fnd_file.put_line(FND_FILE.LOG,pv_fnd_log);
383:
384: END record_fnd_log;
385:
386:
2585: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2586: pv_err_exist => 'Y'
2587: );
2588:
2589: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'DUPLICATE VALIDATION COMPLETED WITH ERROR.');
2590:
2591: END LOOP;
2592: END LOOP;
2593:
2878: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2879: pv_err_exist => 'Y'
2880: );
2881:
2882: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
2883:
2884: END LOOP;
2885:
2886: ELSIF (NVL(ln_event_type,-1) = 1) THEN
2991: pn_interface_line_id => rec_interface_line_id.interface_line_id,
2992: pv_err_exist => 'Y'
2993: );
2994:
2995: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
2996:
2997: END LOOP;
2998: END IF;
2999:
3063: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3064: pv_err_exist => 'Y'
3065: );
3066:
3067: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
3068:
3069: END LOOP;
3070: END IF;
3071:
3125: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3126: pv_err_exist => 'Y'
3127: );
3128:
3129: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
3130:
3131: END LOOP;
3132: END IF;
3133: /*Added by Qinglei for the Advanced Receipt for Service Tax enhancement Bug 13361952 End*/
3253: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3254: pv_err_exist => 'Y'
3255: );
3256: end if;
3257: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
3258:
3259: END LOOP;
3260: END IF;
3261: END IF;--AR
3345: pn_interface_line_id => rec_interface_line_id.interface_line_id,
3346: pv_err_exist => 'Y'
3347: );
3348: end if;
3349: fnd_file.put_line(FND_FILE.LOG,'INTERFACE LINE:'||rec_interface_line_id.interface_line_id||'INTEGRATE VALIDATION COMPLETED WITH ERROR.');
3350:
3351: END LOOP;
3352: END IF;
3353: END IF;--AP
3982: CLOSE c_get_tax_type_code;
3983:
3984: IF NVL(ln_tax_type_code,'N')='N' THEN
3985: IF v_debug = 'Y' THEN
3986: fnd_file.put_line(fnd_file.log,' Can not get tax type code by tax id ' || pn_tax_id);
3987: END IF;
3988: END IF;
3989:
3990: RETURN ln_tax_type_code;
5119:
5120: --If not found error, the fnd log success
5121: IF(ln_err_flag = 0)THEN
5122: NULL;
5123: fnd_file.put_line(FND_FILE.LOG,'VALIDATION in VALIDATE_PROCESS : VALIDATION COMPLETED with SUCCESS With interface_line_id' || rec_interface_line.interface_line_id );
5124: ELSE
5125: --If found error , change status to error and fnd log error
5126: update_line_status(
5127: pn_interface_line_id => rec_interface_line.interface_line_id,
5131: update_error_flag(
5132: pn_interface_line_id => rec_interface_line.interface_line_id,
5133: pv_err_exist => 'Y'
5134: );
5135: fnd_file.put_line(FND_FILE.LOG,'VALIDATION in VALIDATE_PROCESS : VALIDATION COMPLETED with ERRORS With interface_line_id' || rec_interface_line.interface_line_id );
5136: END IF;
5137:
5138: END LOOP;
5139:
5158: update_error_flag(
5159: pn_interface_line_id => rec_interface_line.interface_line_id,
5160: pv_err_exist => 'Y');
5161:
5162: fnd_file.put_line(FND_FILE.LOG,'VALIDATION in VALIDATE_PROCESS : VALIDATION COMPLETED with EXCEPTIONS With interface_line_id' || rec_interface_line.interface_line_id );
5163:
5164: END validate_process;
5165:
5166:
5338: );
5339:
5340: ln_phase := 10.9;
5341:
5342: fnd_file.put_line(FND_FILE.LOG,'INITIAL in INITIAL_PROCESS : INITIAL COMPLETED SUCCESS With INTERFACE_LINE_ID:'||pn_interface_line_id);
5343:
5344: END IF;
5345:
5346:
5358: );
5359:
5360: ln_phase := 11.1;
5361:
5362: fnd_file.put_line(FND_FILE.LOG,'INITIAL in INITIAL_PROCESS : INITIAL COMPLETED FAILURE With INTERFACE_LINE_ID:'||pn_interface_line_id);
5363:
5364: END IF;
5365:
5366: EXCEPTION
7822: Where Customer_Trx_ID = pn_customer_trx_id
7823: And Payment_Schedule_ID = v_payment_schedule_id;
7824:
7825:
7826: fnd_file.put_line(FND_FILE.LOG,
7827: 'TAX ORIGINAL 1.......' || v_trx_num || 'is ' ||
7828: NVL(v_tax_amount, -111));
7829: fnd_file.put_line(FND_FILE.LOG,
7830: 'TAX --|AINING 1......' || v_trx_num || 'is ' ||
7825:
7826: fnd_file.put_line(FND_FILE.LOG,
7827: 'TAX ORIGINAL 1.......' || v_trx_num || 'is ' ||
7828: NVL(v_tax_amount, -111));
7829: fnd_file.put_line(FND_FILE.LOG,
7830: 'TAX --|AINING 1......' || v_trx_num || 'is ' ||
7831: NVL(v_tax_amount, -111));
7832: fnd_file.put_line(FND_FILE.LOG,
7833: 'FREIGHT ORIGINAL 1...' || v_trx_num ||
7828: NVL(v_tax_amount, -111));
7829: fnd_file.put_line(FND_FILE.LOG,
7830: 'TAX --|AINING 1......' || v_trx_num || 'is ' ||
7831: NVL(v_tax_amount, -111));
7832: fnd_file.put_line(FND_FILE.LOG,
7833: 'FREIGHT ORIGINAL 1...' || v_trx_num ||
7834: 'is ' || NVL(v_freight_amount, -77));
7835: fnd_file.put_line(FND_FILE.LOG,
7836: 'FREIGHT --|AINING 1..' || v_trx_num ||
7831: NVL(v_tax_amount, -111));
7832: fnd_file.put_line(FND_FILE.LOG,
7833: 'FREIGHT ORIGINAL 1...' || v_trx_num ||
7834: 'is ' || NVL(v_freight_amount, -77));
7835: fnd_file.put_line(FND_FILE.LOG,
7836: 'FREIGHT --|AINING 1..' || v_trx_num ||
7837: 'is ' || NVL(v_freight_amount, -66));
7838: fnd_file.put_line(FND_FILE.LOG,
7839: 'AMOUNT DUE --|AINING 1...' || v_trx_num ||
7834: 'is ' || NVL(v_freight_amount, -77));
7835: fnd_file.put_line(FND_FILE.LOG,
7836: 'FREIGHT --|AINING 1..' || v_trx_num ||
7837: 'is ' || NVL(v_freight_amount, -66));
7838: fnd_file.put_line(FND_FILE.LOG,
7839: 'AMOUNT DUE --|AINING 1...' || v_trx_num ||
7840: 'is ' || NVL(v_receivable_amount, -222));
7841: fnd_file.put_line(FND_FILE.LOG,
7842: 'AMOUNT DUE ORIGINAL 1...' || v_trx_num ||
7837: 'is ' || NVL(v_freight_amount, -66));
7838: fnd_file.put_line(FND_FILE.LOG,
7839: 'AMOUNT DUE --|AINING 1...' || v_trx_num ||
7840: 'is ' || NVL(v_receivable_amount, -222));
7841: fnd_file.put_line(FND_FILE.LOG,
7842: 'AMOUNT DUE ORIGINAL 1...' || v_trx_num ||
7843: 'is ' || NVL(v_receivable_amount, 333));
7844: fnd_file.put_line(FND_FILE.LOG,
7845: 'ACCTD AMOUNT DUE 1...' || v_trx_num ||
7840: 'is ' || NVL(v_receivable_amount, -222));
7841: fnd_file.put_line(FND_FILE.LOG,
7842: 'AMOUNT DUE ORIGINAL 1...' || v_trx_num ||
7843: 'is ' || NVL(v_receivable_amount, 333));
7844: fnd_file.put_line(FND_FILE.LOG,
7845: 'ACCTD AMOUNT DUE 1...' || v_trx_num ||
7846: 'is ' ||
7847: NVL(v_receivable_acctd_amount, 444));
7848:
7847: NVL(v_receivable_acctd_amount, 444));
7848:
7849: V_TEMP := NVL(v_old_amount, 0) + NVL(v_tax_amt, 0);
7850:
7851: fnd_file.put_line(FND_FILE.LOG,
7852: 'TAX ORIGINAL 2.......' || v_trx_num || 'is ' ||
7853: NVL(v_PAYMENT_amt, -111));
7854: fnd_file.put_line(FND_FILE.LOG,
7855: 'TAX --|AINING 2......' || v_trx_num || 'is ' ||
7850:
7851: fnd_file.put_line(FND_FILE.LOG,
7852: 'TAX ORIGINAL 2.......' || v_trx_num || 'is ' ||
7853: NVL(v_PAYMENT_amt, -111));
7854: fnd_file.put_line(FND_FILE.LOG,
7855: 'TAX --|AINING 2......' || v_trx_num || 'is ' ||
7856: NVL(v_PAYMENT_amt, -111));
7857: fnd_file.put_line(FND_FILE.LOG,
7858: 'FREIGHT ORIGINAL 2...' || v_trx_num ||
7853: NVL(v_PAYMENT_amt, -111));
7854: fnd_file.put_line(FND_FILE.LOG,
7855: 'TAX --|AINING 2......' || v_trx_num || 'is ' ||
7856: NVL(v_PAYMENT_amt, -111));
7857: fnd_file.put_line(FND_FILE.LOG,
7858: 'FREIGHT ORIGINAL 2...' || v_trx_num ||
7859: 'is ' || NVL(v_FREIGHT_amt, -77));
7860: fnd_file.put_line(FND_FILE.LOG,
7861: 'FREIGHT --|AINING 2...' || v_trx_num ||
7856: NVL(v_PAYMENT_amt, -111));
7857: fnd_file.put_line(FND_FILE.LOG,
7858: 'FREIGHT ORIGINAL 2...' || v_trx_num ||
7859: 'is ' || NVL(v_FREIGHT_amt, -77));
7860: fnd_file.put_line(FND_FILE.LOG,
7861: 'FREIGHT --|AINING 2...' || v_trx_num ||
7862: 'is ' || NVL(v_FREIGHT_amt, -66));
7863: fnd_file.put_line(FND_FILE.LOG,
7864: 'AMOUNT DUE --|AINING 2...' || v_trx_num ||
7859: 'is ' || NVL(v_FREIGHT_amt, -77));
7860: fnd_file.put_line(FND_FILE.LOG,
7861: 'FREIGHT --|AINING 2...' || v_trx_num ||
7862: 'is ' || NVL(v_FREIGHT_amt, -66));
7863: fnd_file.put_line(FND_FILE.LOG,
7864: 'AMOUNT DUE --|AINING 2...' || v_trx_num ||
7865: 'is ' || V_TEMP);
7866: fnd_file.put_line(FND_FILE.LOG,
7867: 'AMOUNT DUE ORIGINAL 2...' || v_trx_num ||
7862: 'is ' || NVL(v_FREIGHT_amt, -66));
7863: fnd_file.put_line(FND_FILE.LOG,
7864: 'AMOUNT DUE --|AINING 2...' || v_trx_num ||
7865: 'is ' || V_TEMP);
7866: fnd_file.put_line(FND_FILE.LOG,
7867: 'AMOUNT DUE ORIGINAL 2...' || v_trx_num ||
7868: 'is ' || V_TEMP);
7869: fnd_file.put_line(FND_FILE.LOG,
7870: 'ACCTD AMOUNT DUE 2...' || v_trx_num ||
7865: 'is ' || V_TEMP);
7866: fnd_file.put_line(FND_FILE.LOG,
7867: 'AMOUNT DUE ORIGINAL 2...' || v_trx_num ||
7868: 'is ' || V_TEMP);
7869: fnd_file.put_line(FND_FILE.LOG,
7870: 'ACCTD AMOUNT DUE 2...' || v_trx_num ||
7871: 'is ' ||
7872: NVL(v_receivable_acctd_amount, 444));
7873:
7882: v_sql_num := 34;
7883:
7884: p_process_flag := SQLERRM;
7885:
7886: fnd_file.put_line(FND_FILE.LOG,
7887: 'The total tax amount for the line is....' ||
7888: v_tax_amt);
7889: fnd_file.put_line(FND_FILE.LOG,
7890: 'The receivable amount for the line is....' ||
7885:
7886: fnd_file.put_line(FND_FILE.LOG,
7887: 'The total tax amount for the line is....' ||
7888: v_tax_amt);
7889: fnd_file.put_line(FND_FILE.LOG,
7890: 'The receivable amount for the line is....' ||
7891: v_receivable_amount);
7892: fnd_file.put_line(FND_FILE.LOG,
7893: 'Successfully Processed the Invoice... ' ||
7888: v_tax_amt);
7889: fnd_file.put_line(FND_FILE.LOG,
7890: 'The receivable amount for the line is....' ||
7891: v_receivable_amount);
7892: fnd_file.put_line(FND_FILE.LOG,
7893: 'Successfully Processed the Invoice... ' ||
7894: v_trx_num);
7895: --fnd_file.put_line(FND_FILE.LOG, 'COMPLETED RUN.Processed the Invoice Retcode = '|| retcode);
7896:
7891: v_receivable_amount);
7892: fnd_file.put_line(FND_FILE.LOG,
7893: 'Successfully Processed the Invoice... ' ||
7894: v_trx_num);
7895: --fnd_file.put_line(FND_FILE.LOG, 'COMPLETED RUN.Processed the Invoice Retcode = '|| retcode);
7896:
7897: EXCEPTION
7898: when others then
7899: p_process_message := SUBSTR(SQLERRM, 1, 230);
7905: AND LINK_TO_CUST_TRX_LINE_ID = pn_customer_trx_line_id;
7906:
7907: --COMMIT; --Commented by zhiwei for open interface ER 20101116
7908:
7909: fnd_file.put_line(FND_FILE.LOG,
7910: 'Updated the customer_trx_id error_flag to ...' || 'R');
7911: fnd_file.put_line(FND_FILE.LOG,
7912: 'Unable to Process the invoice... ' ||
7913: v_trx_num);
7907: --COMMIT; --Commented by zhiwei for open interface ER 20101116
7908:
7909: fnd_file.put_line(FND_FILE.LOG,
7910: 'Updated the customer_trx_id error_flag to ...' || 'R');
7911: fnd_file.put_line(FND_FILE.LOG,
7912: 'Unable to Process the invoice... ' ||
7913: v_trx_num);
7914: fnd_file.put_line(FND_FILE.LOG,
7915: 'ABORTED RUN... the err = ' || SQLERRM);
7910: 'Updated the customer_trx_id error_flag to ...' || 'R');
7911: fnd_file.put_line(FND_FILE.LOG,
7912: 'Unable to Process the invoice... ' ||
7913: v_trx_num);
7914: fnd_file.put_line(FND_FILE.LOG,
7915: 'ABORTED RUN... the err = ' || SQLERRM);
7916: fnd_file.put_line(FND_FILE.LOG,
7917: 'ABORTED RUN... the err = ' || SQLERRM ||
7918: v_sql_num);
7912: 'Unable to Process the invoice... ' ||
7913: v_trx_num);
7914: fnd_file.put_line(FND_FILE.LOG,
7915: 'ABORTED RUN... the err = ' || SQLERRM);
7916: fnd_file.put_line(FND_FILE.LOG,
7917: 'ABORTED RUN... the err = ' || SQLERRM ||
7918: v_sql_num);
7919:
7920: END; --End Temp_Cur Block
7971: --------------------------------------------------------------------------
7972: --Added by Bo Li for Bug9803555 on 01-JUL-2010 ,End
7973:
7974:
7975: fnd_file.put_line(FND_FILE.LOG,'COMPLETED RUN.Processed the invoice = ' || v_trx_num);
7976:
7977: EXCEPTION
7978:
7979: when Localization_tax_not_defined then
7976:
7977: EXCEPTION
7978:
7979: when Localization_tax_not_defined then
7980: fnd_file.put_line(FND_FILE.LOG,
7981: ' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ');
7982: p_process_message := ' ''Localization'' Tax not defined or is end-dated. Please ensure that a valid ''Localization'' Tax exists and is not enddated ';
7983: p_process_flag := 2;
7984:
7991: AND LINK_TO_CUST_TRX_LINE_ID = pn_customer_trx_line_id;
7992:
7993: --COMMIT;--Commented by zhiwei for open interface ER 20101116
7994:
7995: fnd_file.put_line(FND_FILE.LOG,
7996: 'ABORTED RUN... the invoice = ' || v_trx_num);
7997: fnd_file.put_line(FND_FILE.LOG,
7998: 'ABORTED RUN... the err = ' || SQLERRM);
7999: fnd_file.put_line(FND_FILE.LOG,
7993: --COMMIT;--Commented by zhiwei for open interface ER 20101116
7994:
7995: fnd_file.put_line(FND_FILE.LOG,
7996: 'ABORTED RUN... the invoice = ' || v_trx_num);
7997: fnd_file.put_line(FND_FILE.LOG,
7998: 'ABORTED RUN... the err = ' || SQLERRM);
7999: fnd_file.put_line(FND_FILE.LOG,
8000: 'Main Block.... the err = ' || SQLERRM);
8001: fnd_file.put_line(FND_FILE.LOG,
7995: fnd_file.put_line(FND_FILE.LOG,
7996: 'ABORTED RUN... the invoice = ' || v_trx_num);
7997: fnd_file.put_line(FND_FILE.LOG,
7998: 'ABORTED RUN... the err = ' || SQLERRM);
7999: fnd_file.put_line(FND_FILE.LOG,
8000: 'Main Block.... the err = ' || SQLERRM);
8001: fnd_file.put_line(FND_FILE.LOG,
8002: 'Please Contact the System Administrator Or Oracle Software Support Services...');
8003:
7997: fnd_file.put_line(FND_FILE.LOG,
7998: 'ABORTED RUN... the err = ' || SQLERRM);
7999: fnd_file.put_line(FND_FILE.LOG,
8000: 'Main Block.... the err = ' || SQLERRM);
8001: fnd_file.put_line(FND_FILE.LOG,
8002: 'Please Contact the System Administrator Or Oracle Software Support Services...');
8003:
8004: END process_trx_dis_bal_lines;
8005:
10328: pv_err_mess,
10329: pv_invalid_value,
10330: pn_request_id
10331: );
10332: --fnd_file.put_line(FND_FILE.LOG,pv_err_mess);
10333: END log_err;*/
10334:
10335:
10336: PROCEDURE get_line_status(
10919: ;
10920: ELSE
10921: --log the error.
10922: lv_err_mess := 'Module '|| GV_IMPORT_MODULE ||' is not expected';
10923: --fnd_file.put_line(FND_FILE.LOG,lv_err_mess);
10924: RAISE error_module;
10925: END IF;
10926: END LOOP;
10927:
11161:
11162: ELSE
11163: --log the error.
11164: lv_err_mess := 'Module '|| GV_IMPORT_MODULE ||' is not expected';
11165: --fnd_file.put_line(FND_FILE.LOG,lv_err_mess);
11166: END IF;
11167:
11168: EXCEPTION
11169: WHEN OTHERS THEN