DBA Data[Home] [Help]

APPS.PA_TRANSACTION_INTERFACE_T4 dependencies on PA_TXN_INT_TRIG_CTL

Line 18: If pa_txn_int_trig_ctl.G_TrxImport2 IS NULL Then

14: --ones are not rejected ('R' transaction status code) and remain as Pending ('P')
15: --Hence they get picked up again in the next loop of the processing and EI's get created
16: --for them. This is wrong and thus this trigger code (in the no data found) will be
17: --executed only when trx import is not running.
18: If pa_txn_int_trig_ctl.G_TrxImport2 IS NULL Then
19:
20: SELECT 1
21: INTO dummy
22: FROM dual

Line 29: pa_txn_int_trig_ctl.G_TrxImport2 := 1;

25: WHERE concurrent_program_name in ( 'PAXTRTRX' , 'PAAPIMP_SI', 'PAAPIMP')
26: AND concurrent_program_id = fnd_global.conc_program_id
27: AND application_id = 275) ;
28:
29: pa_txn_int_trig_ctl.G_TrxImport2 := 1;
30:
31: ElsIf pa_txn_int_trig_ctl.G_TrxImport2 = 0 Then
32:
33: RAISE NO_DATA_FOUND;

Line 31: ElsIf pa_txn_int_trig_ctl.G_TrxImport2 = 0 Then

27: AND application_id = 275) ;
28:
29: pa_txn_int_trig_ctl.G_TrxImport2 := 1;
30:
31: ElsIf pa_txn_int_trig_ctl.G_TrxImport2 = 0 Then
32:
33: RAISE NO_DATA_FOUND;
34:
35: End If;

Line 40: pa_txn_int_trig_ctl.G_TrxImport2 := 0;

36:
37: EXCEPTION
38: WHEN NO_DATA_FOUND THEN
39:
40: pa_txn_int_trig_ctl.G_TrxImport2 := 0;
41:
42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN
43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;
44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP

Line 42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN

38: WHEN NO_DATA_FOUND THEN
39:
40: pa_txn_int_trig_ctl.G_TrxImport2 := 0;
41:
42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN
43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;
44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP
45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then
46: BEGIN

Line 43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;

39:
40: pa_txn_int_trig_ctl.G_TrxImport2 := 0;
41:
42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN
43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;
44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP
45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then
46: BEGIN
47: UPDATE pa_transaction_interface

Line 44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP

40: pa_txn_int_trig_ctl.G_TrxImport2 := 0;
41:
42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN
43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;
44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP
45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then
46: BEGIN
47: UPDATE pa_transaction_interface
48: SET transaction_status_code = 'P'

Line 45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then

41:
42: IF (pa_txn_int_trig_ctl.T4_Trig = TRUE ) THEN
43: pa_txn_int_trig_ctl.T4_Trig := FALSE ;
44: FOR v_index in 1 .. (pa_txn_int_trig_ctl.idx - 1 ) LOOP
45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then
46: BEGIN
47: UPDATE pa_transaction_interface
48: SET transaction_status_code = 'P'
49: WHERE expenditure_id = pa_txn_int_trig_ctl.expenditure_id(v_index)

Line 49: WHERE expenditure_id = pa_txn_int_trig_ctl.expenditure_id(v_index)

45: IF pa_txn_int_trig_ctl.expenditure_id(v_index) IS NOT NULL then
46: BEGIN
47: UPDATE pa_transaction_interface
48: SET transaction_status_code = 'P'
49: WHERE expenditure_id = pa_txn_int_trig_ctl.expenditure_id(v_index)
50: --Bug 4552319. Used pa_txn_int_trig_ctl.batch_name_tbl populated in pa_transaction_interface_t3
51: AND batch_name = pa_txn_int_trig_ctl.batch_name_tbl(v_index) -- added this for index
52: AND transaction_status_code = 'R'
53: AND transaction_rejection_code is NULL

Line 50: --Bug 4552319. Used pa_txn_int_trig_ctl.batch_name_tbl populated in pa_transaction_interface_t3

46: BEGIN
47: UPDATE pa_transaction_interface
48: SET transaction_status_code = 'P'
49: WHERE expenditure_id = pa_txn_int_trig_ctl.expenditure_id(v_index)
50: --Bug 4552319. Used pa_txn_int_trig_ctl.batch_name_tbl populated in pa_transaction_interface_t3
51: AND batch_name = pa_txn_int_trig_ctl.batch_name_tbl(v_index) -- added this for index
52: AND transaction_status_code = 'R'
53: AND transaction_rejection_code is NULL
54: AND NOT EXISTS (SELECT 'Y' /* Bug#2473239 */

Line 51: AND batch_name = pa_txn_int_trig_ctl.batch_name_tbl(v_index) -- added this for index

47: UPDATE pa_transaction_interface
48: SET transaction_status_code = 'P'
49: WHERE expenditure_id = pa_txn_int_trig_ctl.expenditure_id(v_index)
50: --Bug 4552319. Used pa_txn_int_trig_ctl.batch_name_tbl populated in pa_transaction_interface_t3
51: AND batch_name = pa_txn_int_trig_ctl.batch_name_tbl(v_index) -- added this for index
52: AND transaction_status_code = 'R'
53: AND transaction_rejection_code is NULL
54: AND NOT EXISTS (SELECT 'Y' /* Bug#2473239 */
55: FROM PA_TRANSACTION_INTERFACE_ALL

Line 56: WHERE EXPENDITURE_ID = pa_txn_int_trig_ctl.expenditure_id(v_index)

52: AND transaction_status_code = 'R'
53: AND transaction_rejection_code is NULL
54: AND NOT EXISTS (SELECT 'Y' /* Bug#2473239 */
55: FROM PA_TRANSACTION_INTERFACE_ALL
56: WHERE EXPENDITURE_ID = pa_txn_int_trig_ctl.expenditure_id(v_index)
57: AND BATCH_NAME = pa_txn_int_trig_ctl.batch_name_tbl(v_index) --added for 4872423
58: AND TRANSACTION_STATUS_CODE = 'R'
59: AND TRANSACTION_REJECTION_CODE IS NOT NULL);
60:

Line 57: AND BATCH_NAME = pa_txn_int_trig_ctl.batch_name_tbl(v_index) --added for 4872423

53: AND transaction_rejection_code is NULL
54: AND NOT EXISTS (SELECT 'Y' /* Bug#2473239 */
55: FROM PA_TRANSACTION_INTERFACE_ALL
56: WHERE EXPENDITURE_ID = pa_txn_int_trig_ctl.expenditure_id(v_index)
57: AND BATCH_NAME = pa_txn_int_trig_ctl.batch_name_tbl(v_index) --added for 4872423
58: AND TRANSACTION_STATUS_CODE = 'R'
59: AND TRANSACTION_REJECTION_CODE IS NOT NULL);
60:
61: EXCEPTION

Line 63: pa_txn_int_trig_ctl.T4_Trig := TRUE ;

59: AND TRANSACTION_REJECTION_CODE IS NOT NULL);
60:
61: EXCEPTION
62: WHEN OTHERS THEN
63: pa_txn_int_trig_ctl.T4_Trig := TRUE ;
64: pa_txn_int_trig_ctl.idx := 1 ;
65: END ;
66: END IF ;
67: END LOOP ;

Line 64: pa_txn_int_trig_ctl.idx := 1 ;

60:
61: EXCEPTION
62: WHEN OTHERS THEN
63: pa_txn_int_trig_ctl.T4_Trig := TRUE ;
64: pa_txn_int_trig_ctl.idx := 1 ;
65: END ;
66: END IF ;
67: END LOOP ;
68: END IF ;

Line 69: pa_txn_int_trig_ctl.T4_Trig := TRUE ;

65: END ;
66: END IF ;
67: END LOOP ;
68: END IF ;
69: pa_txn_int_trig_ctl.T4_Trig := TRUE ;
70: pa_txn_int_trig_ctl.idx := 1 ;
71: END ;

Line 70: pa_txn_int_trig_ctl.idx := 1 ;

66: END IF ;
67: END LOOP ;
68: END IF ;
69: pa_txn_int_trig_ctl.T4_Trig := TRUE ;
70: pa_txn_int_trig_ctl.idx := 1 ;
71: END ;