DBA Data[Home] [Help]

APPS.AHL_PRD_RESOURCE_TRANX_PVT dependencies on FND_MESSAGE

Line 181: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_NULL');

177: LOOP
178: IF p_prd_resrc_txn_tbl(I).workorder_id IS NULL OR
179: p_prd_resrc_txn_tbl(I).workorder_id=FND_API.G_MISS_NUM
180: THEN
181: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_NULL');
182: FND_MSG_PUB.ADD;
183: ELSE
184:
185: /* sracha: already queried this info in translate_meaning_to_id procedure.

Line 192: --FND_MESSAGE.set_name('AHL','AHL_PRD_ORGID_NULL');

188: Then
189: OPEN get_wo_org_id(p_prd_resrc_txn_tbl(I).workorder_id);
190: FETCH get_wo_org_id INTO l_org_id;
191: CLOSE get_wo_org_id;
192: --FND_MESSAGE.set_name('AHL','AHL_PRD_ORGID_NULL');
193: --FND_MSG_PUB.ADD;
194: Else
195: l_org_id := p_prd_resrc_txn_tbl(I).organization_id;
196: End if;

Line 211: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_ID_INVALID');

207: p_prd_resrc_txn_tbl(i).resource_name);
208: Fetch GetResourceDet into l_res_rec;
209: if GetResourceDet%NotFound
210: Then
211: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_ID_INVALID');
212: FND_MESSAGE.SET_TOKEN('RES_NAME', p_prd_resrc_txn_tbl(i).resource_name);
213: FND_MSG_PUB.ADD;
214: End if;
215: Close GetResourceDet;

Line 212: FND_MESSAGE.SET_TOKEN('RES_NAME', p_prd_resrc_txn_tbl(i).resource_name);

208: Fetch GetResourceDet into l_res_rec;
209: if GetResourceDet%NotFound
210: Then
211: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_ID_INVALID');
212: FND_MESSAGE.SET_TOKEN('RES_NAME', p_prd_resrc_txn_tbl(i).resource_name);
213: FND_MSG_PUB.ADD;
214: End if;
215: Close GetResourceDet;
216:

Line 221: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_INVALID');

217: Open ValidWrkDet(p_prd_resrc_txn_tbl(I).workorder_id);
218: Fetch ValidWrkDet into l_wrkrec;
219: If ValidWrkDet%NOTFOUND
220: THEN
221: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_INVALID');
222: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).WORKORDER_ID);
223: FND_MSG_PUB.ADD;
224: Close ValidWrkDet;
225: return;

Line 222: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).WORKORDER_ID);

218: Fetch ValidWrkDet into l_wrkrec;
219: If ValidWrkDet%NOTFOUND
220: THEN
221: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_INVALID');
222: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).WORKORDER_ID);
223: FND_MSG_PUB.ADD;
224: Close ValidWrkDet;
225: return;
226: END IF;

Line 237: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');

233: p_ue_id => NULL,
234: p_visit_id => NULL,
235: p_item_instance_id => NULL);
236: IF l_return_status = FND_API.G_TRUE THEN
237: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');
238: FND_MESSAGE.Set_Token('WO_NAME', l_wrkrec.workorder_name);
239: FND_MSG_PUB.ADD;
240: IF G_DEBUG='Y' THEN
241: AHL_DEBUG_PUB.debug('Unit is Locked',l_proc_name);

Line 238: FND_MESSAGE.Set_Token('WO_NAME', l_wrkrec.workorder_name);

234: p_visit_id => NULL,
235: p_item_instance_id => NULL);
236: IF l_return_status = FND_API.G_TRUE THEN
237: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');
238: FND_MESSAGE.Set_Token('WO_NAME', l_wrkrec.workorder_name);
239: FND_MSG_PUB.ADD;
240: IF G_DEBUG='Y' THEN
241: AHL_DEBUG_PUB.debug('Unit is Locked',l_proc_name);
242: END IF;

Line 259: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_CANNOTEDIT');

255: IF l_wrkrec.STATUS_CODE = '12' OR l_wrkrec.STATUS_CODE = '6'
256: OR l_wrkrec.STATUS_CODE = '13' OR l_wrkrec.STATUS_CODE = '7'
257: OR l_wrkrec.STATUS_CODE = '1' OR l_wrkrec.STATUS_CODE = '5'
258: THEN
259: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_CANNOTEDIT');
260: FND_MSG_PUB.ADD;
261: return;
262: END IF;
263: END IF; -- work order ID is null

Line 272: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_OP_ID_NULL');

268:
269: IF p_prd_resrc_txn_tbl(I).workorder_operation_id IS NULL
270: OR p_prd_resrc_txn_tbl(I).workorder_operation_id=FND_API.G_MISS_NUM
271: THEN
272: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_OP_ID_NULL');
273: FND_MSG_PUB.ADD;
274: END IF;
275:
276: -- validate operation sequence.

Line 280: FND_MESSAGE.set_name('AHL','AHL_PRD_OPSEQNUM_NULL');

276: -- validate operation sequence.
277: If p_prd_resrc_txn_tbl(I).operation_sequence_num is null
278: or p_prd_resrc_txn_tbl(I).operation_sequence_num=fnd_api.g_miss_num
279: Then
280: FND_MESSAGE.set_name('AHL','AHL_PRD_OPSEQNUM_NULL');
281: FND_MSG_PUB.ADD;
282: Else
283: --Select count(*) into l_ctr
284: Select 1 into l_ctr

Line 291: FND_MESSAGE.set_name('AHL','AHL_PRD_INVALID_OP_SEQ_NUM');

287: AND A.OPERATION_SEQUENCE_NUM=p_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM;
288:
289: IF nvl(l_ctr,0)=0
290: THEN
291: FND_MESSAGE.set_name('AHL','AHL_PRD_INVALID_OP_SEQ_NUM');
292: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM);
293: FND_MSG_PUB.ADD;
294: END IF;
295: End if; -- p_prd_resrc_txn_tbl(I).operation_sequence_num is null

Line 292: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM);

288:
289: IF nvl(l_ctr,0)=0
290: THEN
291: FND_MESSAGE.set_name('AHL','AHL_PRD_INVALID_OP_SEQ_NUM');
292: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM);
293: FND_MSG_PUB.ADD;
294: END IF;
295: End if; -- p_prd_resrc_txn_tbl(I).operation_sequence_num is null
296:

Line 309: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');

305: AND A.RESOURCE_SEQUENCE_NUM=p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM;
306:
307: IF nvl(l_ctr,0)=0
308: THEN
309: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');
310: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
311: FND_MSG_PUB.ADD;
312: END IF;
313: End if;

Line 310: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);

306:
307: IF nvl(l_ctr,0)=0
308: THEN
309: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');
310: FND_MESSAGE.SET_TOKEN('RECORD',p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
311: FND_MSG_PUB.ADD;
312: END IF;
313: End if;
314:

Line 319: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPTID_NULL');

315: -- validate department id.
316: If p_prd_resrc_txn_tbl(I).department_id is null or
317: p_prd_resrc_txn_tbl(I).department_id=fnd_api.g_miss_num
318: Then
319: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPTID_NULL');
320: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
321: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
322: FND_MSG_PUB.ADD;
323: End if;

Line 320: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

316: If p_prd_resrc_txn_tbl(I).department_id is null or
317: p_prd_resrc_txn_tbl(I).department_id=fnd_api.g_miss_num
318: Then
319: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPTID_NULL');
320: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
321: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
322: FND_MSG_PUB.ADD;
323: End if;
324:

Line 334: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPLOYEE_NULL');

330: IF l_res_rec.resource_type =2 THEN
331: --Check for employee id
332: IF p_prd_resrc_txn_tbl(I).employee_num IS NULL AND p_prd_resrc_txn_tbl(I).person_id IS NULL
333: THEN
334: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPLOYEE_NULL');
335: FND_MSG_PUB.ADD;
336: ELSIF (p_prd_resrc_txn_tbl(I).person_id IS NULL) THEN -- only when person_id is not there.
337: OPEN chk_valid_emp_csr(p_prd_resrc_txn_tbl(I).organization_id,
338: --p_prd_resrc_txn_tbl(I).workorder_id,

Line 345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');

341: p_prd_resrc_txn_tbl(I).resource_id,
342: p_prd_resrc_txn_tbl(I).employee_num);
343: FETCH chk_valid_emp_csr INTO l_junk;
344: IF (chk_valid_emp_csr%NOTFOUND) THEN
345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');
346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);

Line 346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);

342: p_prd_resrc_txn_tbl(I).employee_num);
343: FETCH chk_valid_emp_csr INTO l_junk;
344: IF (chk_valid_emp_csr%NOTFOUND) THEN
345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');
346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
350: FND_MSG_PUB.ADD;

Line 347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);

343: FETCH chk_valid_emp_csr INTO l_junk;
344: IF (chk_valid_emp_csr%NOTFOUND) THEN
345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');
346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
350: FND_MSG_PUB.ADD;
351: END IF;

Line 348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);

344: IF (chk_valid_emp_csr%NOTFOUND) THEN
345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');
346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
350: FND_MSG_PUB.ADD;
351: END IF;
352: CLOSE chk_valid_emp_csr;

Line 349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);

345: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INVALID');
346: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
347: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
348: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
349: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
350: FND_MSG_PUB.ADD;
351: END IF;
352: CLOSE chk_valid_emp_csr;
353:

Line 363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');

359: p_prd_resrc_txn_tbl(I).resource_id,
360: p_prd_resrc_txn_tbl(I).person_id);
361: FETCH chk_valid_empid_csr INTO l_junk;
362: IF (chk_valid_empid_csr%NOTFOUND) THEN
363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');
364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);

Line 364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);

360: p_prd_resrc_txn_tbl(I).person_id);
361: FETCH chk_valid_empid_csr INTO l_junk;
362: IF (chk_valid_empid_csr%NOTFOUND) THEN
363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');
364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
368: FND_MSG_PUB.ADD;

Line 365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);

361: FETCH chk_valid_empid_csr INTO l_junk;
362: IF (chk_valid_empid_csr%NOTFOUND) THEN
363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');
364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
368: FND_MSG_PUB.ADD;
369: END IF;

Line 366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);

362: IF (chk_valid_empid_csr%NOTFOUND) THEN
363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');
364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
368: FND_MSG_PUB.ADD;
369: END IF;
370: CLOSE chk_valid_empid_csr;

Line 367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);

363: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPID_INVALID');
364: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
365: FND_MESSAGE.set_token('OP_SEQ',p_prd_resrc_txn_tbl(I).operation_sequence_num);
366: --FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num);
367: FND_MESSAGE.set_token('RES_SEQ', p_prd_resrc_txn_tbl(I).resource_name);
368: FND_MSG_PUB.ADD;
369: END IF;
370: CLOSE chk_valid_empid_csr;
371:

Line 382: FND_MESSAGE.set_name('AHL','AHL_PRD_UOM_NULL');

378: END IF;
379:
380: If p_prd_resrc_txn_tbl(I).uom_code is null
381: Then
382: FND_MESSAGE.set_name('AHL','AHL_PRD_UOM_NULL');
383: FND_MSG_PUB.ADD;
384: End if;
385:
386: -- rroy

Line 392: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NULL');

388: -- throw an error if both qty and end date are null
389: If (p_prd_resrc_txn_tbl(I).qty is null OR p_prd_resrc_txn_tbl(I).qty = fnd_api.g_miss_num)
390: AND (p_prd_resrc_txn_tbl(I).end_date IS NULL OR p_prd_resrc_txn_tbl(I).transaction_date IS NULL)
391: THEN
392: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NULL');
393: -- Change the message to reflect that at least one of qty or end date should be given
394: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
395: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
396: FND_MSG_PUB.ADD;

Line 394: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

390: AND (p_prd_resrc_txn_tbl(I).end_date IS NULL OR p_prd_resrc_txn_tbl(I).transaction_date IS NULL)
391: THEN
392: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NULL');
393: -- Change the message to reflect that at least one of qty or end date should be given
394: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
395: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
396: FND_MSG_PUB.ADD;
397: --OPER_RES rroy
398: -- R12 Tech UIs

Line 402: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');

398: -- R12 Tech UIs
399: -- Negative resource transactions are allowed
400: /*elsif p_prd_resrc_txn_tbl(I).qty <=0
401: then
402: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');
403: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
404: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
405: FND_MSG_PUB.ADD;
406: */

Line 403: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

399: -- Negative resource transactions are allowed
400: /*elsif p_prd_resrc_txn_tbl(I).qty <=0
401: then
402: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');
403: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
404: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
405: FND_MSG_PUB.ADD;
406: */
407: Else

Line 411: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NOT_NULL');

407: Else
408: IF (p_prd_resrc_txn_tbl(I).qty is NOT NULL AND p_prd_resrc_txn_tbl(I).end_date IS NOT NULL
409: AND p_prd_resrc_txn_tbl(I).transaction_date IS NOT NULL)
410: THEN
411: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NOT_NULL');
412: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
413: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
414: FND_MSG_PUB.ADD;
415: End if;

Line 412: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

408: IF (p_prd_resrc_txn_tbl(I).qty is NOT NULL AND p_prd_resrc_txn_tbl(I).end_date IS NOT NULL
409: AND p_prd_resrc_txn_tbl(I).transaction_date IS NOT NULL)
410: THEN
411: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_QTY_NOT_NULL');
412: FND_MESSAGE.SET_TOKEN('RECORD',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
413: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
414: FND_MSG_PUB.ADD;
415: End if;
416:

Line 435: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_ENDDT_INVALID');

431: END IF;
432:
433: IF (p_prd_resrc_txn_tbl(i).end_date > sysdate)
434: THEN
435: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_ENDDT_INVALID');
436: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
437: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
438:
439: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).end_date,fnd_date.outputDT_mask));

Line 436: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

432:
433: IF (p_prd_resrc_txn_tbl(i).end_date > sysdate)
434: THEN
435: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_ENDDT_INVALID');
436: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
437: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
438:
439: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).end_date,fnd_date.outputDT_mask));
440: IF (G_DEBUG = 'Y') THEN

Line 439: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).end_date,fnd_date.outputDT_mask));

435: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_ENDDT_INVALID');
436: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
437: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
438:
439: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).end_date,fnd_date.outputDT_mask));
440: IF (G_DEBUG = 'Y') THEN
441: ahl_debug_pub.debug('End Date > sysdate' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS'));
442: END IF;
443: FND_MSG_PUB.ADD;

Line 467: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_INVALID');

463: IF (G_DEBUG = 'Y') THEN
464: ahl_debug_pub.debug('Trx Date is greater than sysdate:' || to_char(p_prd_resrc_txn_tbl(i).transaction_date,'DD-MON-YYYY HH24:MI:SS'));
465: END IF;
466:
467: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_INVALID');
468: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
469: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
470: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).transaction_date,fnd_date.outputDT_mask));
471: IF (G_DEBUG = 'Y') THEN

Line 468: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

464: ahl_debug_pub.debug('Trx Date is greater than sysdate:' || to_char(p_prd_resrc_txn_tbl(i).transaction_date,'DD-MON-YYYY HH24:MI:SS'));
465: END IF;
466:
467: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_INVALID');
468: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
469: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
470: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).transaction_date,fnd_date.outputDT_mask));
471: IF (G_DEBUG = 'Y') THEN
472: ahl_debug_pub.debug('Txn Date > sysdate' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS'));

Line 470: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).transaction_date,fnd_date.outputDT_mask));

466:
467: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_INVALID');
468: FND_MESSAGE.SET_TOKEN('OPER_RES',P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
469: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
470: FND_MESSAGE.SET_TOKEN('DATE', to_char(p_prd_resrc_txn_tbl(i).transaction_date,fnd_date.outputDT_mask));
471: IF (G_DEBUG = 'Y') THEN
472: ahl_debug_pub.debug('Txn Date > sysdate' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS'));
473: END IF;
474: FND_MSG_PUB.ADD;

Line 489: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_RLSDT');

485: -- the resource transactions are not allowed for unreleased workorders in any case.
486: IF p_prd_resrc_txn_tbl(i).transaction_date <
487: nvl(l_release_date, p_prd_resrc_txn_tbl(i).transaction_date - 1)
488: THEN
489: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_RLSDT');
490: FND_MESSAGE.SET_TOKEN('OPER_RES', P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
491: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
492: FND_MESSAGE.SET_TOKEN('DATE',to_char(l_release_date,fnd_date.outputDT_mask));
493: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);

Line 490: FND_MESSAGE.SET_TOKEN('OPER_RES', P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'

486: IF p_prd_resrc_txn_tbl(i).transaction_date <
487: nvl(l_release_date, p_prd_resrc_txn_tbl(i).transaction_date - 1)
488: THEN
489: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_RLSDT');
490: FND_MESSAGE.SET_TOKEN('OPER_RES', P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
491: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
492: FND_MESSAGE.SET_TOKEN('DATE',to_char(l_release_date,fnd_date.outputDT_mask));
493: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
494: FND_MSG_PUB.ADD;

Line 492: FND_MESSAGE.SET_TOKEN('DATE',to_char(l_release_date,fnd_date.outputDT_mask));

488: THEN
489: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_RLSDT');
490: FND_MESSAGE.SET_TOKEN('OPER_RES', P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
491: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
492: FND_MESSAGE.SET_TOKEN('DATE',to_char(l_release_date,fnd_date.outputDT_mask));
493: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
494: FND_MSG_PUB.ADD;
495: END IF;-- IF p_prd_resrc_txn_tbl(i).transaction_date < l_release_date THEN
496: END IF;-- IF p_prd_resrc_txn_tbl(i).transaction_date IS NOT NULL THEN

Line 493: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);

489: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_DT_RLSDT');
490: FND_MESSAGE.SET_TOKEN('OPER_RES', P_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM||'-'
491: ||p_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
492: FND_MESSAGE.SET_TOKEN('DATE',to_char(l_release_date,fnd_date.outputDT_mask));
493: FND_MESSAGE.set_token('WRK_ID',l_wrkrec.workorder_name);
494: FND_MSG_PUB.ADD;
495: END IF;-- IF p_prd_resrc_txn_tbl(i).transaction_date < l_release_date THEN
496: END IF;-- IF p_prd_resrc_txn_tbl(i).transaction_date IS NOT NULL THEN
497:

Line 516: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');

512: );
513: FETCH get_instance_sernum INTO l_inst_id;
514: IF get_instance_sernum%NOTFOUND
515: THEN
516: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');
517: FND_MESSAGE.SET_TOKEN('SERNUMB',P_prd_resrc_txn_tbl(I).serial_number);
518: FND_MSG_PUB.ADD;
519: END IF;
520:

Line 517: FND_MESSAGE.SET_TOKEN('SERNUMB',P_prd_resrc_txn_tbl(I).serial_number);

513: FETCH get_instance_sernum INTO l_inst_id;
514: IF get_instance_sernum%NOTFOUND
515: THEN
516: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');
517: FND_MESSAGE.SET_TOKEN('SERNUMB',P_prd_resrc_txn_tbl(I).serial_number);
518: FND_MSG_PUB.ADD;
519: END IF;
520:
521: Close get_instance_sernum;

Line 526: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );

522: -- Adithya modified the code to take department_id for Bug # 6326254 - End
523: /*
524: ELSE
525: IF (l_res_rec.resource_type = 1) THEN
526: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
527: FND_MESSAGE.set_token( 'WO_NAME', l_wrkrec.workorder_name );
528: FND_MESSAGE.set_token( 'OP_SEQ', p_prd_resrc_txn_tbl(I).operation_sequence_num );
529: FND_MESSAGE.set_token( 'RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num );
530: FND_MSG_PUB.add;

Line 527: FND_MESSAGE.set_token( 'WO_NAME', l_wrkrec.workorder_name );

523: /*
524: ELSE
525: IF (l_res_rec.resource_type = 1) THEN
526: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
527: FND_MESSAGE.set_token( 'WO_NAME', l_wrkrec.workorder_name );
528: FND_MESSAGE.set_token( 'OP_SEQ', p_prd_resrc_txn_tbl(I).operation_sequence_num );
529: FND_MESSAGE.set_token( 'RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num );
530: FND_MSG_PUB.add;
531: END IF;*/

Line 528: FND_MESSAGE.set_token( 'OP_SEQ', p_prd_resrc_txn_tbl(I).operation_sequence_num );

524: ELSE
525: IF (l_res_rec.resource_type = 1) THEN
526: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
527: FND_MESSAGE.set_token( 'WO_NAME', l_wrkrec.workorder_name );
528: FND_MESSAGE.set_token( 'OP_SEQ', p_prd_resrc_txn_tbl(I).operation_sequence_num );
529: FND_MESSAGE.set_token( 'RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num );
530: FND_MSG_PUB.add;
531: END IF;*/
532:

Line 529: FND_MESSAGE.set_token( 'RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num );

525: IF (l_res_rec.resource_type = 1) THEN
526: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
527: FND_MESSAGE.set_token( 'WO_NAME', l_wrkrec.workorder_name );
528: FND_MESSAGE.set_token( 'OP_SEQ', p_prd_resrc_txn_tbl(I).operation_sequence_num );
529: FND_MESSAGE.set_token( 'RES_SEQ', p_prd_resrc_txn_tbl(I).resource_sequence_num );
530: FND_MSG_PUB.add;
531: END IF;*/
532:
533: END IF; -- p_prd_resrc_txn_tbl(i).serial_number

Line 750: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');

746: FETCH CurGetOperSeq into l_oper_rec;
747:
748: IF CurGetOperSeq%NOTFOUND
749: THEN
750: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
751: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);
752: FND_MSG_PUB.ADD;
753: Else
754: p_x_prd_resrc_txn_tbl(I).Workorder_operation_id:=l_oper_rec.workorder_operation_id;

Line 751: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);

747:
748: IF CurGetOperSeq%NOTFOUND
749: THEN
750: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
751: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);
752: FND_MSG_PUB.ADD;
753: Else
754: p_x_prd_resrc_txn_tbl(I).Workorder_operation_id:=l_oper_rec.workorder_operation_id;
755:

Line 784: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');

780: OPEN CurGetDeptdet(p_x_prd_resrc_txn_tbl(I).department_code
781: ,p_x_prd_resrc_txn_tbl(I).organization_id);
782: FETCH CurGetDeptdet INTO p_x_prd_resrc_txn_tbl(I).department_id;
783: IF(CurGetDeptdet%NOTFOUND)THEN
784: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
785: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
786: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
787: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
788: FND_MSG_PUB.ADD;

Line 785: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);

781: ,p_x_prd_resrc_txn_tbl(I).organization_id);
782: FETCH CurGetDeptdet INTO p_x_prd_resrc_txn_tbl(I).department_id;
783: IF(CurGetDeptdet%NOTFOUND)THEN
784: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
785: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
786: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
787: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
788: FND_MSG_PUB.ADD;
789: END IF;

Line 786: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')

782: FETCH CurGetDeptdet INTO p_x_prd_resrc_txn_tbl(I).department_id;
783: IF(CurGetDeptdet%NOTFOUND)THEN
784: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
785: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
786: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
787: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
788: FND_MSG_PUB.ADD;
789: END IF;
790: CLOSE CurGetDeptdet;

Line 797: FND_MESSAGE.set_name('AHL','AHL_PRD_OPSEQNUM_NULL');

793:
794: END IF;
795: CLOSE CurGetOperSeq;
796: ELSE
797: FND_MESSAGE.set_name('AHL','AHL_PRD_OPSEQNUM_NULL');
798: FND_MSG_PUB.ADD;
799: END IF; -- p_x_prd_resrc_txn_tbl(I).OPERATION_SEQUENCE_NUM
800:
801: If p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM is not null and

Line 810: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');

806: p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
807: FETCH CurGetResSeq into l_res_seq_rec;
808: IF CurGetResSeq%NOTFOUND
809: THEN
810: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');
811: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,false);
812: FND_MSG_PUB.ADD;
813: ELSE
814: p_x_prd_resrc_txn_tbl(I).UOM_CODE:=l_res_seq_rec.UOM_CODE;

Line 811: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,false);

807: FETCH CurGetResSeq into l_res_seq_rec;
808: IF CurGetResSeq%NOTFOUND
809: THEN
810: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_SEQ_INV');
811: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,false);
812: FND_MSG_PUB.ADD;
813: ELSE
814: p_x_prd_resrc_txn_tbl(I).UOM_CODE:=l_res_seq_rec.UOM_CODE;
815: p_x_prd_resrc_txn_tbl(I).RESOURCE_ID:=l_res_seq_rec.RESOURCE_ID;

Line 824: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');

820: p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM);
821: FETCH Curres into l_Resrec;
822: IF Curres%NOTFOUND
823: THEN
824: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
825: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num,false);
826: FND_MSG_PUB.ADD;
827: ELSE
828: p_x_prd_resrc_txn_tbl(I).resource_id:=l_resrec.resource_id;

Line 825: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num,false);

821: FETCH Curres into l_Resrec;
822: IF Curres%NOTFOUND
823: THEN
824: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
825: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num,false);
826: FND_MSG_PUB.ADD;
827: ELSE
828: p_x_prd_resrc_txn_tbl(I).resource_id:=l_resrec.resource_id;
829: p_x_prd_resrc_txn_tbl(I).UOM_CODE:=l_resrec.UOM_CODE;

Line 847: FND_MESSAGE.set_name('AHL','AHL_PP_RESOURCE_NOT_EXISTS');

843: FETCH getResID INTO p_x_prd_resrc_txn_tbl(I).resource_id,
844: p_x_prd_resrc_txn_tbl(I).resource_sequence_num,
845: p_x_prd_resrc_txn_tbl(I).UOM_CODE;
846: IF (getResID%NOTFOUND) THEN
847: FND_MESSAGE.set_name('AHL','AHL_PP_RESOURCE_NOT_EXISTS');
848: FND_MSG_PUB.ADD;
849: END IF;
850: CLOSE getResID;
851: END IF; -- p_x_prd_resrc_txn_tbl(I).Resource_Name

Line 870: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');

866: p_x_prd_resrc_txn_tbl(I).organization_id);
867: FETCH CurGetDeptdet into l_deptrec;
868: If CurGetDeptdet%NOTFOUND
869: Then
870: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
871: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
872: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
873: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
874: FND_MSG_PUB.ADD;

Line 871: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);

867: FETCH CurGetDeptdet into l_deptrec;
868: If CurGetDeptdet%NOTFOUND
869: Then
870: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
871: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
872: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
873: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
874: FND_MSG_PUB.ADD;
875: Else

Line 872: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')

868: If CurGetDeptdet%NOTFOUND
869: Then
870: FND_MESSAGE.set_name('AHL','AHL_PRD_TRX_DEPT_INV');
871: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).DEPARTMENT_CODE);
872: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,'')
873: ||'-'||nvl(p_x_prd_resrc_txn_tbl(I).resource_Sequence_num,''));
874: FND_MSG_PUB.ADD;
875: Else
876: p_x_prd_resrc_txn_tbl(I).DEPARTMENT_ID:=L_DEPTREC.DEPARTMENT_ID;

Line 889: FND_MESSAGE.set_name('AHL','AHL_PRD_ACTIVITY_INV');

885: OPEN CurGetActivity(p_x_prd_resrc_txn_tbl(I).ACTIVITY_MEANING);
886: FETCH CurGetActivity into p_x_prd_resrc_txn_tbl(I).ACTIVITY_ID;
887: If CurGetActivity%NOTFOUND
888: Then
889: FND_MESSAGE.set_name('AHL','AHL_PRD_ACTIVITY_INV');
890: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Activity_Meaning);
891: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
892: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''));
893: FND_MSG_PUB.ADD;

Line 890: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Activity_Meaning);

886: FETCH CurGetActivity into p_x_prd_resrc_txn_tbl(I).ACTIVITY_ID;
887: If CurGetActivity%NOTFOUND
888: Then
889: FND_MESSAGE.set_name('AHL','AHL_PRD_ACTIVITY_INV');
890: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Activity_Meaning);
891: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
892: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''));
893: FND_MSG_PUB.ADD;
894: End If;

Line 891: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,

887: If CurGetActivity%NOTFOUND
888: Then
889: FND_MESSAGE.set_name('AHL','AHL_PRD_ACTIVITY_INV');
890: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Activity_Meaning);
891: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
892: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''));
893: FND_MSG_PUB.ADD;
894: End If;
895: CLOSE CurGetActivity;

Line 905: FND_MESSAGE.set_name('AHL','AHL_PRD_REASON_INV');

901: OPEN CurGetReason(p_x_prd_resrc_txn_tbl(I).Reason);
902: FETCH CurGetReason into p_x_prd_resrc_txn_tbl(I).REASON_ID;
903: If CurGetReason%NOTFOUND
904: Then
905: FND_MESSAGE.set_name('AHL','AHL_PRD_REASON_INV');
906: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Reason,false);
907: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
908: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''),false);
909: FND_MSG_PUB.ADD;

Line 906: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Reason,false);

902: FETCH CurGetReason into p_x_prd_resrc_txn_tbl(I).REASON_ID;
903: If CurGetReason%NOTFOUND
904: Then
905: FND_MESSAGE.set_name('AHL','AHL_PRD_REASON_INV');
906: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Reason,false);
907: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
908: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''),false);
909: FND_MSG_PUB.ADD;
910: End If;

Line 907: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,

903: If CurGetReason%NOTFOUND
904: Then
905: FND_MESSAGE.set_name('AHL','AHL_PRD_REASON_INV');
906: FND_MESSAGE.SET_TOKEN('FIELD1',p_x_prd_resrc_txn_tbl(I).Reason,false);
907: FND_MESSAGE.SET_TOKEN('RECORD',nvl(p_x_prd_resrc_txn_tbl(I).Operation_Sequence_num,
908: '')||'-'||nvl(p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM,''),false);
909: FND_MSG_PUB.ADD;
910: End If;
911: CLOSE CurGetReason;

Line 925: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');

921: p_x_prd_resrc_txn_tbl(i).serial_number);
922: FETCH get_instance_sernum INTO p_x_prd_resrc_txn_tbl(I).instance_id;
923: IF get_instance_sernum%NOTFOUND
924: THEN
925: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');
926: FND_MESSAGE.SET_TOKEN('SERNUMB',p_x_prd_resrc_txn_tbl(I).serial_number);
927: FND_MSG_PUB.ADD;
928: END IF;
929: Close get_instance_sernum;

Line 926: FND_MESSAGE.SET_TOKEN('SERNUMB',p_x_prd_resrc_txn_tbl(I).serial_number);

922: FETCH get_instance_sernum INTO p_x_prd_resrc_txn_tbl(I).instance_id;
923: IF get_instance_sernum%NOTFOUND
924: THEN
925: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_SERNUM_INVALID');
926: FND_MESSAGE.SET_TOKEN('SERNUMB',p_x_prd_resrc_txn_tbl(I).serial_number);
927: FND_MSG_PUB.ADD;
928: END IF;
929: Close get_instance_sernum;
930:

Line 942: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INV');

938: Open CurGetEmployee(p_x_prd_resrc_txn_tbl(I).EMPLOYEE_NUM,p_x_prd_resrc_txn_tbl(I).organization_id);
939: FETCH CurGetEmployee into l_emp_rec;
940: IF CurGetEmployee%NOTFOUND
941: THEN
942: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INV');
943: FND_MESSAGE.SET_TOKEN('EMP_NUM',p_x_prd_resrc_txn_tbl(I).EMPLOYEE_NUM);
944: FND_MSG_PUB.ADD;
945: ELSE
946: p_x_prd_resrc_txn_tbl(I).PERSON_ID:=l_emp_rec.person_id;

Line 943: FND_MESSAGE.SET_TOKEN('EMP_NUM',p_x_prd_resrc_txn_tbl(I).EMPLOYEE_NUM);

939: FETCH CurGetEmployee into l_emp_rec;
940: IF CurGetEmployee%NOTFOUND
941: THEN
942: FND_MESSAGE.set_name('AHL','AHL_PRD_EMPNUM_INV');
943: FND_MESSAGE.SET_TOKEN('EMP_NUM',p_x_prd_resrc_txn_tbl(I).EMPLOYEE_NUM);
944: FND_MSG_PUB.ADD;
945: ELSE
946: p_x_prd_resrc_txn_tbl(I).PERSON_ID:=l_emp_rec.person_id;
947: END IF;

Line 1127: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');

1123: p_x_prd_resrc_txn_tbl(i).DEPARTMENT_ID;
1124:
1125:
1126: IF (get_oper_res_det%NOTFOUND) THEN
1127: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
1128: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);
1129: FND_MSG_PUB.ADD;
1130: END IF;
1131: CLOSE get_oper_res_det;

Line 1128: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);

1124:
1125:
1126: IF (get_oper_res_det%NOTFOUND) THEN
1127: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
1128: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);
1129: FND_MSG_PUB.ADD;
1130: END IF;
1131: CLOSE get_oper_res_det;
1132:

Line 1383: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');

1379: p_prd_myworkorder_txn_tbl(i).TRANSACTED_HOURS <> fnd_api.g_miss_num
1380: THEN
1381: IF p_prd_myworkorder_txn_tbl(i).TRANSACTED_HOURS < 0
1382: THEN
1383: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');
1384: FND_MESSAGE.SET_TOKEN('OPER_RES', p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE||'-'|| p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE);
1385: FND_MSG_PUB.ADD;
1386:
1387: IF G_DEBUG='Y' THEN

Line 1384: FND_MESSAGE.SET_TOKEN('OPER_RES', p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE||'-'|| p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE);

1380: THEN
1381: IF p_prd_myworkorder_txn_tbl(i).TRANSACTED_HOURS < 0
1382: THEN
1383: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');
1384: FND_MESSAGE.SET_TOKEN('OPER_RES', p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE||'-'|| p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE);
1385: FND_MSG_PUB.ADD;
1386:
1387: IF G_DEBUG='Y' THEN
1388: AHL_DEBUG_PUB.debug( 'Error in Quantity');

Line 1399: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_NULL');

1395:
1396: IF p_prd_myworkorder_txn_tbl(i).WORKORDER_ID IS NULL OR
1397: p_prd_myworkorder_txn_tbl(i).WORKORDER_ID = fnd_api.g_miss_num
1398: THEN
1399: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_NULL');
1400: FND_MSG_PUB.ADD;
1401: IF G_DEBUG='Y' THEN
1402: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1403: END IF;

Line 1418: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');

1414: IF l_return_status = FND_API.G_TRUE THEN
1415: OPEN get_wo_details(p_prd_myworkorder_txn_tbl(i).workorder_id);
1416: FETCH get_wo_details INTO l_wo_name;
1417: CLOSE get_wo_details;
1418: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');
1419: FND_MESSAGE.Set_Token('WO_NAME', l_wo_name);
1420: FND_MSG_PUB.ADD;
1421: END IF;
1422: END IF;

Line 1419: FND_MESSAGE.Set_Token('WO_NAME', l_wo_name);

1415: OPEN get_wo_details(p_prd_myworkorder_txn_tbl(i).workorder_id);
1416: FETCH get_wo_details INTO l_wo_name;
1417: CLOSE get_wo_details;
1418: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');
1419: FND_MESSAGE.Set_Token('WO_NAME', l_wo_name);
1420: FND_MSG_PUB.ADD;
1421: END IF;
1422: END IF;
1423: -- rroy

Line 1428: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_NULL');

1424: -- ACL Changes
1425: IF p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE IS NULL OR
1426: p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE = fnd_api.g_miss_num
1427: THEN
1428: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_NULL');
1429: FND_MSG_PUB.ADD;
1430: IF G_DEBUG='Y' THEN
1431: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1432: END IF;

Line 1438: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_NULL');

1434:
1435: IF p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE IS NULL OR
1436: p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE = fnd_api.g_miss_num
1437: THEN
1438: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_NULL');
1439: FND_MSG_PUB.ADD;
1440: IF G_DEBUG='Y' THEN
1441: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1442: END IF;

Line 1648: FND_MESSAGE.set_name('AHL', 'AHL_PRD_RESOURCE_CANNOTEDIT');

1644: OPEN GetWipid (p_x_prd_myworkorder_txn_tbl(i).workorder_id);
1645: FETCH GetWipid into l_wip_entity_id, l_wo_status_code;
1646: CLOSE GetWipid;
1647: IF l_wo_status_code IN ('1', '12', '7', '6', '13', '5') THEN
1648: FND_MESSAGE.set_name('AHL', 'AHL_PRD_RESOURCE_CANNOTEDIT');
1649: FND_MSG_PUB.ADD;
1650: RAISE FND_API.G_EXC_ERROR;
1651: END IF;
1652: