?? NEWTITLE := '  nfe$ptf_condition_codes', EJECT ??

*copyc nfc$abnormal_conditions
  CONST
    nfc$ptf_status_condition = nfc$min_status_condition + 300;

  CONST
    nfe$remote_val_defined =             nfc$ptf_status_condition + 00,
    {E Remote validation already defined for location +P.}

    nfe$remote_val_empty   =             nfc$ptf_status_condition + 01,
    {E No remote validation has been defined.}

    nfe$remote_val_undefined =           nfc$ptf_status_condition + 02,
    {E Remote validation undefined for location +P.}

    nfe$remote_val_device_error =        nfc$ptf_status_condition + 03,
    {E Illegal device for remote validation display.}

    nfe$both_files_remote =              nfc$ptf_status_condition + 05,
    {E Attempted copy with both files remote.}

    nfe$display_output_remote =          nfc$ptf_status_condition + 06,
    {E Output for +P may not be a remote file.}

    nfe$remote_file_not_ms =             nfc$ptf_status_condition + 07,
    {E Remote file +P not on mass storage device.}

    nfe$encountered_eoi =                nfc$ptf_status_condition + 10,
    {E +P encountered EOI.}

    nfe$directives_missing =             nfc$ptf_status_condition + 11,
    {E No server directives for +P.}

    nfe$multiple_file_transfers =        nfc$ptf_status_condition + 15,
    {E Only one file transfer allowed per remote access.}

    nfe$remote_access_terminated =       nfc$ptf_status_condition + 16,
    {E Remote access terminated.}

    nfe$call_not_permitted =             nfc$ptf_status_condition + 17;
    {E PTFS may be called only from the server application.}

?? FMT (FORMAT:=ON) ??

?? OLDTITLE ??
