How to trap 1843 error. .nOT Valid month..

Question

This is in my cursor for loop
mstart_issue := TO_CHAR(to_date(mstart_issue,'YY-MON'),'Mon.YYYY') ;
               mend_issue := to_char(to_date(mend_issue,'YY-MON'),'Mon.YYYY');
But it throws 1843 error..
i Have execptions for finding value error like
when value_error then
warn('value error'||moldmembership);
But i need something to trap the following error ie ..The moment not a valid month error occurs. .It should trap that error
Like warn('not validm onth'||membershpnumber)
What shall be the exeption to catch . .the 1843 error...
Like we got exceptions like when too many rows to catch duplicate records..
And this is how my end_issue data looks like .. . 10-jul
12-Aug date in yy-mon format..
But seems there is error..
Kindly help..
Thanks

Answer 1

susf wrote:
Hi Thanks i am implementing both part of code.. Thanks ..
But ..When i use nls_date_language= 'AMERICAN' I see the output of date in some other language in sql
The output is like this..
Loka .2010
Loka .2010
Loka .2010
Loka .2010
Loka .2010
Loka .2010
Loka .2010
Marras.2010
Marras.2010
Marras.2010which line below generates the output above?
Here is the part of my code
declare
msno sub.sno%type;
e;
mSTART_ISSUE sub.start_issue%type;
MEND_ISSUE SUB.END_ISSUE%TYPE;
MCOMMENTS SUB.COMMENTS%TYPE;
MPCODE SUB.POSTCODE%TYPE;
mpay_mode sub.pay_mode%type;
mrmember sub.rmember%type;
mflag varchar2(1);
cursor c1 is select * from htmldb_collections     where collection_name = 'CSV_DATA' and c001 != 'SNO';
invalid_month exception;
pragma exception_init( invalid_month, -1843 );
begin     
mflag := 'N';
          FOR XXX IN C1
               LOOP
               begin
mrmember := xxx.c023;
mstart_issue := xxx.c019;
mend_issue := xxx.c020;
               BEGIN
IF SUBSTR ( UPPER (mstart_issue)
     , -3
     ) IN ( 'JAN', 'FEB', 'MAR'
          , 'APR', 'MAY', 'JUN'
          , 'JUL', 'AUG', 'SEP'
          , 'OCT', 'NOV', 'DEC'
THEN
     MSTART_ISSUE := TO_CHAR(to_date(mstart_issue,'YY-MON','NLS_DATE_LANGUAGE=AMERICAN'),'Mon.YYYY') ;
mflag := 'Y';
ELSE
     warn('not valid month startissue ' || moldmembership);
mflag := 'N';
END IF;
IF SUBSTR ( UPPER (mend_issue)
     , -3
     ) IN ( 'JAN', 'FEB', 'MAR'
          , 'APR', 'MAY', 'JUN'
          , 'JUL', 'AUG', 'SEP'
          , 'OCT', 'NOV', 'DEC'
THEN
     mend_issue := to_char(to_date(mend_issue,'YY-MON','NLS_DATE_LANGUAGE=AMERICAN'),'Mon.YYYY');
mflag := 'Y';
ELSE
     warn('not valid month endissue ' || moldmembership);
mflag := 'N';
END IF;
exception
when invalid_month then
warn('EXCEPTIONnot valid month xx ' || moldmembership);
END;
IF mflag = 'Y' then
               insert into sub (sno,rno,designation,old,start_issue,end_issue,comments,pay_mode,rmember)
               values
               (msno,mrno,mdesignation,moldmem e,maddressedas,madd1,
               madd2,mcounty,mcity,mstate,mcountry,mph_no,memail,mpostcode,mstart_issue,mend_issue,mco );     
end if;
exception
when value_error then
warn('value error'||moldmembership);
          end;
END LOOP;
END;