46: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
47: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
48: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
49: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_ITEM_DISPLAY_NAME');
50: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
51: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
52: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_ITEM_DISPLAY_NAME',
53: FALSE
54: );
47: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
48: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
49: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_ITEM_DISPLAY_NAME');
50: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
51: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
52: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_ITEM_DISPLAY_NAME',
53: FALSE
54: );
55: END IF;
103: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
104: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
105: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_ITEM_DESCRIPTION');
106:
107: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
108: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
109: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_ITEM_DESCRIPTION',
110: FALSE
111: );
104: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
105: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_ITEM_DESCRIPTION');
106:
107: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
108: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
109: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_ITEM_DESCRIPTION',
110: FALSE
111: );
112: END IF;
207: EXCEPTION
208: WHEN CREATE_ERROR THEN
209: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
210:
211: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
212: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
213: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.CREATE_DEFN_CONTEXT',
214: FALSE
215: );
208: WHEN CREATE_ERROR THEN
209: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
210:
211: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
212: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
213: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.CREATE_DEFN_CONTEXT',
214: FALSE
215: );
216: END IF;
222: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
223: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
224: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_DEFN_CONTEXT');
225:
226: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
228: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.CREATE_DEFN_CONTEXT',
229: FALSE
230: );
223: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
224: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_DEFN_CONTEXT');
225:
226: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
228: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.CREATE_DEFN_CONTEXT',
229: FALSE
230: );
231: END IF;
323: EXCEPTION
324: WHEN UPDATE_ERROR THEN
325: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
326:
327: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
329: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.UPDATE_CONTEXT_PARAMS',
330: FALSE
331: );
324: WHEN UPDATE_ERROR THEN
325: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
326:
327: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
329: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.UPDATE_CONTEXT_PARAMS',
330: FALSE
331: );
332: END IF;
338: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
339: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
340: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_DEFN_CONTEXT');
341:
342: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
343: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
344: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.UPDATE_CONTEXT_PARAMS',
345: FALSE
346: );
339: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
340: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_DEFN_CONTEXT');
341:
342: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
343: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
344: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.UPDATE_CONTEXT_PARAMS',
345: FALSE
346: );
347: END IF;
406:
407: EXCEPTION
408: WHEN XML_ERROR THEN
409: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
410: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
412: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_TRANSACTION_XML',
413: FALSE
414: );
407: EXCEPTION
408: WHEN XML_ERROR THEN
409: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
410: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
412: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_TRANSACTION_XML',
413: FALSE
414: );
415: END IF;
421: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
422: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
423: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_TRANSACTION_XML');
424:
425: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
426: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
427: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_TRANSACTION_XML',
428: FALSE
429: );
422: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
423: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','GET_TRANSACTION_XML');
424:
425: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
426: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
427: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.GET_TRANSACTION_XML',
428: FALSE
429: );
430: END IF;
527: END IF;
528:
529: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
530:
531: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
533: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.SEND_INSTR_ACKN',
534: FALSE
535: );
528:
529: FND_MESSAGE.SET_ENCODED(L_MSG_DATA);
530:
531: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
533: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.SEND_INSTR_ACKN',
534: FALSE
535: );
536: END IF;
547: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
548: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
549: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','SEND_INSTR_ACKN');
550:
551: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
552: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
553: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.SEND_INSTR_ACKN',
554: FALSE
555: );
548: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_SETUP_PVT');
549: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','SEND_INSTR_ACKN');
550:
551: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
552: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
553: 'edr.plsql.GMO_DISPENSE_SETUP_PVT.SEND_INSTR_ACKN',
554: FALSE
555: );
556: END IF;
955: FND_MSG_PUB.COUNT_AND_GET
956: (P_COUNT => X_MSG_COUNT,
957: P_DATA => X_MSG_DATA);
958:
959: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
960: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
961: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISPENSE_SETUP',
962: FALSE);
963: END IF;
956: (P_COUNT => X_MSG_COUNT,
957: P_DATA => X_MSG_DATA);
958:
959: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
960: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
961: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISPENSE_SETUP',
962: FALSE);
963: END IF;
964:
983: FND_MSG_PUB.COUNT_AND_GET
984: (P_COUNT => X_MSG_COUNT,
985: P_DATA => X_MSG_DATA);
986:
987: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
988: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
989: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISPENSE_SETUP',
990: FALSE);
991: END IF;
984: (P_COUNT => X_MSG_COUNT,
985: P_DATA => X_MSG_DATA);
986:
987: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
988: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
989: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISPENSE_SETUP',
990: FALSE);
991: END IF;
992:
1073: FND_MSG_PUB.COUNT_AND_GET
1074: (P_COUNT => X_MSG_COUNT,
1075: P_DATA => X_MSG_DATA);
1076:
1077: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1079: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISP_SETUP',
1080: FALSE);
1081: END IF;
1074: (P_COUNT => X_MSG_COUNT,
1075: P_DATA => X_MSG_DATA);
1076:
1077: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1079: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISP_SETUP',
1080: FALSE);
1081: END IF;
1082:
1102: FND_MSG_PUB.COUNT_AND_GET
1103: (P_COUNT => X_MSG_COUNT,
1104: P_DATA => X_MSG_DATA);
1105:
1106: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1107: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1108: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISP_SETUP',
1109: FALSE);
1110: END IF;
1103: (P_COUNT => X_MSG_COUNT,
1104: P_DATA => X_MSG_DATA);
1105:
1106: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1107: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1108: 'gmo.plsql.GMO_DISPENSE_SETUP_PVT.INSTANTIATE_DISP_SETUP',
1109: FALSE);
1110: END IF;
1111: