Create interro1.cbl and entete.cbl