Utility Statements › RESTRUCTURE CONNECT › Examples and Sample Output

Examples and Sample Output

To illustrate the use of the RESTRUCTURE CONNECT utility, the RESTRUCTURE utility is run first to add pointers to a set. The RESTRUCTURE CONNECT utility is then executed to update the prefix portion of affected records with pointers.

Adding set pointers

The following example directs the RESTRUCTURE utility to use the base restructuring table, LRDKRSTT, to add prior pointers to the owners and members of set A-B and owner pointers to the members of set A-B.

Input to RESTRUCTURE

RESTRUCTURE empdemo using restr01
     rsttmod lrdkrstt continue yes;

Output from RESTRUCTURE

When the RESTRUCTURE operation is completed, the following listing is generated.

IDMSBCF                                              IDMS Batch Command Facility                            mm/dd/yy   PAGE 1

   RESTRUCTURE EMPDEMO USING RESTR01
        RSTTMOD LRDKRSTT CONTINUE YES;
 UT000038 Starting Restructure of area EMPDEMO.EMP-DEMO-REGION
 UT000041 Completed processing of area EMPDEMO.EMP-DEMO-REGION, Pages read=10  Records read=6
 UT011023   Record name AA  Found=2  Changed=2  Ldel=0
0UT000038 Starting Restructure of area EMPDEMO.INS-DEMO-REGION
 UT000041 Completed processing of area EMPDEMO.INS-DEMO-REGION,  Pages read=10  Records read=3
 UT011023   Record name BB  Found=3  Changed=3  Ldel=0
 Status = 0

Connecting prior and owner pointers

To complete this restructure operation, the RESTRUCTURE CONNECT utility is executed to connect the prior and owner pointers in all occurrences of set A-B after restructuring records A and B.

Input to RESTRUCTURE CONNECT

restructure connect segment empdemo using EMPSS01
     rsttmod lrdkrstt continue yes;

Output from RESTRUCTURE CONNECT

When the RESTRUCTURE CONNECT operation is completed, the following listing is generated.

IDMSBCF                                              IDMS Batch Command Facility                            mm/dd/yy   PAGE 1

   RESTRUCTURE CONNECT SEGMENT EMPDEMO USING EMPSS01
        RSTTMOD LRDKRSTT CONTINUE YES;
 UT000038 Starting Connect of area EMPDEMO.EMP-DEMO-REGION
 UT000041 Completed processing of area EMPDEMO.EMPDEMO-REGION,  Pages read=10  Records read=6
 UT011023   Record name AA  Found=2  Changed=2  Ldel=0
 UT000038 Starting Connect of area EMPDEMO.INSDEMO-REGION
 UT000041 Completed processing of area EMPDEMO.INSDEMO-REGION,  Pages read=10  Records read=3
 UT011023   Record name BB  Found=3  Changed=3  Ldel=0
 Status = 0