DBA Data[Home] [Help]

APPS.AHL_PRD_RESOURCE_TRANX_PVT dependencies on FND_MSG_PUB

Line 182: FND_MSG_PUB.ADD;

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.
186: If p_prd_resrc_txn_tbl(I).organization_id is null

Line 193: --FND_MSG_PUB.ADD;

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;
197: **sracha */

Line 213: FND_MSG_PUB.ADD;

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:
217: Open ValidWrkDet(p_prd_resrc_txn_tbl(I).workorder_id);

Line 223: FND_MSG_PUB.ADD;

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;
227: Close ValidWrkDet;

Line 239: FND_MSG_PUB.ADD;

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;
243: END IF;

Line 260: FND_MSG_PUB.ADD;

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
264:

Line 273: FND_MSG_PUB.ADD;

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.
277: If p_prd_resrc_txn_tbl(I).operation_sequence_num is null

Line 281: FND_MSG_PUB.ADD;

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
285: from AHL_WORKORDER_OPERATIONS A

Line 293: FND_MSG_PUB.ADD;

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:
297: -- Validate resource sequence.

Line 311: FND_MSG_PUB.ADD;

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:
315: -- validate department id.

Line 322: FND_MSG_PUB.ADD;

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:
325: IF G_DEBUG='Y' THEN
326: AHL_DEBUG_PUB.debug( 'After resource seq/dept validation',l_proc_name);

Line 335: FND_MSG_PUB.ADD;

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,
339: --p_prd_resrc_txn_tbl(I).operation_sequence_num,

Line 350: FND_MSG_PUB.ADD;

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:
354: ELSE

Line 368: FND_MSG_PUB.ADD;

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:
372: END IF; -- p_prd_resrc_txn_tbl(I).employee_num IS NULL

Line 383: FND_MSG_PUB.ADD;

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
387: -- R12 Tech UIs

Line 396: FND_MSG_PUB.ADD;

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
399: -- Negative resource transactions are allowed
400: /*elsif p_prd_resrc_txn_tbl(I).qty <=0

Line 405: FND_MSG_PUB.ADD;

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
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)

Line 414: FND_MSG_PUB.ADD;

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:
417: End if;
418:

Line 443: FND_MSG_PUB.ADD;

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;
444: END IF;
445: END IF; -- (p_prd_resrc_txn_tbl(i).transaction_date)
446: ELSE -- p_prd_resrc_txn_tbl(i).end_date IS NULL
447: IF (p_prd_resrc_txn_tbl(i).transaction_date IS NULL) THEN

Line 474: FND_MSG_PUB.ADD;

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;
475: END IF;-- IF p_prd_resrc_txn_tbl(i).transaction_date > sysdate THEN
476:
477:
478: -- transaction date should be greater than the workorder release date

Line 494: FND_MSG_PUB.ADD;

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:
498: IF G_DEBUG='Y' THEN

Line 518: FND_MSG_PUB.ADD;

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;
522: -- Adithya modified the code to take department_id for Bug # 6326254 - End

Line 530: FND_MSG_PUB.add;

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
534:

Line 546: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

542: AHL_DEBUG_PUB.debug( 'End of procedure',l_proc_name);
543: END IF;
544:
545: --Adithya added the following debug
546: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
547: p_count => l_msg_count,
548: p_data => l_msg_data);
549: IF l_msg_count > 0 THEN
550: if (l_msg_count = 1) THEN

Line 558: fnd_msg_pub.get(

554: END IF;
555: else
556: FOR i IN 1..l_msg_count LOOP
557:
558: fnd_msg_pub.get(
559: p_encoded => 'F',
560: p_data => l_msg_data,
561: p_msg_index_out => l_msg_index_out);
562: IF G_DEBUG='Y' THEN

Line 752: FND_MSG_PUB.ADD;

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:
756: IF (p_x_prd_resrc_txn_tbl(I).organization_id IS NULL) OR

Line 788: FND_MSG_PUB.ADD;

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;
791:
792: END IF;

Line 798: FND_MSG_PUB.ADD;

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
802: p_x_prd_resrc_txn_tbl(I).RESOURCE_SEQUENCE_NUM<>fnd_api.g_miss_num

Line 812: FND_MSG_PUB.ADD;

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;
816: p_x_prd_resrc_txn_tbl(I).RESOURCE_NAME :=l_res_seq_rec.RESOURCE_CODE;

Line 826: FND_MSG_PUB.ADD;

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;
830: END IF;

Line 848: FND_MSG_PUB.ADD;

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
852:

Line 874: FND_MSG_PUB.ADD;

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;
877: End If;
878: CLOSE CurGetDeptdet;

Line 893: FND_MSG_PUB.ADD;

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;
896: END IF;
897:

Line 909: FND_MSG_PUB.ADD;

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;
912: END IF;
913:

Line 927: FND_MSG_PUB.ADD;

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:
931: END IF;

Line 944: FND_MSG_PUB.ADD;

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;
948: CLOSE CurGetEmployee;

Line 1046: FND_MSG_PUB.initialize;

1042:
1043: -- Initialize message list if p_init_msg_list is set to TRUE.
1044:
1045: IF FND_API.to_boolean(p_init_msg_list) THEN
1046: FND_MSG_PUB.initialize;
1047: END IF;
1048:
1049: -- Initialize API return status to success
1050:

Line 1074: l_msg_count := FND_MSG_PUB.count_msg;

1070: x_return_status =>x_return_status
1071: );
1072:
1073: -- check error message.
1074: l_msg_count := FND_MSG_PUB.count_msg;
1075: IF l_msg_count > 0 THEN
1076: X_msg_count := l_msg_count;
1077: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1078: IF G_DEBUG='Y' THEN

Line 1098: l_msg_count := FND_MSG_PUB.count_msg;

1094: );
1095:
1096:
1097: -- check errors.
1098: l_msg_count := FND_MSG_PUB.count_msg;
1099: IF l_msg_count > 0 THEN
1100: X_msg_count := l_msg_count;
1101: IF G_DEBUG='Y' THEN
1102: AHL_DEBUG_PUB.debug( 'Error Thrown In Validation',L_API_NAME);

Line 1129: FND_MSG_PUB.ADD;

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:
1133: IF (G_DEBUG = 'Y') THEN

Line 1290: l_msg_count := FND_MSG_PUB.count_msg;

1286: p_ahl_res_txn_tbl =>l_ahl_res_txn_tbl
1287: );
1288: End if;
1289:
1290: l_msg_count := FND_MSG_PUB.count_msg;
1291: IF l_msg_count > 0 THEN
1292: X_msg_count := l_msg_count;
1293: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1294: RAISE FND_API.G_EXC_ERROR;

Line 1324: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1320: EXCEPTION
1321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1322: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1323: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1324: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1325: p_count => x_msg_count,
1326: p_data => x_msg_data);
1327:
1328: WHEN FND_API.G_EXC_ERROR THEN

Line 1331: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1327:
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1330: X_return_status := FND_API.G_RET_STS_ERROR;
1331: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1332: p_count => x_msg_count,
1333: p_data => X_msg_data);
1334: WHEN OTHERS THEN
1335: ROLLBACK TO PROCESS_RESOURCE_TRANX;

Line 1337: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1333: p_data => X_msg_data);
1334: WHEN OTHERS THEN
1335: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1336: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1337: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1338: THEN
1339: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1340: p_procedure_name =>l_api_name,
1341: p_error_text =>SUBSTR(SQLERRM,1,240)

Line 1339: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,

1335: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1336: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1337: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1338: THEN
1339: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1340: p_procedure_name =>l_api_name,
1341: p_error_text =>SUBSTR(SQLERRM,1,240)
1342: );
1343: END IF;

Line 1344: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1340: p_procedure_name =>l_api_name,
1341: p_error_text =>SUBSTR(SQLERRM,1,240)
1342: );
1343: END IF;
1344: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1345: p_count => x_msg_count,
1346: p_data => X_msg_data);
1347:
1348: END;

Line 1385: FND_MSG_PUB.ADD;

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');
1389: END IF;

Line 1400: FND_MSG_PUB.ADD;

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;
1404: END IF ;

Line 1420: FND_MSG_PUB.ADD;

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
1424: -- ACL Changes

Line 1429: FND_MSG_PUB.ADD;

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;
1433: END IF ;

Line 1439: FND_MSG_PUB.ADD;

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;
1443: END IF ;

Line 1600: FND_MSG_PUB.initialize;

1596:
1597: -- Initialize message list if p_init_msg_list is set to TRUE.
1598:
1599: IF FND_API.to_boolean(p_init_msg_list) THEN
1600: FND_MSG_PUB.initialize;
1601: END IF;
1602:
1603: -- Initialize API return status to success
1604:

Line 1620: l_msg_count := FND_MSG_PUB.count_msg;

1616: x_return_status =>x_return_status
1617: );
1618:
1619:
1620: l_msg_count := FND_MSG_PUB.count_msg;
1621: IF l_msg_count > 0 THEN
1622: X_msg_count := l_msg_count;
1623: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1624: IF G_DEBUG='Y' THEN

Line 1649: FND_MSG_PUB.ADD;

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:
1653: Open getResDetails(p_x_prd_myworkorder_txn_tbl(i).ASSIGNMENT_ID);

Line 1697: l_msg_count := FND_MSG_PUB.count_msg;

1693: x_msg_data =>l_msg_data,
1694: p_ahl_res_txn_tbl =>l_ahl_res_txn_tbl
1695: );
1696: End if;
1697: l_msg_count := FND_MSG_PUB.count_msg;
1698: IF l_msg_count > 0 THEN
1699: X_msg_count := l_msg_count;
1700: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1701: RAISE FND_API.G_EXC_ERROR;

Line 1748: l_msg_count := FND_MSG_PUB.count_msg;

1744: x_msg_data =>l_msg_data,
1745: p_x_prd_operation_tbl =>l_prd_operation_tbl
1746: );
1747: End if;
1748: l_msg_count := FND_MSG_PUB.count_msg;
1749: IF l_msg_count > 0 THEN
1750: X_msg_count := l_msg_count;
1751: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1752: RAISE FND_API.G_EXC_ERROR;

Line 1778: l_msg_count := FND_MSG_PUB.count_msg;

1774: p_object_version_no => l_prd_operation_tbl(i).object_version_number
1775: );
1776: END LOOP;
1777: END IF;
1778: l_msg_count := FND_MSG_PUB.count_msg;
1779: IF l_msg_count > 0 THEN
1780: X_msg_count := l_msg_count;
1781: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1782: RAISE FND_API.G_EXC_ERROR;

Line 1807: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1803: EXCEPTION
1804: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1805: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1806: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1807: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1808: p_count => x_msg_count,
1809: p_data => x_msg_data);
1810:
1811: WHEN FND_API.G_EXC_ERROR THEN

Line 1814: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1810:
1811: WHEN FND_API.G_EXC_ERROR THEN
1812: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1813: X_return_status := FND_API.G_RET_STS_ERROR;
1814: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1815: p_count => x_msg_count,
1816: p_data => X_msg_data);
1817: WHEN OTHERS THEN
1818: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;

Line 1820: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1816: p_data => X_msg_data);
1817: WHEN OTHERS THEN
1818: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1819: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1820: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1821: THEN
1822: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1823: p_procedure_name =>l_api_name,
1824: p_error_text =>SUBSTR(SQLERRM,1,240)

Line 1822: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,

1818: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1819: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1820: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1821: THEN
1822: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1823: p_procedure_name =>l_api_name,
1824: p_error_text =>SUBSTR(SQLERRM,1,240)
1825: );
1826: END IF;

Line 1827: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1823: p_procedure_name =>l_api_name,
1824: p_error_text =>SUBSTR(SQLERRM,1,240)
1825: );
1826: END IF;
1827: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1828: p_count => x_msg_count,
1829: p_data => X_msg_data);
1830:
1831: END;