View previous topic :: View next topic |
Author |
Message |
ranga_subham Intermediate

Joined: 31 Jan 2006 Posts: 255 Topics: 72
|
Posted: Wed Mar 22, 2006 5:06 am Post subject: Is it possible to throw ISPF panels from PL/I programs? |
|
|
Hi,
Is it possible to throw ISPF panels from PL/I programs instead of REXX?
How to do that? Can you provide some examples please?
Please give reply ASAP.
TIA. _________________ Ranga
*****
None of us is as smart as all of us - Ken Blanchard |
|
Back to top |
|
 |
superk Advanced

Joined: 19 Dec 2002 Posts: 684 Topics: 5
|
Posted: Wed Mar 22, 2006 8:21 am Post subject: |
|
|
I'm not sure what it means to "throw ISPF panels", but when I created a dataset 'TEST.PLI', edited it, and entered the "MODEL" command on the command line, I got the "PLI Language Models" panel. Selecting the option "D1 DISPLAY" from the panel returned this content into the program source:
Code: |
BUFFER = 'DISPLAY PANEL(PANELNAM) MSG(MSG-ID) CURSOR(FIELD)
CSRPOS(CSRPOS) COMMAND(COMMAND)
RETBUFFR(RETBUFFR) RETLGTH(RETLGTH)
MSGLOC(MSGFIELD)';
CALL ISPEXEC (BUFLEN, BUFFER);
OR
CALL ISPLINK ('DISPLAY ', PANELNAM, MSG-ID, FIELD, CSRPOS, COMMAND,
RETBUFFR, RETLGTH, MSGFIELD);
|
|
|
Back to top |
|
 |
Cogito-Ergo-Sum Advanced
Joined: 15 Dec 2002 Posts: 637 Topics: 43 Location: Bengaluru, INDIA
|
Posted: Wed Mar 22, 2006 9:01 am Post subject: |
|
|
You would have to add a DCL for ISPLINK program. _________________ ALL opinions are welcome.
Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes. |
|
Back to top |
|
 |
ranga_subham Intermediate

Joined: 31 Jan 2006 Posts: 255 Topics: 72
|
Posted: Fri Mar 24, 2006 1:01 am Post subject: |
|
|
Thank you superk. I will try it out. _________________ Ranga
*****
None of us is as smart as all of us - Ken Blanchard |
|
Back to top |
|
 |
|
|