36:
37: --Initialize the message list if specified so.
38: IF FND_API.TO_BOOLEAN( P_INIT_MSG_LIST ) THEN
39:
40: FND_MSG_PUB.INITIALIZE;
41:
42: END IF;
43:
44: --Call a private API to obtain the document number type.
53:
54:
55: --Get the message count.
56: --If count is 1, then get the message data.
57: FND_MSG_PUB.COUNT_AND_GET
58: (P_COUNT => X_MSG_COUNT,
59: P_DATA => X_MSG_DATA);
60:
61:
63:
64: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
65: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
66:
67: FND_MSG_PUB.COUNT_AND_GET
68: (P_COUNT => X_MSG_COUNT,
69: P_DATA => X_MSG_DATA);
70:
71: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
77: WHEN OTHERS THEN
78:
79: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
80:
81: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
82: FND_MSG_PUB.ADD_EXC_MSG
83: (G_PKG_NAME,
84: L_API_NAME);
85: END IF;
78:
79: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
80:
81: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
82: FND_MSG_PUB.ADD_EXC_MSG
83: (G_PKG_NAME,
84: L_API_NAME);
85: END IF;
86:
83: (G_PKG_NAME,
84: L_API_NAME);
85: END IF;
86:
87: FND_MSG_PUB.COUNT_AND_GET
88: (P_COUNT => X_MSG_COUNT,
89: P_DATA => X_MSG_DATA);
90:
91: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134:
135: --Initialized the message list if specified so.
136: IF FND_API.TO_BOOLEAN(P_INIT_MSG_LIST) THEN
137:
138: FND_MSG_PUB.INITIALIZE;
139:
140: END IF;
141:
142: --Call a private API to obtain the next value of the document number associated with
151: X_MSG_DATA => X_MSG_DATA);
152:
153: --Get the message count.
154: --If count is 1, then get the message data.
155: FND_MSG_PUB.COUNT_AND_GET
156: (P_COUNT => X_MSG_COUNT,
157: P_DATA => X_MSG_DATA);
158:
159:
161:
162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
163: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
164:
165: FND_MSG_PUB.COUNT_AND_GET
166: (P_COUNT => X_MSG_COUNT,
167: P_DATA => X_MSG_DATA);
168:
169: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
175: WHEN OTHERS THEN
176:
177: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
178:
179: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
180: FND_MSG_PUB.ADD_EXC_MSG
181: (G_PKG_NAME,
182: L_API_NAME);
183: END IF;
176:
177: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
178:
179: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
180: FND_MSG_PUB.ADD_EXC_MSG
181: (G_PKG_NAME,
182: L_API_NAME);
183: END IF;
184:
181: (G_PKG_NAME,
182: L_API_NAME);
183: END IF;
184:
185: FND_MSG_PUB.COUNT_AND_GET
186: (P_COUNT => X_MSG_COUNT,
187: P_DATA => X_MSG_DATA);
188:
189: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
231:
232: --Initialized the message list if specified so.
233: IF FND_API.TO_BOOLEAN(P_INIT_MSG_LIST) THEN
234:
235: FND_MSG_PUB.INITIALIZE;
236:
237: END IF;
238:
239: --Call the private API to perform the required operation.
247: X_MSG_DATA => X_MSG_DATA);
248:
249: --Get the message count.
250: --If count is 1, then get the message data.
251: FND_MSG_PUB.COUNT_AND_GET
252: (P_COUNT => X_MSG_COUNT,
253: P_DATA => X_MSG_DATA);
254:
255: EXCEPTION
256:
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
259:
260: FND_MSG_PUB.COUNT_AND_GET
261: (P_COUNT => X_MSG_COUNT,
262: P_DATA => X_MSG_DATA);
263:
264: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
270: WHEN OTHERS THEN
271:
272: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
273:
274: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
275: FND_MSG_PUB.ADD_EXC_MSG
276: (G_PKG_NAME,
277: L_API_NAME);
278: END IF;
271:
272: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
273:
274: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
275: FND_MSG_PUB.ADD_EXC_MSG
276: (G_PKG_NAME,
277: L_API_NAME);
278: END IF;
279:
276: (G_PKG_NAME,
277: L_API_NAME);
278: END IF;
279:
280: FND_MSG_PUB.COUNT_AND_GET
281: (P_COUNT => X_MSG_COUNT,
282: P_DATA => X_MSG_DATA);
283:
284: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN