Format Level Identifier

[Mercury]

Hi there,

I'm trying to match the Format Level Identifier of the program files against the files Format Level Identifier.


To do so, I use the 3 following commands to outfiles :

• DSPPGMREF to get the programs and service programs name along with Format Level Identifier.
• DSPOBJD to get onmy the *PGM and *SRVPGM object types
• DSPFD to get the File Format Level Identifier.

and the following sql stm

select WHLIB, WHPNAM, ODOBAT, WHTEXT, RFFILE, RFFTXT, WHRFSN, RFID
  from PROGRAMS 
  join FILES                                                 
  on WHFNAM = RFFILE                                                   
  join OBJECTS                                                         
  on ODOBNM = WHPNAM                                                   
  where WHOBJT = 'F'                                                 
  and WHRFSN <> RFID 

I want to check if file level check error could be in power. I get this on every program type but the WHRFSN field is always blank for CL objects.

Any insights ?

Thanks in advance.

[GLS400]

Re: Format Level Identifier

Hi Mercury:

Unless you're reading/writing to a file Level check does not come into play. Commands like clrpfm, addpfm, rmvm, etc. reference a file (and are in dsppgmref) but do not care about the file level.

If you use DCLF, RCVF in your CL I think you will see WHRFSN filled in.

Best of Luck
GLS

[Mercury]

Re: Format Level Identifier

True Greg. Thanks a lot.