Good News Everybody!
The new search engine is LIVE!
Please report any problems to david (at) midrange.com.
|
After attending Leif's sessions in Nashville, I've been trying to wet my
feet with MI.
I keep getting stuck with a "Parameters do not match those in program
CRTMIPGM in LOPEZ" whenever trying to use a command for CRTMIPGM. The
command is coded with:
0001.00 CMD PROMPT('Create MI Program')
0002.00 PARM KWD(PGM) TYPE(*CHAR) LEN(10) MIN(1) +
0003.00 PROMPT('Program Source Member')
0004.00 PARM KWD(FILE) TYPE(*CHAR) LEN(10) DFT(QMISRC) +
0005.00 PROMPT(' in Source File')
0006.00 PARM KWD(LIST) TYPE(*CHAR) LEN(10) DFT(*LIST) +
0007.00 PROMPT(' LIST Option')
When I check the MI source in Leif's RPG program for the front end I find:
0037.00 DCL SPCPTR .MBR PARM;
0038.00 DCL SPCPTR .FIL PARM;
0039.00 DCL SPCPTR .DET PARM;
0040.00 DCL OL *ENTRY (.MBR, .FIL, .DET) PARM EXT MIN(1);
0041.00 DCL DD MBR CHAR(10) BAS(.MBR);
0042.00 DCL DD FIL CHAR(10) BAS(.FIL);
0043.00 DCL DD DET CHAR(10) BAS(.DET);
If I understand this, CRTMIPGM will be looking for three parameters, just
like the command. When I try calling the program directly with passed
parameters, I get the same error. I've originally type in the source for
the RPG/MI frontend, then copied it out of iSeries400.org. I plan to
download the savefile at some point, but I'd like to know what I'm missing.
Any pointers?
Thanks.
This mailing list archive is Copyright 1997-2026 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.