|
Hmmm... there doesn't appear to be a RTVCMDSRC on my system. But, the
code that you've given works great. Thanks!
On Fri, 9 May 2003 bdietz@xxxxxx wrote:
>
> I did a RTVCMDSRC for WRKJOB
>
> PARM KWD(JOB) +
> TYPE(Q0260) +
> DFT(*) +
> SNGVAL( +
> (* )) +
> PROMPT('Job name')
>
> Q0260: QUAL TYPE(*NAME) +
> LEN(10) +
> MIN(1) +
> EXPR(*YES)
> QUAL TYPE(*NAME) +
> LEN(10) +
> EXPR(*YES) +
> PROMPT('User')
> QUAL TYPE(*CHAR) +
> LEN(6) +
> RANGE( +
> '000000' +
> '999999') +
> FULL(*YES) +
> EXPR(*YES) +
> PROMPT('Number')
>
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.