[Home] [Help]
46: * period was closed for the passed in trans date. Also added
47: * specific messaging to the return codes from trans date validate.
48: *
49: * VRA Srinivas 26/Apr/2002 BUG#2341493
50: * Changed the code to not to insert into IC_TRAN_CMP when
51: * DOC_TYPE is STSI and STATUS_CTL is No Inventory.
52: * Jalaj Srivastava 07/24/02 Bug 2483644
53: * Modified create completed transaction to accept/process
54: * journal transactions doc types also.
192: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
193: , p_commit IN VARCHAR2 := FND_API.G_FALSE
194: , p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL
195: , p_tran_rec IN GMI_TRANS_ENGINE_PUB.ictran_rec
196: , x_tran_row OUT NOCOPY IC_TRAN_CMP%ROWTYPE
197: , x_return_status OUT NOCOPY VARCHAR2
198: , x_msg_count OUT NOCOPY NUMBER
199: , x_msg_data OUT NOCOPY VARCHAR2
200: , p_table_name IN VARCHAR2 := 'IC_TRAN_CMP'
196: , x_tran_row OUT NOCOPY IC_TRAN_CMP%ROWTYPE
197: , x_return_status OUT NOCOPY VARCHAR2
198: , x_msg_count OUT NOCOPY NUMBER
199: , x_msg_data OUT NOCOPY VARCHAR2
200: , p_table_name IN VARCHAR2 := 'IC_TRAN_CMP'
201: )
202: IS
203: l_api_name CONSTANT VARCHAR2 (30) := 'CREATE_COMPLETED_TRANSACTION';
204: l_api_version CONSTANT NUMBER := 1.0;
202: IS
203: l_api_name CONSTANT VARCHAR2 (30) := 'CREATE_COMPLETED_TRANSACTION';
204: l_api_version CONSTANT NUMBER := 1.0;
205: l_tran_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
206: l_tran_cmp IC_TRAN_CMP%ROWTYPE;
207: l_tran_pnd IC_TRAN_PND%ROWTYPE;
208: l_msg_count NUMBER :=0;
209: l_return_val NUMBER :=0;
210: l_retry_flag NUMBER :=0;
321: END IF; /* IF (l_tran_rec.doc_type = 'GRDI') */
322:
323: /* end of bug 1427922REM ---------------------------- */
324:
325: /* Call the IC_TRAN_CMP INSERT procedure to insert this record. */
326:
327: IF p_table_name = 'IC_TRAN_CMP'
328: THEN
329: --BEGIN Bug# 2341493 VRA Srinivas 26/04/2002
323: /* end of bug 1427922REM ---------------------------- */
324:
325: /* Call the IC_TRAN_CMP INSERT procedure to insert this record. */
326:
327: IF p_table_name = 'IC_TRAN_CMP'
328: THEN
329: --BEGIN Bug# 2341493 VRA Srinivas 26/04/2002
330: --Do not insert into ic_tran_cmp if the status control
331: --of the item is set to 'No Inventory'
326:
327: IF p_table_name = 'IC_TRAN_CMP'
328: THEN
329: --BEGIN Bug# 2341493 VRA Srinivas 26/04/2002
330: --Do not insert into ic_tran_cmp if the status control
331: --of the item is set to 'No Inventory'
332: OPEN Cur_status_ctl(p_tran_rec.item_id);
333: FETCH Cur_status_ctl INTO l_status_ctl;
334: CLOSE Cur_status_ctl;
339: NULL;
340: ELSE
341: -- END Bug# 2341493
342:
343: /* Call the IC_TRAN_CMP INSERT procedure to insert this record. */
344: l_tran_cmp.trans_id := p_tran_rec.trans_id;
345: l_tran_cmp.item_id := p_tran_rec.item_id;
346: l_tran_cmp.line_id := p_tran_rec.line_id;
347: l_tran_cmp.co_code := p_tran_rec.co_code;
375: BUG#3090255 Populated intorder_posted_ind
376: ==========================================*/
377: l_tran_cmp.intorder_posted_ind := NVL(p_tran_rec.intorder_posted_ind,0);
378:
379: IF NOT GMI_TRAN_CMP_PVT.INSERT_IC_TRAN_CMP
380: ( p_tran_row => l_tran_cmp, x_tran_row => x_tran_row)
381: THEN
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: END IF;
473: /*============================================
474: BUG#3526733 Populated reverse_id
475: ==========================================*/
476: -- 3575580
477: -- Commented the lines below as reverse id does not exist in ic_tran_cmp.
478: -- x_tran_row.reverse_id := l_tran_pnd.reverse_id;
479:
480: END IF;
481: