× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. January 2009

RE: USRDTA issue.

Yep. There is data printed to it.

I don't have access to the program. This was all brought up because I'm doing a paper reduction project that uses the printer file name and the user data as keys to a physical file that controls who gets the emails that contain the PDFs. I can ask her to change this and see what happens.

I'll ask her to add the code, though.

Thanks,

Mark

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, January 21, 2009 9:00 AM
To: RPG programming on the IBM i / System i
Subject: RE: USRDTA issue.

You do write out some data to the printer file, right?

It's still spooled up and hasn't automatically printed? So, you're not
just seeing
WRKJOB
4 - Spooled files
Status
FIN
When it gets to that point it drops the user data.

If you insert this line in the cl that calls that last rpg program,
immediately before the call, what do you get?
DSPJOB OUTPUT(*PRINT) OPTION(*FILOVR)
Nothing like this eh?
File Level Type Keyword Specifications
QSYSPRT 14 PRT USRDTA( )

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/21/2009 08:45 AM
Subject:
RE: USRDTA issue.
Sent by:
rpg400-l-bounces@xxxxxxxxxxxx



5th program is an RPG38 that has the program in the F-Spec. Just like the
other 4.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, January 21, 2009 8:23 AM
To: RPG programming on the IBM i / System i
Subject: RE: USRDTA issue.

How does the application program use the printer file? For example is the
5th program a rpg program that has it in an F spec, or is the 5th program
a CLP that does a CPYF to a spool file or some such thing?

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/21/2009 08:02 AM
Subject:
RE: USRDTA issue.
Sent by:
rpg400-l-bounces@xxxxxxxxxxxx



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.



--
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.


As an Amazon Associate we earn from qualifying purchases.

This thread ...
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.