LABEL    PROC  P,1,VOL=RUN,DVC,EXT=(DA,,1,CYL,1)                        ALL00010
ALLOC    NAME                                                           ALL00020
ALL      NAME                                                           ALL00030
// DVCVOL      &VOL,&DVC                                                ALL00040
// LBL &P(1,1)                                                          ALL00045
// EXT &EXT(1),&EXT(2),&EXT(3),&EXT(4),&EXT(5),&EXT(6),&EXT(7),&EXT(8),XALL00050
//1 &EXT(9),&EXT(10),&EXT(11),&EXT(12),&EXT(13),&EXT(14),&EXT(15),     XALL00051
//2 &EXT(16),&EXT(17),&EXT(18),&EXT(19),&EXT(20),&EXT(21),&EXT(22),    XALL00052
//3 &EXT(23),&EXT(24),&EXT(25),&EXT(26),&EXT(27),&EXT(28),&EXT(29),    XALL00053
//4 &EXT(30),&EXT(31),&EXT(32),&EXT(33),&EXT(34),&EXT(35),&EXT(36),    XALL00054
//5 &EXT(37)                                                            ALL00060
//       IF    ('&LABEL' EQ '')LAB1                                     ALL00070
// LFD   &LABEL,&P(1,2),&P(1,3)                                         ALL00080
//       GO    LAB2                                                     ALL00090
//LAB1   LFD   &P(1,1),&P(1,2),&P(1,3)                                  ALL00100
//LAB2   NOP                                                            ALL00110
         END                                                            ALL00120
