COBOL user exit routines (input phase user exit)