I got it!!!!!!!
run the pack off command inside member
the now it´s OK!!!!! very, very thank´s to all
what helped me!!!!!
thank´s Scott and thank´s for all
regards
----- Original Message -----
From: "Scott Ford" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To: <[email protected]>
Sent: Friday, October 17, 2008 11:47 PM
Subject: Re: REXX error
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
----------------------------------------------------------------------
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
