28: /* To check weather the current item already exist for approval */
29:
30: l_trohdr_rec := INV_Trohdr_Util.Query_row( To_Header_Id );
31:
32: if ( l_trohdr_rec.header_status <> INV_Globals.G_TO_STATUS_INCOMPLETE ) then
33: FND_MESSAGE.SET_NAME('INV','INV_TO_INVALID_FOR_APPROVAL');
34: FND_MESSAGE.SET_TOKEN('ENTITY', To_Header_Id);
35: FND_MSG_PUB.Add;
36: RETURN;
47: Where organization_id = l_trohdr_rec.organization_id;
48:
49: if( l_timeout_action = 1 ) then
50: Inv_trohdr_Util.Update_Row_Status(To_Header_Id,
51: Inv_Globals.G_TO_STATUS_APPROVED);
52:
53: l_trolin_tbl := INV_trolin_util.Get_Lines( To_Header_Id );
54: For l_line_count in 1..l_trolin_tbl.count Loop
55:
59:
60: /*
61: if(l_trolin_tbl(l_line_count).Line_Status=6) then
62: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
63: INV_Globals.G_TO_STATUS_CANCELLED);
64: */
65:
66: if (l_trolin_tbl(l_line_count).Line_Status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE) then
67: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
62: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
63: INV_Globals.G_TO_STATUS_CANCELLED);
64: */
65:
66: if (l_trolin_tbl(l_line_count).Line_Status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE) then
67: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
68: INV_Globals.G_TO_STATUS_APPROVED);
69: end if;
70: end Loop;
64: */
65:
66: if (l_trolin_tbl(l_line_count).Line_Status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE) then
67: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
68: INV_Globals.G_TO_STATUS_APPROVED);
69: end if;
70: end Loop;
71: else
72: Inv_trohdr_Util.Update_Row_Status(To_Header_Id,
69: end if;
70: end Loop;
71: else
72: Inv_trohdr_Util.Update_Row_Status(To_Header_Id,
73: Inv_Globals.G_TO_STATUS_REJECTED);
74:
75: l_trolin_tbl := INV_trolin_util.Get_Lines( To_Header_Id );
76: For l_line_count in 1..l_trolin_tbl.count Loop
77:
75: l_trolin_tbl := INV_trolin_util.Get_Lines( To_Header_Id );
76: For l_line_count in 1..l_trolin_tbl.count Loop
77:
78: --Bug #5462193, added the if condition
79: if (l_trolin_tbl(l_line_count).Line_Status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE) then
80: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
81: INV_Globals.G_TO_STATUS_REJECTED);
82: end if;
83: end Loop;
77:
78: --Bug #5462193, added the if condition
79: if (l_trolin_tbl(l_line_count).Line_Status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE) then
80: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id,
81: INV_Globals.G_TO_STATUS_REJECTED);
82: end if;
83: end Loop;
84: end if;
85: Return;
84: end if;
85: Return;
86: else
87: Inv_trohdr_Util.Update_Row_Status(To_Header_Id,
88: Inv_Globals.G_TO_STATUS_PENDING_APPROVAL);
89: end if;
90:
91: end if;
92:
211: aname => 'TO_HEADER_ID');
212: l_trohdr_rec := INV_Trohdr_Util.Query_row( p_header_id );
213:
214: if ( l_trohdr_rec.header_status IN
215: ( INV_Globals.G_TO_STATUS_PENDING_APPROVAL,
216: INV_Globals.G_TO_STATUS_APPROVED ) ) then
217:
218: wf_engine.setitemattrtext( itemtype => itemtype,
219: itemkey => itemkey,
212: l_trohdr_rec := INV_Trohdr_Util.Query_row( p_header_id );
213:
214: if ( l_trohdr_rec.header_status IN
215: ( INV_Globals.G_TO_STATUS_PENDING_APPROVAL,
216: INV_Globals.G_TO_STATUS_APPROVED ) ) then
217:
218: wf_engine.setitemattrtext( itemtype => itemtype,
219: itemkey => itemkey,
220: aname => 'TO_NUMBER',
308:
309: For l_line_count in 1..l_trolin_tbl.count Loop
310:
311: -- Bug #5462193, Cancelled lines should not go for approval.
312: IF l_trolin_tbl(l_line_count).line_status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE THEN
313:
314: l_child_itemkey := to_char(l_header_id)||'-'||
315: to_char(l_trolin_tbl(l_line_count).line_id);
316:
454:
455: For l_line_count in 1..l_trolin_tbl.count Loop
456:
457: -- Bug #5462193, Only incomplete lines should go for approval.
458: IF l_trolin_tbl(l_line_count).line_status = INV_GLOBALS.G_TO_STATUS_INCOMPLETE THEN
459:
460: l_child_itemkey := to_char(l_header_id)||'-'||
461: to_char(l_trolin_tbl(l_line_count).line_id);
462:
460: l_child_itemkey := to_char(l_header_id)||'-'||
461: to_char(l_trolin_tbl(l_line_count).line_id);
462:
463: Inv_trolin_Util.Update_Row_Status(l_trolin_tbl(l_line_count).Line_id ,
464: INV_Globals.G_TO_STATUS_PENDING_APPROVAL);
465:
466: wf_engine.startprocess( itemtype => l_child_itemtype,
467: itemkey => l_child_itemkey );
468: END IF;
515:
516: For l_row_count in 1..l_trolin_tbl.count Loop
517:
518: if ( l_trolin_tbl(l_row_count).line_status <>
519: INV_Globals.G_TO_STATUS_APPROVED ) then
520: l_lines_rejected := l_lines_rejected + 1;
521: else
522: l_lines_approved := l_lines_approved + 1;
523: end if;
565: l_header_id := wf_engine.GetItemAttrNumber( itemtype => itemtype,
566: itemkey => itemkey,
567: aname => 'TO_HEADER_ID');
568: Inv_trohdr_Util.Update_Row_Status(l_header_id,
569: Inv_Globals.G_TO_STATUS_APPROVED);
570: result := 'COMPLETE';
571: return;
572: end if;
573:
600: l_header_id := wf_engine.GetItemAttrNumber( itemtype => itemtype,
601: itemkey => itemkey,
602: aname => 'TO_HEADER_ID');
603: Inv_trohdr_Util.Update_Row_Status(l_header_id,
604: Inv_Globals.G_TO_STATUS_PART_APPROVED);
605: result := 'COMPLETE';
606: return;
607: end if;
608:
638: l_header_id := wf_engine.GetItemAttrNumber( itemtype => itemtype,
639: itemkey => itemkey,
640: aname => 'TO_HEADER_ID');
641: Inv_trohdr_Util.Update_Row_Status(l_header_id,
642: Inv_Globals.G_TO_STATUS_REJECTED);
643: result := 'COMPLETE';
644: return;
645:
646: end if;
920: from mtl_txn_request_lines
921: where line_id = l_line_id;
922:
923:
924: IF l_line_status = INV_GLOBALS.G_TO_STATUS_PENDING_APPROVAL THEN
925: Inv_trolin_Util.Update_Row_Status(l_Line_id ,
926: INV_Globals.G_TO_STATUS_APPROVED);
927: END IF;
928: result := 'COMPLETE';
922:
923:
924: IF l_line_status = INV_GLOBALS.G_TO_STATUS_PENDING_APPROVAL THEN
925: Inv_trolin_Util.Update_Row_Status(l_Line_id ,
926: INV_Globals.G_TO_STATUS_APPROVED);
927: END IF;
928: result := 'COMPLETE';
929: return;
930: end if;
967: into l_line_status
968: from mtl_txn_request_lines
969: where line_id = l_line_id;
970:
971: IF l_line_status = INV_GLOBALS.G_TO_STATUS_PENDING_APPROVAL THEN
972: Inv_trolin_Util.Update_Row_Status(l_Line_id ,
973: INV_Globals.G_TO_STATUS_REJECTED);
974: END IF;
975: result := 'COMPLETE';
969: where line_id = l_line_id;
970:
971: IF l_line_status = INV_GLOBALS.G_TO_STATUS_PENDING_APPROVAL THEN
972: Inv_trolin_Util.Update_Row_Status(l_Line_id ,
973: INV_Globals.G_TO_STATUS_REJECTED);
974: END IF;
975: result := 'COMPLETE';
976:
977: end if;
1104:
1105: /* Added for the bug 14456716 */
1106: for Approve_MO_line in l_current_line..l_total_lines loop
1107:
1108: If (l_trolin_tbl(Approve_MO_line).line_status = INV_Globals.G_TO_STATUS_APPROVED) then
1109: l_current_line := Approve_MO_line;
1110: exit;
1111: end if;
1112:
1114: /* End for the bug 14456716 */
1115:
1116: if ( ( l_current_line <= l_total_lines ) AND
1117: ( l_trolin_tbl(l_current_line).line_status =
1118: INV_Globals.G_TO_STATUS_APPROVED ) ) then
1119: wf_engine.setitemattrNumber( itemtype => itemtype,
1120: itemkey => itemkey,
1121: aname => 'LINE_NUMBER',
1122: avalue => l_trolin_tbl(l_current_line).line_number );