向EBS中注册表和字段脚本

来源：互联网发布：张良一生知乎编辑：程序博客网时间：2024/06/03 15:29
DECLARE   CURSOR r_table IS     SELECT ta.owner ,           NVL(ta.NEXT_EXTENT,2)  next_extent,           ta.PCT_FREE,           ta.pct_used      FROM All_Tables ta      WHERE ta.table_name='CUX_ORDER_HEADERS_ALL';  CURSOR r_column IS    SELECT            tc.COLUMN_NAME,           tc.COLUMN_ID,           tc.DATA_TYPE,           tc.DATA_LENGTH,           TC.NULLABLE      FROM All_Tab_Columns tc               WHERE tc.TABLE_NAME='CUX_ORDER_HEADERS_ALL';     v_owner VARCHAR2 (10);     v_nextextent VARCHAR2 (10);     v_pctfree VARCHAR2 (10);     v_pctUsed VARCHAR2 (10);     V_COLUMN_NAME  VARCHAR2(100);     V_COLUMN_ID  VARCHAR2(100);     V_DATA_TYPE  VARCHAR2(100);     V_DATA_LENGTH  VARCHAR2(100);     V_NULLABLE  VARCHAR2(100);     V_COUNT NUMBER;BEGIN   OPEN r_table;   LOOP     FETCH r_table INTO v_owner,v_nextextent,v_pctfree,v_pctUsed;     EXIT WHEN r_table %NOTFOUND;   dbms_output.put_line('EXECUTE AD_DD.REGISTER_TABLE('||''''||'CUX'||''''||','                                                      ||''''||'CUX_ORDER_HEADERS_ALL'||''''||','                                                       ||''''||'T'||''''||','                                                      ||''''||v_nextextent||''''||','                                                      ||''''||v_pctfree||''''                                                      ||')'||';');   END LOOP;   OPEN r_column;   LOOP     FETCH r_column INTO V_COLUMN_NAME,V_COLUMN_ID,V_DATA_TYPE,V_DATA_LENGTH,V_NULLABLE;       EXIT WHEN r_column%NOTFOUND;    dbms_output.put_line('EXECUTE AD_DD.REGISTER_COLUMN('||''''||'CUX'||''''||','                                                      ||''''||'CUX_ORDER_HEADERS_ALL'||''''||','                                                       ||''''||V_COLUMN_NAME||''''||','                                                      ||''''||V_COLUMN_ID||''''||','                                                      ||''''||V_DATA_TYPE||''''||','                                                      ||''''||V_DATA_LENGTH||''''||','                                                      ||''''||V_NULLABLE ||''''||','                                                      ||''''||'N'||''''                                                      ||')'||';');           END LOOP;       CLOSE r_table;                                                  END;
阅读全文
0 0