× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.




PARM KWD(OUTREQ) TYPE(*CHAR) LEN(4) RSTD(*YES) +
DFT(*YES) VALUES(*YES *NO) MAX(1) +
PROMPT('Outfile Required')

PARM KWD(OUTFILE) TYPE(FILLIB) MIN(0) MAX(1) +
PMTCTL(CRTPF) PROMPT('Output File name')

FILLIB: QUAL TYPE(*NAME) LEN(10) MIN(1)
QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) +
SPCVAL((*LIBL)) PROMPT('Library')
QUAL TYPE(*NAME) LEN(10) DFT(*FIRST) +
SPCVAL((*FIRST)) PROMPT('Member')
QUAL TYPE(*CHAR) LEN(4) RSTD(*YES) DFT(*YES) +
VALUES(*YES *NO) PROMPT('Replace')

CRTPF: PMTCTL CTL(OUTREQ) COND((*EQ '*YES'))

On 4/22/2015 12:03 AM, Jon Paris wrote:
Hopefully I’ll get this right this time!

I don’t do commands very often and haven’t really worked with them for about 20 years so I’m rusty as heck.

Here’s what I want.

Outfile required . . . . . . . . *YES *YES, *NO
Output file . . . . . . . . . . *GEN______ Name, *GEN
Library . . . . . . . . . . . __________ Name
Member . . . . . . . . . . . . __________ Name, *FILE, *DATE
Replace physical file . . . . . *NO_ *YES, *NO

Only if *YES is specified to the first parm do I want the others to appear. I can condition them via a defined Type but then it does not appear to allow me to specify default values for the individual components such as Member and Replace.

Only if I specify them as individual parms can I get the defaults accepted.

Is what I want possible? Seems like it should be.

In a related question - how do I control which parms appear in the initial prompted screen. It seems that the minute I have a parm related to a PMTCTL it does not appear unless I press F9 and then I get everything.

Can anyone provide a little WD40 to loosen up my aged brain?
Jon Paris

www.partner400.com
www.SystemiDeveloper.com



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.