ISP

International
Software Products

ASI2 Code Samples

Sample ASI2 Statements for selecting IDD Data>

 

 

Notes regarding the following code Samples:

  1. The samples use the 'REUSE ;' statement. An initial run using the 'DBNAME ;' statement would be used to catalog the SYSPCH dataset and/or member.
  2. For ASI2LR, the 'CONTROL' statement and related 'FROM' and 'PARTIAL' or 'COMPLETE statements would be replaced by a standard CA-IDMS LRF DML statement.

 

SAMPLE #3:

  • Retrieve all LOADHDR-156 records from the LOAD area with names beginning with KC and OC.
  • Select only the LOAD module name, VERSION, DATE and TIME fields.
  • Sort by NAME, VERSION, DATE and TIME before printing.

 

PROC ASI2 OUT=TEST ;
REUSE ;
DB IDMSNWKA WITHIN IDMSNTWK VERSION 1. ;
CONTROL LOADHDR-156 SEQUENTIAL DDLDCLOD COMPLETE
WHEN LOADHDR-MODNAME-156 EQ KC*
OR LOADHDR-MODNAME-156 EQ OC*;
SELECT LOADHDR-MODNAME-156 LOADMOD ;
SELECT LOADHDR-VERS-156 LOADVER C ;
SELECT LOADHDR-DATE-156 LOADDATE;
SELECT LOADHDR-TIME-156 LOADTIME;
PROC SORT ; BY LOADMOD LOADVER LOADDATE LOADTIME ;

PROC PRINT ; 

 

ASI2/ASI2LR Sample 1

ASI2/ASI2LR Sample 2

ASI2/ASI2LR Sample 3

All Trademarks Acknowledged

Copyright 1987 - 2009 International Software Products