Claudio, How are you executing your clist ??? Option # 6 as 'exec clist-pds(clistname)' or
How ? Also what are the dcb parameters of your clist pds ? Scott Ford Senior Systems Engineer [p] 678.266.3399 x304 [m] 609-346-0399 identityforge.com This message is for the designated recipient only and may contain privileged, proprietary, or otherwise private information. If you have received it in error, please notify the sender immediately or let us know at [EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the original. Any other use of the email by you is prohibited. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Claudio Marcio Sent: Friday, October 17, 2008 8:08 PM To: [email protected] Subject: Re: REXX error when I run my exec REXX the error appears: 1 +++ ? IRX0013I Error running BRAS, line 1: Invalid character in program see my program rexx BRAS: /* REXX para mostrar o dia da semana que cai o natal. BY CLAUDIO MARCIO */ /***************************************************************/ /* Say 'Calculate Christmas day in year ?' */ Say 'Este programa informa em que dia da semana foi ou sera o Natal', 'em determinado ano, que ano quer saber ?' pull year do until answer \= "S" if year = "" then year = right(date(),4) dec25 = date("B",year"1225","S")//7 select when dec25 = 0 then day = "Segunda-feira" when dec25 = 1 then day = "Terca-feira" when dec25 = 2 then day = "Quarta-feira" when dec25 = 3 then day = "Quinta-feira" when dec25 = 4 then day = "Sexta-feira" when dec25 = 5 then day = "Sabado" otherwise day = "Domingo" end if year < right(date(),4) then say 'Em 'year', o natal foi 'day else say 'Em 'year', o natal sera 'day say 'Deseja saber mais algum ano ? (s/n)' pull answer if answer = 'S' then Say 'Vamos la entao, qual outro ano voce gostaria de saber!!' else do say 'BYE! BYE!' leave end pull year end exit ---------------------------------------------------------------------------- ----------- Very strange!!!! Why runs in other dataset ?? in the dataset below, run ok.. VIEW ZOS.CONTEST.JCL ------------> other dataset Command ===> Scroll ===> PAGE Name Prompt Size Created Changed ID __ex_____ BRAS *RC=0 11 2007/09/19 2007/09/21 14:36:53 BABEYS **End** In the dataset below, not run, WHY?? I'm use the ex command in BRAS(member) of the my datset see; VIEW BRATIME.TIME.CHRIST ---------------> my dataset Command ===> Name Prompt Size Created ___EX______ BRAS *Edited 34 2008/09/09 ---- -> member member **End** regards ----- Original Message ----- From: "Hunkeler Peter (KIUK 3)" <[EMAIL PROTECTED]> Newsgroups: bit.listserv.ibm-main To: <[email protected]> Sent: Friday, October 17, 2008 4:52 AM Subject: Re: REXX error >I don't see neither an error nor REXX code? What is your problem? > Pleaes take your time to write sufficient information so others > are able to help instead of wasting time trying to guess what > you want. > > -- > Peter Hunkeler > CREDIT SUISSE > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
