Re: Doubt on prerun time array And a doubt about batch job

Hai Larry, Buck, James

Thanks for that excellent piece of advice. I really appretiate it. I was
able to get the program running. Thanks especially for the code snippet,
Larry. That helped me a lot. I had been declaring the file as externally
described.

I have some doubts
1) Am I right in saying that program creates a temporary program described
table where the values from the pf is loaded and used during the execution
of the program.
2) Does the Table file have ant relation to the create Table in SQL/400.
I was not able to declare the file directly in the Table in the d spec.
3) I am getting an error when I run the program with packed decimal fields I
am getting junk during the transformation i.e from the File to the Table
resulting in a decimal data error.
  I am not getting any error if I change the fields as char.
Also no error if I don't put any values in the pf.
I am including the code that I had tried out. So that you can get the
correct picture.

The program

FPF1       IT   F   10        DISK
FPF5       CT   F   10        DISK
DARE              S              9P 0 DIM(1)
D                                     FROMFILE(PF1)
D                                     TOFILE(PF5)
C     ARE(1)        DSPLY
C                   EVAL      *INLR = *ON

The PF
                R PF
                  FLD1           9P 0
                K FLD1

Thankyou very much for your help

Sunil


----- Original Message -----
From: "Jansen, Larry" <ljansen@preformed.com>
To: <rpg400-l@midrange.com>
Sent: Tuesday, June 25, 2002 9:03 PM
Subject: RE: Doubt on prerun time array And a doubt about batch job


> No problem.  In this example, the file ZIPFILE consists of 2000
10-character
> records that contain valid 10-character zip codes for this particular
> organization.  In order to have that data loaded at pre-rumtime into a
table
> called TABZIP, code the following:
>
> .FFilename++IPEASFRlen+LKlen+AIDevice+.Keywords++++++++++++++++++++
>  fzipfile   it   f   10        disk
>
>  d tabzip          s             10    dim(2000) fromfile(zipfile)
>
> I hope this helps!
>
> -----Original Message-----
> From: Sunil Ramakumar [mailto:Sunil_Ramakumar@USSWI.COM]
> Sent: Tuesday, June 25, 2002 11:00 AM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Doubt on prerun time array And a doubt about batch job
>
>
> Hai Larry,
>
> Sorry for my ignorance.
> I tried putting T in the file designation instead of the I I had given.
Now
> the type field is creating problems. Seems none of the four options are
> compatible. I tried leaving it blank that also didn't work. Can you help
me?
>
> Sunil
>
> -----Original Message-----
> From: Jansen, Larry [mailto:ljansen@preformed.com]
> Sent: Tuesday, June 25, 2002 8:18 PM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Doubt on prerun time array And a doubt about batch job
>
>
> The records in the physical file should be created to match the definition
> of your pre-runtime array.  By coding the "T" in the file designation, and
> the fromfile keyword on the d-spec for the table/array, the system opens
the
> file and loads the table/array prior to running the rest of your program.
>
> -----Original Message-----
> From: Sunil Ramakumar [mailto:Sunil_Ramakumar@USSWI.COM]
> Sent: Tuesday, June 25, 2002 10:34 AM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Doubt on prerun time array And a doubt about batch job
>
>
> No I haven't
> What is this table file?
>
>
>
> -----Original Message-----
> From: Jansen, Larry [mailto:ljansen@preformed.com]
> Sent: Tuesday, June 25, 2002 8:11 PM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Doubt on prerun time array And a doubt about batch job
>
>
> On your F-spec for the file, have you coded "T" in the file designation
> field to indicate that this is a table file?  If not, this may be your
> problem.
> Larry Jansen
>
> -----Original Message-----
> From: Sunil R [mailto:sunil_ramakumar@usswi.com]
> Sent: Tuesday, June 25, 2002 10:38 AM
> To: rpg400-l@midrange.com
> Subject: Doubt on prerun time array And a doubt about batch job
>
>
> Hai,
>
> Hai all,
>
> Was trying out preruntime arrays. I made a PF and included it in the F
spec.
> In the d spec I included this file in the keyword fromfile().
> But I am getting an error saying parameter not valid. In the ibm material
> they have said only files. But in the error they have mentioned something
> regarding an input-table file. I am unable to understand this.
> Can't I include a pf here.
> Can some body help?
>
> Also is there any way I can know wheather my batch job has completed
without
> manually going and checking it
> I mean is there any command which will help me write a cl program that
> monitors this?
>
> Sunil
>
>
> _______________________________________________
> 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.
> _______________________________________________
> 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.
>