Re: Error Message

["Ren Fu Ping" <fupingren@xxxxxxxx>]

But the command can't include PARM option, the system of log is prompt the 
option is only for resource file. How to deal?



----- Original Message -----
From: <rob@dekko.com>
To: <rpg400-l@midrange.com>
Sent: Monday, April 15, 2002 10:43 PM
Subject: Re: Error Message


> This is a multipart message in MIME format.
> --
> [ Picked text/plain from multipart/alternative ]
> Denis is correct.  It is a shame that noone has written a faq on this.
> This faq should include a very simple CMD source to help replace the call.
>  Anyone up to the challenge?
>
> Rob Berendt
> --
> "They that can give up essential liberty to obtain a little temporary
> safety deserve neither liberty nor safety."
> Benjamin Franklin
>
>
>
>
> "Denis Robitaille" <DRobitaille@cascades.com>
> Sent by: rpg400-l-admin@midrange.com
> 04/15/2002 08:31 AM
> Please respond to rpg400-l
>
>
>         To:     <rpg400-l@midrange.com>
>         cc:
>         Fax to:
>         Subject:        Re: Error Message
>
>
> This problem has been seen and discussed a lot before. I will try to
> explain:
>
> When your CL program submit to batch the RPG program, a string like the
> following is sent to the jobq:
>
> CALL PGM(RPGPGM) PARM(12345)
>
> Where 12345 is the value of the numeric parameter that you are passing
> to the program. Since when the job starts in batch, it does not know the
> structure of 12345, the system assume a packed numeric filed of 15 digit
> with 5 decimal position (15P5). Your Rpg program is certainly expecting
> a number formatted differently.
>
> There are several work around for this situation. Here are the 2 main
> one that I know:
> - use 15p5 numeric parameters in all 3 programs
> - use a command to call the second RPG. By submitting a command instead
> of a direct call, the structure of the different parameters willm be
> known when the programs statrs.
>
> hope this help
>
> Denis Robitaille
> Directeur services techniques
> Cascades Inc
> 819 363 5187
>
>
> >>> fupingren@yeah.net 04/15/02 08:23am >>>
> This is a multi-part message in MIME format.
> --
> [ Picked text/plain from multipart/alternative ]
>  Message ID . . . . . . :   RPG0907
>  Date sent  . . . . . . :   02/04/15      Time sent  . . . . . . :
> 20:11:15
>
>  Message . . . . :   INVX01B 4900 decimal-data error in field (C G S D
> F).
>
>  Cause . . . . . :   The RPG program INVX01B in library DERFP found a
>    decimal-data error at statement 4900. One field did not contain
> valid
>    numeric data.  The digit and/or sign is not valid.
>  Recovery  . . . :   Enter C to cancel, G to continue processing at
> *GETIN, S
>    to obtain a system dump, or D to obtain an RPG formatted dump.
>  Possible choices for replying to message . . . . . . . . . . . . . . .
> :
>    D -- Obtain RPG formatted dump.
>    S -- Obtain system dump.
>    G -- Continue processing at *GETIN.
>    C -- Cancel.
>
> More..
>
> Dear Guys,
>           I have a program mentioned before here.   I use two RPG
> programm and one CLP programm to control interactive job or batch job.
> one RPG to check display file, Then call CL programm; and CL programm is
> receive parameter from the first RPG programm, then pass this parameter
> to the second RPG programm, certainly, if the special parameter is '1',
> I will submit this job to batch, otherwise for interactive.  Problem is
> I run this programm through interactive job is very good, but run in
> batch will display error message on the above paster. Why?
>
> thanks a lot.
> Ping
>
>
>
>
> --
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> 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@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> 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@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>