Contrôle de débordement d'information

HR Access utilise des tableaux Cobols dont le nombre d'occurrence est fixé par le dictionnaire HR Access. Il peut donc arriver que ces tableau génèrent des erreurs de débordement.

Pour anticiper l'apparition de ces blocages, un collègue m'a transmis un SQL de Contrôle de débordement (ici avec les informations rattachées au processus de paie FDAZY hors 6* et 8*, l'alarme étant fixée dans le premier cas à 90% du maximum) :

  select a.nudoss, a.matcle, a.soccle, b.cdinfo, b.nboccr as NombreDico, c.cdpros,
  c.cdinfo, c.nboccr as NombreFDAZY , d.cdinfo, d.nombre as NombreTD12
  from hr.zy00 a, hr.di40 b, hr.ap30 c,  hr.zytd12 d
  where a.nudoss = d.nudoss and b.cdinfo= c.cdinfo and b.cdinfo = d.cdinfo
  and ((c.nboccr > 0 and d.nombre >= (c.nboccr*90/100))
  or   (c.nboccr = 0 and d.nombre >=  b.nboccr*90/100))
  and (b.tehist = '1' or b.tyinfo='R') and b.cdstdo = 'ZY' and c.cdstdo = 'ZY'
  and c.cdpros = 'FDAZY'
  and b.cdinfo not like '6%' and b.cdinfo not like '8%' order by b.cdinfo, d.nombre;

et

  select distinct b.cdinfo from hr.zy00 a, hr.di40 b, hr.ap30 c,  hr.zytd12 d
  where a.nudoss = d.nudoss and b.cdinfo= c.cdinfo and b.cdinfo = d.cdinfo
  and ((c.nboccr > 0 and d.nombre >= c.nboccr)
    or (c.nboccr = 0 and d.nombre >= b.nboccr))
  and (b.tehist = '1' or b.tyinfo='R')
  and b.cdstdo = 'ZY' and c.cdstdo = 'ZY' and c.cdpros = 'FDAZY'
  and b.cdinfo not like '6%' and b.cdinfo not like '8%' ;