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


  1.  Home
  2. RPG400-L
  3. July 2005

RE: Error on compile

Only one *pgm, there is a lf with the same name, but that should not cause a 
problem.


On Mon, 18 Jul 2005 13:54:45 -0230, RPower wrote
> Sorry,
> my mistake I should have pasted:
> CALL PGM(INVMARGIN) PARM('AA' '06/01/2005' '06/30/2005')
> 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.
> 
> -- 
> 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 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.