I'm getting JCL error 838 and the error messages I'm seeing are: "IEFC006I Positional parameters must be specified before keyword parameter" and "IEFC001I Procedure comp was expanded using instream procedure definiti"

This is what I've typed up:

 //TSOZA601  JOB 3ES10G10000012,'TSOZA60',MSGCLASS=Q,MSGLEVEL=(1,1),
 //          NOTIFY=TSOZA60,CLASS=A,REGION=2M
 //COMP      PROC
 //*****
 //*****   MAKE BACKUP
 //*****
 //S1        EXEC PGM=IEBCOPY
 //SYSPRINT1 DD  SYSOUT=*
 //SYSUT1    DD  DISP=SHR,DSN=TSOZA60.ES10.CNTL
 //SYSUT2    DD  DISP=(,CATLG),DSN=TSOZA60.ES10.BACK,
 //          LIKE=TSOZA60.ES10.CNTL
 //SYSIN     DD  DUMMY
 //IFOK1     IF  (S1.RC=0) THEN
 //*****
 //*****    COMPRESS DATASET
 //*****
 //S2        EXEC PGM=IEBCOPY
 //SYSPRINT  DD   SYSOUT=*
 //SYSUT1    DD   DISP=SHR,DSN=TSOZA60.ES10.CNTL
 //SYSUT2    DD   DISP=OLD,DSN=TSOZA60.ES10.CNTL
 //SYSIN     DD   DUMMY
 //IFOKEND1  ENDIF
 //IFOK2     IF   (S2.RC=0)  THEN
 //*****
 //*****     COMPRESS SUCCESSFUL, DELETE BACKUP
 //*****
 //S3        EXEC PGM=IEFBR14
 //DD1       DD   DISP=(OLD,DELETE),DSN=TSOZA60.ES10.BACK
 //IFOKEND2  ENDIF
 //          PEND
 //FINAL     EXEC COMP
 //S1.SYSUT1   DD   DSN=TSOZA60.COPY.CNTL
 //S1.SYSUT2   DD   DSN=TSOZA60.ES10.BACK
 //S2.SYSUT1   DD   DSN=TSOZA60.COPY.CNTL
 //S2.SYSUT2   DD   DSN=TS0ZA60.COPY.CNTL
 //S3.DD1      DD   DSN=TSOZA60.ES10.BACK