*******************************************
* MAJ CESU : Cration de l'enregistrement *
* AnomaliesCESU dans le fichier TABLES    *
*******************************************

EXECUTE "SET-THOUS ."
EXECUTE "SET-DEC ,"
EXECUTE "DATE.FORMAT"

***********************
* Ouvertures fichiers *
***********************
OPEN "","TABLES" TO F.TABLES ELSE STOP "Ouverture TABLES"

ENR_TABLES = ""

ENR_TABLES<1> = "Titre non mis"
ENR_TABLES<2> = "Titre en doublon"
ENR_TABLES<3> = "Valeur faciale incorrecte"
ENR_TABLES<4> = "Type de titre incorrect"
ENR_TABLES<5> = "Titre prim"
ENR_TABLES<6> = "Titre plac en Liste Rouge"
ENR_TABLES<7> = "Affili diffrent de celui dclar"

WRITE ENR_TABLES ON F.TABLES, "AnomaliesCESU"
