Re: Passing Parms to an RPG Program

[Anton Gombkötö <Gombkoetoe@xxxxxxxxxx>]

Dear a,

define custid as packed 15/5 then it should work.

Numeric parameters from the command line are always passed as 15/5.
As you cannot state how you want the parameters passed, there has to be some
default.

--
Anton Gombkötö

-----Ursprüngliche Nachricht-----
Von: "a b" <eagle_291@yahoo.com>
An: <RPG400-L@midrange.com>
Gesendet: Donnerstag, 23. März 2000 14:15
Betreff: Passing Parms to an RPG Program


> Beginners question:
>
> I'm attempting to call an RPG application from the
> command line with a parm, but I continue to get an
> error indicating that I have a data decimal error.
> I'm not quite sure if I'm doing this right or not but
> essentially I'm doing the following:
>
>  CALL PGM(ALIBARY/PROGRAMX) PARM(9)
>
> I need to pass a numeric variable to my RPG program
> that looks like this:
>
>
> *******************************************************fafile
>   UF A E K DISK
> fbfile   UF A E K DISK
> *******************************************************dcustid
>     s      10 0
>
> *********************************************************
> Mainline
>
> c     *entry       plist
> c                  parm        custid
>
> C     custid       chain       afile
> c                  if          not %found
> c          ***************************
> c           ************************
> c                  else                   c
>       return
> c                  endif
>
>
> Is this right... or am I missing something that I
> should have?
>
>
> Any help would greatly be apprecaited.
>
>
> Thanks
>
>
>
>
> __________________________________________________
> Do You Yahoo!?
> Talk to your friends online with Yahoo! Messenger.
> http://im.yahoo.com
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---