525: cn_utils.appendcr(code, '-- | All rights reserved. | --');
526: cn_utils.appendcr(code, '-- +======================================================================+ --');
527: cn_utils.appendcr(code);
528:
529: SELECT user INTO X_userid FROM sys.dual;
530:
531: cn_utils.appendcr(code, 'SET VERIFY OFF');
532: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
533:
544:
545: next_id := cn_utils.get_repository(module_id,x_org_id);
546: SELECT cn_objects_s.NEXTVAL
547: INTO object_id
548: FROM dual;
549: insert into CN_OBJECTS (
550: OBJECT_ID, DEPENDENCY_MAP_COMPLETE, NAME, OBJECT_TYPE, REPOSITORY_ID,
551: OBJECT_STATUS, LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE, CREATED_BY,
552: LAST_UPDATE_LOGIN, DESCRIPTION, NEXT_SYNCHRONIZATION_DATE,
658: cached_org_id:=x_org_id;
659: cached_org_append:='_'||cached_org_id;
660:
661:
662: SELECT user INTO X_userid FROM sys.dual;
663:
664: X_package_name := Lower(package_name) || cached_org_append;
665:
666: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(x_package_name) || '"');
2084: -----+
2085:
2086: SELECT user
2087: INTO l_applsys_schema
2088: FROM dual;
2089:
2090: ad_ddl.create_plsql_object(
2091: applsys_schema => l_applsys_schema,
2092: application_short_name => 'CN',
2270: PROCEDURE get_cached_org_info (x_cached_org_id OUT NOCOPY integer, x_cached_org_append OUT NOCOPY VARCHAR2) IS
2271: BEGIN
2272: SELECT NVL(TO_NUMBER(DECODE(SUBSTRB(USERENV('CLIENT_INFO'),1,1), ' ',
2273: NULL, SUBSTRB(USERENV('CLIENT_INFO'),1,10))),-99) INTO x_cached_org_id
2274: FROM DUAL;
2275:
2276: if x_cached_org_id = -99 then
2277: x_cached_org_append := '_MINUS99';
2278: else