46: p_rti_rec rti_rec;
47:
48: BEGIN
49:
50: asn_debug.put_line('Entering RCV_CALL_LCM_WS.insertLCM' || to_char(sysdate,'DD-MON-YYYY HH:MI:SS'));
51:
52: open c_rsh_rti;
53: fetch c_rsh_rti BULK COLLECT INTO p_rti_rec;
54:
51:
52: open c_rsh_rti;
53: fetch c_rsh_rti BULK COLLECT INTO p_rti_rec;
54:
55: asn_debug.put_line('No of rows from RSH to be inserted: ' || p_rti_rec.COUNT);
56:
57:
58: IF p_rti_rec.first IS NOT NULL THEN
59:
56:
57:
58: IF p_rti_rec.first IS NOT NULL THEN
59:
60: asn_debug.put_line('calling LCM API for RSH');
61:
62: INL_INTEGRATION_GRP.Import_FromRCV(p_rti_rec);
63:
64: asn_debug.put_line('after calling LCM API for RSH: ' || p_rti_rec.COUNT);
60: asn_debug.put_line('calling LCM API for RSH');
61:
62: INL_INTEGRATION_GRP.Import_FromRCV(p_rti_rec);
63:
64: asn_debug.put_line('after calling LCM API for RSH: ' || p_rti_rec.COUNT);
65:
66: END IF;
67:
68: asn_debug.put_line('before closing the RSH cursor');
64: asn_debug.put_line('after calling LCM API for RSH: ' || p_rti_rec.COUNT);
65:
66: END IF;
67:
68: asn_debug.put_line('before closing the RSH cursor');
69:
70: IF c_rsh_rti%ISOPEN THEN
71: CLOSE c_rsh_rti;
72: END IF;
74: p_rti_rec.delete;
75:
76: open c_rhi_rti;
77:
78: asn_debug.put_line('fetching the RHI cursor');
79:
80: fetch c_rhi_rti BULK COLLECT INTO p_rti_rec;
81:
82:
79:
80: fetch c_rhi_rti BULK COLLECT INTO p_rti_rec;
81:
82:
83: asn_debug.put_line('No of rows from RHI to be inserted: ' || p_rti_rec.COUNT);
84:
85: IF p_rti_rec.first IS NOT NULL THEN
86:
87: asn_debug.put_line('calling LCM API for RHI' || p_rti_rec.COUNT);
83: asn_debug.put_line('No of rows from RHI to be inserted: ' || p_rti_rec.COUNT);
84:
85: IF p_rti_rec.first IS NOT NULL THEN
86:
87: asn_debug.put_line('calling LCM API for RHI' || p_rti_rec.COUNT);
88:
89: INL_INTEGRATION_GRP.Import_FromRCV(p_rti_rec);
90:
91: asn_debug.put_line(' after calling LCM API for RHI' || p_rti_rec.COUNT);
87: asn_debug.put_line('calling LCM API for RHI' || p_rti_rec.COUNT);
88:
89: INL_INTEGRATION_GRP.Import_FromRCV(p_rti_rec);
90:
91: asn_debug.put_line(' after calling LCM API for RHI' || p_rti_rec.COUNT);
92:
93: END IF;
94:
95: asn_debug.put_line('before closing the RHI cursor');
91: asn_debug.put_line(' after calling LCM API for RHI' || p_rti_rec.COUNT);
92:
93: END IF;
94:
95: asn_debug.put_line('before closing the RHI cursor');
96: IF c_rhi_rti%ISOPEN THEN
97: CLOSE c_rhi_rti;
98: END IF;
99:
113: IF c_rhi_rti%ISOPEN THEN
114: CLOSE c_rhi_rti;
115: END IF;
116:
117: asn_debug.put_line('the error is: ' || sqlcode ||' '||substr(SQLERRM, 1, 1000));
118:
119: l_ret := fnd_concurrent.set_completion_status('ERROR', 'Error');
120:
121: x_retcode := 2;