oracle - एसक्यूएल डेवलपर में एक चर के मूल्य को मुद्रित करना




plsql oracle-sqldeveloper (5)

आपको dbms_output चालू करने की आवश्यकता है। ओरेकल एसक्यूएल डेवलपर में:

  1. डीबीएमएस आउटपुट विंडो दिखाएं (देखें-> डीबीएमएस आउटपुट)।
  2. डीबीएमएस आउटपुट विंडो के शीर्ष पर "+" बटन दबाएं और फिर खुलने वाले संवाद में एक खुले डेटाबेस कनेक्शन का चयन करें।

एसक्यूएल * प्लस में:

 SET SERVEROUTPUT ON

मैं एक विशेष चर के मान को मुद्रित करना चाहता था जो एक अज्ञात ब्लॉक के अंदर है। मैं ओरेकल एसक्यूएल डेवलपर का उपयोग कर रहा हूँ। मैंने dbms_output.put_line का उपयोग करने का dbms_output.put_line । लेकिन यह काम नहीं कर रहा है। जो कोड मैं उपयोग कर रहा हूं वह नीचे दिखाया गया है।

SET SERVEROUTPUT ON

DECLARE

  CTABLE USER_OBJECTS.OBJECT_NAME%TYPE;
  CCOLUMN ALL_TAB_COLS.COLUMN_NAME%TYPE;
  V_ALL_COLS VARCHAR2(500);

  CURSOR CURSOR_TABLE
    IS
    SELECT OBJECT_NAME 
    FROM USER_OBJECTS 
    WHERE OBJECT_TYPE='TABLE'
    AND OBJECT_NAME LIKE 'tb_prm_%';

  CURSOR CURSOR_COLUMNS (V_TABLE_NAME IN VARCHAR2)
    IS
    SELECT COLUMN_NAME
    FROM ALL_TAB_COLS
    WHERE TABLE_NAME = V_TABLE_NAME;

BEGIN

  OPEN CURSOR_TABLE;

  LOOP
    FETCH CURSOR_TABLE INTO CTABLE;
    EXIT WHEN CURSOR_TABLE%NOTFOUND;

    OPEN CURSOR_COLUMNS (CTABLE);

    V_ALL_COLS := NULL;

    LOOP
      FETCH CURSOR_COLUMNS INTO CCOLUMN;
      V_ALL_COLS := V_ALL_COLS || CCOLUMN;
      IF CURSOR_COLUMNS%FOUND THEN
        V_ALL_COLS := V_ALL_COLS || ', ';
      ELSE
        EXIT;
      END IF;
    END LOOP;

    DBMS_OUTPUT.PUT_LINE(V_ALL_COLS);

  END LOOP;
  CLOSE CURSOR_TABLE;

END;

और मुझे केवल anonymous block completed रूप में आउटपुट मिल रहा है।


एक और विकल्प है:

set serveroutput on format wraped;

या

'व्यू' मेनू खोलें और 'डीबीएमएस आउटपुट' पर क्लिक करें। आपको वर्कशीट के नीचे एक डीबीएमएस आउटपुट विंडो मिलनी चाहिए। फिर आपको कनेक्शन जोड़ने की आवश्यकता है (किसी कारण से यह स्वचालित रूप से नहीं किया जाता है)।


डीबीएमएस आउटपुट विंडो पर जाएं (देखें-> डीबीएमएस आउटपुट)।


मेनू में देखें -> डीबीएमएस आउटपुट का चयन करें


DECLARE

  CTABLE USER_OBJECTS.OBJECT_NAME%TYPE;
  CCOLUMN ALL_TAB_COLS.COLUMN_NAME%TYPE;
  V_ALL_COLS VARCHAR2(5000);

  CURSOR CURSOR_TABLE
    IS
    SELECT OBJECT_NAME 
    FROM USER_OBJECTS 
    WHERE OBJECT_TYPE='TABLE'
    AND OBJECT_NAME LIKE 'STG%';

  CURSOR CURSOR_COLUMNS (V_TABLE_NAME IN VARCHAR2)
    IS
    SELECT COLUMN_NAME
    FROM ALL_TAB_COLS
    WHERE TABLE_NAME = V_TABLE_NAME;

BEGIN

  OPEN CURSOR_TABLE;
  LOOP
    FETCH CURSOR_TABLE INTO CTABLE;

    OPEN CURSOR_COLUMNS (CTABLE);
    V_ALL_COLS := NULL;
    LOOP

      FETCH CURSOR_COLUMNS INTO CCOLUMN;
      V_ALL_COLS := V_ALL_COLS || CCOLUMN;
      IF CURSOR_COLUMNS%FOUND THEN
        V_ALL_COLS := V_ALL_COLS || ', ';
      ELSE
        EXIT;
      END IF;
    END LOOP;
   close CURSOR_COLUMNS ;
    DBMS_OUTPUT.PUT_LINE(V_ALL_COLS);
    EXIT WHEN CURSOR_TABLE%NOTFOUND;
  END LOOP;`enter code here`
  CLOSE CURSOR_TABLE;

END;

मैंने दूसरे कर्सर के करीब जोड़ा है। यह काम कर रहा है और आउटपुट भी प्राप्त कर रहा है ...





oracle-sqldeveloper