Probably you are exceeding the length of the PL/SQL variable when you are
assigning values to it.
 
Check the length by inserting the following line in your code:
 
dbms_output.put_line(length(V_LONGTEXT));
dbms_output.put_line(length(V_LONGTEXT_TRIM));

-----Original Message-----
Sent: Wednesday, April 04, 2001 3:36 PM
To: Multiple recipients of list ORACLE-L



Thanks all of you for reply. I'm now use following to adjusted the logic:

declare  V_AKTIV_NR    aktiv.AKTIV_NR%TYPE;
  V_PROBLEM    aktiv.PROBLEM%TYPE;
  V_ENDDAT   aktiv.ENDDAT%TYPE;
  V_ENDUHR   aktiv.ENDUHR%TYPE;
  V_AUSSAGEW   aktiv.AUSSAGEW%TYPE;
  V_LANGTEXT   aktiv.LANGTEXT%TYPE;
  V_LONGTEXT    VARCHAR2(20000);
  V_LONGTEXT_CUR  VARCHAR2(13000);
  V_LONGTEXT_TRIM VARCHAR2(2000);

      CURSOR AKLangTextCur ( V_ENDDAT aktiv.ENDDAT%TYPE, V_ENDUHR
aktiv.ENDUHR%TYPE,  V_AUSSAGEW aktiv.AUSSAGEW%TYPE, V_LANGTEXT
aktiv.LANGTEXT%TYPE) IS
       SELECT  TO_CHAR(V_ENDDAT, 'YYYYMMDD')||' '||   V_ENDUHR||' '||
rtrim(V_AUSSAGEW)||' '||  rtrim(V_LANGTEXT)   thisText
        FROM AKTIV, PROBLEM
        WHERE RTRIM(V_PROBLEM) = RTRIM(PROBLEM.PROBLEM)
        ORDER BY Aktiv_NR;        

Begin

  FOR v_LoopIndex IN 1..pkgFreeText.v_NumEntries LOOP
    V_AKTIV_NR := pkgFreeText.V_AKTIV_NR_P(v_LoopIndex);
    V_PROBLEM  := pkgFreeText.V_PROBLEM_P(v_LoopIndex);
    V_ENDDAT   := pkgFreeText.V_ENDDAT_P(v_LoopIndex);
    V_ENDUHR   := pkgFreeText.V_ENDUHR_P(v_LoopIndex);
    V_AUSSAGEW := pkgFreeText.V_AUSSAGEW_P(v_LoopIndex);
    V_LANGTEXT := pkgFreeText.V_LANGTEXT_P(v_LoopIndex);

    SELECT PROBLEM INTO p_PROBLEM FROM PROBLEM 
    where RTRIM(V_PROBLEM) = RTRIM(PROBLEM.PROBLEM);

    OPEN AKLangTextCur(V_ENDDAT, V_ENDUHR,V_AUSSAGEW, V_LANGTEXT);
    LOOP
      FETCH AKLangTextCur into AKLangTextRec;
      EXIT WHEN AKLangTextCur%NOTFOUND;
      V_LONGTEXT_CUR := V_LONGTEXT_CUR ||AKLangTextRec.thisText;
    END LOOP;
     CLOSE AKLangTextCur;    

 V_LONGTEXT := V_LONGTEXT || V_LONGTEXT_CUR;   
  
  END LOOP;  
   V_LONGTEXT_TRIM := RTRIM(V_LONGTEXT, 2000);

        UPDATE PROBBES
        SET LANGTEXT = V_LONGTEXT_TRIM
        WHERE PROBLEM = V_PROBLEM and
        rtrim(AUSSAGEW)= 'Report';  ...

But I'm getting 'ORA-06502: numeric or value error', and I'm not sure where
it might come from.

 I don't think it's from the trigger above.(the four concated fields are
date, char, varchar2). It's more likely come from the application as I see.
I have to check more...

Thanks again

Wendy

  "Toepke, Kevin M" <[EMAIL PROTECTED]> wrote: 



Wendy:

Actually, you don't need to declare the cursor inside the for loop, you just
need to open it inside the loop and pass a parameter to the cursor.

DECLARE
V_AKTIV_NR aktiv.AKTIV_NR%TYPE;
V_PROBLEM aktiv.PROBLEM%TYPE;
V_ENDDAT aktiv.ENDDAT%TYPE;
V_ENDUHR aktiv.ENDUHR%TYPE;
V_AUSSAGEW aktiv.AUSSAGEW%TYPE;
V_LANGTEXT aktiv.LANGTEXT%TYPE;
V_LONGTEXT VARCHAR2(20000);
V_LONGTEXT_CUR VARCHAR2(13000);
V_LONGTEXT_TRIM VARCHAR2(2000);
p_PROBLEM PROBLEM.PROBLEM%TYPE; 

CURSOR AKLangTextCur (p_problem IN VARCHAR2) IS 
SELECT TO_CHAR(V_ENDDAT, 'YYYYMMDD')||' '|| V_ENDUHR||' '||
rtrim(V_AUSSAGEW)||' '|| rtrim(V_LANGTEXT) thisText
FROM AKTIV
WHERE V_PROBLEM = p_PROBLEM
ORDER BY Aktiv_NR; 
AKLangTextRec AKLangTextCur%ROWTYPE; 

BEGIN
FOR v_LoopIndex IN 1..pkgFreeText.v_NumEntries LOOP
V_AKTIV_NR := pkgFreeText.V_AKTIV_N! ! ! R_P(v_LoopIndex);
V_PROBLEM := pkgFreeText.V_PROBLEM_P(v_LoopIndex);
V_ENDDAT := pkgFreeText.V_ENDDAT_P(v_LoopIndex);
V_ENDUHR := pkgFreeText.V_ENDUHR_P(v_LoopIndex);
V_AUSSAGEW := pkgFreeText.V_AUSSAGEW_P(v_LoopIndex);
V_LANGTEXT := pkgFreeText.V_LANGTEXT_P(v_LoopIndex);
SELECT PROBLEM INTO p_PROBLEM FROM PROBLEM;

OPEN AKLangTextCur(v_problem);
LOOP
FETCH AKLangTextCur into AKLangTextRec;
EXIT WHEN AKLangTextCur%NOTFOUND;
V_LONGTEXT_CUR := V_LONGTEXT_CUR ||AKLangTextRec.thisText;

END LOOP;
CLOSE AKLangTextCur;
V_LONGTEXT := V_LONGTEXT || V_LONGTEXT_CUR; 
END LOOP;
V_LONGTEXT_TRIM := RTRIM(V_LONGTEXT, 2000);
END;
/

Kevin

-- 
Please see the official ORACLE-L FAQ: http://www.orafaq.com
-- 
Author: Toepke, Kevin M
INET: [EMAIL PROTECTED]

Fat City Network Services -- (858) 538-5051 FAX: (858) 538-5051
San Diego, California -- Public Internet access / Mailing Lists
-----! ! ! ---------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
the message BODY, include a line containing: UNSUB ORACLE-L
(or the name of mailing list you want to be removed from). You may
also send the HELP command for other information (like subscribing).




  _____  

Do You Yahoo!?
Yahoo! Mail Personal  <http://personal.mail.yahoo.com/?.refer=mailiyfoot>
Address - Get email at your own domain with Yahoo! Mail.

-- 
Please see the official ORACLE-L FAQ: http://www.orafaq.com
-- 
Author: Bala, Prakash
  INET: [EMAIL PROTECTED]

Fat City Network Services    -- (858) 538-5051  FAX: (858) 538-5051
San Diego, California        -- Public Internet access / Mailing Lists
--------------------------------------------------------------------
To REMOVE yourself from this mailing list, send an E-Mail message
to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in
the message BODY, include a line containing: UNSUB ORACLE-L
(or the name of mailing list you want to be removed from).  You may
also send the HELP command for other information (like subscribing).

Reply via email to