Any body knows about cobol program i got this error in every program?

Not sure if this is the reason for your error, but you never read any INPU records after reopening it for input. Therefore, when you do your MOVE CORR, you could be picking up any old garbage in the buffer.