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 1062: FND_MSG_PUB.initialize;

1058:
1059: -- Initialize message list if p_init_msg_list is set to TRUE.
1060:
1061: IF FND_API.to_boolean(p_init_msg_list) THEN
1062: FND_MSG_PUB.initialize;
1063: END IF;
1064:
1065: -- Initialize API return status to success
1066:

Line 1090: l_msg_count := FND_MSG_PUB.count_msg;

1086: x_return_status =>x_return_status
1087: );
1088:
1089: -- check error message.
1090: l_msg_count := FND_MSG_PUB.count_msg;
1091: IF l_msg_count > 0 THEN
1092: X_msg_count := l_msg_count;
1093: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1094: IF G_DEBUG='Y' THEN

Line 1114: l_msg_count := FND_MSG_PUB.count_msg;

1110: );
1111:
1112:
1113: -- check errors.
1114: l_msg_count := FND_MSG_PUB.count_msg;
1115: IF l_msg_count > 0 THEN
1116: X_msg_count := l_msg_count;
1117: IF G_DEBUG='Y' THEN
1118: AHL_DEBUG_PUB.debug( 'Error Thrown In Validation',L_API_NAME);

Line 1145: FND_MSG_PUB.ADD;

1141:
1142: IF (get_oper_res_det%NOTFOUND) THEN
1143: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_SEQ_INV');
1144: FND_MESSAGE.SET_TOKEN('RECORD',p_x_prd_resrc_txn_tbl(I).operation_Sequence_num);
1145: FND_MSG_PUB.ADD;
1146: END IF;
1147: CLOSE get_oper_res_det;
1148:
1149: IF (G_DEBUG = 'Y') THEN

Line 1332: l_msg_count := FND_MSG_PUB.count_msg;

1328: p_ahl_res_txn_tbl =>l_ahl_res_txn_tbl
1329: );
1330: End if;
1331:
1332: l_msg_count := FND_MSG_PUB.count_msg;
1333: IF l_msg_count > 0 THEN
1334: X_msg_count := l_msg_count;
1335: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336: RAISE FND_API.G_EXC_ERROR;

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

1362: EXCEPTION
1363: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1364: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1365: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1366: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1367: p_count => x_msg_count,
1368: p_data => x_msg_data);
1369:
1370: WHEN FND_API.G_EXC_ERROR THEN

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

1369:
1370: WHEN FND_API.G_EXC_ERROR THEN
1371: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1372: X_return_status := FND_API.G_RET_STS_ERROR;
1373: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1374: p_count => x_msg_count,
1375: p_data => X_msg_data);
1376: WHEN OTHERS THEN
1377: ROLLBACK TO PROCESS_RESOURCE_TRANX;

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

1375: p_data => X_msg_data);
1376: WHEN OTHERS THEN
1377: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1379: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1380: THEN
1381: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1382: p_procedure_name =>l_api_name,
1383: p_error_text =>SUBSTR(SQLERRM,1,240)

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

1377: ROLLBACK TO PROCESS_RESOURCE_TRANX;
1378: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1379: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1380: THEN
1381: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1382: p_procedure_name =>l_api_name,
1383: p_error_text =>SUBSTR(SQLERRM,1,240)
1384: );
1385: END IF;

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

1382: p_procedure_name =>l_api_name,
1383: p_error_text =>SUBSTR(SQLERRM,1,240)
1384: );
1385: END IF;
1386: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1387: p_count => x_msg_count,
1388: p_data => X_msg_data);
1389:
1390: END;

Line 1427: FND_MSG_PUB.ADD;

1423: IF p_prd_myworkorder_txn_tbl(i).TRANSACTED_HOURS < 0
1424: THEN
1425: FND_MESSAGE.set_name('AHL','AHL_PRD_RESTXN_QTY_INVALID');
1426: FND_MESSAGE.SET_TOKEN('OPER_RES', p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE||'-'|| p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE);
1427: FND_MSG_PUB.ADD;
1428:
1429: IF G_DEBUG='Y' THEN
1430: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1431: END IF;

Line 1442: FND_MSG_PUB.ADD;

1438: IF p_prd_myworkorder_txn_tbl(i).WORKORDER_ID IS NULL OR
1439: p_prd_myworkorder_txn_tbl(i).WORKORDER_ID = fnd_api.g_miss_num
1440: THEN
1441: FND_MESSAGE.set_name('AHL','AHL_PRD_WORKORDER_ID_NULL');
1442: FND_MSG_PUB.ADD;
1443: IF G_DEBUG='Y' THEN
1444: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1445: END IF;
1446: END IF ;

Line 1462: FND_MSG_PUB.ADD;

1458: FETCH get_wo_details INTO l_wo_name;
1459: CLOSE get_wo_details;
1460: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_RESTXN_UNTLCKD');
1461: FND_MESSAGE.Set_Token('WO_NAME', l_wo_name);
1462: FND_MSG_PUB.ADD;
1463: END IF;
1464: END IF;
1465: -- rroy
1466: -- ACL Changes

Line 1471: FND_MSG_PUB.ADD;

1467: IF p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE IS NULL OR
1468: p_prd_myworkorder_txn_tbl(i).OPERATION_SEQUENCE = fnd_api.g_miss_num
1469: THEN
1470: FND_MESSAGE.set_name('AHL','AHL_PRD_OPERATION_NULL');
1471: FND_MSG_PUB.ADD;
1472: IF G_DEBUG='Y' THEN
1473: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1474: END IF;
1475: END IF ;

Line 1481: FND_MSG_PUB.ADD;

1477: IF p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE IS NULL OR
1478: p_prd_myworkorder_txn_tbl(i).RESOURCE_SEQUENCE = fnd_api.g_miss_num
1479: THEN
1480: FND_MESSAGE.set_name('AHL','AHL_PRD_RESOURCE_NULL');
1481: FND_MSG_PUB.ADD;
1482: IF G_DEBUG='Y' THEN
1483: AHL_DEBUG_PUB.debug( 'Error in Quantity');
1484: END IF;
1485: END IF ;

Line 1642: FND_MSG_PUB.initialize;

1638:
1639: -- Initialize message list if p_init_msg_list is set to TRUE.
1640:
1641: IF FND_API.to_boolean(p_init_msg_list) THEN
1642: FND_MSG_PUB.initialize;
1643: END IF;
1644:
1645: -- Initialize API return status to success
1646:

Line 1662: l_msg_count := FND_MSG_PUB.count_msg;

1658: x_return_status =>x_return_status
1659: );
1660:
1661:
1662: l_msg_count := FND_MSG_PUB.count_msg;
1663: IF l_msg_count > 0 THEN
1664: X_msg_count := l_msg_count;
1665: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1666: IF G_DEBUG='Y' THEN

Line 1691: FND_MSG_PUB.ADD;

1687: FETCH GetWipid into l_wip_entity_id, l_wo_status_code;
1688: CLOSE GetWipid;
1689: IF l_wo_status_code IN ('1', '12', '7', '6', '13', '5') THEN
1690: FND_MESSAGE.set_name('AHL', 'AHL_PRD_RESOURCE_CANNOTEDIT');
1691: FND_MSG_PUB.ADD;
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: Open getResDetails(p_x_prd_myworkorder_txn_tbl(i).ASSIGNMENT_ID);

Line 1739: l_msg_count := FND_MSG_PUB.count_msg;

1735: x_msg_data =>l_msg_data,
1736: p_ahl_res_txn_tbl =>l_ahl_res_txn_tbl
1737: );
1738: End if;
1739: l_msg_count := FND_MSG_PUB.count_msg;
1740: IF l_msg_count > 0 THEN
1741: X_msg_count := l_msg_count;
1742: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1743: RAISE FND_API.G_EXC_ERROR;

Line 1790: l_msg_count := FND_MSG_PUB.count_msg;

1786: x_msg_data =>l_msg_data,
1787: p_x_prd_operation_tbl =>l_prd_operation_tbl
1788: );
1789: End if;
1790: l_msg_count := FND_MSG_PUB.count_msg;
1791: IF l_msg_count > 0 THEN
1792: X_msg_count := l_msg_count;
1793: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1794: RAISE FND_API.G_EXC_ERROR;

Line 1820: l_msg_count := FND_MSG_PUB.count_msg;

1816: p_object_version_no => l_prd_operation_tbl(i).object_version_number
1817: );
1818: END LOOP;
1819: END IF;
1820: l_msg_count := FND_MSG_PUB.count_msg;
1821: IF l_msg_count > 0 THEN
1822: X_msg_count := l_msg_count;
1823: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: RAISE FND_API.G_EXC_ERROR;

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

1845: EXCEPTION
1846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1847: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1848: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1849: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1850: p_count => x_msg_count,
1851: p_data => x_msg_data);
1852:
1853: WHEN FND_API.G_EXC_ERROR THEN

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

1852:
1853: WHEN FND_API.G_EXC_ERROR THEN
1854: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1855: X_return_status := FND_API.G_RET_STS_ERROR;
1856: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1857: p_count => x_msg_count,
1858: p_data => X_msg_data);
1859: WHEN OTHERS THEN
1860: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;

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

1858: p_data => X_msg_data);
1859: WHEN OTHERS THEN
1860: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1861: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1863: THEN
1864: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1865: p_procedure_name =>l_api_name,
1866: p_error_text =>SUBSTR(SQLERRM,1,240)

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

1860: ROLLBACK TO PROCESS_MYWORKORDER_TXNS;
1861: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1863: THEN
1864: fnd_msg_pub.add_exc_msg(p_pkg_name =>G_PKG_NAME,
1865: p_procedure_name =>l_api_name,
1866: p_error_text =>SUBSTR(SQLERRM,1,240)
1867: );
1868: END IF;

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

1865: p_procedure_name =>l_api_name,
1866: p_error_text =>SUBSTR(SQLERRM,1,240)
1867: );
1868: END IF;
1869: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1870: p_count => x_msg_count,
1871: p_data => X_msg_data);
1872:
1873: END;