|
midrange.com
Peter, F9 didn't bring up the F10 parameters. The existing program is an RPG
program that takes the following:
I 'DSPJOB JOB(' C DSP
I 'CHGJOB JOB(' C CHG1
I '??JOBPTY() ??OUTPTY(-C CHG2
I ') ??PRTDEV() ??OUTQ-
I ')'
I 'ENDJOB JOB(' C
and then runs a home grown command that displays USer jobs. When the '2' is hit
CHGJOB gets invoked:
C MOVE *BLANKS CHGCMD 80
C CHG1 CAT JNBR:0 CHGCMD
C CHGCMD CAT '/':0 CHGCMD
C CHGCMD CAT JUSR:0 CHGCMD
C CHGCMD CAT '/':0 CHGCMD
C CHGCMD CAT JNME:0 CHGCMD
C CHGCMD CAT ')':0 CHGCMD
C CHGCMD CAT CHG2:1 CHGCMD
C CALL 'QCMDEXC' 80
C PARM CHGCMD
C PARM 80 LEN 155
C ELSE
But what happens is that on this CHGJOB, there is no F10.
Thanks (also to AL),
Phil
MIDRANGE-L@midrange.com wrote:
>
Try F9. Whether displayed as a possible function key or
not, F9 will bring up *all* additional parameters, whether relevant or
not.
Peter Dow
> Dow Software Services, Inc.
> 909 425-0194
voice
> 909 425-0196 fax
----- Original Message -----
From:
<A TARGET="Link" href="mailto:pike4@ix.netcom.com"
title=pike4@ix.netcom.com>Phil
Kestenbaum</A>
To: <A TARGET="Link"
href="mailto:MIDRANGE-L@midrange.com"
title=MIDRANGE-L@midrange.com>MIDRANGE-L@midrange.com</A>
Sent: Sunday, August 13, 2000 8:25
PM
Subject: Re: CHGJOB from a CL pgm.
>
What is happening with CHGJOB when prompted for
in this manner, is that it displays only one screen ( the first one), and
does
not show F10, which is additonal parameters.
Phil
----- Original Message -----
From:
<A TARGET="Link" href="mailto:barsa2@ibm.net" title=barsa2@ibm.net>Al
Barsa, Jr.</A>
To: <A TARGET="Link"
href="mailto:MIDRANGE-L@midrange.com"
title=MIDRANGE-L@midrange.com>MIDRANGE-L@midrange.com</A>
Sent: Friday, August 11, 2000 12:13
PM
Subject: Re: CHGJOB from a CL
pgm.
> At 02:36 PM 8/11/00 -0400, you wrote:
>
>
HI -
> There is a way in CL to display to
the user, the command CHGJOB, and the program can prefill in certain
values, pertaining to the user. However, it seems to only show the first
screen only of the CHGJOB command, and not everything ( does not allow
F10, which would bring up more). Is this a limitation, or am I missing
something?
> There is a technique in the command prompter
called "selective prompting". The CL Programming Book
says:
>
>
>
6.5.2 Selective Prompting for CL
Commands
>
>
>
>
> You can request to prompt for selected
parameters within a command. This is especially helpful when you are
using
some of the longer commands and do not want to
> be prompted for certain
parameters.
>
> Selective prompting can be used during interactive
prompting or entered as source (in SEU) for use within a CL procedure or
program. You can enter the source for
> selective prompting with SEU but
you cannot use selective prompting while entering commands in SEU.
>
> You can use selective prompting to:
>
> Select the parameters for which prompting
is needed.
>
> Determine which parameters are
protected.
>
> Omit parameters from the
prompt.
>
>
>
>
> The following restrictions apply to selective
prompting:
>
> The command name or label must
be preceded by a ? (question mark):
>
> When one or
more of the selective prompt options is ?- (question mark, minus).
>
> To avoid
getting a CPF6805 message (a message that indicates a diagnostic problem
on the command although compilation is successful)
>
>
>
>
> Parameters can be specified
by position but they cannot be preceded by selective prompt characters.
>
> A parameter must be in keyword form to be
selectively prompted for.
>
> Blanks cannot
be entered between the selective prompt characters and the keyword.
>
> Selective prompting is only applicable at
a parameter level; that is, you cannot specify particular keyword values
within a list of values.
>
> ?- is not
allowed in prompt override programs.
>
> If a
parameter is required, the ?? selective prompt must be used.
>
> You can tell that a parameter is required
because the input slot is highlighted when the command is prompted.
>
>
>
>
> User-specified values are marked with a special symbol
(>) in front of the values in both selective and regular prompting. If
a user-specified value on the parameter
> prompt is not preceded by this
symbol, the command default is passed to the command processing program.
>
> If PASSATR(*YES) is specified on the PARM, ELEM, or QUAL command
definition statement, and the default value is changed using the
CHGCMDDFT
> command, the default value is shown as a user-specified value
(using the > symbol) and not a default value. If a default value of a
changed PARM, ELEM, or QUAL
> command definition statement is changed
back to its original default value, the > symbol is removed.
>
> You can press F5 while you are using selective prompting to again
display those values initially shown on the display.
>
> If a CL
variable is used to specify a value for a parameter which is to be
displayed through selective prompting, you can change the value on the
prompt, and the
> changed value is used when the command is run. The
value of the variable in the procedure or program is not changed. If a CL
procedure contains the following:
>
> OVRDBF
?*FILE(FILEA) ??TOFILE(&FILENAME) ??MBR(MBR1)
>
>
>
> the
three parameters, FILE, TOFILE, and MBR is shown on the prompt display.
The value specified for the FILE parameter cannot be changed by you, but
the values
> for the TOFILE and MBR parameters can be changed. Assume
that the CL variable &FILENAME has a value of FILE1, and you change it
to FILE2. When the
> command is run, the value of FILE2 is used, but the
value of &FILENAME is not changed in the procedure. The following
tables list the various selective prompting
> characters and the
resulting action.
>
>
_____________ ______________ ______________ ______________
_____________
>
|
|
|
| Value Passed
|
|
>
|
|
|
| to CPP if
|
|
>
|
| Value
|
| Nothing | Marked with |
> |
You Enter | Displayed |
Protected | Specified | >
Symbol |
>
|_____________|______________|______________|______________|_____________|
> | ??KEYWORD() | Default |
No |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
??KEYWORD(VA|UValue |
No |
Value |
Yes |
>
|_____________|______________|______________|______________|_____________|
> | ?*KEYWORD() | Default |
Yes |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
?*KEYWORD(VA|UValue |
Yes |
Value |
Yes |
>
|_____________|______________|______________|______________|_____________|
> | ?<KEYWORD() | Default
| No |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
?<KEYWORD(VA|UValue |
No |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> | ?/KEYWORD() | Default |
Yes |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
?/KEYWORD(VA|UValue |
Yes |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> | ?-KEYWORD() |
None |
N/A |
Default |
N/A |
>
|_____________|______________|______________|______________|_____________|
> |
?-KEYWORD(VA|UNone |
N/A |
Value |
N/A |
>
|_____________|______________|______________|______________|_____________|
> | ?&KEYWORD() | Default
| No |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
?&KEYWORD(VA|UValue |
No |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> | ?%KEYWORD() | Default |
Yes |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
> |
?%KEYWORD(VA|UValue |
Yes |
Default |
No |
>
|_____________|______________|______________|______________|_____________|
>
>
>
+--------------------------------------------------+
| Please do not send private mail to this address. |
| Private mail should go to
barsa@ibm.net. |
+--------------------------------------------------+
>
Al Barsa, Jr. - Account for Midrange-L
Barsa Consulting, LLC.
400 > 390
>
Phone: 914-251-1234
Fax: 914-251-9406
<A TARGET="Link" href="http://www.barsaconsulting.com/"
EUDORA="AUTOURL">http://www.barsaconsulting.com</A><A TARGET="Link"
href="http://www.taatool.com/" EUDORA="AUTOURL">http://www.taatool.com</A>
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
