|
Sorry, my mistake I should have pasted: CALL PGM(INVMARGIN) PARM('AA' '06/01/2005' '06/30/2005') not CALL PGM(INVMARGIN) PARM('AA' '06/01/2005' '06/30/'2005') So it runs from the command line, but not from the RPG. This definitely sounds like it's finding a different program when it's being submitted. If you do a WRKOBJ *ALL/INVMARGIN do you find more that one INVMARGIN? Ron Power Programmer Information Services City Of St. John's, NL P.O. Box 908 St. John's, NL A1C 5M2 709-576-8132 rpower@xxxxxxxxxx http://www.stjohns.ca/ ___________________________________________________________________________ Success is going from failure to failure without a loss of enthusiasm. - Sir Winston Churchill "Douglas W. Palme" <dpalme@xxxxxxxxxxx> Sent by: rpg400-l-bounces@xxxxxxxxxxxx 2005/07/18 01:41 PM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> To RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> cc Subject RE: Error on compile Runs just like it is supposed to, although it is putting an extra ' in the second date, IE: CALL PGM(INVMARGIN) PARM('AA' '06/01/2005' '06/30/ ' 2005') I wonder why that is happening or am reading it wrong? On Mon, 18 Jul 2005 13:36:53 -0230, RPower wrote > Can you copy and paste the cmd into the command line and see if it > runs then? This is not making much sense because it should be > working. You don't happen to have another copy of INVMARGIN out > there that's causing the issue? Go to your command line and paste: > CALL PGM(INVMARGIN) PARM('AA' '06/01/2005' '06/30/'2005') and see > what happens... > > Ron Power > Programmer > Information Services > City Of St. John's, NL > P.O. Box 908 > St. John's, NL > A1C 5M2 > 709-576-8132 > rpower@xxxxxxxxxx > http://www.stjohns.ca/ > ___________________________________________________________________________ > Success is going from failure to failure without a loss of > enthusiasm. - Sir Winston Churchill > > "Douglas W. Palme" <dpalme@xxxxxxxxxxx> > Sent by: rpg400-l-bounces@xxxxxxxxxxxx > 2005/07/18 01:24 PM > Please respond to > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> > > To > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> > cc > > Subject > RE: Error on compile > > The reason I did not use a CL program was because there are some > routines I need to run, 1. verify the user has access to the data, > set the parameters > > for what data is extracted, etc. > > I suppose I can have the original rpgle do that and then call the cl > program, and let it submit the job......but it still would have been > nice to figure out how to do it from within rpgle. > > On Mon, 18 Jul 2005 09:42:29 -0600, Tyler, Matt wrote > > Douglas, > > I would like to see the dump entry of CMD. The one shown > here does > > not look right. By the way, if you submit to a CL program, you have > > to pass ALL parameters, unless you want to add CEE* code to obtain > > the information about parameters passed Very technical and prone to > > errors, IMO. > > > > SBMJOB CMD(CLPGMA PARM('1' '2' '07/18/2005' > 'ABCDEFGHIJKMNOP')) > > JOB(CLPGMA) > > > > To reduce your level of frustration, I would also suggest > creating a > > submitting CL program that receives your parameters and then runs > > the SBMOJB command. > > > > PGM PARM(&CODE &TYPE &DATE &DATA) > > ... > > Dcl's left out intentionally > > ... > > SBMJOB CMD(CLPGMA PARM(&CODE &TYPE &DATE &PRM4)) > JOB(CLPGMA) > > ENDPGM > > > > Thank you, > > Matt Tyler > > WinCo Foods, LLC > > mattt@xxxxxxxxxxxxxx > > > > -----Original Message----- > > From: rpg400-l-bounces@xxxxxxxxxxxx > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] > > On Behalf Of Douglas W. Palme > > Sent: Monday, July 18, 2005 9:28 AM > > To: RPG programming on the AS400 / iSeries > > Subject: RE: Error on compile > > > > Yeah, I noticed that as well, and changed it, however it still keeps > > telling > > > > me that I am not passing enough parameters. Talk about frustrating LOL > > > > On Mon, 18 Jul 2005 16:12:40 +0100, Saunders, Martin P wrote > > > There should be a space between '(INMARGIN)' and 'PARM'. > > > > > > HTH > > > > > > Martin > > > > > > -----Original Message----- > > > From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l- > bounces@xxxxxxxxxxxx] > > > On Behalf Of Douglas W. Palme > > > Sent: 18 July 2005 15:50 > > > To: RPG programming on the AS400 / iSeries > > > Subject: RE: Error on compile > > > > > > Ok, I am totally lost now LOL.....I do believe that I still need to > keep > > > each parm deliminited which is what I have been doing. > > > > > > Here is what it looks like, which at least to me looks correct: > > > > > > > EVAL CMD > > > CMD = > > > > > > .....5...10...15...20...25...30...35...40...45...50...55...60 > > > 1 'SBMJOB CMD(CALL PGM(INVMARGIN)PARM('AA' '06/01/2005' '06/30/' > > > 61 '2005')) > > > ' 121 ' > > > ' 181 ' ' > > > > > > This message contains information that may be privileged or > > > confidential and is the property of the Capgemini Group. It is > > > intended only for the person to whom it is addressed. If you are not > > > the intended recipient, you are not authorized to read, print, > > > retain, copy, disseminate, distribute, or use this message or any > > > part thereof. If you receive this message in error, please notify > > > the sender immediately and delete all copies of this message. > > > > > > -- > > > This is the RPG programming on the AS400 / iSeries (RPG400-L) > > > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To > > > subscribe, unsubscribe, or change list options, visit: > > > http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400- > > > L-request@xxxxxxxxxxxx Before posting, please take a moment to > > > review the archives at http://archive.midrange.com/rpg400-l. > > > > If you bought, it was hauled by a truck - somewhere, sometime. > > > > -- > > > > This is the RPG programming on the AS400 / iSeries (RPG400-L) > > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To > > subscribe, unsubscribe, or change list options, visit: > > http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400- > > L-request@xxxxxxxxxxxx Before posting, please take a moment to > > review the archives at http://archive.midrange.com/rpg400-l. > > -- > > This is the RPG programming on the AS400 / iSeries (RPG400-L) > > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To > > subscribe, unsubscribe, or change list options, visit: > > http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400- > > L-request@xxxxxxxxxxxx Before posting, please take a moment to > > review the archives at http://archive.midrange.com/rpg400-l. > > If you bought, it was hauled by a truck - somewhere, sometime. > > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To > subscribe, unsubscribe, or change list options, visit: > http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400- > L-request@xxxxxxxxxxxx Before posting, please take a moment to > review the archives at http://archive.midrange.com/rpg400-l. > > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To > subscribe, unsubscribe, or change list options, visit: > http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400- > L-request@xxxxxxxxxxxx Before posting, please take a moment to > review the archives at http://archive.midrange.com/rpg400-l. If you bought, it was hauled by a truck - somewhere, sometime.
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.