Re: Procedure Question.

I assume you have a subprocedure that needs to do file i/o? What I have done
is, define a DS outside of the subprocedure (Globally), using LIKEREC i.e.
D ActionFmt DS LikeRec(AL:*Input) Based(pTemp)

Then, inside your P specs, define a DS using LIKEDS:
D A DS LikeDS(ActionFmt)

Inside your subprocedure, you can read into the A data structure
Read AL A;

This is how I have accomplished the task. I am sure there are other ways.

On 10/18/05, Hatzenbeler, Tim <thatzenbeler@xxxxxxxxxxxxx> wrote:
>
>
> The 'F' Spec file never populates the fields...
>
> If all the "file fields" are located in the sub-procedure, the fields are
> never populated on my chain...
>
> I have to move the fields into the main area of the program, either as
> d-specs or c-specs, so they will be populated, thus usable in my
> procedure..
>
> Is there a way around this? I tried using an external DS, but that didn't
> seem to work either...
>
>
>
> Thanks , Tim
>
> --
> 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.
>
>


--
"Enter any 11-digit prime number to continue..."
"In Hebrew SQL, how do you use right() and left()?..." - Random Thought
"If all you have is a hammer, all your problems begin to look like nails"