sFichier est une chaine = "SAI"
sCleUnique est une chaine = "JALPIECE1"
sValeur est une chaine
Ind est un entier

POUR TOUTE LIGNE ind DE TABLE_SAIS
 TableSelectPlus(TABLE_SAI, ind )
 sValeur = HConstruitValClé( sFichier, sCleUnique, [COMBO_ANNEXJX..ValeurAffichee, SAI_PIECE, COL_NOLIG] )
 SI HLitRecherche(sFichier,sCleUnique, sValeur )
  SAIS.MOISAN=SAI_MOISAN
  SAIS.LIBOP=SAI_LIBOP
  SAIS.PIECE=SAI_PIECE
  SAIS.COMPTE=TABLE_SAIS.COL_COMPTE
  SAIS.DB=TABLE_SAIS.COL_DB
  SAIS.CR=TABLE_SAIS.COL_CR 
  HMODIFIE(SAIS)
 SINON
  ERREUR("Ligne introuvable" + RC + HErreurinfo())
 FIN
FIN