String And Unstring In Cobol