Friends, now at 06:41PM I found this article on this manual: -->http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/index.jsp?topic=/rzaks/rzaksjobacctconvert.htm
and I resolve this situation:
<pre>
Converting job accounting journal entries
You can use the OUTFILE parameter on the Display Journal (DSPJRN) command to write the job accounting journal entries into a database file that you can process.
The OUTFILE parameter allows you to name a file or member. If the member exists, it is cleared before the records are written. If the member does not exist, it is added. If the file does not exist, a file is created using the record format QJORDJE. This format defines the standard heading fields for each journal entry, but the job accounting data is defined as a single large field.
To avoid having to process the accounting data as a single large field, two field reference files are supplied to help you in processing the job accounting journal entries. The file QSYS/QAJBACG4 contains the record format QAWTJAJ4 and is used for JB entries. <b>File QSYS/QAPTACG5 contains record format QSPJAPT5 and is used for DP or SP entries. The same format is used for all printer file entries regardless if the output is SP (spooled) or DP (nonspooled)</b>. The DP entry for directly printed files contains some fields that are not used; these fields contain blanks.
The following are some approaches you might use:
The basic JB entries and DP or SP entries can be processed by creating two output files using the supplied field reference file formats and running the DSPJRN command once for JB and once for DP or SP. This allows you to define a logical file over the two physical files and use an high-level language program to process the externally described file.
You can process only the JB entries by creating a file using one of the supplied field reference files (QSYS/QAJBACG4) to create an externally described file. This file can then be processed by the query utility or an high-level language program.
You can convert both types of journal entries using the default DSPJRN format of QJORDJE. You can then use a program-described file to process the journal entries in a high-level language program.
The following DDS defines a physical file for the JB journal entries using the QAJBACG4 field reference file in QSYS. You can create the file (using the Create Physical File (CRTPF) command) with the same name (QAJBACG4) as the model file.
R QAWTJAJ4 FORMAT(QSYS/QAJBACG4)
The following DDS defines a physical file for the DP or SP journal entries using the QAPTACG5 field reference file in QSYS. You can create the file (using the CRTPF command) with the same name (QAPTACG5) as the model file.
R QSPJAPT5 FORMAT(QSYS/QAPTACG5)
You can specify a key field in either physical file; however, in this example, a logical file is used for sequencing. If you create two physical files (one for JB and one for DP or SP) with the members of the same name, you can issue the following DSPJRN commands to convert the entries. Assume that you have created the physical files with the same names as the model files in your library YYYY.
DSPJRN JRN(QACGJRN) JRNCDE(A) ENTTYP(JB)
OUTPUT(*OUTFILE) OUTFILE(YYYY/QAJBACG4)
DSPJRN JRN(QACGJRN) JRNCDE(A) ENTTYP(SP DP)
OUTPUT(*OUTFILE) OUTFILE(YYYY/QAPTACG5)
You can control the use and selection criteria of the DSPJRN command so that you do not convert the same entries several times. For example, you can select all entries in a specific range of dates. You can convert all of the entries at a cutoff point for your job accounting analysis, for example, monthly. One or more journal receivers might have been used during the month. Note that each use of the DSPJRN command to the same member causes the member to be cleared before any new entries are added. Do not use the JOB parameter of the DSPJRN command as some entries are made for a job by a system job and will therefore not appear as you expect them to.
Allowing the Processing of Both Physical Files:
Enter the following DDS to create a logical file to allow processing of both physical files. This allows you to read a single file in accounting code order and print a report using a high-level language program:
R QAWTJAJ4 PFILE(YYYY/QAJBACG4)
K JACDE
R QSPJAPT5 PFILE(YYYY/QAPTACG5)
K JACDE
Processing Basic Job Accounting Record:
If you want to use a logical file to process only the basic job accounting record in accounting code order by a user name, you can enter the following DDS for a logical file:
R QAWTJAJ4 PFILE(YYYY/QAJBACG4)
K JACDE
K JAUSER
This logical file can be processed by the query utility or by a high-level language program. If an abnormal system ending occurs, the qualified job name in the first 30 bytes of the JARES field in the journal entry describe the system job that wrote the entry at the next IPL and not the job that used the resources. For this reason, any analysis done on the JB entries should use the JAJOB, JAUSER, and JANBR fields.
Thanks, for all.
SILVARB
---------------------------------------------------------------------------------------------------------------------------------------------
<pre>
People, after this command:
DSPJRN JRN(QSYS/QACGJRN) JRNCDE((A)) ENTTYP(SP DP) OUTPUT(*OUTFILE) OUTFILE(QTEMP/ACCG)
Where I found the information about total pages on this query, cause I cannot see the field name JAPAGE
</pre>
---------------------------------------------------------------------------------------------------------------------------------------------
OK, thanks for Your help.
But, I need only the information in Journal a report to summarize only CPU usage and total pages printed.
In my DSPJRN i cannot see on the outfile(qtemp/lixo) fields JACDE, JACPU and JAPAGE this fields starts with the name JO.... and not JA...
Thanks again,
SILVARB
---------------------------------------------------------------------------------------------------------------------------------------------
In the 2nd article, note this paragraph.
We have also specified journal code A and entry type JB. Journal code A collects all the system accounting entries. Entry type JB specifies that we want only job resource information because we are going to run a report to summarize only CPU usage and total pages printed. If you want other information as well, such as specific print information, then you want to also specify entry types DP (for direct print information) and/or SP (spooled print information).
When you do the DSPJRN, include types DP and SP.
==
On the last screen, where you could not see the info, I believe that only part of the information was being display, you wouyld need to do F20 to move to right.</pre>
People, after this command:
DSPJRN JRN(QSYS/QACGJRN) JRNCDE((A)) ENTTYP(SP DP) OUTPUT(*OUTFILE) OUTFILE(QTEMP/ACCG)
Where I found the information about total pages on this query, cause I cannot see the field name JAPAGE
Display Spooled File
File . . . . . : QPQUPRFIL Page/Line 1/6
Control . . . . . Columns 1 - 130
Find . . . . . .
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....0....+....1....+....2....+....3
5722QU1 V5R3M0 040528 IBM Query for AS/400 MYSYSTEM 21/09/09 16:55:58 Page 1
Query . . . . . . . . . . . . . . . . . LIXO
Library . . . . . . . . . . . . . . . QTEMP
Query text . . . . . . . . . . . . . .
Query CCSID . . . . . . . . . . . . . . 65535
Query language id . . . . . . . . . . . ENU
Query country or region id . . . . . . US
Collating sequence . . . . . . . . . . Hexadecimal
Processing options
Use rounding . . . . . . . . . . . . Yes (default)
Ignore decimal data errors . . . . . No (default)
Ignore substitution warnings . . . . Yes
Use collating for all compares . . . Yes
Special conditions
*** All fields selected by default ***
*** All records selected by default ***
Selected files
ID File Library Member Record Format
T01 ACCG QTEMP *FIRST QJORDJE
Ordering of selected fields
Field Sort Ascending/ Break Field
Name Priority Descending Level Text
JOENTL Length of entry
JOSEQN Sequence number
JOCODE Journal Code
JOENTT Entry Type
JODATE Date of entry: Job date format
JOTIME Time of entry: hour/minute/second
JOJOB Name of Job
JOUSER Name of User
JONBR Number of Job
JOPGM Name of Program
JOOBJ Name of Object
JOLIB Objects Library
JOMBR Name of Member
JOCTRR Count or relative record number changed
JOFLAG Flag: 1 or 0
IBM Query for AS/400 21/09/09 16:55:58 Page 2
Ordering of selected fields (continued)
Field Sort Ascending/ Break Field
Name Priority Descending Level Text
JOCCID Commit cycle identifier
JOINCDAT Incomplete Data: 1 or 0
JOMINESD Minimized ESD: 1 or 0
JORES Not used
JOESD Entry Specific Data - Variable contents
Report column formatting and summary functions
Summary functions: 1-Total, 2-Average, 3-Minimum, 4-Maximum, 5-Count Overrides
Field Summary Column Dec Null Dec Numeric
Name Functions Spacing Column Headings Len Pos Cap Len Pos Editing
JOENTL 0 ENTRY 5 0
LENGTH
JOSEQN 2 SEQUENCE 10 0
NUMBER
JOCODE 2 CODE 1
JOENTT 2 TYPE 2
JODATE 2 DATE 6
JOTIME 2 TIME 6 0
JOJOB 2 JOB 10
NAME
JOUSER 2 USER 10
NAME
JONBR 2 JOB 6 0
NUMBER
JOPGM 2 PROGRAM 10
NAME
JOOBJ 2 OBJECT 10
NAME
JOLIB 2 LIBRARY 10
NAME
JOMBR 2 MEMBER 10
NAME
JOCTRR 2 COUNT/ 10 0
RRN
JOFLAG 2 FLAG 1
JOCCID 2 COMMIT 10 0
CYCLE ID
JOINCDAT 2 INCOMPLETE 1
DATA
JOMINESD 2 MINIMIZED 1
ESD
JORES 2 RESERVED 6
JOESD 2 SPECIFIC 100
DATA
IBM Query for AS/400 21/09/09 16:55:58 Page 3
Selected output attributes
Output type . . . . . . . . . . . . . . Display
Form of output . . . . . . . . . . . . Detail
Line wrapping . . . . . . . . . . . . . No
* * * * * E N D O F Q U E R Y P R I N T * * * * *