Re: Two Externally Defined Printer Files in same pgm

[x y <xy6581@xxxxxxxxx>]

In RPG, rename all the formats for one of the printer files and you're on
your way.

   dcl-f aal00501 disk(*ext) usage(*input) rename(tbgrec:tbgrec01);



On Thu, Nov 6, 2025 at 6:29 AM Greg Wilburn <
gwilburn@xxxxxxxxxxxxxxxxxxxxxxx> wrote:

> I have a situation where I need to print to two different printer files
> within the same program... the problem is that both printer files share
> record format and field names.
>
> I've been attempting to use the "qualified" when defining one of the
> printer files (maybe I should do both?), but the compiler is giving me this
> error
> RNF7274: A result data structure is required for I/O operations to file
>
> Definitions are:
>   dcl-f  prtf01     printer oflind(*in09) qualified usropn;
>   dcl-f  prtf02     printer oflind(*in08) usropn;
>
> Each is being written inside a separate procedure... Each is open/closed
> as needed.
>
> Not sure how to solve this short of writing separate pgms.
>
> Thx,
> Greg
> [Logo]<https://www.totalbizfulfillment.com/>    Greg Wilburn
> Director of IT
> 301.895.3792 ext. 1231
> 301.895.3895 direct
> gwilburn@xxxxxxxxxxxxxxxxxxxxxxx<mailto:gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>
> 1 Corporate Dr
> Grantsville, MD 21536
> www.totalbizfulfillment.com<http://www.totalbizfulfillment.com>
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.