Télécharger la plaquette Cast3M


fr en

Télécharger ktest_io2.dgibi

Retour à la liste

Numérotation des lignes : 

  1. * fichier :  ktest_io2.dgibi
  2. ************************************************************************
  3. ************************************************************************
  4.  
  5. *** restitutions succésives ...
  6.  
  7.     opti rest      'testsauv_glob_B.sortgibi' ;
  8.     rest      ;
  9.  
  10.     opti rest FORM 'testsauv_glob_F.sortgibi' ;
  12.  
  13.     opti rest      'testsauv_noms_B.sortgibi' ;
  14.     rest      ;
  15.  
  16.     opti rest FORM 'testsauv_noms_F.sortgibi' ;
  18.  
  19. *** sg 2014/11 : nouveaux noms d'inconnues
  20.  
  21.    lpri ldua = 'VALEUR' 'INCO' ;
  22. *   'LISTE' lpri ;
  23. *   'LISTE' ldua ;
  24. *    lpn = 'MOTS' 'LX' 'PP' 'QQ' ;
  25. *bp : passage a 4 caracteres depuis #8543
  26.    lpn = 'MOTS' 'LX' 'PP' 'QQQQ' ;
  27.    ldn = 'MOTS' 'FLX' 'PQ' 'QQQQ' ;
  28.    ok1 = 'EXISTE' lpri lpn 'ET' ;
  29.    posp = 'POSI' lpn 'DANS' lpri ;
  30.    posd = 'POSI' ldn 'DANS' ldua ;
  31.    ok2 = 'EGA' posp posd ;
  32. *   'LISTE' posp ;
  33. *   'LISTE' posd ;
  34.    'SI' ('NON' (ok1 'ET' ok2)) ;
  35.       'ERREUR' 5 ;
  36.    'FINSI' ;      
  37.  
  38.  
  39.  
  40. *** bye ...
  41.     fin ;
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales