//STEP02   EXEC PGM=SORT                           

//SYSOUT   DD SYSOUT=*                             

//SORTIN   DD DSN=USERID.ABC.VBFORMAT,DISP=SHR    

//SORTOUT  DD DSN=USERID.ABC.FBFORMAT,              

//            DISP=(,CATLG,DELETE),UNIT=SYSDA,     

//            DCB=(LRECL=80,RECFM=FB)              

//SYSIN    DD  *                                   

  SORT FIELDS=COPY                                 

  OUTREC FIELDS(1:20,80),CONVERT                                                  

/*     

 

; /* Google-Ads1 */ google_ad_slot = "6312586367"; google_ad_width = 468; google_ad_height = 60;