|
View previous topic :: View next topic
|
| Author |
Message |
dbordon
New User
Joined: 25 Jan 2007
Posts: 20
Location: Argentina
|
|
|
|
i´m installing a popular LRS´s product. REXX does not understand the QUEUE line. Or Am i not understanding it correctly.
this is the output for the job that ends with MAXCC=3622
| Code: |
4 *-* TRACE SCAN
5 *-* X = PROMPT(ON)
6 *-* OPREFIX = SFTW
7 *-* VOLSER = INS003
8 *-* ARG MEMBER OUTDSN
9 +++ QUEUE "RESTORE DA('"OPREFIX"."OUTDSN"') UNIT(SYSDA) RELEASE VOLUME("VOLSER")¨ QUEUE "END"
"RECEIVE INDSNAME('"OPREFIX".LRS.PRODUCT.PDS("MEMBER")')" EXIT RC
IRX0006I Error running OBTAIN, line 9: Unmatched "/*" or quote |
and this is the REXX
| Code: |
/* REXX EXEC */
/* */
/* */
TRACE SCAN
X = PROMPT(ON)
OPREFIX = SFTW
VOLSER = INS003
ARG MEMBER OUTDSN
QUEUE "RESTORE DA('"OPREFIX"."OUTDSN"') UNIT(SYSDA) RELEASE VOLUME("VOLSER")¨
QUEUE "END"
"RECEIVE INDSNAME('"OPREFIX".LRS.PRODUCT.PDS("MEMBER")')"
EXIT RC |
|
|
| Back to top |
|
 |
Escapa
Senior Member
Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA
|
|
|
|
| I think Improper quote for literal is your problem |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| Your HILITE REXX in your ISPF EDIT settings didn't pick up anything? |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
The last double-quote in the QUEUE RESTORE line look different than other double-quotes.
BTW,
| Code: |
OPREFIX = SFTW
VOLSER = INS003
|
is bad. Always put your constants in quotes:
| Code: |
OPREFIX = "SFTW"
VOLSER = "INS003"
|
|
|
| Back to top |
|
|
dbordon
New User
Joined: 25 Jan 2007
Posts: 20
Location: Argentina
|
|
|
|
Thank to all !!!
Everything you said works well.
At some point in the JCL edition i entered a wrong quotes byt typing SHIFT + ´ key instead of the number 2´s key.
Also HILITE REXX give me a hand.
BTW the Return Code for the job was 3622.
Thanks to all and have a good day! |
|
| Back to top |
|
|
|
|
