ZTDPCLP 
ASCII 
COMMON
*NOSEQ
*WIDTH 95 
  
^0 ZTDPCLP  CLP ^C^O^M^M^O^N ^D^E^C^K^S ^2
  
*CALL ZCLPSPL 
*CALL ZCLPEXP 
*CALL ZCLPTOK 
*CALL ZCLPGPV 
*CALL ZCLPGSC 
*CALL ZCLPTPS 
*CALL ZCLPFVT 
*CALL ZCLPV2S 
*CALL ZCLPV2I 
*CALL ZCLPV2B 
