ADAINV Definitions

The function Generate ADAINV Definitions generates input data for the Adabas utility ADAINV from Predict file objects of type A.

The function applies to the following Adabas versions:

  • IBM/Siemens Version 5.1 or above

  • UNIX Version 2.1 or above

  • VMS Version 2.1 or above

Predict checks against the implemented Adabas file which descriptors are already defined and generates the ADAINV definition only for the additional descriptors in Predict.

If Adabas Online Services are installed, ADAINV couple cards are generated additionally if file relations of type C (physically coupled) are documented but not implemented for the file.

When using Adabas version 7 or above on mainframes with Adabas Online Services installed or Adabas on a Windows or UNIX platform, the invert function can be executed as part of the Generate Adabas file function. In this case it is not necessary to adapt the FDT in a three step process (i.e. generate Adabas file, generate ADAINV and execute ADAINV).

In all other configurations, before using the ADAINV utility with Predict, it is recommended to first generate the Adabas FDT, then the ADAINV definitions.

The output generated from this function is used as input for the ADAINV functions INVERT and COUPLE in one member. The output must be punched and edited as necessary. See Sample Output.

This document covers the following topics:


Calling the Function

The Generate ADAINV Definitions screen is displayed with function code G and object code AI in a Predict main menu, or with the command GENERATE ADAINV.

09:13:47              *****  P R E D I C T  *****            2007-05-31
Plan   0               - Generate ADAINV Definitions -

Current VM ............... HOME                                             
File ID .................*                                                  
Phys. File number ........                                                  
Contained in DA ..........                                                  
Phys. Database number ....                                                  

Save as member ...........                       Save in library .... INVLIB
Overwrite option ......... Y        (Y,N)        Op. system member ..       
Punch / output ..........* N                                                

List generated code ...... Y        (Y,N)        Adabas version ....* I7    
SORTSIZE .................          C/B ... C    SORTDEV ...........*       
TEMPSIZE .................          C/B ... C    TEMPDEV ...........*       
Work pool size ...........          KB/B .. KB   Cipher code ........       
Prefetch buffer size .....          KB/B .. KB   Adabas password ....       
Handle UQ conflict ......* A                                                

Command ===>
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
      Help  Next  Stop  Last  LnkEl Flip  Print Impl  AdmFi SelFi Prof  Main

Parameters

Values for fields which have been locked by your data dictionary administrator cannot be overwritten. These fields are skipped when positioning the cursor with the TAB key. See Generation Defaults.

The parameter below can be changed in the Modify ADAINV Defaults screen. See Generation Defaults.

Presetting
Library system Library system for which the generated code is punched. Determines which additional cards need to be punched. An operating system member must be entered for the additional cards to be generated. See Parameters Specifying the Form of Output for more information.
Parameters
The parameters Save as member, Save in library, Overwrite option, Op. system member, Punch/output, Workfile name and List generated code are described in the section Parameters Specifying the Form of Output.
Current VM Read-only field. ADAINV definitions can only be generated from Predict file objects contained in databases accessible from the current virtual machine.
File ID, Phys. file number, Contained in DA, Phys. database number ADAINV definitions are generated for an Adabas file. The file must not be marked as Adabas system file. The file is identified either by file ID or physical file number in the database. The database can be identified either by database ID or physical database number. If one physical file number and one physical database number are not identified uniquely, a selection screen appears. The identified Adabas file must be implemented, because Predict performs the Adabas LF commands to check which descriptors are already defined.
SORTSIZE, TEMPSIZE Both values must be entered (cylinders or blocks).
SORTDEV, TEMPDEV Only required if the value is different from that specified with the ADARUN DEVICE parameter.
Work pool size Both values can be specified in bytes or in kilobytes.
Prefetch buffer size If no value is specified, the default size is taken.
Cipher code Applies only to files marked in Predict as ciphered. Specifies the value of the cipher code parameter to be generated in the ADAINV control statement.
Adabas password If the file specified is security protected, an appropriate Adabas password must be supplied.
Handle UQ conflict
Determines system response if descriptor is not unique. This parameter only applies to Adabas versions VMS 2.1 or above and UNIX 1.2 or above.
A Abort
R Reset

Generate ADAINV Definitions in Batch Mode

Command: GENERATE ADAINV

Enter parameters on next line in positional or keyword form. File ID is obligatory, all other parameters are optional. If a parameter is not specified, the default value is taken.

Field Keyword Position
File ID FILE-ID 1
Phys. file number FNR 2
Database ID DB 3
Phys. database number DBNR 4
Save as member MEM 5
Save in library LIB 6
Overwrite option REPLACE 7
Op. system member OS-MEMBER 8
Punch / output PUNCH 9
List generated code LIST 10
Adabas version ADA-VER 11
SORTSIZE SORTSIZE 12
C/B SORTSIZE-TYPE 13
SORTDEV SORTDEV 14
TEMPSIZE TEMPSIZE 15
C/B TEMPSIZE-TYPE 16
TEMPDEV TEMPDEV 17
Work pool size LWP 18
KB/B LWP-TYPE 19
Cipher code CIPHER 20
Prefetch buffer size LPB 21
KB/B LPB-TYPE 22
Adabas password PSW 23
Handle UQ conflict UQ-CONFLICT 24
Workfile name (see note below)  WORKFILE-NAME 25
If Entire System Server is used  
- DB-ID NP-DBID 26
- Data set NP-DSNAME 27
- Volume NP-VOLSER 28
- Library NP-LIB 29
- Sublibrary NP-SUBLIB 30
- Member type NP-MEMTYPE 31
- VSAM catalog NP-VSAMCAT 32

Note:
You cannot specify a value other than blank (' ') for WORKFILE-NAME on mainframes.

Parameters NP-LIB, NP-SUBLIB and NP-MEMTYPE must be specified if the generated code is written to workfile 1 (Punch/output=Y) and Library system=3.

Sample Output

ADAINV INVERT FILE=171
ADAINV TEMPSIZE=60
ADAINV SORTSIZE=40,SORTDEV=3380
ADAINV FIELD='AD'
ADAINV HYPDE='04,S2,4,F,FI,MU,PE=AP,AF'
/*
ADAINV COUPLE
ADAINV TEMPSIZE=60
ADAINV SORTSIZE=40,SORTDEV=3380
ADAINV FILES=171,172,DESCRIPTOR='AD,AA'

DIC1800 SUMMARY:    27 FIELD(S) PROCESSED