65: l_warning EXCEPTION;
66:
67:
68: BEGIN
69: GMI_Reservation_Util.PrintLn('IN MOVE ORDER line');
70: /* ************ DO I NEED SAVE POINT FOR PUBLIC DECLARATION ******* */
71: /* Standard call to check for call compatibility. */
72:
73: IF NOT FND_API.Compatible_API_CALL ( l_api_version_number
78: THEN
79: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
80: END IF;
81:
82: GMI_Reservation_Util.PrintLn('After Check Version');
83: /* Initialize message list if p_int_msg_lst is set TRUE. */
84: IF FND_API.to_boolean(p_init_msg_lst)
85: THEN
86: FND_MSG_PUB.Initialize;
85: THEN
86: FND_MSG_PUB.Initialize;
87: END IF;
88:
89: GMI_Reservation_Util.PrintLn('After Init Messages');
90:
91: /* Initialize API return status to sucess */
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
95: /* Check That we have at least one Move Order Line Rec */
96: GMI_Reservation_Util.PrintLn('mo_line_tbl.COUNT='||p_mo_line_tbl.count);
97:
98: IF ( p_mo_line_tbl.count = 0 ) THEN
99: FND_MESSAGE.SET_NAME('INV', 'INV_NO_LINES_TO_PICK_CONFIRM');
100: FND_MSG_PUB.add;
101: raise FND_API.G_EXC_ERROR;
102: END IF;
103:
104: /* Convert Missing To NULL; */
105: GMI_Reservation_Util.PrintLn('Call Convert Missing To Null');
106:
107: FOR I in 1..p_mo_line_tbl.COUNT LOOP
108:
109: l_mo_line_rec := p_mo_line_tbl(I);
107: FOR I in 1..p_mo_line_tbl.COUNT LOOP
108:
109: l_mo_line_rec := p_mo_line_tbl(I);
110:
111: GMI_Reservation_Util.PrintLn('_Move_Order_line => '||l_mo_line_rec.operation);
112: -- HW BUG#:2643440 No need to call Convert_Miss_To_Null since the
113: -- records is set to NULL already
114: l_mo_line_rec := GMI_MOVE_ORDER_line_UTIL.Convert_Miss_To_Null
115: ( p_mo_line_rec => l_mo_line_rec);
120: -- HW BUG#:2296620
121: l_manual_pick := p_manual_pick;
122: END LOOP;
123:
124: GMI_Reservation_Util.PrintLn('CAlling Move order Lines PVT');
125: GMI_RESERVATION_UTIL.println('Value of p_manual_pick is '|| l_manual_pick);
126: -- HW BUG#:2296620 add p_manual_pick parameter
127: -- HW OPM changes for NOCOPY
128: -- Use ll_mo_line_tbl for x_mo_LINE_tbl
121: l_manual_pick := p_manual_pick;
122: END LOOP;
123:
124: GMI_Reservation_Util.PrintLn('CAlling Move order Lines PVT');
125: GMI_RESERVATION_UTIL.println('Value of p_manual_pick is '|| l_manual_pick);
126: -- HW BUG#:2296620 add p_manual_pick parameter
127: -- HW OPM changes for NOCOPY
128: -- Use ll_mo_line_tbl for x_mo_LINE_tbl
129: GMI_PICK_WAVE_CONFIRM_PVT.PICK_CONFIRM
158: -- HW OPM changes for NOCOPY
159: -- Use ll_mo_line_tbl for x_mo_LINE_tbl
160:
161: x_mo_line_tbl := ll_mo_line_tbl;
162: GMI_Reservation_Util.PrintLn('Count MOL table => ' || x_mo_line_tbl.count);
163:
164:
165: EXCEPTION
166: WHEN FND_API.G_EXC_ERROR THEN