RE: DSPPGMREF output confusion

No different record definitions, no DS or anything. The only thing in
the program is the F spec, 1 SETLL, 2 READ's, and 1 WRITE. Other files
have a similar thing happening although some only show up twice.

Scott

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Scott Klement
Sent: Friday, August 24, 2012 8:31 AM
To: Midrange Systems Technical Discussion
Subject: Re: DSPPGMREF output confusion

hi Scott,

I see the difference between them is the "field count" value. Do you
have different record definitions that you use in different places in
your program? Would that explain the three entries?



On 8/24/2012 9:18 AM, Scott Mildenberger wrote:

I ran DSPPGMREF on a RPGLE program and am confused why a file used in
the program shows up 3 times in the list.



The file is defined in the program as :

fCOMSGS UF A E K disk

It is used in a Chain, Read, and Write - in all cases nothing special,

all fields are read or written. The file has 8 fields and the key is
2 fields. The program does use a SRVPGM and I verified that nothing
in that service program uses this file.



The 3 references from DSPPGMREF are shown below. Note that the Format

Level on reference and number of fields on reference 1 match the
actual file as shown by DSPFD. Reference 2 shows fewer fields and
Reference 3 shows 22 fields (way more than the file contains) and both

References have a different format id.



1. Object . . . . . . . . . . . . . . . . . . : COMSGS

Library . . . . . . . . . . . . . . . . . : TRUCKLIB

Object type . . . . . . . . . . . . . . . : *FILE

File name in program . . . . . . . . . . : COMSGS

File usage . . . . . . . . . . . . . . . : Input

Output

Update

Number of record formats . . . . . . . . : 1

Record Format Format Level Identifier Field Count

COMSGSR 41B94C2FAB7F7 8



2. Object . . . . . . . . . . . . . . . . . . : COMSGS

Library . . . . . . . . . . . . . . . . . : TRUCKLIB

Object type . . . . . . . . . . . . . . . : *FILE

File name in program . . . . . . . . . . : COMSGS

File usage . . . . . . . . . . . . . . . : Input

Output

Update

Number of record formats . . . . . . . . : 1

Record Format Format Level Identifier Field Count

COMSGSR 302543348E8EF 6



3. Object . . . . . . . . . . . . . . . . . . : COMSGS

Library . . . . . . . . . . . . . . . . . : TRUCKLIB

Object type . . . . . . . . . . . . . . . : *FILE

File name in program . . . . . . . . . . : COMSGS

File usage . . . . . . . . . . . . . . . : Input

Output

Update

Number of record formats . . . . . . . . : 1

Record Format Format Level Identifier Field Count

COMSGSR 38143C64A2B48 22



I am confused why the 3 different references?????



Thanks,



Scott Mildenberger

Programmer/Analyst

Davis Transport Inc.

Missoula, MT

406-728-5510 x128

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.