[Home] [Help]
980: l_import_message_body OUT NOCOPY varchar2
981: ) IS
982: v_SelectSQL varchar2(500);
983: v_ReturnCursor t_RefCur;
984: v_Batches gl_je_batches%ROWTYPE;
985: l_batch_name varchar2(100);
986: l_batch_id number;
987: l_first_one boolean;
988: BEGIN
987: l_first_one boolean;
988: BEGIN
989: l_first_one := TRUE;
990: -- Get_Schema_Name(dblink); --=bug#2630145
991: v_SelectSQL := 'select * from ' || applSysSchema ||'.gl_je_batches@' || dblink ||
992: ' where name like ''%' || TO_CHAR(l_reqJI_id) || '%''';
993: OPEN v_ReturnCursor FOR v_SelectSQL;
994: LOOP --+for every batch in this transfer
995: FETCH v_ReturnCursor INTO v_Batches;
994: LOOP --+for every batch in this transfer
995: FETCH v_ReturnCursor INTO v_Batches;
996: EXIT WHEN v_ReturnCursor%NOTFOUND;
997: l_batch_id := v_Batches.je_batch_id;
998: v_SelectSQL := 'select name from ' || applSysSchema ||'.gl_je_batches@' || dblink ||
999: ' WHERE je_batch_id = :b_id';
1000: EXECUTE IMMEDIATE v_SelectSQL INTO l_batch_name USING l_batch_id;
1001: COMMIT;
1002: if l_first_one then
1050: l_batch_id number;
1051: v_SQL1 varchar2(1000);
1052: v_SQL2 varchar2(2000);
1053: v_ReturnCursor t_RefCur;
1054: v_Batches gl_je_batches%ROWTYPE;
1055: l_posted_rows number;
1056: l_status varchar2(1);
1057: l_target_ledger_name varchar2(30);
1058: l_post_run_id number;
1261: if (p_j_post = 'Y') then
1262: --+Journal Post
1263: section_number := 3;
1264: --+dbms_output.put_line('j post flag is ' || p_j_post);
1265: v_SelectSQL := 'select * from ' || applSysSchema || '.gl_je_batches@' || dblink ||
1266: ' where name like ''%' || TO_CHAR(l_reqJI_id) || '%''';
1267: OPEN v_ReturnCursor FOR v_SelectSQL;
1268: LOOP --+for every batch in this transfer
1269: FETCH v_ReturnCursor INTO v_Batches;
1307: EXECUTE IMMEDIATE v_SQL2 USING IN l_pd_name, IN l_postable_rows,
1308: IN l_to_ledger_id, IN l_batch_id, IN p_actual_flag, IN l_avg_flag, OUT l_verify;
1309: --COMMIT;
1310: --+dbms_output.put_line('After verify Journal post');
1311: v_SQL2 := 'select name from ' || applSysSchema ||'.gl_je_batches@' || dblink ||
1312: ' WHERE je_batch_id = :b_id';
1313: EXECUTE IMMEDIATE v_SQL2 INTO l_batch_name USING l_batch_id;
1314: --COMMIT;
1315: --+dbms_output.put_line('The name of the batch is' || l_batch_name);