DBA Data[Home] [Help]

APPS.XTR_EFT_SCRIPT_P dependencies on FND_FILE

Line 555: --FND_FILE.put_names ('eft.log', 'eft.out', '/tmp/');

551: XTR_RISK_DEBUG_PKG.dlog('BNZ_EFT: ' || '> mts_details = '||mts_details||
552: ' mts_file_name = '||mts_file_name);
553: END IF;
554:
555: --FND_FILE.put_names ('eft.log', 'eft.out', '/tmp/');
556: FND_FILE.put_line(FND_FILE.OUTPUT, mts_details);
557: --FND_FILE.new_line(FND_FILE.OUTPUT,1);
558: --
559: -- delete data from XTR_MTS_RECORDS table

Line 556: FND_FILE.put_line(FND_FILE.OUTPUT, mts_details);

552: ' mts_file_name = '||mts_file_name);
553: END IF;
554:
555: --FND_FILE.put_names ('eft.log', 'eft.out', '/tmp/');
556: FND_FILE.put_line(FND_FILE.OUTPUT, mts_details);
557: --FND_FILE.new_line(FND_FILE.OUTPUT,1);
558: --
559: -- delete data from XTR_MTS_RECORDS table
560: --

Line 557: --FND_FILE.new_line(FND_FILE.OUTPUT,1);

553: END IF;
554:
555: --FND_FILE.put_names ('eft.log', 'eft.out', '/tmp/');
556: FND_FILE.put_line(FND_FILE.OUTPUT, mts_details);
557: --FND_FILE.new_line(FND_FILE.OUTPUT,1);
558: --
559: -- delete data from XTR_MTS_RECORDS table
560: --
561: DELETE from XTR_MTS_RECORDS

Line 579: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Debit Account is in the wrong format');

575: IF (curr=1) THEN
576: IF xtr_risk_debug_pkg.g_Debug THEN
577: XTR_RISK_DEBUG_PKG.dlog('BNZ_EFT: ' || 'EXCEPTION: Wrong Debit Account Format');
578: END IF;
579: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Debit Account is in the wrong format');
580: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Correct Format is XX-XXXX-XXXXXXX-XX');
581: RAISE;
582: ELSE
583: IF xtr_risk_debug_pkg.g_Debug THEN

Line 580: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Correct Format is XX-XXXX-XXXXXXX-XX');

576: IF xtr_risk_debug_pkg.g_Debug THEN
577: XTR_RISK_DEBUG_PKG.dlog('BNZ_EFT: ' || 'EXCEPTION: Wrong Debit Account Format');
578: END IF;
579: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Debit Account is in the wrong format');
580: FND_FILE.put_line(FND_FILE.LOG, 'EXCEPTION: Correct Format is XX-XXXX-XXXXXXX-XX');
581: RAISE;
582: ELSE
583: IF xtr_risk_debug_pkg.g_Debug THEN
584: XTR_RISK_DEBUG_PKG.dlog('EXCEPTION: XTR_EFT_SCRIPT_P.BNZ_EFT');

Line 737: FND_FILE.put_line(FND_FILE.OUTPUT, p_string);

733: --bug 3195086
734: procedure filter_blanks(p_string varchar2) is
735: begin
736: if (p_string is not null) then
737: FND_FILE.put_line(FND_FILE.OUTPUT, p_string);
738: end if;
739: end filter_blanks;
740:
741: begin

Line 818: FND_FILE.put_line(FND_FILE.OUTPUT, ':20:' || v_settlement_number);

814:
815: IF xtr_risk_debug_pkg.g_Debug THEN
816: XTR_RISK_DEBUG_PKG.dlog('SWT_EFT: inside credit rec settlement number ' || v_settlement_number );
817: END IF;
818: FND_FILE.put_line(FND_FILE.OUTPUT, ':20:' || v_settlement_number);
819:
820: v_settlement_amount_c := replace(to_char(v_settlement_amount), '.', ',');
821:
822: if INSTR(v_settlement_amount_c, ',') = 0 THEN

Line 832: FND_FILE.put_line(FND_FILE.OUTPUT, ':32A:' || to_char( v_settlement_date, 'YYMMDD') || v_currency || v_settlement_amount_c);

828:
829:
830:
831:
832: FND_FILE.put_line(FND_FILE.OUTPUT, ':32A:' || to_char( v_settlement_date, 'YYMMDD') || v_currency || v_settlement_amount_c);
833: IF xtr_risk_debug_pkg.g_Debug THEN
834: XTR_RISK_DEBUG_PKG.dlog('SWT_EFT: ' || ':32A:' || to_char( v_settlement_date, 'YYMMDD') || v_currency || v_settlement_amount_c);
835: END IF;
836:

Line 837: FND_FILE.put_line(FND_FILE.OUTPUT, ':50:' || substr(v_comp_name, 1, 35));

833: IF xtr_risk_debug_pkg.g_Debug THEN
834: XTR_RISK_DEBUG_PKG.dlog('SWT_EFT: ' || ':32A:' || to_char( v_settlement_date, 'YYMMDD') || v_currency || v_settlement_amount_c);
835: END IF;
836:
837: FND_FILE.put_line(FND_FILE.OUTPUT, ':50:' || substr(v_comp_name, 1, 35));
838: --Bug 3195086
839: FILTER_BLANKS(substr(v_comp_address1, 1, 35));
840: FILTER_BLANKS(substr(v_comp_address2, 1, 35));
841: FILTER_BLANKS(substr(v_comp_address3, 1, 35));

Line 846: --Bug 3195086: FND_FILE.put_line(FND_FILE.OUTPUT, ':53B:/' || v_company_acct_no);

842: IF xtr_risk_debug_pkg.g_Debug THEN
843: XTR_RISK_DEBUG_PKG.dlog('SWT_EFT: ' ||':50:' || substr(v_comp_name, 1, 35));
844: END IF;
845:
846: --Bug 3195086: FND_FILE.put_line(FND_FILE.OUTPUT, ':53B:/' || v_company_acct_no);
847:
848: if ((v_cp_corr_bank_name IS NOT NULL) AND (v_cp_corr_bank_no IS NOT NULL)) THEN
849: FND_FILE.put_line(FND_FILE.OUTPUT, ':54A:' || v_cp_corr_bank_name);
850: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_corr_bank_no);

Line 849: FND_FILE.put_line(FND_FILE.OUTPUT, ':54A:' || v_cp_corr_bank_name);

845:
846: --Bug 3195086: FND_FILE.put_line(FND_FILE.OUTPUT, ':53B:/' || v_company_acct_no);
847:
848: if ((v_cp_corr_bank_name IS NOT NULL) AND (v_cp_corr_bank_no IS NOT NULL)) THEN
849: FND_FILE.put_line(FND_FILE.OUTPUT, ':54A:' || v_cp_corr_bank_name);
850: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_corr_bank_no);
851:
852: END IF;
853:

Line 850: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_corr_bank_no);

846: --Bug 3195086: FND_FILE.put_line(FND_FILE.OUTPUT, ':53B:/' || v_company_acct_no);
847:
848: if ((v_cp_corr_bank_name IS NOT NULL) AND (v_cp_corr_bank_no IS NOT NULL)) THEN
849: FND_FILE.put_line(FND_FILE.OUTPUT, ':54A:' || v_cp_corr_bank_name);
850: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_corr_bank_no);
851:
852: END IF;
853:
854: if v_cp_swift_id is null then

Line 855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);

851:
852: END IF;
853:
854: if v_cp_swift_id is null then
855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);
856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);
857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');

Line 856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);

852: END IF;
853:
854: if v_cp_swift_id is null then
855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);
856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);
857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else

Line 857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);

853:
854: if v_cp_swift_id is null then
855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);
856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);
857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else
861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);

Line 858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);

854: if v_cp_swift_id is null then
855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);
856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);
857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else
861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);
862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);

Line 859: FND_FILE.put_line(FND_FILE.OUTPUT, '');

855: FND_FILE.put_line(FND_FILE.OUTPUT, ':57D:/' || v_cparty_acct_no);
856: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_name);
857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else
861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);
862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);
863: end if;

Line 861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);

857: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_street);
858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else
861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);
862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);
863: end if;
864:
865: FND_FILE.put_line(FND_FILE.OUTPUT, ':59:/' || v_cparty_acct_no);

Line 862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);

858: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_bank_location);
859: FND_FILE.put_line(FND_FILE.OUTPUT, '');
860: else
861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);
862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);
863: end if;
864:
865: FND_FILE.put_line(FND_FILE.OUTPUT, ':59:/' || v_cparty_acct_no);
866: --Bug 3195086

Line 865: FND_FILE.put_line(FND_FILE.OUTPUT, ':59:/' || v_cparty_acct_no);

861: FND_FILE.put_line(FND_FILE.OUTPUT, ':57A:/' || v_cparty_acct_no);
862: FND_FILE.put_line(FND_FILE.OUTPUT, v_cp_swift_id);
863: end if;
864:
865: FND_FILE.put_line(FND_FILE.OUTPUT, ':59:/' || v_cparty_acct_no);
866: --Bug 3195086
867: FILTER_BLANKS(substr(v_cp_name, 1, 35));
868: FILTER_BLANKS(substr(v_cp_address1, 1, 35));
869: FILTER_BLANKS(substr(v_cp_address2, 1, 35));

Line 872: FND_FILE.put_line(FND_FILE.OUTPUT, ':70:/ROC/' || v_settlement_number);

868: FILTER_BLANKS(substr(v_cp_address1, 1, 35));
869: FILTER_BLANKS(substr(v_cp_address2, 1, 35));
870: FILTER_BLANKS(substr(v_cp_address3, 1, 35));
871:
872: FND_FILE.put_line(FND_FILE.OUTPUT, ':70:/ROC/' || v_settlement_number);
873:
874: FND_FILE.put_line(FND_FILE.OUTPUT, '');
875:
876: fnd_profile.get('CONC_REQUEST_ID', v_request_id);

Line 874: FND_FILE.put_line(FND_FILE.OUTPUT, '');

870: FILTER_BLANKS(substr(v_cp_address3, 1, 35));
871:
872: FND_FILE.put_line(FND_FILE.OUTPUT, ':70:/ROC/' || v_settlement_number);
873:
874: FND_FILE.put_line(FND_FILE.OUTPUT, '');
875:
876: fnd_profile.get('CONC_REQUEST_ID', v_request_id);
877:
878: if v_netcount > 0 then

Line 1131: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);

1127: FND_MESSAGE.set_name('XTR', 'XTR_X12_EXCEED_AMOUNT');
1128: FND_MESSAGE.set_token('SETT_NO',v_settlement_number);
1129: v_exc_desc := FND_MESSAGE.get;
1130: retcode := 1;
1131: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);
1132:
1133: -- Must have a swift id set up for company's bank account
1134: ELSIF v_comp_swift_id is null THEN
1135: FND_MESSAGE.set_name('XTR', 'XTR_X12_NO_COMP_SID');

Line 1141: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);

1137: FND_MESSAGE.set_token('BANK_ACC',v_company_acct_no);
1138: FND_MESSAGE.set_token('SETT_NO',v_settlement_number);
1139: v_exc_desc := FND_MESSAGE.get;
1140: retcode:=1;
1141: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);
1142:
1143: ELSIF v_cp_swift_id is null THEN
1144: FND_MESSAGE.set_name('XTR', 'XTR_X12_NO_CP_SID');
1145: FND_MESSAGE.set_token('CP', v_cp_name);

Line 1150: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);

1146: FND_MESSAGE.set_token('BANK_ACC',v_cparty_acct_no);
1147: FND_MESSAGE.set_token('SETT_NO',v_settlement_number);
1148: v_exc_desc := FND_MESSAGE.get;
1149: retcode:=1;
1150: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);
1151:
1152: --bug 3185544
1153: ELSIF v_comp_address1 is null THEN
1154: FND_MESSAGE.set_name('XTR', 'XTR_X12_NO_COMP_ADDRESS');

Line 1163: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);

1159: FND_MESSAGE.set_token('COMP', v_comp_name);
1160: FND_MESSAGE.set_token('SETT_NO',v_settlement_number);
1161: v_exc_desc := FND_MESSAGE.get;
1162: retcode:=1;
1163: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);
1164:
1165: --bug 3185544
1166: ELSIF v_cp_address1 is null THEN
1167: FND_MESSAGE.set_name('XTR', 'XTR_X12_NO_CP_ADDRESS');

Line 1176: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);

1172: FND_MESSAGE.set_token('COMP', v_cp_name);
1173: FND_MESSAGE.set_token('SETT_NO',v_settlement_number);
1174: v_exc_desc := FND_MESSAGE.get;
1175: retcode:=1;
1176: FND_FILE.put_line(FND_FILE.LOG, v_exc_desc);
1177:
1178: ELSE
1179:
1180: IF xtr_risk_debug_pkg.g_Debug THEN

Line 1184: FND_FILE.put_line(FND_FILE.OUTPUT, 'ST*820*' || v_settlement_number);

1180: IF xtr_risk_debug_pkg.g_Debug THEN
1181: XTR_RISK_DEBUG_PKG.dlog('X12_EFT: inside credit rec settlement number ' || v_settlement_number );
1182: END IF;
1183:
1184: FND_FILE.put_line(FND_FILE.OUTPUT, 'ST*820*' || v_settlement_number);
1185: FND_FILE.put_line(FND_FILE.OUTPUT, 'BPR*D*'|| v_settlement_amount ||
1186: '*C*FWT**02*' || v_comp_swift_id || '*DA*'|| v_company_acct_no
1187: || '**' || v_company || '*02*' || v_cp_swift_id || '*DA*' ||
1188: v_cparty_acct_no || '*' || to_char( v_settlement_date, 'YYYYMMDD') );

Line 1185: FND_FILE.put_line(FND_FILE.OUTPUT, 'BPR*D*'|| v_settlement_amount ||

1181: XTR_RISK_DEBUG_PKG.dlog('X12_EFT: inside credit rec settlement number ' || v_settlement_number );
1182: END IF;
1183:
1184: FND_FILE.put_line(FND_FILE.OUTPUT, 'ST*820*' || v_settlement_number);
1185: FND_FILE.put_line(FND_FILE.OUTPUT, 'BPR*D*'|| v_settlement_amount ||
1186: '*C*FWT**02*' || v_comp_swift_id || '*DA*'|| v_company_acct_no
1187: || '**' || v_company || '*02*' || v_cp_swift_id || '*DA*' ||
1188: v_cparty_acct_no || '*' || to_char( v_settlement_date, 'YYYYMMDD') );
1189: FND_FILE.put_line(FND_FILE.OUTPUT, 'CUR*PR*' || v_currency);

Line 1189: FND_FILE.put_line(FND_FILE.OUTPUT, 'CUR*PR*' || v_currency);

1185: FND_FILE.put_line(FND_FILE.OUTPUT, 'BPR*D*'|| v_settlement_amount ||
1186: '*C*FWT**02*' || v_comp_swift_id || '*DA*'|| v_company_acct_no
1187: || '**' || v_company || '*02*' || v_cp_swift_id || '*DA*' ||
1188: v_cparty_acct_no || '*' || to_char( v_settlement_date, 'YYYYMMDD') );
1189: FND_FILE.put_line(FND_FILE.OUTPUT, 'CUR*PR*' || v_currency);
1190:
1191: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PR*' || v_comp_name);
1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'
1193: || v_comp_address2);

Line 1191: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PR*' || v_comp_name);

1187: || '**' || v_company || '*02*' || v_cp_swift_id || '*DA*' ||
1188: v_cparty_acct_no || '*' || to_char( v_settlement_date, 'YYYYMMDD') );
1189: FND_FILE.put_line(FND_FILE.OUTPUT, 'CUR*PR*' || v_currency);
1190:
1191: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PR*' || v_comp_name);
1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'
1193: || v_comp_address2);
1194:
1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);

Line 1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'

1188: v_cparty_acct_no || '*' || to_char( v_settlement_date, 'YYYYMMDD') );
1189: FND_FILE.put_line(FND_FILE.OUTPUT, 'CUR*PR*' || v_currency);
1190:
1191: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PR*' || v_comp_name);
1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'
1193: || v_comp_address2);
1194:
1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);
1196: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_cp_address1 || '*'

Line 1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);

1191: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PR*' || v_comp_name);
1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'
1193: || v_comp_address2);
1194:
1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);
1196: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_cp_address1 || '*'
1197: || v_cp_address2);
1198: FND_FILE.put_line(FND_FILE.OUTPUT, 'SE*8*' || v_settlement_number);
1199:

Line 1196: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_cp_address1 || '*'

1192: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_comp_address1 || '*'
1193: || v_comp_address2);
1194:
1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);
1196: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_cp_address1 || '*'
1197: || v_cp_address2);
1198: FND_FILE.put_line(FND_FILE.OUTPUT, 'SE*8*' || v_settlement_number);
1199:
1200:

Line 1198: FND_FILE.put_line(FND_FILE.OUTPUT, 'SE*8*' || v_settlement_number);

1194:
1195: FND_FILE.put_line(FND_FILE.OUTPUT, 'N1*PE*' || v_cp_name);
1196: FND_FILE.put_line(FND_FILE.OUTPUT, 'N3*' || v_cp_address1 || '*'
1197: || v_cp_address2);
1198: FND_FILE.put_line(FND_FILE.OUTPUT, 'SE*8*' || v_settlement_number);
1199:
1200:
1201:
1202: fnd_profile.get('CONC_REQUEST_ID', v_request_id);