Description:
This Knowledge Document shows one possibility how to use the "dynamic PSB feature" of the CA MAX IMS Software to browse an IMS data base.
Solution:
Important note: There is another Knowledge Document, called "How to prepare using the CA MAX IMS dynamic PSB feature?" what shows which steps need to be done in order to use the feature as shown below.
MAX ---------------------- IMS/UTIL PROFILE OPTIONS ---------------------- MAXNotes:
COMMAND ===>
Press ENTER to update profile, or END to exit profile processing
Press DOWN to scroll forward, or UP to scroll backward
More: +
Edit log dataset work unit name: SYSALLDA (Exam: SYSALLDA)
Primary number cylinders . . : 0 (0 = No logging)
Secondary number cylinders . : 0
Log data set disposition . . : (P,PD,D,K,KN)
Search limit (run away search) : 10000 (0 = No limit)
"COPYBOOK" special processing
TSO procedure name . . . . . : (Exam: MAXEXIT1)
Subsystem for copybook process :
Specify character set to use . : DEFAULT (Default, CP870, CP838)
PSB identification exit
TSO procedure name . . . . . : (Exam: MAXIY001)
DFSRRC00 processing exit
TSO procedure name . . . . . : (Exam: MAXIX001)
BMP parameter values to be used
PARM=(BMP,<MBR>,<PSB>,,,C00000,,,,1,,15,15,<IMSID>,<AGN>,,,,,0)
Application Group Name <AGN> : IVP (from DSNL)
DLI BATCH parameter values to be used
PARM=(DLI,<MBR>,<PSB>,7,0000,,0,,N,,T,<IMSID>,Y,N,N,,N,,,,0,,)
DFSVSAMP dataset name. . . . : 'your.MXRXV340.JCL(DFSVSMDB)'
Miscellaneous parameter values
COPE environment active. . . : NO (NO, YES)
DBD Library datasets (specify at least one)
DBDLIB 1 (from DSNL) . . . . : 'IMS.DBD.LOAD'
DBDLIB 2 (from DSNL) . . . . :
PSB Library datasets (specify at least one)
PSBLIB 1 (from DSNL) . . . . : 'IMS.PSB.LOAD'
PSBLIB 2 (from DSNL) . . . . :
TASKLIB datasets
IMS/UTIL LOADLIB . . . . . . : 'your.MXRXV340.LOADLIB'
User LOADLIB (from DSNL) . . :
Authorized RESLIB datasets
User RESLIB (from DSNL). . . : 'IMS.SDFSRESL'
RESLIB datasets allocated when accessing specified IMSID (Blank matches ALL)
1. IMSID: IMS RESLIB: 'IMS.SDFSRESL'
2. IMSID: RESLIB:
3. IMSID: RESLIB:
4. IMSID: RESLIB:
5. IMSID: RESLIB:
...
MAX IMS/UTIL -------------- SPECIFY A DATABASE NAME ------------- MAX IMS/UTIL
COMMAND ===>
Select one of the following. Then press Enter.
1 0. Profile parameters 4. update/search/Count database
1. Browse database 5. Unload database
2. Edit database 6. Load database
3. IMS utilities 7. build Mapping criteria
8. compAre database
Specify an IMS Database:
IMSID ===> IMSY (enter '?' to view list of valid ID's)
PSB NAME ===> DYNAM (DYNAM/DYNAMSEG to build dynamic PSB)
PCB/DBD NAME ===> CAWKIVD (#n=rel DB PCB num, *=DB selection)
IMS RUN MODE ===> DLI (BMP, DLI)
INITIAL DISPLAY ===> UNFORMATTED (Dump,Formatted,Unformatted,Horizontal)
SEGMENT SELECT ===> NO (No, Yes)
Specify copybook, or mapping criteria library and member (formatted mode)
DATA SET NAME ===>
COPYBOOK TYPE ===> (Cobol, Pl1)
(c) Copyright MAX SOFTWARE, Inc. 1993-2005. All rights reserved.
MAX - DLI DATABASE ALLOCATION FOR PSB=DYNAM/CAWKIVD
COMMAND ===>
Press ENTER to allocate files, or END to cancel DFSRRC00 processing
Press DOWN to scroll forward, or UP to scroll backward
DDNAME DATASET NAME DISP
More: +
1. CAWKIVD 'IMS.CAWKIVD.DSN' SHR
2. CAWKIVDI 'IMS.CAWKIVDI.DSN' SHR
3. SHR
4. SHR
5. SHR
6. SHR
7. SHR
8. SHR
9. SHR
10. SHR
11. SHR
12. SHR
13. SHR
14. SHR
15. SHR
MAX UNFORMATTED BROWSE PSB=DYNAM/CAWKIVD COL 00001 00068
COMMAND ===> SCROLL ===> PAGE
Display: DD - Dump Style DF - Formatted DH - Horizontal ED - EDit data
Read: N - Next T/R/CH P - Prev T/R/PA L - Locate key
SEGMENT LV SEL=OFF SIZE=247 KEY=00001
STUDENT 01 00001DAVID PERKINS 1221209 W. 75TH ST SMITH
SUBJECT 02 C315INTRO TO BIOCHEM 40C210CHEMISTRY I B220BIOLOGY I
TEACHER 03 DOROTHY ROPER PHD C10104 FERN CT. SMITH
CLASS 04 0401L98LECTURE 0050
SUBJECT 02 H316US CIVIL WAR 30
TEACHER 03 SAM SANDERSON BS H6B1860 BOOTH ST. SMITH
CLASS 04 0201182LECTURE 0025
SUBJECT 02 L304SHAKESPEARE 30E321JR ENGLISH I E322JR ENGLISH II
TEACHER 03 ANGELINA ORTEGA BS L412091 PLEASANT HILL RD. CONNE...