123:
124: --Initialize the message list if specified so.
125: IF FND_API.TO_BOOLEAN( P_INIT_MSG_LIST ) THEN
126:
127: FND_MSG_PUB.INITIALIZE;
128:
129: END IF;
130:
131: --The cursor is chosen based on the availability of organization ID.
190: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
191:
192: --Get the message count.
193: --If count is 1, then get the message data.
194: FND_MSG_PUB.COUNT_AND_GET
195: (P_COUNT => X_MSG_COUNT,
196: P_DATA => X_MSG_DATA);
197:
198: EXCEPTION
215: FND_MESSAGE.SET_TOKEN('TRANS',L_INVALID_TRANS_NAME);
216:
217: END IF;
218:
219: FND_MSG_PUB.ADD;
220:
221: FND_MSG_PUB.COUNT_AND_GET
222: (P_COUNT => X_MSG_COUNT,
223: P_DATA => X_MSG_DATA);
217: END IF;
218:
219: FND_MSG_PUB.ADD;
220:
221: FND_MSG_PUB.COUNT_AND_GET
222: (P_COUNT => X_MSG_COUNT,
223: P_DATA => X_MSG_DATA);
224:
225: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
249: X_DOCUMENT_NUMBER_TYPE := NULL;
250: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
251:
252:
253: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
254: FND_MSG_PUB.ADD_EXC_MSG
255: (G_PKG_NAME,
256: L_API_NAME);
257: END IF;
250: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
251:
252:
253: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
254: FND_MSG_PUB.ADD_EXC_MSG
255: (G_PKG_NAME,
256: L_API_NAME);
257: END IF;
258:
255: (G_PKG_NAME,
256: L_API_NAME);
257: END IF;
258:
259: FND_MSG_PUB.COUNT_AND_GET
260: (P_COUNT => X_MSG_COUNT,
261: P_DATA => X_MSG_DATA);
262:
263: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
367:
368: --Initialize the message list if specified so.
369: IF FND_API.TO_BOOLEAN( P_INIT_MSG_LIST ) THEN
370:
371: FND_MSG_PUB.INITIALIZE;
372:
373: END IF;
374:
375: --Check if organization ID exists.
602: FND_MESSAGE.SET_TOKEN('TRANS',L_INVALID_TRANS_NAME);
603:
604: END IF;
605:
606: FND_MSG_PUB.ADD;
607:
608: FND_MSG_PUB.COUNT_AND_GET
609: (P_COUNT => X_MSG_COUNT,
610: P_DATA => X_MSG_DATA);
604: END IF;
605:
606: FND_MSG_PUB.ADD;
607:
608: FND_MSG_PUB.COUNT_AND_GET
609: (P_COUNT => X_MSG_COUNT,
610: P_DATA => X_MSG_DATA);
611:
612: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635:
636: END IF;
637:
638:
639: FND_MSG_PUB.ADD;
640:
641: FND_MSG_PUB.COUNT_AND_GET
642: (P_COUNT => X_MSG_COUNT,
643: P_DATA => X_MSG_DATA);
637:
638:
639: FND_MSG_PUB.ADD;
640:
641: FND_MSG_PUB.COUNT_AND_GET
642: (P_COUNT => X_MSG_COUNT,
643: P_DATA => X_MSG_DATA);
644:
645: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
666: FND_MESSAGE.SET_TOKEN('TRANS',L_INVALID_TRANS_NAME);
667:
668: END IF;
669:
670: FND_MSG_PUB.ADD;
671:
672: FND_MSG_PUB.COUNT_AND_GET
673: (P_COUNT => X_MSG_COUNT,
674: P_DATA => X_MSG_DATA);
668: END IF;
669:
670: FND_MSG_PUB.ADD;
671:
672: FND_MSG_PUB.COUNT_AND_GET
673: (P_COUNT => X_MSG_COUNT,
674: P_DATA => X_MSG_DATA);
675:
676: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
700:
701: END IF;
702:
703:
704: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
705: FND_MSG_PUB.ADD_EXC_MSG
706: (G_PKG_NAME,
707: L_API_NAME);
708: END IF;
701: END IF;
702:
703:
704: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
705: FND_MSG_PUB.ADD_EXC_MSG
706: (G_PKG_NAME,
707: L_API_NAME);
708: END IF;
709:
706: (G_PKG_NAME,
707: L_API_NAME);
708: END IF;
709:
710: FND_MSG_PUB.COUNT_AND_GET
711: (P_COUNT => X_MSG_COUNT,
712: P_DATA => X_MSG_DATA);
713:
714: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
777: X_DOCUMENT_NUMBER_EXISTS := FND_API.G_FALSE;
778:
779: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
780:
781: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
782: FND_MSG_PUB.ADD_EXC_MSG
783: (G_PKG_NAME,
784: L_API_NAME);
785: END IF;
778:
779: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
780:
781: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
782: FND_MSG_PUB.ADD_EXC_MSG
783: (G_PKG_NAME,
784: L_API_NAME);
785: END IF;
786:
783: (G_PKG_NAME,
784: L_API_NAME);
785: END IF;
786:
787: FND_MSG_PUB.COUNT_AND_GET
788: (P_COUNT => X_MSG_COUNT,
789: P_DATA => X_MSG_DATA);
790:
791: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN