|
View previous topic :: View next topic
|
| Author |
Message |
sreekanth.sama
New User
Joined: 05 Sep 2007
Posts: 6
Location: bangalore
|
|
|
|
need help in calling rexx code from DTL
Hello guys.. I am creating a panel using DTL.. In my panel I am calling rexx code using *REXX(*) keyword. But when i execute my code it is displaying like below.
**************************************************
* ISPP156
*
* Panel 'TEST' error
* Unrecognized keyword.
*
*
*
*
*
*
* Panel line where error was detected:
* *REXX(*,TIME5)
Can anybody help in resolving this problem.. It looks like the DTL is not recognizing the
*REXX as a keyword. But in my material it is showing as a keyword, so that i can call rexx code from DTL.
Thanks,
Sreeks... |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| Quote: |
| DTL is not recognizing the *REXX as a keyword. But in my material it is showing as a keyword |
don' t You have the doubt that your material is WRONG,
or maybe You misread ? ....
To be sure I just checked the DTL reference and nowhere says that REXX is a keyword
to get a grasp on how dtl is working why not start reading and understanding
the way in which ISPF itself was written..
start with simple panels as
[/quote]ISP.SISPPENU(ISP@PRIM)
| Quote: |
and then progress towards more complex structures
but for simpler applications is faster to use the old standard panels definitions |
[/code] |
|
| Back to top |
|
|
sreekanth.sama
New User
Joined: 05 Sep 2007
Posts: 6
Location: bangalore
|
|
|
|
Here are the word that had in my book:
The *REXX statement The *REXX statement is used to invoke REXX code in a panel’s )INIT, )REINIT, or )PROC section. The REXX can be coded within the panel source immediately after the *REXX statement, or the name of a member containing a REXX program can be supplied.
*REXX[([*,]value,value,...[,(member)])]
and here is the example given in the book:
.ZVARS = ’(ZCMD NWIDGETS QPRICE TCSTXTAX TOTTAX TOTCOST SCOMM)’
/* Call REXX routine VALUSER to validate the user is allowed to use */
/* this application. */
*REXX(ZPANELID,ZUSER,(VALUSER))
/* If the user is not allowed, display a message and protect the */ /* input fields. */
IF (.MSG ¬= &Z) .ATTRCHAR(#) = ’TYPE(LI)’
)PROC
/* Call REXX routine VALUSER to validate the user is allowed to use */
/* this application. */
*REXX(ZPANELID,ZUSER,(VALUSER))
/* If the user is not allowed, display a message and protect the */ /* input fields. */ IF (.MSG ¬= &Z) .ATTRCHAR(#) = ’TYPE(LI)’ EXIT
&CPOS = ’--------’
&HPRICE = ’ ’
&LPRICE = ’ ’
/* Invoke panel REXX to validate input and calculate quote values. */ *REXX(*,CPOS,LPRICE,HPRICE)
Trace O
upper zcmd
I am getting all these things in :
Interactive System Productivity Facility (ISPF)
Dialog Developer’s Guide and Reference
z/OS Version 1 Release 9.0 SC34.
This is published by IBM.
SO i dont think this is wrong. May be i am not understanding it properly. But I tried the same in my code also, wht ever is given in the book. But still it is not accepting the *REXX as a key word. So can anybody help me in this.
Thanks,
Sreek. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
I was searching with the info You quoted in the first post ...
| Quote: |
| I am creating a panel using DTL |
there is nothing about rexx in the DTL manual
I agree with You that *rexx is described in the other manual...
What Ispf message do You get ?
I know that it could be a useless question.. but what level of ISPF You are at?
*rexx came up from z/os 1.6 |
|
| Back to top |
|
|
sreekanth.sama
New User
Joined: 05 Sep 2007
Posts: 6
Location: bangalore
|
|
|
|
HI Enrico,
Thk u very much for ur reply. Now i realized y it was not acceping the key word. I am using Z/OS 1.02 . As per ur reply it is effective only from 1.6.
So i cant use this.
Can u please tell me is there any other alternative that i can use my REXX or CLIST code as part of )PROC section in the panel design.
Thanks
Sreeks. |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
As far as I know, DTL does not use the tags )INIT, )PROC and so on.
The error message you received said:
| Quote: |
**************************************************
* ISPP156
*
* Panel 'TEST' error
* Unrecognized keyword.
*
*
*
*
*
*
* Panel line where error was detected:
* *REXX(*,TIME5)
|
The book and the examples you gave say you should have coded:
In your case, TIME5 was certainly interpreted as one of the fields, hence the "Unrecognized keyword" |
|
| Back to top |
|
|
|
|
