DBA Data[Home] [Help]

APPS.HZ_GNR_GEN_PKG dependencies on FND_API

Line 384: x_status := FND_API.G_RET_STS_SUCCESS;

380:
381:
382: BEGIN
383: -- initializing the retun value
384: x_status := FND_API.G_RET_STS_SUCCESS;
385:
386: l(' ');
387: l('BEGIN ');
388:

Line 795: li(' P_LOCK_FLAG IN VARCHAR2 DEFAULT FND_API.G_TRUE,');

791: li(' P_ATTRIBUTE7 IN VARCHAR2,');
792: li(' P_ATTRIBUTE8 IN VARCHAR2,');
793: li(' P_ATTRIBUTE9 IN VARCHAR2,');
794: li(' P_ATTRIBUTE10 IN VARCHAR2,');
795: li(' P_LOCK_FLAG IN VARCHAR2 DEFAULT FND_API.G_TRUE,');
796: li(' X_CALL_MAP IN OUT NOCOPY VARCHAR2,');
797: li(' P_CALLED_FROM IN VARCHAR2,');
798: li(' P_ADDR_VAL_LEVEL IN VARCHAR2,');
799: li(' X_ADDR_WARN_MSG OUT NOCOPY VARCHAR2,');

Line 840: x_status := FND_API.g_ret_sts_success;

836: i number;
837: j number;
838:
839: BEGIN
840: x_status := FND_API.g_ret_sts_success;
841: i := 0;
842: IF G_USAGE_TBL.COUNT > 0 THEN
843: i := G_USAGE_TBL.FIRST;
844: LOOP

Line 894: l(' x_status := FND_API.g_ret_sts_success;');

890:
891: l(' ');
892: li('BEGIN ');
893: li(' -- defaulting the sucess status');
894: l(' x_status := FND_API.g_ret_sts_success;');
895: l(' L_MDU_TBL := '||l_mdu_tbl_name||';');
896: l(' LL_MDU_TBL := '||l_mdu_tbl_name||';');
897: l(' --hk_debugl(''Validate HR Loc Start for the location_id :''||p_location_id);');
898: l(' --hk_debugl(''The MDU table structure'');');

Line 931: l(' x_status := FND_API.g_ret_sts_success;');

927: l(' IF P_LOCATION_ID IS NOT NULL THEN');
928: l(' HZ_GNR_UTIL_PKG.create_gnr(P_LOCATION_ID,G_MAP_REC.LOC_TBL_NAME,');
929: l(' ''TAX'',''S'',l_loc_components_rec,''T'',L_MDU_TBL,l_status);');
930: l(' END IF;');
931: l(' x_status := FND_API.g_ret_sts_success;');
932: l(' RETURN;');
933: l(' END IF;');
934: l(' --hk_debugl(''L_MDU_TBL has count count more than 1'');');
935: l(' ');

Line 959: l(' x_status := FND_API.g_ret_sts_error;');

955: l(' FROM HR_LOCATIONS_ALL ');
956: l(' WHERE LOCATION_ID = P_LOCATION_ID;');
957: l(' ');
958: l(' EXCEPTION WHEN OTHERS THEN ');
959: l(' x_status := FND_API.g_ret_sts_error;');
960: l(' END; ');
961: END IF;
962: l(' --hk_debugl(''The MDU table after location components populated`'');');
963: l(' --hk_debugt(L_MDU_TBL);');

Line 1049: l(' x_status := FND_API.G_RET_STS_ERROR;');

1045: l(' );');
1046: l(' END IF; ');
1047: l(' ');
1048: l(' HZ_GNR_UTIL_PKG.fix_no_match(LL_MDU_TBL,x_status);');
1049: l(' x_status := FND_API.G_RET_STS_ERROR;');
1050: l(' ELSE ');
1051: l(' --Fetching once more to see where there are multiple records');
1052: l(' ');
1053: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');

Line 1113: l(' x_status := FND_API.G_RET_STS_ERROR;');

1109: l(' );');
1110: l(' END IF; ');
1111: l(' ');
1112: l(' LL_MDU_TBL := L_MDU_TBL;');
1113: l(' x_status := FND_API.G_RET_STS_ERROR;');
1114: l(' END IF; ');
1115: l(' CLOSE c_getGeo1;');
1116: l(' ');
1117:

Line 1131: l(' IF l_multiple_parent_flag = ''Y'' AND x_status <> FND_API.G_RET_STS_ERROR THEN');

1127: l(' );');
1128: l(' END IF; ');
1129: l(' END IF;');
1130: l(' ');
1131: l(' IF l_multiple_parent_flag = ''Y'' AND x_status <> FND_API.G_RET_STS_ERROR THEN');
1132: l(' --hk_debugl(''Multiple Parent Match found for the usage level search'');');
1133: l(' IF HZ_GNR_UTIL_PKG.fix_multiparent(l_geography_id,LL_MDU_TBL) = TRUE THEN');
1134: l(' --hk_debugl(''Sucessfully Fixed the Multiple Parent Case '');');
1135: l(' NULL;');

Line 1149: l(' x_status := FND_API.G_RET_STS_ERROR;');

1145: l(' );');
1146: l(' END IF; ');
1147: l(' ');
1148: l(' --hk_debugl(''Unable to Fix the Multiple Parent Case '');');
1149: l(' x_status := FND_API.G_RET_STS_ERROR;');
1150: l(' END IF;');
1151: l(' ELSE -- a unique record is found');
1152: l(' --hk_debugl(''Successfully found a unique record '');');
1153: l(' ');

Line 1168: l(' IF x_status = FND_API.G_RET_STS_SUCCESS THEN ');

1164: l(' END IF;');
1165: l(' END IF;');
1166: l(' CLOSE c_getGeo;');
1167: l(' ');
1168: l(' IF x_status = FND_API.G_RET_STS_SUCCESS THEN ');
1169: l(' --Following call will try to derive missing lower level compoents ');
1170: l(' --hk_debugl(''LL_MDU Table before Fix_child '');');
1171: l(' --hk_debugt(LL_MDU_TBL);');
1172: l(' ');

Line 1207: l(' IF x_status = FND_API.g_ret_sts_success THEN');

1203: l(' HZ_GNR_UTIL_PKG.fill_values(LL_MDU_TBL);');
1204: l(' --hk_debugl(''LL_MDU Table after HZ_GNR_UTIL_PKG.fill_values '');');
1205: l(' --hk_debugt(LL_MDU_TBL);');
1206: l(' ');
1207: l(' IF x_status = FND_API.g_ret_sts_success THEN');
1208: l(' ');
1209: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');
1210: l(' hz_utility_v2pub.debug ');
1211: l(' (p_message => '' Calling create_gnr with map status S.'',');

Line 1282: x_status := FND_API.g_ret_sts_success;

1278: l_usage_code varchar2(30);
1279: l_mdu_tbl_name varchar2(30);
1280:
1281: BEGIN
1282: x_status := FND_API.g_ret_sts_success;
1283: l(' ');
1284: -- write the header comments, procedure name
1285: l_procName := 'validateForMap';
1286: procBegin(l_procName);

Line 1336: li(' x_status := FND_API.g_ret_sts_success;');

1332: l(' END IF; ');
1333: l(' ');
1334: l(' --hk_debugl(''Validate for Map Start'');');
1335: li(' -- defaulting the sucess status');
1336: li(' x_status := FND_API.g_ret_sts_success;');
1337: l(' ');
1338: l(' L_MAP_DTLS_TBL := X_MAP_DTLS_TBL;');
1339: l(' --hk_debugl(''The Map table passed in with loc comp values'');');
1340: l(' --hk_debugt(L_MAP_DTLS_TBL);');

Line 1345: l(' x_status := FND_API.g_ret_sts_success;');

1341: l(' ');
1342: l(' IF L_MAP_DTLS_TBL.COUNT = 1 THEN');
1343: l(' -- This means country is the only required mapped column for validation.');
1344: l(' -- and country is already populated in the L_MAP_DTLS_TBL in the initialization section of this package.');
1345: l(' x_status := FND_API.g_ret_sts_success;');
1346: l(' RETURN;');
1347: l(' END IF;');
1348: l(' ');
1349: l(' IF HZ_GNR_UTIL_PKG.getLocCompCount(L_MAP_DTLS_TBL) = 0 THEN');

Line 1378: l(' x_status := FND_API.G_RET_STS_ERROR;');

1374: l(' );');
1375: l(' END IF; ');
1376: l(' ');
1377: -- l(' HZ_GNR_UTIL_PKG.fill_values(L_MAP_DTLS_TBL);');
1378: l(' x_status := FND_API.G_RET_STS_ERROR;');
1379: l(' X_MAP_DTLS_TBL := L_MAP_DTLS_TBL;');
1380: l(' RETURN;');
1381: l(' ELSE');
1382: l(' ');

Line 1394: l(' x_status := FND_API.G_RET_STS_SUCCESS;');

1390: l(' );');
1391: l(' END IF; ');
1392: l(' ');
1393: -- l(' HZ_GNR_UTIL_PKG.fill_values(L_MAP_DTLS_TBL);');
1394: l(' x_status := FND_API.G_RET_STS_SUCCESS;');
1395: l(' X_MAP_DTLS_TBL := L_MAP_DTLS_TBL;');
1396: l(' RETURN;');
1397: l(' END IF;');
1398: l(' END IF;');

Line 1478: l(' x_status := FND_API.G_RET_STS_ERROR;');

1474: l(' x_cause := ''NO_MATCH'';');
1475: l(' HZ_GNR_UTIL_PKG.fix_no_match(L_MAP_DTLS_TBL,x_status);');
1476: l(' --hk_debugl(''Map_loc table after Fix'');');
1477: l(' --hk_debugt(L_MAP_DTLS_TBL);');
1478: l(' x_status := FND_API.G_RET_STS_ERROR;');
1479: l(' ELSE ');
1480: l(' --Fetching once more to see where there are multiple records');
1481: l(' ');
1482: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');

Line 1546: l(' x_status := FND_API.G_RET_STS_ERROR; ');

1542: l(' ); ');
1543: l(' END IF; ');
1544: l(' ');
1545: l(' x_cause := ''MULTIPLE_MATCH''; ');
1546: l(' x_status := FND_API.G_RET_STS_ERROR; ');
1547: l(' RETURN; ');
1548: l(' END IF; ');
1549: l(' ');
1550: -------

Line 1564: l(' x_status := FND_API.G_RET_STS_ERROR;');

1560: l(' p_module => l_module');
1561: l(' );');
1562: l(' END IF; ');
1563: l(' ');
1564: l(' x_status := FND_API.G_RET_STS_ERROR;');
1565: l(' RETURN;');
1566: l(' END IF; ');
1567: l(' CLOSE c_getGeo1;');
1568: l(' ');

Line 1600: l(' x_status := FND_API.G_RET_STS_ERROR;');

1596: l(' END IF; ');
1597: l(' ');
1598: l(' x_cause := ''MULTIPLE_PARENT'';');
1599: l(' X_MAP_DTLS_TBL := L_MAP_DTLS_TBL;');
1600: l(' x_status := FND_API.G_RET_STS_ERROR;');
1601: l(' ');
1602: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');
1603: l(' hz_utility_v2pub.debug ');
1604: l(' (p_message => '' x_cause : ''||x_cause,');

Line 1659: l(' x_status := FND_API.G_RET_STS_ERROR;');

1655: l(' );');
1656: l(' END IF; ');
1657: l(' ');
1658: -- l(' HZ_GNR_UTIL_PKG.fill_values(L_MAP_DTLS_TBL);');
1659: l(' x_status := FND_API.G_RET_STS_ERROR;');
1660: l(' X_MAP_DTLS_TBL := L_MAP_DTLS_TBL;');
1661: l(' RETURN;');
1662: l(' END IF;');
1663: -- l(' HZ_GNR_UTIL_PKG.fill_values(L_MAP_DTLS_TBL);');

Line 1771: li(' x_status := FND_API.g_ret_sts_success;');

1767: -- procedure body
1768: li('BEGIN ');
1769: l(' ');
1770: li(' -- defaulting the sucess status');
1771: li(' x_status := FND_API.g_ret_sts_success;');
1772: l(' --hk_debugl(''Processing Location record with location_id :- ''||nvl(to_char(p_location_id),''NULL_LOCATION_ID''));');
1773: li(' l_loc_components_rec.COUNTRY := P_COUNTRY;');
1774: li(' l_loc_components_rec.STATE := P_STATE;');
1775: li(' l_loc_components_rec.PROVINCE := P_PROVINCE;');

Line 1824: l(' x_status := FND_API.g_ret_sts_success;');

1820: l(' p_module => l_module');
1821: l(' );');
1822: l(' END IF; ');
1823: l(' ');
1824: l(' x_status := FND_API.g_ret_sts_success;');
1825: l(' X_ADDR_VAL_STATUS := x_status;');
1826: l(' RETURN;');
1827: l(' END IF;');
1828: l(' END IF;');

Line 1881: l(' IF (x_status = FND_API.g_ret_sts_error) THEN ');

1877: l(' ');
1878: -- Check added on 19-APR-2006 (Part of fix for bug 5011366 ) by Nishant
1879: l(' -- This usage level check is required upfront because usage level validation will ignore ');
1880: l(' -- some of the passed in parameters for the complete mapping and may result in wrong status ');
1881: l(' IF (x_status = FND_API.g_ret_sts_error) THEN ');
1882: l(' ');
1883: l(' -- hk_debugl(''Trying to check if usage level validation is success even with map validation as error..''); ');
1884: l(' -- hk_debugl(''TABLE that is returned by Validate For Map''); ');
1885: l(' -- hk_debugt(LL_MAP_DTLS_TBL); ');

Line 1889: l(' IF HZ_GNR_UTIL_PKG.get_usage_val_status(LL_MAP_DTLS_TBL,L_MDU_TBL) = FND_API.G_RET_STS_SUCCESS THEN ');

1885: l(' -- hk_debugt(LL_MAP_DTLS_TBL); ');
1886: l(' -- hk_debugl(''Usage Map Table With loc comp values''); ');
1887: l(' -- hk_debugt(L_MDU_TBL); ');
1888: l(' ');
1889: l(' IF HZ_GNR_UTIL_PKG.get_usage_val_status(LL_MAP_DTLS_TBL,L_MDU_TBL) = FND_API.G_RET_STS_SUCCESS THEN ');
1890: l(' -- hk_debugl(''COMPLETE mapping is error but is sufficient for passed usage. So setting X_STATUS to success''); ');
1891: l(' x_status := FND_API.g_ret_sts_success; ');
1892: l(' ');
1893: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');

Line 1891: l(' x_status := FND_API.g_ret_sts_success; ');

1887: l(' -- hk_debugt(L_MDU_TBL); ');
1888: l(' ');
1889: l(' IF HZ_GNR_UTIL_PKG.get_usage_val_status(LL_MAP_DTLS_TBL,L_MDU_TBL) = FND_API.G_RET_STS_SUCCESS THEN ');
1890: l(' -- hk_debugl(''COMPLETE mapping is error but is sufficient for passed usage. So setting X_STATUS to success''); ');
1891: l(' x_status := FND_API.g_ret_sts_success; ');
1892: l(' ');
1893: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');
1894: l(' hz_utility_v2pub.debug ');
1895: l(' (p_message => ''COMPLETE mapping is error but is sufficient for passed usage. So setting X_STATUS to success'',');

Line 1909: l(' IF x_status = FND_API.g_ret_sts_success THEN');

1905: l(' -------End of status check for usage level ----------+ ');
1906: l(' ');
1907:
1908: -- end of check addition (bug 5011366)
1909: l(' IF x_status = FND_API.g_ret_sts_success THEN');
1910: l(' --hk_debugt(LL_MAP_DTLS_TBL); ----- Code to display the output.');
1911: l(' -- Set the address validation status to success since x_statusis success ');
1912: l(' X_ADDR_VAL_STATUS := x_status;');
1913: l(' IF P_LOCATION_ID IS NOT NULL THEN');

Line 1953: l(' IF HZ_GNR_UTIL_PKG.get_usage_val_status(LL_MAP_DTLS_TBL,L_MDU_TBL) = FND_API.G_RET_STS_ERROR THEN');

1949: l(' );');
1950: l(' END IF; ');
1951: l(' ');
1952: l(' -- This means no usage level validation is required');
1953: l(' IF HZ_GNR_UTIL_PKG.get_usage_val_status(LL_MAP_DTLS_TBL,L_MDU_TBL) = FND_API.G_RET_STS_ERROR THEN');
1954: l(' ');
1955: l(' HZ_GNR_UTIL_PKG.fill_values(LL_MAP_DTLS_TBL);');
1956: l(' -- This below call is to derive the address validation status and set the message ');
1957: l(' X_ADDR_VAL_STATUS := HZ_GNR_UTIL_PKG.getAddrValStatus(LL_MAP_DTLS_TBL,L_MDU_TBL,P_CALLED_FROM,P_ADDR_VAL_LEVEL,x_addr_warn_msg,''E'',x_status);');

Line 1993: l(' x_status := FND_API.g_ret_sts_success;');

1989: l(' ');
1990: l(' HZ_GNR_UTIL_PKG.create_gnr(P_LOCATION_ID,G_MAP_REC.LOC_TBL_NAME,');
1991: l(' L_USAGE_CODE,''S'',L_LOC_COMPONENTS_REC,p_lock_flag,LL_MAP_DTLS_TBL,l_status);');
1992: l(' --hk_debugl(''Status after create_gnr : ''||l_status);');
1993: l(' x_status := FND_API.g_ret_sts_success;');
1994: l(' END IF;');
1995: l(' ');
1996: l(' X_CALL_MAP := ''N'';');
1997: l(' RETURN;');

Line 2034: l(' x_status := FND_API.g_ret_sts_success;');

2030: l(' HZ_GNR_UTIL_PKG.create_gnr(P_LOCATION_ID,G_MAP_REC.LOC_TBL_NAME,');
2031: l(' L_USAGE_CODE,''S'',L_LOC_COMPONENTS_REC,p_lock_flag,L_MDU_TBL,l_status);');
2032: l(' END IF;');
2033: l(' ');
2034: l(' x_status := FND_API.g_ret_sts_success;');
2035: l(' RETURN;');
2036: l(' END IF;');
2037: l(' --hk_debugl(''L_MDU_TBL has count count more than 1'');');
2038: l(' ');

Line 2113: l(' x_status := FND_API.G_RET_STS_ERROR;');

2109: l(' );');
2110: l(' END IF; ');
2111: l(' ');
2112: l(' HZ_GNR_UTIL_PKG.fix_no_match(LL_MAP_DTLS_TBL,x_status);');
2113: l(' x_status := FND_API.G_RET_STS_ERROR;');
2114: l(' ELSE ');
2115: l(' --Fetching once more to see where there are multiple records');
2116: l(' ');
2117: l(' IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN ');

Line 2182: l(' x_status := FND_API.G_RET_STS_ERROR; ');

2178: l(' END IF; ');
2179: l(' ');
2180: l(' LL_MAP_DTLS_TBL := L_MAP_DTLS_TBL; ');
2181: l(' HZ_GNR_UTIL_PKG.fix_no_match(LL_MAP_DTLS_TBL,x_status); ');
2182: l(' x_status := FND_API.G_RET_STS_ERROR; ');
2183: l(' END IF; ');
2184: l(' ');
2185: ----- End of fix for Bug 5011366 (Nishant)
2186: l(' ELSE -- Not able to found a unique record with identifier type as NAME');

Line 2199: l(' x_status := FND_API.G_RET_STS_ERROR;');

2195: l(' );');
2196: l(' END IF; ');
2197: l(' ');
2198: l(' LL_MAP_DTLS_TBL := L_MAP_DTLS_TBL;');
2199: l(' x_status := FND_API.G_RET_STS_ERROR;');
2200: l(' END IF; ');
2201: l(' CLOSE c_getGeo1;');
2202: l(' ');
2203: l(' ELSE -- a unique record or a record with multiple parent flag = Y is found');

Line 2217: l(' IF l_multiple_parent_flag = ''Y'' AND x_status <> FND_API.G_RET_STS_ERROR THEN');

2213: l(' END IF; ');
2214: l(' ');
2215: l(' END IF;');
2216: l(' ');
2217: l(' IF l_multiple_parent_flag = ''Y'' AND x_status <> FND_API.G_RET_STS_ERROR THEN');
2218: l(' IF HZ_GNR_UTIL_PKG.fix_multiparent(l_geography_id,LL_MAP_DTLS_TBL) = TRUE THEN');
2219: l(' NULL;');
2220: l(' ELSE -- Multiple parent case not able to find a unique record ');
2221: l(' ');

Line 2232: l(' x_status := FND_API.G_RET_STS_ERROR;');

2228: l(' p_module => l_module');
2229: l(' );');
2230: l(' END IF; ');
2231: l(' ');
2232: l(' x_status := FND_API.G_RET_STS_ERROR;');
2233: l(' END IF;');
2234: l(' ');
2235: l(' ELSE -- a unique record is found');
2236: l(' ');

Line 2294: l(' IF x_status = FND_API.g_ret_sts_success THEN');

2290: l(' HZ_GNR_UTIL_PKG.fill_values(LL_MAP_DTLS_TBL);');
2291: l(' --hk_debugl(''LL_MAP_DTLS_TBL after fill_values'');');
2292: l(' --hk_debugt(LL_MAP_DTLS_TBL);');
2293: l(' ');
2294: l(' IF x_status = FND_API.g_ret_sts_success THEN');
2295: l(' -- We need to call the getAddrValStatus only once. All other cases we are looking into x_call_map ');
2296: l(' -- In some case the below code will execute with the x_call_map as N ');
2297: l(' IF l_get_addr_val = ''Y'' THEN');
2298: l(' -- This below call is to derive the address validation status and set the message ');

Line 2378: x_status := FND_API.G_RET_STS_SUCCESS;

2374: -- 3. create the package tail
2375: --
2376:
2377: -- initializing the retun value
2378: x_status := FND_API.G_RET_STS_SUCCESS;
2379:
2380: genPkgSpecHdr(g_pkgName);
2381: -- known caveat: for srchGeoSpec - the procedure comments do not have all the
2382: -- input variables.

Line 2412: x_status := FND_API.G_RET_STS_SUCCESS;

2408: 3. generate the package tail
2409: */
2410:
2411: -- initializing the retun value
2412: x_status := FND_API.G_RET_STS_SUCCESS;
2413:
2414: -- package header
2415: genPkgBdyHdr(g_pkgName);
2416:

Line 2514: x_status := FND_API.G_RET_STS_SUCCESS;

2510:
2511: -- Hari 2 Lines
2512: g_type := 'S';
2513: -- initializing the retun value
2514: x_status := FND_API.G_RET_STS_SUCCESS;
2515:
2516: -- prepare the packge name
2517: x_pkgName := 'HZ_GNR_MAP'||p_map_rec.map_id;
2518: g_map_rec := p_map_rec;

Line 2525: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN

2521: g_usage_dtls_tbl := p_usage_dtls_tbl;
2522: g_pkgName := x_pkgName;
2523:
2524: genSpec(x_status);
2525: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN
2526: --dbms_output.put_line('genSpec in genPkg'||sqlerrm);
2527: RAISE FND_API.G_EXC_ERROR;
2528: END IF;
2529:

Line 2527: RAISE FND_API.G_EXC_ERROR;

2523:
2524: genSpec(x_status);
2525: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN
2526: --dbms_output.put_line('genSpec in genPkg'||sqlerrm);
2527: RAISE FND_API.G_EXC_ERROR;
2528: END IF;
2529:
2530: -- Hari 1 Line
2531: g_type := 'B';

Line 2533: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN

2529:
2530: -- Hari 1 Line
2531: g_type := 'B';
2532: genBody(x_status);
2533: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN
2534: --dbms_output.put_line('genBody in genPkg'||sqlerrm);
2535: RAISE FND_API.G_EXC_ERROR;
2536: END IF;
2537:

Line 2535: RAISE FND_API.G_EXC_ERROR;

2531: g_type := 'B';
2532: genBody(x_status);
2533: IF x_status <> FND_API.G_RET_STS_SUCCESS THEN
2534: --dbms_output.put_line('genBody in genPkg'||sqlerrm);
2535: RAISE FND_API.G_EXC_ERROR;
2536: END IF;
2537:
2538: END genPkg;
2539: --------------------------------------

Line 2583: x_status := FND_API.G_RET_STS_SUCCESS;

2579: l_usage_dtls_exists varchar2(1);
2580:
2581: BEGIN
2582: -- initializing the retun value
2583: x_status := FND_API.G_RET_STS_SUCCESS;
2584: l_map_exists := 'N';
2585: FOR l_c_map IN c_map(p_map_id) LOOP -- only one record will be fetched
2586: l_map_exists := 'Y';
2587: l_map_rec.MAP_ID := l_c_map.MAP_ID;

Line 2603: x_status := FND_API.G_RET_STS_ERROR;

2599: l_map_dtls_tbl(m).loc_compval := null;
2600: l_map_dtls_tbl(m).geography_id := null;
2601: END LOOP;
2602: IF l_map_dtls_exists = 'N' THEN
2603: x_status := FND_API.G_RET_STS_ERROR;
2604: RAISE FND_API.G_EXC_ERROR;
2605: END IF;
2606: m :=0;
2607: l_usage_exists := 'N';

Line 2604: RAISE FND_API.G_EXC_ERROR;

2600: l_map_dtls_tbl(m).geography_id := null;
2601: END LOOP;
2602: IF l_map_dtls_exists = 'N' THEN
2603: x_status := FND_API.G_RET_STS_ERROR;
2604: RAISE FND_API.G_EXC_ERROR;
2605: END IF;
2606: m :=0;
2607: l_usage_exists := 'N';
2608: FOR l_c_usage in c_usage(p_map_id) LOOP

Line 2622: x_status := FND_API.G_RET_STS_ERROR;

2618: l_usage_dtls_tbl(n).USAGE_ID := l_c_usage_dtls.USAGE_ID;
2619: l_usage_dtls_tbl(n).GEOGRAPHY_TYPE := l_c_usage_dtls.GEOGRAPHY_TYPE;
2620: END LOOP;
2621: IF l_usage_dtls_exists = 'N' THEN
2622: x_status := FND_API.G_RET_STS_ERROR;
2623: RAISE FND_API.G_EXC_ERROR;
2624: END IF;
2625: END LOOP;
2626: IF l_usage_exists = 'N' THEN

Line 2623: RAISE FND_API.G_EXC_ERROR;

2619: l_usage_dtls_tbl(n).GEOGRAPHY_TYPE := l_c_usage_dtls.GEOGRAPHY_TYPE;
2620: END LOOP;
2621: IF l_usage_dtls_exists = 'N' THEN
2622: x_status := FND_API.G_RET_STS_ERROR;
2623: RAISE FND_API.G_EXC_ERROR;
2624: END IF;
2625: END LOOP;
2626: IF l_usage_exists = 'N' THEN
2627: x_status := FND_API.G_RET_STS_ERROR;

Line 2627: x_status := FND_API.G_RET_STS_ERROR;

2623: RAISE FND_API.G_EXC_ERROR;
2624: END IF;
2625: END LOOP;
2626: IF l_usage_exists = 'N' THEN
2627: x_status := FND_API.G_RET_STS_ERROR;
2628: RAISE FND_API.G_EXC_ERROR;
2629: END IF;
2630: END LOOP;
2631: IF l_map_exists = 'N' THEN

Line 2628: RAISE FND_API.G_EXC_ERROR;

2624: END IF;
2625: END LOOP;
2626: IF l_usage_exists = 'N' THEN
2627: x_status := FND_API.G_RET_STS_ERROR;
2628: RAISE FND_API.G_EXC_ERROR;
2629: END IF;
2630: END LOOP;
2631: IF l_map_exists = 'N' THEN
2632: x_status := FND_API.G_RET_STS_ERROR;

Line 2632: x_status := FND_API.G_RET_STS_ERROR;

2628: RAISE FND_API.G_EXC_ERROR;
2629: END IF;
2630: END LOOP;
2631: IF l_map_exists = 'N' THEN
2632: x_status := FND_API.G_RET_STS_ERROR;
2633: RAISE FND_API.G_EXC_ERROR;
2634: END IF;
2635:
2636: genpkg(l_map_rec,l_map_dtls_tbl,l_usage_tbl,l_usage_dtls_tbl,x_pkgname,x_status);

Line 2633: RAISE FND_API.G_EXC_ERROR;

2629: END IF;
2630: END LOOP;
2631: IF l_map_exists = 'N' THEN
2632: x_status := FND_API.G_RET_STS_ERROR;
2633: RAISE FND_API.G_EXC_ERROR;
2634: END IF;
2635:
2636: genpkg(l_map_rec,l_map_dtls_tbl,l_usage_tbl,l_usage_dtls_tbl,x_pkgname,x_status);
2637: END genPkg;