1 CALL  "CEEDATE"  USING  input_Lilian_date,  picture_string,  output_char_date,  fc.