43:
44: PROCEDURE GET_GUI_SOURCE
45: (
46: P_TRX_SOURCE_NAME IN VARCHAR2,
47: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
48: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
49: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
50: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
51: );
44: PROCEDURE GET_GUI_SOURCE
45: (
46: P_TRX_SOURCE_NAME IN VARCHAR2,
47: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
48: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
49: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
50: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
51: );
52:
45: (
46: P_TRX_SOURCE_NAME IN VARCHAR2,
47: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
48: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
49: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
50: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
51: );
52:
53:
46: P_TRX_SOURCE_NAME IN VARCHAR2,
47: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
48: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
49: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
50: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
51: );
52:
53:
54: PROCEDURE GET_ORG_TRX_NUMBER
159: /* Taiwanese Output VAT Report */
160: if P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID is NOT NULL then
161: SELECT batch_source_type, TO_NUMBER(global_attribute1)
162: INTO l_loc_trx_src_type, l_referenced_trx_src_id
163: FROM ra_batch_sources_all
164: WHERE batch_source_Id = P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID;
165:
166:
167: IF (g_level_statement >= g_current_runtime_level ) THEN
172:
173: if l_loc_trx_src_type = 'INV' and
174: l_referenced_trx_src_id IS NOT NULL and
175: P_TRL_GLOBAL_VARIABLES_REC.INCLUDE_REFERENCED_SOURCE = 'Y' then
176: /* l_referenced_trx_src_id :GDF_RA_BATCH_SOURCES_ATT1 is used for Reference
177: Transaction Source */
178: lp_where_trx_source_id:= ' DET.TRX_BATCH_SOURCE_ID = ' || P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID;
179: lp_where_inc_reference_source:= ' or DET.TRX_BATCH_SOURCE_ID = '|| l_referenced_trx_src_id;
180: else
232:
233: if P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID is NOT NULL then
234: SELECT batch_source_type, TO_NUMBER(global_attribute1)
235: INTO l_loc_trx_src_type, l_referenced_trx_src_id
236: FROM ra_batch_sources
237: WHERE batch_source_Id = P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID;
238:
239: if l_loc_trx_src_type = 'INV' and
240: l_referenced_trx_src_id IS NOT NULL and
238:
239: if l_loc_trx_src_type = 'INV' and
240: l_referenced_trx_src_id IS NOT NULL and
241: P_TRL_GLOBAL_VARIABLES_REC.INCLUDE_REFERENCED_SOURCE = 'Y' then
242: /* l_referenced_trx_src_id is used for GDF_RA_BATCH_SOURCES_ATT1 */
243: lp_where_trx_source_id:= ' and DET.TRX_BATCH_SOURCE_ID = ' || P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID;
244: lp_where_inc_reference_source:= ' DET.TRX_BATCH_SOURCE_ID = '|| l_referenced_trx_src_id;
245: else
246: lp_where_trx_source_id:= ' DET.TRX_BATCH_SOURCE_ID = ' || P_TRL_GLOBAL_VARIABLES_REC.BATCH_SOURCE_ID;
255: 'DELETE from ZX_REP_TRX_DETAIL_T DET
256: WHERE DET.REQUEST_ID = '||P_TRL_GLOBAL_VARIABLES_REC.REQUEST_ID||' and
257: NOT EXISTS
258: (
259: SELECT 1 FROM ra_batch_sources_all rbs,
260: ra_customer_trx_all rct
261: WHERE
262: rbs.batch_source_id = DET.TRX_BATCH_SOURCE_ID and
263: rct.batch_source_id = rbs.batch_source_id and
791: TYPE EXPORT_TYPE_TBL is TABLE OF
792: ZX_REP_TRX_JX_EXT_T.ATTRIBUTE6%TYPE INDEX BY BINARY_INTEGER;
793:
794: TYPE INVOICE_WORD_TBL is TABLE OF
795: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE INDEX BY BINARY_INTEGER;
796:
797: TYPE INITIAL_TRX_NUM_TBL is TABLE OF
798: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE INDEX BY BINARY_INTEGER;
799:
794: TYPE INVOICE_WORD_TBL is TABLE OF
795: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE INDEX BY BINARY_INTEGER;
796:
797: TYPE INITIAL_TRX_NUM_TBL is TABLE OF
798: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE INDEX BY BINARY_INTEGER;
799:
800: TYPE FINAL_TRX_NUM_TBL is TABLE OF
801: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE INDEX BY BINARY_INTEGER;
802:
797: TYPE INITIAL_TRX_NUM_TBL is TABLE OF
798: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE INDEX BY BINARY_INTEGER;
799:
800: TYPE FINAL_TRX_NUM_TBL is TABLE OF
801: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE INDEX BY BINARY_INTEGER;
802:
803: TYPE REFERENCE_TRX_SRC_TBL is TABLE OF
804: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE INDEX BY BINARY_INTEGER;
805:
800: TYPE FINAL_TRX_NUM_TBL is TABLE OF
801: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE INDEX BY BINARY_INTEGER;
802:
803: TYPE REFERENCE_TRX_SRC_TBL is TABLE OF
804: ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE INDEX BY BINARY_INTEGER;
805:
806: TYPE ORG_TRX_NUMBER_TBL is TABLE OF
807: ZX_REP_TRX_JX_EXT_T.GDF_RA_CUST_TRX_ATT9%TYPE INDEX BY BINARY_INTEGER;
808:
1021: (detail_tax_line_ext_id,
1022: detail_tax_line_id,
1023: tax_status_mng, -- government tax type meaning
1024: gdf_ra_cust_trx_att9, -- orginal transaction number ZXTWRUIL
1025: gdf_ra_batch_sources_att1, -- reference transaction source ZXTWRUIL
1026: gdf_ra_batch_sources_att2, -- initial trx num ZXTWRUIL
1027: gdf_ra_batch_sources_att3, -- invoice word ZXTWRUIL
1028: gdf_ra_batch_sources_att4, -- final trx num ZXTWRUIL
1029: attribute15, --Bug 5251425
1022: detail_tax_line_id,
1023: tax_status_mng, -- government tax type meaning
1024: gdf_ra_cust_trx_att9, -- orginal transaction number ZXTWRUIL
1025: gdf_ra_batch_sources_att1, -- reference transaction source ZXTWRUIL
1026: gdf_ra_batch_sources_att2, -- initial trx num ZXTWRUIL
1027: gdf_ra_batch_sources_att3, -- invoice word ZXTWRUIL
1028: gdf_ra_batch_sources_att4, -- final trx num ZXTWRUIL
1029: attribute15, --Bug 5251425
1030: created_by,
1023: tax_status_mng, -- government tax type meaning
1024: gdf_ra_cust_trx_att9, -- orginal transaction number ZXTWRUIL
1025: gdf_ra_batch_sources_att1, -- reference transaction source ZXTWRUIL
1026: gdf_ra_batch_sources_att2, -- initial trx num ZXTWRUIL
1027: gdf_ra_batch_sources_att3, -- invoice word ZXTWRUIL
1028: gdf_ra_batch_sources_att4, -- final trx num ZXTWRUIL
1029: attribute15, --Bug 5251425
1030: created_by,
1031: creation_date,
1024: gdf_ra_cust_trx_att9, -- orginal transaction number ZXTWRUIL
1025: gdf_ra_batch_sources_att1, -- reference transaction source ZXTWRUIL
1026: gdf_ra_batch_sources_att2, -- initial trx num ZXTWRUIL
1027: gdf_ra_batch_sources_att3, -- invoice word ZXTWRUIL
1028: gdf_ra_batch_sources_att4, -- final trx num ZXTWRUIL
1029: attribute15, --Bug 5251425
1030: created_by,
1031: creation_date,
1032: last_updated_by,
2291:
2292: PROCEDURE GET_GUI_SOURCE
2293: (
2294: P_TRX_SOURCE_NAME IN VARCHAR2,
2295: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
2296: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
2297: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
2298: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
2299:
2292: PROCEDURE GET_GUI_SOURCE
2293: (
2294: P_TRX_SOURCE_NAME IN VARCHAR2,
2295: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
2296: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
2297: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
2298: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
2299:
2300: )
2293: (
2294: P_TRX_SOURCE_NAME IN VARCHAR2,
2295: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
2296: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
2297: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
2298: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
2299:
2300: )
2301: IS
2294: P_TRX_SOURCE_NAME IN VARCHAR2,
2295: X_GDF_RA_BATCH_SOURCES_ATT1 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT1%TYPE, -- reference transaction source
2296: X_GDF_RA_BATCH_SOURCES_ATT2 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT2%TYPE, -- initial trx num
2297: X_GDF_RA_BATCH_SOURCES_ATT3 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT3%TYPE, -- invoice word
2298: X_GDF_RA_BATCH_SOURCES_ATT4 OUT NOCOPY ZX_REP_TRX_JX_EXT_T.GDF_RA_BATCH_SOURCES_ATT4%TYPE -- final trx num
2299:
2300: )
2301: IS
2302:
2314:
2315: IF P_TRX_SOURCE_NAME is not null THEN
2316: SELECT decode(src.global_attribute1, NULL, src.batch_source_id,
2317: src.global_attribute1)
2318: INTO X_GDF_RA_BATCH_SOURCES_ATT1
2319: FROM ra_batch_sources src
2320: WHERE src.name = P_TRX_SOURCE_NAME;
2321:
2322: IF ( g_level_statement>= g_current_runtime_level ) THEN
2315: IF P_TRX_SOURCE_NAME is not null THEN
2316: SELECT decode(src.global_attribute1, NULL, src.batch_source_id,
2317: src.global_attribute1)
2318: INTO X_GDF_RA_BATCH_SOURCES_ATT1
2319: FROM ra_batch_sources src
2320: WHERE src.name = P_TRX_SOURCE_NAME;
2321:
2322: IF ( g_level_statement>= g_current_runtime_level ) THEN
2323: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2320: WHERE src.name = P_TRX_SOURCE_NAME;
2321:
2322: IF ( g_level_statement>= g_current_runtime_level ) THEN
2323: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2324: ' X_GDF_RA_BATCH_SOURCES_ATT1 : '||X_GDF_RA_BATCH_SOURCES_ATT1 );
2325: END IF;
2326:
2327: SELECT substr(global_attribute3,1,2),
2328: to_number(global_attribute2),
2326:
2327: SELECT substr(global_attribute3,1,2),
2328: to_number(global_attribute2),
2329: to_number(global_attribute4)
2330: INTO X_GDF_RA_BATCH_SOURCES_ATT3,
2331: X_GDF_RA_BATCH_SOURCES_ATT2,
2332: X_GDF_RA_BATCH_SOURCES_ATT4
2333: FROM ra_batch_sources
2334: WHERE batch_source_id = X_GDF_RA_BATCH_SOURCES_ATT1;
2327: SELECT substr(global_attribute3,1,2),
2328: to_number(global_attribute2),
2329: to_number(global_attribute4)
2330: INTO X_GDF_RA_BATCH_SOURCES_ATT3,
2331: X_GDF_RA_BATCH_SOURCES_ATT2,
2332: X_GDF_RA_BATCH_SOURCES_ATT4
2333: FROM ra_batch_sources
2334: WHERE batch_source_id = X_GDF_RA_BATCH_SOURCES_ATT1;
2335:
2328: to_number(global_attribute2),
2329: to_number(global_attribute4)
2330: INTO X_GDF_RA_BATCH_SOURCES_ATT3,
2331: X_GDF_RA_BATCH_SOURCES_ATT2,
2332: X_GDF_RA_BATCH_SOURCES_ATT4
2333: FROM ra_batch_sources
2334: WHERE batch_source_id = X_GDF_RA_BATCH_SOURCES_ATT1;
2335:
2336: END IF;
2329: to_number(global_attribute4)
2330: INTO X_GDF_RA_BATCH_SOURCES_ATT3,
2331: X_GDF_RA_BATCH_SOURCES_ATT2,
2332: X_GDF_RA_BATCH_SOURCES_ATT4
2333: FROM ra_batch_sources
2334: WHERE batch_source_id = X_GDF_RA_BATCH_SOURCES_ATT1;
2335:
2336: END IF;
2337:
2330: INTO X_GDF_RA_BATCH_SOURCES_ATT3,
2331: X_GDF_RA_BATCH_SOURCES_ATT2,
2332: X_GDF_RA_BATCH_SOURCES_ATT4
2333: FROM ra_batch_sources
2334: WHERE batch_source_id = X_GDF_RA_BATCH_SOURCES_ATT1;
2335:
2336: END IF;
2337:
2338: IF ( g_level_statement>= g_current_runtime_level ) THEN
2336: END IF;
2337:
2338: IF ( g_level_statement>= g_current_runtime_level ) THEN
2339: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2340: ' X_GDF_RA_BATCH_SOURCES_ATT2 : '||X_GDF_RA_BATCH_SOURCES_ATT2 );
2341: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2342: ' X_GDF_RA_BATCH_SOURCES_ATT3 : '||X_GDF_RA_BATCH_SOURCES_ATT3 );
2343: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2344: ' X_GDF_RA_BATCH_SOURCES_ATT4 : '||X_GDF_RA_BATCH_SOURCES_ATT4 );
2338: IF ( g_level_statement>= g_current_runtime_level ) THEN
2339: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2340: ' X_GDF_RA_BATCH_SOURCES_ATT2 : '||X_GDF_RA_BATCH_SOURCES_ATT2 );
2341: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2342: ' X_GDF_RA_BATCH_SOURCES_ATT3 : '||X_GDF_RA_BATCH_SOURCES_ATT3 );
2343: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2344: ' X_GDF_RA_BATCH_SOURCES_ATT4 : '||X_GDF_RA_BATCH_SOURCES_ATT4 );
2345: END IF;
2346:
2340: ' X_GDF_RA_BATCH_SOURCES_ATT2 : '||X_GDF_RA_BATCH_SOURCES_ATT2 );
2341: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2342: ' X_GDF_RA_BATCH_SOURCES_ATT3 : '||X_GDF_RA_BATCH_SOURCES_ATT3 );
2343: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2344: ' X_GDF_RA_BATCH_SOURCES_ATT4 : '||X_GDF_RA_BATCH_SOURCES_ATT4 );
2345: END IF;
2346:
2347: IF (g_level_procedure >= g_current_runtime_level ) THEN
2348: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_JA_EXTRACT_PKG',
2501: SELECT rct_org.trx_number
2502: INTO X_ORG_TRX_NUMBER
2503: FROM ra_customer_trx_all rct,
2504: ra_customer_trx_all rct_org,
2505: ra_batcH_sources_all rbs
2506: WHERE rct_org.customer_Trx_id = rct.previous_customer_trx_id and
2507: rct.batch_source_id = rbs.batch_source_id and
2508: rbs.batch_source_id = P_TRX_SOURCE_ID and
2509: rct.customer_trx_id = p_trx_id;