IOCDS example

Sample IOCDS code.

         ID    SYSTEM=(2817,1),LSYSTEM=SYS1,                           *        
               TOK=('SY1',...,...,'12-08-10','hh:mm:ss','SYS4','IODFxx') 
         RESOURCE PARTITION=(((LPAR1,1),(LPAR2,2))))
         CHPID PATH=(CSS(2),3C),SHARED,SWITCH=ss,PCHID=pc1,TYPE=FC,    *        
               PARTITION=((CSS(2),(LPAR1,LPAR2),=))
         CHPID PATH=(CSS(2),3D),SHARED,SWITCH=ss,PCHID=pc2,TYPE=FC,    *        
               PARTITION=((CSS(2),(LPAR1,LPAR2),=))
         CHPID PATH=(CSS(2),3E),SHARED,SWITCH=ss,PCHID=pc3,TYPE=FC,    *        
               PARTITION=((CSS(2),(LPAR1,LPAR2),=))
         CHPID PATH=(CSS(2),3F),SHARED,SWITCH=ss,PCHID=pc4,TYPE=FC,    *        
               PARTITION=((CSS(2),(LPAR1,LPAR2),=))
*
*
*	   16 "STRAIGHT" FCTC connections between LPAR1 and LPAR2 on CHPID 3C
*
*        CNTLUNIT D000 on CHPID 3C "points to" LPAR2 (LINK=18, CUADD=2)
         CNTLUNIT CUNUMBR=D000,PATH=((CSS(2),3C)),UNITADD=((00,256)),  *        
               LINK=((CSS(2),18)),CUADD=2,UNIT=FCTC                            
*
*        DEVICES D000-D00F on LPAR1 are on D000 (which "points to" LPAR2)
         IODEVICE ADDRESS=(D000,016),CUNUMBR=(D000),STADET=Y,          *        
               PARTITION=((CSS(2),LPAR1)),UNIT=FCTC                           
*
*        CNTLUNIT D001 also on CHPID 3C "points to" LPAR1 (LINK=18, CUADD=1)
         CNTLUNIT CUNUMBR=D001,PATH=((CSS(2),3C)),UNITADD=((00,256)),  *        
               LINK=((CSS(2),18)),CUADD=1,UNIT=FCTC                            
*
*        DEVICES D000-D00F on LPAR2 are on D001 (which "points to" LPAR1)
         IODEVICE ADDRESS=(D000,016),CUNUMBR=(D001),STADET=Y,          *        
               PARTITION=((CSS(2),LPAR2)),UNIT=FCTC
*
*
*	   16 "CROSSED" FCTC connections between LPAR1 and LPAR2
*        on CHPIDs 3C and 3D
*
*        CNTLUNIT D010 on CHPID 3C "points to" CHPID 3D/LPAR2 (LINK=19, CUADD=2)
         CNTLUNIT CUNUMBR=D010,PATH=((CSS(2),3C)),UNITADD=((00,256)),  *        
               LINK=((CSS(2),19)),CUADD=2,UNIT=FCTC                            
*
*        DEVICES D010-D01F on LPAR1 are on D010 (which "points to" LPAR2)
         IODEVICE ADDRESS=(D010,016),CUNUMBR=(D010),STADET=Y,          *        
               PARTITION=((CSS(2),LPAR1)),UNIT=FCTC                           
*
*        CNTLUNIT D011 on CHPID 3D "points to" CHPID 3C/LPAR1 (LINK=18, CUADD=1)
         CNTLUNIT CUNUMBR=D011,PATH=((CSS(2),3C)),UNITADD=((00,256)),  *        
               LINK=((CSS(2),18)),CUADD=1,UNIT=FCTC                            
*
*        DEVICES D010-D01F on LPAR2 are on D011 (which "points to" LPAR1)
         IODEVICE ADDRESS=(D010,016),CUNUMBR=(D011),STADET=Y,          *        
               PARTITION=((CSS(2),LPAR2)),UNIT=FCTC