The IDENT function creates a list of source library names vs. their internal program names. This is done by examining each selected source library member, and searching for it's 'PROGRAM-ID' (for COBOL,) or it's equivalent in Assembler and PL/1.
SV RELEASE: C306M1C FUNCTION: WHERE
VBASE: O : ADPRBH1.ZEX.VBASE DATE: 06/14/2003
SYSLIB: O : ADPRBH1.ZEX.SOURCE TIME: 11:18
ALTLIB: N : *** NOT ALLOCATED *** EXEC: BACKGROUND
COPYLIB: O : ADPRBH1.ZEX.COPY TAPE: D00110
C2COPY: O : ADPRBH1.ZEX.COPY2 USERID: ADPRBH1H
P1PROC: O : ADPRBH1.ZEX.PROC
P2PROC: N : *** NOT ALLOCATED ***
JOBCNTL: O : ADPRBH1.ZEX.JOB
OUTLIB: O : ADPRBH1.ZEX.OUTLIB
PMHELP: N : *** NOT ALLOCATED ***
S1SCEN: N : *** NOT ALLOCATED ***
S2SCEN: N : *** NOT ALLOCATED ***
L1LOAD: I : ADPRBH1.ZEX.LOAD
L2LOAD: N : *** NOT ALLOCATED ***
@SV INPUT:
@SV.IDENT TITLE='IDE: '
@SV MEM=*
@SV
@SV
@SV ERR=GO,PMR=NO
PROGRAM ID LIST IDE: ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 1
RPT USER MEMBER PROGRAM
LINE CODES NAME IDENT
1--------- 11-------- 21------
1 C APPLLOAD APPLLOAD
2 C APPLMAIN APPLMAIN
3 C APPLRFMT APPLRFMT
4 C APPLSRCH APPLSRCH
5 AI ASMSMPL A
6 C CTLCRE8 CTLCRE8
7 C CTLRPT CTLRPT
PROGRAM-ID. ISAM-STATUS. 00020000
PM@ENT-06 PROGRAM-ID NAME LENGTH EXCEEDS 8 SEE CTLSTAT
--------------------
8 CI CTLSTAT ISAM-STA
9 C CTLUPDT CTLUPDT
10 P EMPLFN EMPLFN M
11 C EUROCUR EUROCUR
12 A FILEFILE FILEFILE
13 PI PL1SMPL SAMPLE M
14 PI PMRUNSTD PMRNSTD M
PROGRAM ID LIST EXCEPTIONS: PROGRAM IDENT AND MEMBER NAME NOT THE SAME ADPAC, USE BY AGREEMENT ONLY 06/14/2003 PAGE 2
RPT USER MEMBER PROGRAM
LINE CODES NAME IDENT
1--------- 11-------- 21------
1 AI ASMSMPL A
2 CI CTLSTAT ISAM-STA
3 PI PL1SMPL SAMPLE M
4 PI PMRUNSTD PMRNSTD M
PM@000-10 NORMAL EOJ CPU HRS:00 MIN:00 SEC:01.94
--------------------