하나의 명령문에 테이블과 열을 나열하십시오.

Question

오라클 SQL은 각 테이블의 이름과 해당 테이블 내의 열을 어떻게 인쇄할까요?

Table1 
    columns 
Table2 
    Columns 

Answer 1

이 트릭을 수행해야합니다

형식은 다음과 같이해야한다.

DECLARE 
TNAME user_tables.table_name%TYPE; 
CNAME user_tab_columns.column_name%TYPE; 
CURSOR ct1 
IS SELECT table_name from user_tables; 
CURSOR ct2 IS SELECT column_name FROM user_tab_columns WHERE table_name =TNAME; 
BEGIN 
OPEN ct1; 
LOOP 
FETCH ct1 INTO TNAME; 
EXIT WHEN ct1%NOTFOUND; 
DBMS_OUTPUT.PUT_LINE('TABLENAME:-->'|| TRIM(TNAME)); 
     OPEN ct2; 
     LOOP 
     FETCH ct2 INTO CNAME; 
     EXIT WHEN ct2%NOTFOUND; 
     DBMS_OUTPUT.PUT_LINE('    '|| TRIM(CNAME)); 
     END LOOP; 
     CLOSE CT2; 
END LOOP; 
CLOSE ct1; 
END;