DBA Data[Home] [Help]

APPS.JL_CO_GL_NIT_MANAGEMENT dependencies on FND_FILE

Line 162: FND_FILE.PUT_LINE(FND_FILE.log,'Insert_Error_Rec:'|| g_error_text);

158: EXCEPTION
159: WHEN others THEN
160: g_error_code := SQLCODE;
161: g_error_text := SUBSTR(SQLERRM,1,240);
162: FND_FILE.PUT_LINE(FND_FILE.log,'Insert_Error_Rec:'|| g_error_text);
163: RAISE;
164:
165: END Insert_Error_Rec;
166:

Line 190: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit : '||p_nit_rec.nit);

186: l_add_text := 'JL_CO_GL_0_NIT_TRX_CREATED';
187: END IF;
188:
189: BEGIN -- check if nit exists by nit number
190: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit : '||p_nit_rec.nit);
191:
192: SELECT nit_id,
193: nit,
194: name,

Line 218: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit_name : '||p_nit_rec.nit_name);

214: INTO l_master_nit_rec
215: FROM jl_co_gl_nits
216: WHERE UPPER(name) = UPPER(p_nit_rec.nit_name);
217:
218: FND_FILE.PUT_LINE(FND_FILE.log,'p_nit_rec.nit_name : '||p_nit_rec.nit_name);
219:
220: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_NAME_EXISTS');
221: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
222: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);

Line 236: FND_FILE.PUT_LINE(FND_FILE.log,'master : p_nit_rec.nit : '||p_nit_rec.nit);

232: NULL;
233: END;
234:
235: IF l_master_nit_rec.nit IS NULL THEN
236: FND_FILE.PUT_LINE(FND_FILE.log,'master : p_nit_rec.nit : '||p_nit_rec.nit);
237:
238: -- master NIT does not exist
239: -- validate NIT and insert new NIT record
240: IF jg_taxid_val_pkg.check_length('CO',14,p_nit_rec.nit) = 'FALSE' THEN

Line 251: FND_FILE.PUT_LINE(FND_FILE.log,'NIT Null Check : p_nit_rec.nit : '||p_nit_rec.nit);

247: l_nit_valid := FALSE;
248: END IF; /*check_length*/
249:
250: IF p_nit_rec.nit IS NULL THEN
251: FND_FILE.PUT_LINE(FND_FILE.log,'NIT Null Check : p_nit_rec.nit : '||p_nit_rec.nit);
252:
253: FND_MESSAGE.SET_NAME('JL','JL_CO_GL_NIT_REQUIRED');
254: FND_MESSAGE.SET_TOKEN('IDENTIFIER_TYPE',p_identifier_type,TRUE);
255: FND_MESSAGE.SET_TOKEN('IDENTIFIER',g_gl_je_rec.identifier);

Line 379: FND_FILE.PUT_LINE(FND_FILE.log,'Validate_NIT:'|| g_error_text);

375:
376: WHEN others THEN
377: g_error_code := SQLCODE;
378: g_error_text := SUBSTR(SQLERRM,1,240);
379: FND_FILE.PUT_LINE(FND_FILE.log,'Validate_NIT:'|| g_error_text);
380: RAISE;
381:
382: END Validate_NIT;
383:

Line 559: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_GL_trx:'|| g_error_text);

555: EXCEPTION
556: WHEN others THEN
557: g_error_code := SQLCODE;
558: g_error_text := SUBSTR(SQLERRM,1,240);
559: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_GL_trx:'|| g_error_text);
560: RAISE;
561:
562: END Generate_GL_trx;
563:

Line 738: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : Begin ');

734: p_journal_rec.ext_nit
735: INTO g_gl_je_rec
736: FROM DUAL;
737:
738: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : Begin ');
739:
740: FOR ap_trx IN ap_detail_lines LOOP
741:
742: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||ap_trx.source_table);

Line 742: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||ap_trx.source_table);

738: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : Begin ');
739:
740: FOR ap_trx IN ap_detail_lines LOOP
741:
742: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||ap_trx.source_table);
743: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :Dist ID' ||to_char(ap_trx.trx_dist_id));
744: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :i Trx ID' ||to_char(ap_trx.trx_hdr_id));
745: g_nit_rec := NULL;
746: l_supplier_num := NULL;

Line 743: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :Dist ID' ||to_char(ap_trx.trx_dist_id));

739:
740: FOR ap_trx IN ap_detail_lines LOOP
741:
742: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||ap_trx.source_table);
743: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :Dist ID' ||to_char(ap_trx.trx_dist_id));
744: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :i Trx ID' ||to_char(ap_trx.trx_hdr_id));
745: g_nit_rec := NULL;
746: l_supplier_num := NULL;
747:

Line 744: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :i Trx ID' ||to_char(ap_trx.trx_hdr_id));

740: FOR ap_trx IN ap_detail_lines LOOP
741:
742: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||ap_trx.source_table);
743: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :Dist ID' ||to_char(ap_trx.trx_dist_id));
744: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx :i Trx ID' ||to_char(ap_trx.trx_hdr_id));
745: g_nit_rec := NULL;
746: l_supplier_num := NULL;
747:
748: IF (ap_trx.source_table = 'AP_INV_DIST') THEN

Line 763: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||l_supplier_num);

759: WHERE to_ledger_id = g_parameter_rec.set_of_books_id));
760:
761: END IF;
762:
763: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : After ap_trx cursor call : ' ||l_supplier_num);
764: /* Commented out for Bug3840010
765: SELECT jlcgn.nit_id,
766: REPLACE(pov.num_1099,'-'),
767: pov.vendor_name,

Line 784: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : l_supplier_num IS NULL ');

780: AND jlcgn.nit(+) = REPLACE(pov.num_1099,'-') ; */
781:
782: -- Replaced the above logic with 2 different statements executed conditionally
783: IF l_supplier_num IS NULL THEN
784: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : l_supplier_num IS NULL ');
785: SELECT jlcgn.nit_id,
786: REPLACE(povapf.num_1099,'-'),
787: povapf.vendor_name,
788: SUBSTR(povapf.global_attribute10,1,30),

Line 812: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : l_supplier_num IS NOT NULL ');

808: AND jlcgn.nit(+) = REPLACE(povapf.num_1099,'-') ;
809:
810: ELSE
811:
812: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_ap_trx : l_supplier_num IS NOT NULL ');
813: SELECT jlcgn.nit_id,
814: REPLACE(povapf.num_1099,'-'),
815: povapf.vendor_name,
816: SUBSTR(povapf.global_attribute10,1,30),

Line 842: FND_FILE.PUT_LINE(FND_FILE.log,'Before Validate Call for AP : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));

838: END IF;
839:
840: g_gl_je_rec.identifier := l_supplier_num;
841:
842: FND_FILE.PUT_LINE(FND_FILE.log,'Before Validate Call for AP : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
843: IF Validate_NIT(g_nit_rec, 'JL_CO_GL_SUPPLIER') THEN
844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)
846: ||'-'||p_journal_rec.account_code);

Line 844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));

840: g_gl_je_rec.identifier := l_supplier_num;
841:
842: FND_FILE.PUT_LINE(FND_FILE.log,'Before Validate Call for AP : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
843: IF Validate_NIT(g_nit_rec, 'JL_CO_GL_SUPPLIER') THEN
844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)
846: ||'-'||p_journal_rec.account_code);
847: FND_FILE.PUT_LINE(FND_FILE.log,' : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
848: FND_FILE.PUT_LINE(FND_FILE.log,'AP : acc_dr, acc_cr,ent_dr, ent_dr : '

Line 845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)

841:
842: FND_FILE.PUT_LINE(FND_FILE.log,'Before Validate Call for AP : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
843: IF Validate_NIT(g_nit_rec, 'JL_CO_GL_SUPPLIER') THEN
844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)
846: ||'-'||p_journal_rec.account_code);
847: FND_FILE.PUT_LINE(FND_FILE.log,' : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
848: FND_FILE.PUT_LINE(FND_FILE.log,'AP : acc_dr, acc_cr,ent_dr, ent_dr : '
849: ||to_char(ap_trx.accounted_dr)||'-'||to_char(ap_trx.accounted_cr)

Line 847: FND_FILE.PUT_LINE(FND_FILE.log,' : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);

843: IF Validate_NIT(g_nit_rec, 'JL_CO_GL_SUPPLIER') THEN
844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)
846: ||'-'||p_journal_rec.account_code);
847: FND_FILE.PUT_LINE(FND_FILE.log,' : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
848: FND_FILE.PUT_LINE(FND_FILE.log,'AP : acc_dr, acc_cr,ent_dr, ent_dr : '
849: ||to_char(ap_trx.accounted_dr)||'-'||to_char(ap_trx.accounted_cr)
850: ||'-'||to_char(ap_trx.entered_dr)||'-'||to_char(ap_trx.entered_cr));
851:

Line 848: FND_FILE.PUT_LINE(FND_FILE.log,'AP : acc_dr, acc_cr,ent_dr, ent_dr : '

844: FND_FILE.PUT_LINE(FND_FILE.log,'After AP NIT Validate : JE Line NUM, Header_id : '||to_char(p_journal_rec.je_line_num)||'-'||to_char(p_journal_rec.je_header_id));
845: FND_FILE.PUT_LINE(FND_FILE.log,'CCID, account code : '||to_char(p_journal_rec.code_combination_id)
846: ||'-'||p_journal_rec.account_code);
847: FND_FILE.PUT_LINE(FND_FILE.log,' : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
848: FND_FILE.PUT_LINE(FND_FILE.log,'AP : acc_dr, acc_cr,ent_dr, ent_dr : '
849: ||to_char(ap_trx.accounted_dr)||'-'||to_char(ap_trx.accounted_cr)
850: ||'-'||to_char(ap_trx.entered_dr)||'-'||to_char(ap_trx.entered_cr));
851:
852: INSERT INTO jl_co_gl_trx (transaction_id,

Line 989: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AP_trx:'|| g_error_text);

985:
986: WHEN others THEN
987: g_error_code := SQLCODE;
988: g_error_text := SUBSTR(SQLERRM,1,240);
989: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AP_trx:'|| g_error_text);
990: RAISE;
991:
992: END Generate_AP_trx;
993:

Line 1157: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_PO_trx:'|| g_error_text);

1153:
1154: WHEN others THEN
1155: g_error_code := SQLCODE;
1156: g_error_text := SUBSTR(SQLERRM,1,240);
1157: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_PO_trx:'|| g_error_text);
1158: RAISE;
1159:
1160: END Generate_PO_trx;
1161:

Line 1242: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AR_trx(+)');

1238: BEGIN
1239:
1240: g_error_exists := 'FALSE';
1241:
1242: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AR_trx(+)');
1243:
1244: SELECT p_journal_rec.je_header_id,
1245: p_journal_rec.je_line_num,
1246: p_journal_rec.ext_nit

Line 1249: FND_FILE.PUT_LINE(FND_FILE.log,'je_header_id, je_line_num : '||to_char(p_journal_rec.je_header_id)

1245: p_journal_rec.je_line_num,
1246: p_journal_rec.ext_nit
1247: INTO g_gl_je_rec
1248: FROM DUAL;
1249: FND_FILE.PUT_LINE(FND_FILE.log,'je_header_id, je_line_num : '||to_char(p_journal_rec.je_header_id)
1250: ||'-'||to_char(p_journal_rec.je_line_num));
1251:
1252: FOR ar_trx IN ar_detail_lines LOOP
1253:

Line 1297: FND_FILE.PUT_LINE(FND_FILE.log,'l_country_code - l_branch_country_code : '

1293: AND nit.nit = substr(party.jgzz_fiscal_code,1,14);
1294:
1295: l_country_code := fnd_profile.value ('JGZZ_COUNTRY_CODE');
1296:
1297: FND_FILE.PUT_LINE(FND_FILE.log,'l_country_code - l_branch_country_code : '
1298: ||l_country_code||'--'||l_branch_country_code);
1299:
1300: IF l_country_code = l_branch_country_code THEN
1301: g_nit_rec.nit_type := 'LEGAL_ENTITY';

Line 1306: FND_FILE.PUT_LINE(FND_FILE.log,'g_nit_rec.nit_type : '||g_nit_rec.nit_type);

1302: ELSE
1303: g_nit_rec.nit_type := 'FOREIGN_ENTITY';
1304: END IF;
1305:
1306: FND_FILE.PUT_LINE(FND_FILE.log,'g_nit_rec.nit_type : '||g_nit_rec.nit_type);
1307: l_identifier_type := 'JL_CO_GL_BANK';
1308:
1309: ELSIF (( l_customer_num IS NULL ) AND
1310: ( nvl(ar_trx.event_class_code,'$') <> 'MISC_RECEIPT' )) THEN

Line 1333: FND_FILE.PUT_LINE(FND_FILE.log,'Non Misc : g_nit_rec : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);

1329: WHERE custacct.cust_account_id = ar_trx.party_id
1330: AND REPLACE(rac.jgzz_fiscal_code,'-') = jlcgn.nit(+)
1331: AND custacct.party_id=rac.party_id;
1332:
1333: FND_FILE.PUT_LINE(FND_FILE.log,'Non Misc : g_nit_rec : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
1334: EXCEPTION
1335: WHEN no_data_found THEN
1336:
1337: SELECT nit_id,

Line 1349: FND_FILE.PUT_LINE(FND_FILE.log,'Exception Non Misc : g_nit_rec : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);

1345: g_nit_rec.nit_type,
1346: g_nit_rec.verifying_digit
1347: FROM jl_co_gl_nits
1348: WHERE nit_id = g_default_nit_id;
1349: FND_FILE.PUT_LINE(FND_FILE.log,'Exception Non Misc : g_nit_rec : '||g_nit_rec.nit||'-'||g_nit_rec.nit_name);
1350:
1351: END;
1352:
1353: g_gl_je_rec.identifier := l_customer_num;

Line 1356: FND_FILE.PUT_LINE(FND_FILE.log,'Call To Validate_NIT in Generate_AR :'||g_gl_je_rec.identifier);

1352:
1353: g_gl_je_rec.identifier := l_customer_num;
1354:
1355: END IF;
1356: FND_FILE.PUT_LINE(FND_FILE.log,'Call To Validate_NIT in Generate_AR :'||g_gl_je_rec.identifier);
1357:
1358: IF Validate_NIT(g_nit_rec,l_identifier_type) THEN
1359: FND_FILE.PUT_LINE(FND_FILE.log,'After Validate :'||g_gl_je_rec.identifier);
1360:

Line 1359: FND_FILE.PUT_LINE(FND_FILE.log,'After Validate :'||g_gl_je_rec.identifier);

1355: END IF;
1356: FND_FILE.PUT_LINE(FND_FILE.log,'Call To Validate_NIT in Generate_AR :'||g_gl_je_rec.identifier);
1357:
1358: IF Validate_NIT(g_nit_rec,l_identifier_type) THEN
1359: FND_FILE.PUT_LINE(FND_FILE.log,'After Validate :'||g_gl_je_rec.identifier);
1360:
1361: INSERT INTO jl_co_gl_trx (transaction_id,
1362: process_id,
1363: set_of_books_id,

Line 1495: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AR_trx:'|| g_error_text);

1491:
1492: WHEN others THEN
1493: g_error_code := SQLCODE;
1494: g_error_text := SUBSTR(SQLERRM,1,240);
1495: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_AR_trx:'|| g_error_text);
1496: RAISE;
1497: END Generate_AR_trx;
1498:
1499:

Line 1653: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_Non_Oracle_trx:'

1649: WHEN others THEN
1650: BEGIN
1651: g_error_code := SQLCODE;
1652: g_error_text := SUBSTR(SQLERRM,1,240);
1653: FND_FILE.PUT_LINE(FND_FILE.log,'Generate_Non_Oracle_trx:'
1654: || g_error_text);
1655: RAISE;
1656: END;
1657:

Line 1733: FND_FILE.PUT_LINE(FND_FILE.log,'p_sobid :'||to_char(p_sobid)||'-'||to_char(l_pre_period_num));

1729: FROM jl_co_gl_balances bal
1730: WHERE (bal.period_year * 100 + bal.period_num) = l_pre_period_num
1731: AND bal.set_of_books_id = p_sobid);
1732:
1733: FND_FILE.PUT_LINE(FND_FILE.log,'p_sobid :'||to_char(p_sobid)||'-'||to_char(l_pre_period_num));
1734:
1735:
1736: EXCEPTION
1737: WHEN others THEN

Line 1741: FND_FILE.PUT_LINE(FND_FILE.log,'create_balances:'

1737: WHEN others THEN
1738: BEGIN
1739: g_error_code := SQLCODE;
1740: g_error_text := SUBSTR(SQLERRM,1,240);
1741: FND_FILE.PUT_LINE(FND_FILE.log,'create_balances:'
1742: || g_error_text);
1743: RAISE;
1744: END;
1745: END;

Line 1842: FND_FILE.PUT_LINE(FND_FILE.log,

1838: -- balance records IN a specific period unless there is activity
1839: -- IN that period. This decision was made to avoid creating
1840: -- too many records IN jl_co_balances (unlike gl_balances)
1841:
1842: FND_FILE.PUT_LINE(FND_FILE.log,
1843: 'If l_balance_id is 0 then insert ');
1844:
1845: BEGIN
1846:

Line 1932: FND_FILE.PUT_LINE(FND_FILE.log,

1928: g_login_id);
1929:
1930: ELSE
1931: -- Balance record exists - Update period_net of current record
1932: FND_FILE.PUT_LINE(FND_FILE.log,
1933: 'If l_balance_id is non 0 then update :' ||to_char(trx.acc_dr));
1934: UPDATE jl_co_gl_balances jlcgb
1935: SET period_net_dr = (period_net_dr + trx.acc_dr) ,
1936: period_net_cr = (period_net_cr + trx.acc_cr),

Line 1985: FND_FILE.PUT_LINE(FND_FILE.log,'Calculate_Balance:'

1981: EXCEPTION
1982: WHEN others THEN
1983: g_error_code := SQLCODE;
1984: g_error_text := SUBSTR(SQLERRM,1,240);
1985: FND_FILE.PUT_LINE(FND_FILE.log,'Calculate_Balance:'
1986: || g_error_text);
1987: RAISE;
1988:
1989: END Calculate_Balance;

Line 2115: FND_FILE.PUT_LINE(FND_FILE.log,'Reverse_Balance:'|| g_error_text);

2111: EXCEPTION
2112: WHEN others THEN
2113: g_error_code := SQLCODE;
2114: g_error_text := SUBSTR(SQLERRM,1,240);
2115: FND_FILE.PUT_LINE(FND_FILE.log,'Reverse_Balance:'|| g_error_text);
2116: RAISE;
2117:
2118: END Reverse_Balance;
2119:

Line 2136: FND_FILE.PUT_LINE(FND_FILE.log,'Create_Trx_Balance: Start');

2132: l_message_text jl_co_gl_conc_errs.message_text%TYPE := NULL;
2133:
2134: BEGIN
2135:
2136: FND_FILE.PUT_LINE(FND_FILE.log,'Create_Trx_Balance: Start');
2137:
2138: DELETE FROM jl_co_gl_conc_errs;
2139:
2140: -- Find out which segment IS the natural account segment

Line 2251: FND_FILE.PUT_LINE(FND_FILE.log,

2247:
2248: IF p_proc_type = 'GENERATE' THEN
2249:
2250: -- Generate Transactions AND calculate balance
2251: FND_FILE.PUT_LINE(FND_FILE.log,
2252: 'Create_Trx_Balance: Entering FOR LOOP');
2253:
2254: FOR j_line IN journals(p_period,p_sobid,p_batchid) LOOP
2255: FND_FILE.PUT_LINE(FND_FILE.log,

Line 2255: FND_FILE.PUT_LINE(FND_FILE.log,

2251: FND_FILE.PUT_LINE(FND_FILE.log,
2252: 'Create_Trx_Balance: Entering FOR LOOP');
2253:
2254: FOR j_line IN journals(p_period,p_sobid,p_batchid) LOOP
2255: FND_FILE.PUT_LINE(FND_FILE.log,
2256: 'p_period :'||p_period||'-'||to_char(p_sobid)||'-'||to_char(p_batchid)||j_line.source);
2257:
2258: g_journal_rec := j_line;
2259:

Line 2267: FND_FILE.PUT_LINE(FND_FILE.log, 'Call to Generate_AP_trx :');

2263: j_line.ref_3 IS NULL AND
2264: j_line.ref_4 IS NULL AND
2265: j_line.ref_5 IS NULL )) AND
2266: (j_line.reversed_je_header_id IS NULL)) THEN
2267: FND_FILE.PUT_LINE(FND_FILE.log, 'Call to Generate_AP_trx :');
2268:
2269: Generate_AP_trx(g_journal_rec);
2270: ELSIF (j_line.source IN ('Purchasing') AND
2271: (j_line.ref_1 = 'PO') AND

Line 2282: FND_FILE.PUT_LINE(FND_FILE.log, 'Call to Generate_AR_trx :');

2278: j_line.ref_3 IS NULL AND
2279: j_line.ref_4 IS NULL AND
2280: j_line.ref_5 IS NULL )) AND
2281: (j_line.reversed_je_header_id IS NULL)) THEN
2282: FND_FILE.PUT_LINE(FND_FILE.log, 'Call to Generate_AR_trx :');
2283: Generate_AR_trx(g_journal_rec);
2284: ELSIF (j_line.ref_10 IS NULL AND
2285: (j_line.ext_nit_type IS NOT NULL AND
2286: j_line.ext_nit_name IS NOT NULL AND

Line 2390: FND_FILE.PUT_LINE(FND_FILE.log,

2386: = reverse_rec_tbl(j_line).je_line_num );
2387: END LOOP;
2388:
2389: -- Now that all the transactions are created - calculate balance
2390: FND_FILE.PUT_LINE(FND_FILE.log,
2391: 'Create_Trx_Balance: Calling Calculate Balance');
2392:
2393:
2394: Create_Balances( p_period,

Line 2414: FND_FILE.PUT_LINE(FND_FILE.log,

2410: FALSE,
2411: p_sobid,
2412: g_parameter_rec.cid);
2413: IF l_request_id = 0 THEN
2414: FND_FILE.PUT_LINE(FND_FILE.log,
2415: 'CONC-REQUEST SUBMISSION FAILED');
2416: ELSE
2417: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
2418: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);

Line 2420: FND_FILE.PUT_LINE(FND_FILE.log,

2416: ELSE
2417: FND_MESSAGE.SET_NAME('SQLGL','GL_REQUEST_SUBMITTED');
2418: FND_MESSAGE.SET_TOKEN('REQUEST_ID',l_request_id,FALSE);
2419: l_message_text := FND_MESSAGE.GET;
2420: FND_FILE.PUT_LINE(FND_FILE.log,
2421: 'Submitted Third Party Balances Error Report. '
2422: || l_message_text);
2423: END IF;
2424:

Line 2429: FND_FILE.PUT_LINE(FND_FILE.log,

2425: ELSIF p_proc_type = 'REVERSE' THEN
2426:
2427: -- call Reverse Balances routine with the RCID
2428:
2429: FND_FILE.PUT_LINE(FND_FILE.log,
2430: 'Create_Trx_Balance: Calling Reverse Balance');
2431:
2432: Reverse_Balance(p_rcid,
2433: g_parameter_rec.cid,

Line 2438: FND_FILE.PUT_LINE(FND_FILE.log,

2434: p_sobid,
2435: g_parameter_rec.user_id);
2436: END IF; -- if p_proc_type
2437:
2438: FND_FILE.PUT_LINE(FND_FILE.log,
2439: 'Create_Trx_Balance: Process completed successfully');
2440:
2441: EXCEPTION
2442: WHEN others THEN

Line 2445: FND_FILE.PUT_LINE(FND_FILE.log,

2441: EXCEPTION
2442: WHEN others THEN
2443: g_error_code := SQLCODE;
2444: g_error_text := SUBSTR(SQLERRM,1,240);
2445: FND_FILE.PUT_LINE(FND_FILE.log,
2446: 'Create_Trx_Balance:'|| g_error_text);
2447: RAISE;
2448:
2449: END create_trx_balance;