× 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.



Peter,

Take a look at the INLPMTLEN (initial prompt length) parameter of the PARM command. You'll note that the possible values for the initial prompt length are as follows:

*CALC, *PWD, 1-12, 17, 25, 32, 50, 80, 132, 256, 512

The default value is *CALC which means that the length will be calculated -- that is, the closest length that's the same or higher than the field size will be used.

Since the possible lengths are 1-12, 17, 25, 32 (and so forth) the length for an 18 character field will be 25. (17 would be too small, and the next highest number is 25.)

Make sense?



Peter.Colpaert@xxxxxxxxx wrote:
Group,

I've been having some very strange problems with a command I'm making...

This is the source:

/* *_> CNLLSTSPLF SRCFILE(@2/@1) SRCMBR(@3) */
/* *_> CRTCMD CMD(@5/@4) + */
/* *_> PGM(*LIBL/@4) + */
/* *_> SRCFILE(@2/@1) + */
/* *_> SRCMBR(@3) + */
/* *_> AUT(*LIBCRTAUT) */

CMD PROMPT('CRT/UPD/link/rollout document')

PARM KWD(DOCMGR) TYPE(*CHAR) LEN(10) MIN(1) +
PROMPT('Document main group')
PARM KWD(DOCSGR) TYPE(*CHAR) LEN(10) MIN(1) +
PROMPT('Document subgroup')
PARM KWD(DOCNAM) TYPE(*CHAR) LEN(256) MIN(1) +
PROMPT('Document name')
PARM KWD(DOCTYP) TYPE(*CHAR) LEN(10) MIN(1) +
PROMPT('Document type')
PARM KWD(DATTIM) TYPE(*CHAR) LEN(19) MIN(1) +
PROMPT('Date and time last update')
When I compile this command, and prompt it from the command line, the last parameter is shown as 25 characters long.

If I change it to 18, it is still shown as 25 long, but when I reduce the length further to 17, it is shown correctly as 17.

The same happens when I for instance change the DOCTYP parameter to LEN(19): it will be 25 on screen.

Is there any special reason why the length of the parameter is rounded up?

Thanks,

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we. Futile is resistance, assimilated will you be.
-----


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.