Re: USRDTA issue.

[Charles Wilt <charles.wilt@xxxxxxxxx>]

Mark,

Are all 4 programs RPG38?

For some reason, I'm thinking the USRDTA(*SOURCE) doesn't work for
ILE.  But a quick search didn't turn up any confirmation or that
thought.

Charles

On Wed, Jan 21, 2009 at 8:04 AM, Mark Walter <mwalter@xxxxxxxxxxxxxxx> wrote:
> Sorry,
>
> The spooled file is created by an application program. I'll check the printer file definition, but the previous 4 programs that use that printer file have the application program as the usrdta. On the fifth, it's blank.
>
> Mark
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
> Sent: Tuesday, January 20, 2009 4:06 PM
> To: RPG programming on the IBM i / System i
> Subject: RE: USRDTA issue.
>
> So was the sample I sent you.  QSYSPRT is an existing printer file on your
> system, and is the exact one I used in my sample.  Take another look.
>
> Rob Berendt
> --
> Group Dekko Services, LLC
> Dept 01.073
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> From:
> Mark Walter <mwalter@xxxxxxxxxxxxxxx>
> To:
> "'RPG programming on the IBM i / System i'" <rpg400-l@xxxxxxxxxxxx>
> Date:
> 01/20/2009 03:59 PM
> Subject:
> RE: USRDTA issue.
> Sent by:
> rpg400-l-bounces@xxxxxxxxxxxx
>
>
>
> Sorry, I should have specified. It's internally described. QSYSPRT.
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of rob@xxxxxxxxx
> Sent: Tuesday, January 20, 2009 3:49 PM
> To: RPG programming on the IBM i / System i
> Subject: Re: USRDTA issue.
>
> What about the printer file itself?
>
> *SOURCE
>    If the spooled file was created by an application program, the
>    name of that program is used.  Otherwise, blanks are used.
>
> CHGPRTF FILE(...) USRDTA(*SOURCE)
>
> CPYF FROMFILE(ROB/ANN) TOFILE(*PRINT)
> WRKSPLFA FILE(QSYSPRT) SPLNBR(*LAST)
> User-specified data  . . . . . . . . . :
> User defined data  . . . . . . . . . . :   *NONE
>
> Rob Berendt
> --
> Group Dekko Services, LLC
> Dept 01.073
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> From:
> Mark Walter <mwalter@xxxxxxxxxxxxxxx>
> To:
> "'RPG programming on the IBM i / System i'" <rpg400-l@xxxxxxxxxxxx>
> Date:
> 01/20/2009 03:27 PM
> Subject:
> USRDTA issue.
> Sent by:
> rpg400-l-bounces@xxxxxxxxxxxx
>
>
>
> I have a client running RPG38/CLP38 code on V5R4 and she has a weird
> occurrence happening.
>
> Basically she has a CL that does a FMTDTA, then calls a program to print a
> report, then does a FMTDTA then calls a program to print a report, and
> this goes on for about 5 reporting program. The first 4 programs' output
> has a user data on the spooled file of the program name. The fifth one is
> blank. There is nothing in the OVRPRTF command that I would see that
> causes this.
>
> Any ideas?
>
> Thanks,
>
> Mark
>
> Mark Walter
> IBM Certified System i Specialist
> Paragon Consulting Services, Inc
> mwalter@xxxxxxxxxxxxxxx<mailto:mwalter@xxxxxxxxxxxxxxx>
> www.paragon-csi.com<http://www.paragon-csi.com/>
> 717.764.7909 Ext. 26
>
> --
> This is the RPG programming on the IBM i / System i (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.
>
>
>
> --
> This is the RPG programming on the IBM i / System i (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.
>
> --
> This is the RPG programming on the IBM i / System i (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.
>
>
>
> --
> This is the RPG programming on the IBM i / System i (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.
>
> --
> This is the RPG programming on the IBM i / System i (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.