Help for CPD0714

A do group was open at the end of the program.

Add the missing ENDDO command. Then try the CRTCLPGM command again.