DBA Data[Home] [Help]

APPS.JMF_SUBCONTRCT_DIAG_UTIL dependencies on JMF_SUBCONTRCT_DIAG_UTIL

Line 1: PACKAGE BODY JMF_SUBCONTRCT_DIAG_UTIL AS

1: PACKAGE BODY JMF_SUBCONTRCT_DIAG_UTIL AS
2: --$Header: JMFDUSBB.pls 120.0 2008/01/08 15:03:19 kdevadas noship $
3: --+===========================================================================+
4: --| Copyright (c) 2005 Oracle Corporation |
5: --| Redwood Shores, California, USA |

Line 35: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

31:
32: FUNCTION Check_Profiles RETURN VARCHAR2 IS
33: l_statusStr VARCHAR2(10);
34: BEGIN
35: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
36: JTF_DIAGNOSTIC_COREAPI.SectionPrint('1. CHECKING PROFILES');
37: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('JMF_SHK_CHARGE_BASED_ENABLED', NULL, NULL, NULL, null) = NULL THEN
38: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
39: END IF;

Line 38: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

34: BEGIN
35: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
36: JTF_DIAGNOSTIC_COREAPI.SectionPrint('1. CHECKING PROFILES');
37: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('JMF_SHK_CHARGE_BASED_ENABLED', NULL, NULL, NULL, null) = NULL THEN
38: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
39: END IF;
40: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('XLA_MO_SECURITY_PROFILE_LEVEL', NULL, NULL, NULL, null) = NULL THEN
41: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
42: END IF ;

Line 41: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

37: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('JMF_SHK_CHARGE_BASED_ENABLED', NULL, NULL, NULL, null) = NULL THEN
38: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
39: END IF;
40: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('XLA_MO_SECURITY_PROFILE_LEVEL', NULL, NULL, NULL, null) = NULL THEN
41: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
42: END IF ;
43: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('DEFAULT_ORG_ID', NULL, NULL, NULL, null) = NULL THEN
44: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
45: END IF;

Line 44: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

40: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('XLA_MO_SECURITY_PROFILE_LEVEL', NULL, NULL, NULL, null) = NULL THEN
41: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
42: END IF ;
43: IF JTF_DIAGNOSTIC_COREAPI.CheckProfile('DEFAULT_ORG_ID', NULL, NULL, NULL, null) = NULL THEN
44: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
45: END IF;
46: JTF_DIAGNOSTIC_COREAPI.BRPrint;
47: RETURN l_statusStr;
48: END Check_Profiles;

Line 63: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

59: l_count NUMBER := 0;
60: l_sqltxt VARCHAR2(2000);
61: l_statusStr VARCHAR2(10);
62: BEGIN
63: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
64: JTF_DIAGNOSTIC_COREAPI.SectionPrint('2. CHECKING WIP PARAMETERS');
65: JTF_DIAGNOSTIC_COREAPI.line_out('WIP Parameters have not been defined for the following MP Organizations:');
66: JTF_DIAGNOSTIC_COREAPI.BRPrint;
67: l_sqltxt := ' SELECT

Line 81: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

77: JTF_DIAGNOSTIC_COREAPI.BRPrint;
78: IF l_count >0 THEN
79: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please enter WIP Parameters for these MP Organizations');
80: JTF_DIAGNOSTIC_COREAPI.BRPrint;
81: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
82: END IF;
83: RETURN l_statusStr;
84:
85: END Check_WIP_Parameters;

Line 100: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

96: l_count NUMBER := 0;
97: l_sqltxt VARCHAR2(2000);
98: l_statusStr VARCHAR2(10);
99: BEGIN
100: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
101: JTF_DIAGNOSTIC_COREAPI.SectionPrint('3. CHECKING ACCOUNTING PERIODS');
102: JTF_DIAGNOSTIC_COREAPI.line_out('Inventory accounting periods are not open in the following MP organizations:');
103: JTF_DIAGNOSTIC_COREAPI.BRPrint;
104: l_sqltxt := ' SELECT

Line 122: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

118: JTF_DIAGNOSTIC_COREAPI.BRPrint;
119: IF l_count >0 THEN
120: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please open accounting periods in these MP organizations');
121: JTF_DIAGNOSTIC_COREAPI.BRPrint;
122: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
123: END IF;
124: RETURN l_statusStr;
125:
126: END Check_Accounting_Periods;

Line 145: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

141: l_count NUMBER := 0;
142: l_sqltxt VARCHAR2(2000);
143: l_statusStr VARCHAR2(10);
144: BEGIN
145: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
146: JTF_DIAGNOSTIC_COREAPI.SectionPrint('4. CHECKING ROUTINGS');
147: JTF_DIAGNOSTIC_COREAPI.line_out('Routings are defined for the following Outsourced Assembly items in MP organizations:');
148: JTF_DIAGNOSTIC_COREAPI.BRPrint;
149: l_sqltxt := ' SELECT

Line 170: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

166: JTF_DIAGNOSTIC_COREAPI.BRPrint;
167: IF l_count >0 THEN
168: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please remove any defined routings for these Outsourced assemblies in MP Organizations');
169: JTF_DIAGNOSTIC_COREAPI.BRPrint;
170: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
171: END IF;
172: RETURN l_statusStr;
173:
174: END Check_Routings;

Line 188: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

184: l_count NUMBER := 0;
185: l_sqltxt VARCHAR2(2000);
186: l_statusStr VARCHAR2(10);
187: BEGIN
188: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
189: JTF_DIAGNOSTIC_COREAPI.SectionPrint('5. CHECKING SHIPPING NETWORKS');
190: JTF_DIAGNOSTIC_COREAPI.line_out('Shipping network is not defined between the following OEM and MP organizations:');
191: JTF_DIAGNOSTIC_COREAPI.BRPrint;
192: l_sqltxt := ' SELECT DISTINCT

Line 208: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

204: JTF_DIAGNOSTIC_COREAPI.BRPrint;
205: IF l_count >0 THEN
206: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please define shipping networks between the following OEM and MP organizations');
207: JTF_DIAGNOSTIC_COREAPI.BRPrint;
208: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
209: END IF;
210: RETURN l_statusStr;
211:
212: END Check_Shipping_Network;

Line 226: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

222: l_count NUMBER := 0;
223: l_sqltxt VARCHAR2(2000);
224: l_statusStr VARCHAR2(10);
225: BEGIN
226: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
227: JTF_DIAGNOSTIC_COREAPI.SectionPrint('6. CHECKING SHIPPING METHODS');
228: JTF_DIAGNOSTIC_COREAPI.line_out('Default shipping method is not defined between the following OEM and MP organizations:');
229: JTF_DIAGNOSTIC_COREAPI.BRPrint;
230: l_sqltxt := ' SELECT DISTINCT

Line 255: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

251: JTF_DIAGNOSTIC_COREAPI.BRPrint;
252: IF l_count >0 THEN
253: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please define default shipping methods between the following OEM and MP organizations');
254: JTF_DIAGNOSTIC_COREAPI.BRPrint;
255: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
256: END IF;
257: RETURN l_statusStr;
258:
259: END Check_Shipping_Methods;

Line 274: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

270: l_count NUMBER := 0;
271: l_sqltxt VARCHAR2(2000);
272: l_statusStr VARCHAR2(10);
273: BEGIN
274: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
275: JTF_DIAGNOSTIC_COREAPI.SectionPrint('7. CHECKING CUSTOMER SUPPLIER ASSOCIATION');
276:
277: -- For OEM organizations
278: JTF_DIAGNOSTIC_COREAPI.line_out('Customer/Supplier Associations have not been defined in the following OEM organizations:');

Line 300: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

296: JTF_DIAGNOSTIC_COREAPI.BRPrint;
297: IF l_count >0 THEN
298: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please define Customer/Supplier Associations in these OEM organizations');
299: JTF_DIAGNOSTIC_COREAPI.BRPrint;
300: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
301: END IF;
302:
303: l_count :=0;
304: -- For MP organizations

Line 325: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

321: JTF_DIAGNOSTIC_COREAPI.BRPrint;
322: IF l_count >0 THEN
323: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please define Customer/Supplier Associations in these MP organizations');
324: JTF_DIAGNOSTIC_COREAPI.BRPrint;
325: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
326: END IF;
327: RETURN l_statusStr;
328:
329: END Check_Cust_Supp_Association;

Line 345: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;

341: l_count NUMBER := 0;
342: l_sqltxt VARCHAR2(2000);
343: l_statusStr VARCHAR2(10);
344: BEGIN
345: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_SUCCESS;
346: JTF_DIAGNOSTIC_COREAPI.SectionPrint('8. CHECKING PRICE LISTS');
347: JTF_DIAGNOSTIC_COREAPI.line_out('The following subcontracting components are not associated with any price list:');
348: JTF_DIAGNOSTIC_COREAPI.BRPrint;
349: l_sqltxt := ' SELECT DISTINCT

Line 366: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;

362: JTF_DIAGNOSTIC_COREAPI.BRPrint;
363: IF l_count >0 THEN
364: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please define a valid price for these subcontracting components');
365: JTF_DIAGNOSTIC_COREAPI.BRPrint;
366: l_statusStr := JMF_SUBCONTRCT_DIAG_UTIL.G_STATUS_FAILURE;
367: END IF;
368: RETURN l_statusStr;
369:
370: END Check_Price_List;

Line 373: END JMF_SUBCONTRCT_DIAG_UTIL;

369:
370: END Check_Price_List;
371:
372:
373: END JMF_SUBCONTRCT_DIAG_UTIL;