View previous topic :: View next topic
|
Author |
Message |
vijayk123
New User
Joined: 31 Oct 2014 Posts: 3 Location: India
|
|
|
|
Hi..
When I invoke a Panel through REXX, It is displaying all actual code from member.
My Panel code is as shown in screenshot..
I tried to UNNUM and then submit still it was giving error as
"Panel line where error was detected:
# |$PGMNAME :- -PGMNAME% "
I did try other options such as changing PDS attributes..Still it did not work.
Could you please provide me any point where I can pay attention in this case ? |
|
Back to top |
|
|
vijayk123
New User
Joined: 31 Oct 2014 Posts: 3 Location: India
|
|
|
|
Sorry .. COuld not attache screenshots... Here is code I am trying with...
Panel Code:-
)ATTR
- TYPE(INPUT) INTENS(HIGH)
% TYPE(TEXT) INTENS(LOW) SKIP(ON)
+ TYPE(TEXT) INTENS(HIGH) COLOR(RED) SKIP(ON)
! TYPE(TEXT) INTENS(HIGH) COLOR(GREEN) SKIP(ON)
# TYPE(TEXT) INTENS(HIGH) COLOR(WHITE) SKIP(ON)
$ TYPE(TEXT) INTENS(HIGH) COLOR(TURQUOISE) SKIP(ON)
^ TYPE(TEXT) INTENS(HIGH) COLOR(BLUE) SKIP(ON)
~ TYPE(TEXT) INTENS(HIGH) COLOR(PINK) SKIP(ON)
` TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW) SKIP(ON)
)BODY
# *********************************
# *+ BATCH AUTOMATION TOOL *
# *********************************
_ABC %
# |$PGMNAME :- -PGMNAME% #|
# | |
# |$CHOOSE1:- -Q% ~(A/B/C/1) #|
# | |
# |$CHOOSE:- -SYSTEM% ~(aaaa/bbbbb) #|
_ABC1 %
% %
)INIT
.CURSOR = PGMNAME
)END
Rexx code to Invoke:-
/* REXX */
MYLIB = "'MATE03.PROJECT.REXX.BKUP.D011114'"
"ISPEXEC LIBDEF ISPPLIB DATASET ID("MYLIB")"
"ISPEXEC ADDPOP"
"ISPEXEC DISPLAY PANEL(PAN2)"
"ISPEXEC REMPOP"
"ISPEXEC LIBDEF ISPPLIB"
EXIT |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
Usually I start with "Welcome to the Forum", but in your case I really don't know where to start...
vijayk123 wrote: |
I tried to UNNUM and then submit still it was giving error |
UNNUM ? really ? Please explain what it has to do with the error you received. And what do you submit ? the panel ? the rexx program ?
vijayk123 wrote: |
Panel line where error was detected:
# |$PGMNAME :- -PGMNAME% |
Is this what you mean by "Panel code is getting displayed when invoked through REXX" ?
vijayk123 wrote: |
I did try other options such as changing PDS attributes.. |
Please explain what it has to do with the error you received...
Finally, because I'm in a good mood: If '-' is the INPUT attribute, then it must be followed by a variable name. |
|
Back to top |
|
|
vijayk123
New User
Joined: 31 Oct 2014 Posts: 3 Location: India
|
|
|
|
Thanks for your reply..
I tried UNNUM as it was showing line numbers also when I invoke it through REXX...
PDS attributes were changed as it was showing line numbers after 72...
I read these suggestions on some other forums.. I do understand that these are direction less options which I tried.. |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
When you post a question, you have to be as accurate as possible.
There is a huge difference between:
Quote: |
Panel code is getting displayed |
(that means 25 lines of the panel) and
Quote: |
Panel line where error was detected:
# |$PGMNAME :- -PGMNAME% |
(which is only a small part of the error message you've received).
And the error you have received certainly starts with something like:
Code: |
******************************************************************************
* ISPP127 *
* *
* Panel 'PAN2' error *
* Field or area name missing following identifying attribute character. * |
which is the important part! |
|
Back to top |
|
|
|