IFS ERP刷新字典与后台编译

来源：互联网发布：网站客服软件编辑：程序博客网时间：2024/04/29 10:48

刷新字典

DECLARE   lang_code_         VARCHAR2(32000) := 'zh';   module_            VARCHAR2(32000) := '%';   CURSOR get_module IS          SELECT *          FROM   Module m          -- WHERE  module IN ('INVENT','ORDER','SHPORD','CFGCHR','DOP','PURCH','PAYLED','PROSCH','INVOIC');          WHERE  module IN ('PURCH');BEGIN   FOR rec_ IN get_module LOOP       Language_Sys.Refresh_Language_Dictionary_( lang_code_, rec_.module );   END LOOP;   COMMIT;   --   -- Dictionary_Sys.Rebuild_Dictionary_Storage_( 0 );  -- COMMIT;   END;

后台编译

-- Recompiling invalid database objectsEXEC Trace_Sys.Set_Trace_Output(1);SET SERVEROUT ONSPOOL Compile_Invalid_Object.logPROMPT Refresh Database ObjectsEXEC Reference_Sys.Refresh_Database_Objects__('dummy_');SET SERVEROUT OFFEXEC Trace_Sys.Set_Trace_Output(0);PROMPT Refreshing Reference_SYSEXEC Reference_SYS.Refresh_Active_List__(1 );