**************************************************************************
* DBGDPRO0: *OUTFILE for DSPPGMREF command
* Copyright (C) 2000 Martin Rowe <martin@dbg400.net>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software Foundation,
* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
**************************************************************************
A R QWHDRPPR
A WHLIB 10 TEXT('Library')
A COLHDG('Library')
A WHPNAM 10 TEXT('Program')
A COLHDG('Program')
A WHTEXT 50 TEXT('Text ''description''')
A COLHDG('TEXT' +
A 'Text' +
A '''Description''')
A WHFNUM 5S 0 TEXT('Number of objects reference +
A d')
A COLHDG('Number Of' +
A 'Objects Referenced')
A WHDTTM 13 TEXT('Retrieval date: century/da +
A te/time')
A COLHDG('Retrieval' +
A 'Date And Time')
A WHFNAM 11 TEXT('Object referenced: 1=*EXPR')
A COLHDG('Object' +
A 'Referenced')
A WHLNAM 11 TEXT('Library referenced: 1=*EXPR')
A COLHDG('Library')
A WHSNAM 11 TEXT('File name in source program +
A : 1=*EXP')
A COLHDG('Source' +
A 'File Name')
A WHRFNO 3S 0 TEXT('Number of record formats re +
A ferenced')
A COLHDG('Number Of' +
A 'Record Formats')
A WHFUSG 2S 0 TEXT('1=I,2=O,3=I/O,4=U,5=I/U,6=O +
A /U,7=I/O')
A COLHDG('File Usage')
A WHRFNM 10 TEXT('Record format referenced')
A COLHDG('Record' +
A 'Format')
A WHRFSN 13 TEXT('Format level identifier')
A COLHDG('Format Level' +
A 'Identifier')
A WHRFFN 5S 0 TEXT('Number of fields')
A COLHDG('Number Of' +
A 'Fields')
A WHOBJT 1 TEXT('Object type: F=File, P=Prog +
A ram, D=D')
A COLHDG('Object' +
A 'Type')
A WHOTYP 10 TEXT('Object type')
A COLHDG('Object' +
A 'Type')
A WHSYSN 8 TEXT('System Name (Source System, +
A if file')
A COLHDG('System' +
A 'Name')
A WHSPKG 1 TEXT('PGM=P, SQLPKG=S, SRVPGM=V, +
A MODULE=M')
A COLHDG('Referencing' +
A 'Object' +
A 'Type')
A WHRFNB 5S 0 TEXT('Number of record formats re +
A ferenced')
A COLHDG('Number Of' +
A 'Record Formats')
--
MartinRowe - 18 Jun 2005