[Home] [Help]
1034:
1035: BEGIN
1036:
1037: p_count := 0;
1038: select fii_tmp_pk_s.nextval into l_seq_id from dual;
1039:
1040: -- --------------------------------------------
1041: -- Populate rowid into fii_tmp_pk table based
1042: -- on last update date
1037: p_count := 0;
1038: select fii_tmp_pk_s.nextval into l_seq_id from dual;
1039:
1040: -- --------------------------------------------
1041: -- Populate rowid into fii_tmp_pk table based
1042: -- on last update date
1043: -- --------------------------------------------
1044: IF (p_mode = 'AR INVL') THEN
1045:
1045:
1046: -- -----------------------------------------
1047: -- For ra_customer_trx_lines_all
1048: -- -----------------------------------------
1049: Insert into fii_tmp_pk(
1050: SEQ_ID,
1051: primary_key1,
1052: primary_key_char5)
1053: select /*+ PARALLEL(CT,4) */
1086: -- The profile option stored in the global variable g_acct_or_inv_date
1087: -- will be stored in the column Primary_Key5 . Modified for Currency Conversion Date Enhancement, 14-APR-03
1088: -----------------------------------------------------------------------------------------------------
1089:
1090: Insert into fii_tmp_pk(
1091: SEQ_ID,
1092: Primary_Key1,
1093: primary_key_char5,
1094: primary_key5,
1121: ctlgd.cust_trx_line_gl_dist_id,
1122: p_mode,
1123: g_acct_or_inv_date,
1124: xal.code_combination_id
1125: from fii_tmp_pk ftr,
1126: ra_cust_trx_line_gl_dist_all ctlgd,
1127: xla_ae_headers xah,
1128: xla_ae_lines xal,
1129: xla_distribution_links xdl
1154: -- ----------------------------------------
1155: -- For ar_adjustments_all
1156: -- ----------------------------------------
1157:
1158: Insert into fii_tmp_pk(
1159: SEQ_ID,
1160: primary_key1,
1161: primary_key_char5 ,
1162: primary_key4) --ccid
1233: p_count := sql%rowcount;
1234:
1235: IF (FND_INSTALLATION.GET_APP_INFO('FII', l_status, l_industry, l_fii_schema)) THEN
1236: FND_STATS.GATHER_TABLE_STATS(OWNNAME => l_fii_schema,
1237: TABNAME => 'FII_TMP_PK');
1238: END IF;
1239:
1240: -- ------------------------------------------
1241: -- Commit for the child process to pick up
1882: edw_log.put_line(' ');
1883: edw_log.put_line('Cleaning tmp table');
1884: end if;
1885:
1886: delete fii_tmp_pk
1887: where seq_id IN ( l_seq_id_line,
1888: l_seq_id_dist_line);
1889: commit;
1890:
1983: edw_log.put_line(' ');
1984: edw_log.put_line('Cleaning tmp table');
1985: end if;
1986:
1987: delete fii_tmp_pk
1988: where seq_id = g_seq_id;
1989: commit;
1990:
1991: fii_util.stop_timer;
2118: Errbuf:=g_errbuf;
2119: Retcode:=g_retcode;
2120: l_exception_msg := Retcode || ':' || Errbuf;
2121: rollback; -- rollback any submitted requests
2122: delete fii_tmp_pk -- clean out fii_tmp_pk table
2123: where seq_id IN ( l_seq_id_line,
2124: l_seq_id_dist_line,
2125: l_seq_id_adjust_line);
2126: commit;
2161: Errbuf:=g_errbuf;
2162: Retcode:=g_retcode;
2163: l_exception_msg := Retcode || ':' || Errbuf;
2164: rollback; -- Rollback insert into local staging
2165: delete fii_tmp_pk -- clean out fii_tmp_pk table
2166: where seq_id = g_seq_id;
2167: commit;
2168: if g_debug_flag = 'Y' then
2169: edw_log.put_line('Inserting into local staging have failed');
2223: WHEN L_IDEN_CHANGE_FAILURE THEN
2224: Errbuf:=g_errbuf;
2225: Retcode:=g_retcode;
2226: l_exception_msg := Retcode || ':' || Errbuf;
2227: delete fii_tmp_pk
2228: where seq_id IN ( l_seq_id_line,
2229: l_seq_id_dist_line,
2230: l_seq_id_adjust_line,
2231: g_seq_id);
2268: Errbuf:=g_errbuf;
2269: Retcode:=g_retcode;
2270: l_exception_msg := Retcode || ':' || Errbuf;
2271: rollback;
2272: delete fii_tmp_pk
2273: where seq_id IN ( l_seq_id_line,
2274: l_seq_id_dist_line,
2275: l_seq_id_adjust_line,
2276: g_seq_id);