1 CALL  "CEECBLDY"  USING  input_char_date,  picture_string,  output_Integer_date,  fc.