DBA Data[Home] [Help]

APPS.OZF_ACCT_GENERATOR dependencies on FND_MSG_PUB

Line 4: G_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

1: PACKAGE BODY Ozf_Acct_Generator AS
2: /*$Header: ozfactgb.pls 120.12.12020000.2 2012/07/17 11:07:05 bkunjan ship $*/
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'Ozf_Acct_Generator';
4: G_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
5:
6: -- Start of Comments
7: -- API name ams_acct_generator
8: -- Type Private

Line 241: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

237:
238: --DBMS_OUTPUT.PUT_LINE('Entering the api gl_post_account');
239: IF p_account_type = 'ACCRUAL_LIABILITY' THEN
240: IF l_fund_accrual_liability is null THEN
241: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
242: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_ACC_LIAB_ACCT');
243: FND_MSG_PUB.add;
244: END IF;
245: x_return_status := FND_API.g_ret_sts_error;

Line 243: FND_MSG_PUB.add;

239: IF p_account_type = 'ACCRUAL_LIABILITY' THEN
240: IF l_fund_accrual_liability is null THEN
241: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
242: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_ACC_LIAB_ACCT');
243: FND_MSG_PUB.add;
244: END IF;
245: x_return_status := FND_API.g_ret_sts_error;
246: ELSE
247: l_post_account := l_fund_accrual_liability;

Line 251: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

247: l_post_account := l_fund_accrual_liability;
248: END IF;
249: ELSIF p_account_type = 'EXPENSE ACCOUNT' THEN
250: IF l_fund_expense_account is null THEN
251: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
252: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_EXP_ACCT');
253: FND_MSG_PUB.add;
254: END IF;
255: x_return_status := FND_API.g_ret_sts_error;

Line 253: FND_MSG_PUB.add;

249: ELSIF p_account_type = 'EXPENSE ACCOUNT' THEN
250: IF l_fund_expense_account is null THEN
251: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
252: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_EXP_ACCT');
253: FND_MSG_PUB.add;
254: END IF;
255: x_return_status := FND_API.g_ret_sts_error;
256: ELSE
257: l_post_account := l_fund_expense_account;

Line 261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

257: l_post_account := l_fund_expense_account;
258: END IF;
259: ELSIF p_account_type = 'VEN_CLEARING' THEN
260: IF l_ven_clearing is null THEN
261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
262: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_VEN_CLEAR_ACCT');
263: FND_MSG_PUB.add;
264: END IF;
265: x_return_status := FND_API.g_ret_sts_error;

Line 263: FND_MSG_PUB.add;

259: ELSIF p_account_type = 'VEN_CLEARING' THEN
260: IF l_ven_clearing is null THEN
261: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
262: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_VEN_CLEAR_ACCT');
263: FND_MSG_PUB.add;
264: END IF;
265: x_return_status := FND_API.g_ret_sts_error;
266: ELSE
267: l_post_account := l_ven_clearing;

Line 271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

267: l_post_account := l_ven_clearing;
268: END IF;
269: ELSIF p_account_type = 'REC_CLEARING' THEN
270: IF l_rec_clearing is null THEN
271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
272: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_REC_CLEAR_ACCT');
273: FND_MSG_PUB.add;
274: END IF;
275: x_return_status := FND_API.g_ret_sts_error;

Line 273: FND_MSG_PUB.add;

269: ELSIF p_account_type = 'REC_CLEARING' THEN
270: IF l_rec_clearing is null THEN
271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
272: FND_MESSAGE.set_name('OZF', 'OZF_GL_NO_REC_CLEAR_ACCT');
273: FND_MSG_PUB.add;
274: END IF;
275: x_return_status := FND_API.g_ret_sts_error;
276: ELSE
277: l_post_account := l_rec_clearing;

Line 280: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

276: ELSE
277: l_post_account := l_rec_clearing;
278: END IF;
279: ELSE
280: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
281: FND_MESSAGE.set_name('OZF', 'OZF_GL_INVALID_ACCT_EVENT');
282: FND_MSG_PUB.add;
283: END IF;
284: l_post_account := null;

Line 282: FND_MSG_PUB.add;

278: END IF;
279: ELSE
280: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
281: FND_MESSAGE.set_name('OZF', 'OZF_GL_INVALID_ACCT_EVENT');
282: FND_MSG_PUB.add;
283: END IF;
284: l_post_account := null;
285: END IF;
286:

Line 287: FND_MSG_PUB.Count_And_Get

283: END IF;
284: l_post_account := null;
285: END IF;
286:
287: FND_MSG_PUB.Count_And_Get
288: (p_count => x_msg_count,
289: p_data => x_msg_data);
290:
291: IF G_DEBUG_HIGH_ON THEN

Line 300: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

296: EXCEPTION
297: WHEN NO_DATA_FOUND THEN
298: l_post_account := 0;
299: -- Standard call to get message count and if count=1, get the message
300: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
301: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_ACCOUNT');
302: FND_MESSAGE.SET_TOKEN('CCID',l_post_account);
303: FND_MSG_PUB.ADD;
304: END IF;

Line 303: FND_MSG_PUB.ADD;

299: -- Standard call to get message count and if count=1, get the message
300: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
301: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_ACCOUNT');
302: FND_MESSAGE.SET_TOKEN('CCID',l_post_account);
303: FND_MSG_PUB.ADD;
304: END IF;
305: FND_MSG_PUB.Count_And_Get
306: (p_count => x_msg_count,
307: p_data => x_msg_data);

Line 305: FND_MSG_PUB.Count_And_Get

301: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_ACCOUNT');
302: FND_MESSAGE.SET_TOKEN('CCID',l_post_account);
303: FND_MSG_PUB.ADD;
304: END IF;
305: FND_MSG_PUB.Count_And_Get
306: (p_count => x_msg_count,
307: p_data => x_msg_data);
308: x_return_status := FND_API.g_ret_sts_error;
309: RETURN l_post_account;

Line 313: FND_MSG_PUB.Count_And_Get (

309: RETURN l_post_account;
310: WHEN FND_API.G_EXC_ERROR THEN
311: l_post_account := 0;
312: -- Standard call to get message count and if count=1, get the message
313: FND_MSG_PUB.Count_And_Get (
314: p_encoded => FND_API.G_FALSE,
315: p_count => x_msg_count,
316: p_data => x_msg_data);
317: x_return_status := FND_API.g_ret_sts_error;

Line 322: FND_MSG_PUB.Count_And_Get (

318: RETURN l_post_account;
319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: l_post_account := 0;
321: -- Standard call to get message count and if count=1, get the message
322: FND_MSG_PUB.Count_And_Get (
323: p_encoded => FND_API.G_FALSE,
324: p_count => x_msg_count,
325: p_data => x_msg_data);
326: x_return_status := FND_API.g_ret_sts_unexp_error;

Line 329: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

325: p_data => x_msg_data);
326: x_return_status := FND_API.g_ret_sts_unexp_error;
327: RETURN l_post_account;
328: WHEN OTHERS THEN
329: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
330: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
331: END IF;
332: l_post_account := 0;
333: -- Standard call to get message count and if count=1, get the message

Line 330: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

326: x_return_status := FND_API.g_ret_sts_unexp_error;
327: RETURN l_post_account;
328: WHEN OTHERS THEN
329: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
330: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
331: END IF;
332: l_post_account := 0;
333: -- Standard call to get message count and if count=1, get the message
334: FND_MSG_PUB.Count_And_Get (

Line 334: FND_MSG_PUB.Count_And_Get (

330: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
331: END IF;
332: l_post_account := 0;
333: -- Standard call to get message count and if count=1, get the message
334: FND_MSG_PUB.Count_And_Get (
335: p_encoded => FND_API.G_FALSE,
336: p_count => x_msg_count,
337: p_data => x_msg_data);
338: RETURN l_post_account;

Line 495: FND_MSG_PUB.initialize;

491: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
492: END IF;
493: --Initialize message list if p_init_msg_list is TRUE.
494: IF FND_API.To_Boolean (p_init_msg_list) THEN
495: FND_MSG_PUB.initialize;
496: END IF;
497: -- Initialize API return status to sucess
498: x_return_status := FND_API.G_RET_STS_SUCCESS;
499:

Line 526: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

522: OZF_UTILITY_PVT.debug_message('l_chart_of_accounts_id '||l_chart_of_accounts_id);
523: END IF;
524:
525: IF l_chart_of_accounts_id is null THEN
526: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
527: FND_MESSAGE.SET_NAME('OZF','OZF_GL_CHART_OF_ACCT_MISSING');
528: FND_MESSAGE.SET_TOKEN('BUDGET',p_budget_id);
529: END IF;
530: RAISE FND_API.G_EXC_ERROR;

Line 625: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

621: l_inventory_item_id,
622: l_item_type_code;
623: CLOSE line_detail_csr;
624: IF l_header_id is null THEN
625: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
626: FND_MESSAGE.SET_NAME('OZF','OZF_GL_HEADER_DETAIL_MISSING');
627: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
628: FND_MSG_PUB.ADD;
629: END IF;

Line 628: FND_MSG_PUB.ADD;

624: IF l_header_id is null THEN
625: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
626: FND_MESSAGE.SET_NAME('OZF','OZF_GL_HEADER_DETAIL_MISSING');
627: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
628: FND_MSG_PUB.ADD;
629: END IF;
630: RAISE FND_API.G_EXC_ERROR;
631: END IF;
632:

Line 636: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

632:
633: IF l_ship_from_org_id IS NULL THEN
634: -- 19-JUL-2004 yizhang: bill only orders do not have ship from org
635: /*
636: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
637: FND_MESSAGE.SET_NAME('OZF','OZF_WAREHOUSE_MISSING');
638: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
639: FND_MSG_PUB.ADD;
640: END IF;

Line 639: FND_MSG_PUB.ADD;

635: /*
636: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
637: FND_MESSAGE.SET_NAME('OZF','OZF_WAREHOUSE_MISSING');
638: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
639: FND_MSG_PUB.ADD;
640: END IF;
641: RAISE FND_API.G_EXC_ERROR;
642: */
643: l_ship_from_org_id := l_org_id;

Line 729: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

725: l_sold_to_org_id := p_cust_account_id;
726: END IF; -- order line is not passed
727:
728: /* Initialize the workflow item attributes */
729: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
730: FND_MESSAGE.SET_NAME('OZF','INITIALIZE_WORK_FLOW');
731: END IF;
732:
733: l_itemkey := Fnd_Flex_Workflow.INITIALIZE

Line 913: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

909:
910: IF G_DEBUG_HIGH_ON THEN
911: OZF_UTILITY_PVT.debug_message('Error in OZFACCTG WF'||'-'||x_return_ccid);
912: END IF;
913: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
914: FND_MESSAGE.SET_NAME('OZF','OZF_GL_ACC_GEN_FAILED');
915: FND_MSG_PUB.ADD;
916: END IF;
917: x_return_status := FND_API.G_RET_STS_ERROR;

Line 915: FND_MSG_PUB.ADD;

911: OZF_UTILITY_PVT.debug_message('Error in OZFACCTG WF'||'-'||x_return_ccid);
912: END IF;
913: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
914: FND_MESSAGE.SET_NAME('OZF','OZF_GL_ACC_GEN_FAILED');
915: FND_MSG_PUB.ADD;
916: END IF;
917: x_return_status := FND_API.G_RET_STS_ERROR;
918:
919: END IF; --IF l_default_gl_account = 'Y' THEN

Line 934: FND_MSG_PUB.Count_And_Get (

930: IF G_DEBUG_HIGH_ON THEN
931: OZF_UTILITY_PVT.debug_message('Private Api: ' || l_api_name || ' END');
932: END IF;
933: --Standard call to get message count and if count=1, get the message
934: FND_MSG_PUB.Count_And_Get (
935: p_encoded => FND_API.G_FALSE,
936: p_count => x_msg_count,
937: p_data => x_msg_data
938: );

Line 942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

938: );
939: EXCEPTION
940: WHEN NO_DATA_FOUND THEN
941: x_return_status := FND_API.G_RET_STS_ERROR;
942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
943: FND_MESSAGE.SET_NAME('OZF','OZF_COGS_NOT_FOUND');
944: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
945: FND_MSG_PUB.ADD;
946: END IF;

Line 945: FND_MSG_PUB.ADD;

941: x_return_status := FND_API.G_RET_STS_ERROR;
942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
943: FND_MESSAGE.SET_NAME('OZF','OZF_COGS_NOT_FOUND');
944: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
945: FND_MSG_PUB.ADD;
946: END IF;
947: FND_MSG_PUB.Count_And_Get (
948: p_encoded => FND_API.G_FALSE,
949: p_count => x_msg_count,

Line 947: FND_MSG_PUB.Count_And_Get (

943: FND_MESSAGE.SET_NAME('OZF','OZF_COGS_NOT_FOUND');
944: FND_MESSAGE.SET_TOKEN('LINE_ID',l_line_id);
945: FND_MSG_PUB.ADD;
946: END IF;
947: FND_MSG_PUB.Count_And_Get (
948: p_encoded => FND_API.G_FALSE,
949: p_count => x_msg_count,
950: p_data => x_msg_data
951: );

Line 955: FND_MSG_PUB.Count_And_Get (

951: );
952: WHEN FND_API.G_EXC_ERROR THEN
953: x_return_status := FND_API.G_RET_STS_ERROR;
954: -- Standard call to get message count and if count=1, get the message
955: FND_MSG_PUB.Count_And_Get (
956: p_encoded => FND_API.G_FALSE,
957: p_count => x_msg_count,
958: p_data => x_msg_data
959: );

Line 963: FND_MSG_PUB.Count_And_Get (

959: );
960: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: -- Standard call to get message count and if count=1, get the message
963: FND_MSG_PUB.Count_And_Get (
964: p_encoded => FND_API.G_FALSE,
965: p_count => x_msg_count,
966: p_data => x_msg_data
967: );

Line 970: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

966: p_data => x_msg_data
967: );
968: WHEN OTHERS THEN
969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
970: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
971: THEN
972: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
973: END IF;
974: -- Standard call to get message count and if count=1, get the message

Line 972: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

968: WHEN OTHERS THEN
969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
970: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
971: THEN
972: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
973: END IF;
974: -- Standard call to get message count and if count=1, get the message
975: FND_MSG_PUB.Count_And_Get (
976: p_encoded => FND_API.G_FALSE,

Line 975: FND_MSG_PUB.Count_And_Get (

971: THEN
972: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
973: END IF;
974: -- Standard call to get message count and if count=1, get the message
975: FND_MSG_PUB.Count_And_Get (
976: p_encoded => FND_API.G_FALSE,
977: p_count => x_msg_count,
978: p_data => x_msg_data
979: );