*if not $true(osv$unix)
*copyc amc$condition_code_limits
?? NEWTITLE := 'AMDVFID :File_identifier valid   : ''AM'' 400 .. 409', EJECT ??
*else
*copyc amc$ecc_range
*ifend
?? FMT (FORMAT := OFF) ??

{ AME$IMPROPER_FILE_ID }

   CONST
*if not $true(osv$unix)
     amc$min_ecc_fid_validation      = amc$min_ecc_validation + 400,

     ame$improper_file_id            = amc$min_ecc_fid_validation + 5,
         {E  +P1 issued but file_identifier parameter value is..
         { improper.}

     amc$max_ecc_fid_validation      = amc$min_ecc_fid_validation + 9;
*else

     ame$improper_file_id            = amc$min_ecc + 1;
     {E  +P1 issued but file_identifier parameter value is..
     { improper.}

*ifend
?? FMT (FORMAT := ON) ??
*if not $true(osv$unix)
?? OLDTITLE ??
*ifend
