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