| 
A R REPERTF1
A ADR1 25 TEXT('ADRESSE 1')
A COLHDG('ADRESSE PRINCIPALE')
A COMP(NE ' ')
A ADR2 25 TEXT('ADRESSE 2')
A COLHDG('ADRESSE COMPLEMENT')
A AND 2 0 TEXT('ANNEE DEPART')
A COLHDG('ANNEE')
A COMP(GE 00)
A EDTCDE(Z)
A ANE 2 0 TEXT('ANNEE ENTREE')
A COLHDG('ANNEE')
A COMP(GE 00)
A ANF 2 0 TEXT('ANNEE FACTURE')
A COLHDG('AN')
A COMP(GE 86)
A ANN 2 0 TEXT('ANNEE NAISSANCE')
A COLHDG('ANNEE')
A COMP(GE 00)
A BDIST 3 0 TEXT('BUREAU DISTRIBUTEUR')
A COLHDG('BDIST')
A CAS 2 0 TEXT('CASIER DE RANGEMENT')
A COLHDG('CAS')
A RANGE(1 50)
A EDTCDE(Z)
A CODOM 1 TEXT('CODE OBLIGATION MILITAIRE')
A COLHDG('OBLIGATIONS' 'MILITAIRES')
A VALUES('D' 'N' ' ')
A CODP 1 TEXT('CODE PAIEMENT')
A COLHDG('C-P')
A VALUES('1' '2' '3')
A CODR 1 TEXT('CODE REMISE')
A COLHDG('C-R')
A VALUES('1' '2' '3')
A CODART 10A TEXT('CODE ARTICLE')
A COLHDG('CODE ART')
A COMP(NE ' ')
A CODLOG 1 0 TEXT('CODE VERROUILLAGE LOG')
A COLHDG('COD' 'LOG')
A VALUES(0 1)
A CODPROD 6A TEXT('CODE PRODUIT')
A COLHDG('CODPRO')
A COMP(GE '1')
A CODAF 1 TEXT('CODE ACHAT/FABRIQUE')
|
|
A COLHDG('AF')
A VALUES('A' 'F')
A CODSF 1 TEXT('CODE SITUATION FAMILIALE')
A COLHDG('SITUATION' 'FAMILLIALE')
A VALUES('C' 'M' 'V' 'D')
A CODST 1 TEXT('CODE STATUS')
A COLHDG('STATUS')
A VALUES('C' 'E')
A CODSUP 2B 0 TEXT('CODE SUPRESSION')
A COLHDG('01')
A VALUES(0 1)
A COEF 3 0 TEXT('COEFFICIENT')
A COLHDG('COEFFICIENT')
A COMP(GT 0)
A DEPT 2 0 TEXT('DEPARTEMENT')
A COLHDG('DEPT')
A COMP(GE 1)
A DESIPROD 30 TEXT('DESIGNATION PRODUIT')
A COLHDG('DESIGNATION''PRODUIT')
A COMP(NE ' ')
A ENTREE 5 0 TEXT('MVT EN ENTREE')
A COMP(GE 0)
A EDTCDE(Z)
A EMETT 3A TEXT('EMETTEUR')
A COLHDG('EMETT')
A COMP(NE ' ')
A HOR 1 TEXT('HORAIRES')
A COLHDG('HORAIRES(V-E-P)')
A VALUES('V' 'E' 'P')
A INFOPGM 70A TEXT('INFO RELATIVES AU PGM')
A COLHDG('INFORMATION DU PGM')
A COMP(NE ' ')
A JOURD 2 0 TEXT('JOUR DEPART')
A COLHDG('JOUR DE DEPART')
A RANGE(1 31)
A EDTCDE(Z)
A JOURE 2 0 TEXT('JOUR ENTREE')
A COLHDG('JOUR D''ENTREE')
A RANGE(1 31)
A JOURF 2 0 TEXT('JOUR FACTURE')
A COLHDG('JOUR')
A RANGE(1 31)
A JOURN 2 0 TEXT('JOUR NAISSANCE')
A COLHDG('JOUR DE NAISSANCE')
|
|
A RANGE(1 31)
A QTEFACT 7 2 TEXT('QUANTITE A FACTURER')
A COLHDG('QTE A FACTURER')
A COMP(GE 0) EDTCDE(3)
A QTEMVT 5 0 TEXT('QUANTITE MOUVEMENT')
A COMP(GE 0)
A EDTCDE(Z)
A QTESTOCK 5 0 TEXT('QUANTITE EN STOCK')
A COLHDG('QUANTITE''STOCK')
A COMP(GE 0)
A EDTCDE(Z)
A QTEMINI 5 0 TEXT('QUANTITE MINIMUM')
A COLHDG('QTE''MINI')
A COMP(GE 0)
A EDTCDE(Z)
A QTEMAXI 5 0 TEXT('QUANTITE MAXI')
A COLHDG('QTE''MAXI')
A COMP(GE 0)
A EDTCDE(Z)
A QTEALERTE 5 0 TEXT('QUANTITE ALERTE')
A COLHDG('QTE''ALERT')
A COMP(GE 0)
A EDTCDE(Z)
A MAG 2 TEXT('MAGAZIN DE STOCKAGE')
A COLHDG('MAG')
A VALUES('M1' 'M2' 'M3' 'M4')
A MATRIC 4 0 TEXT('MATRICULE')
A COLHDG('MATRICULE')
A COMP(GT 0)
A MOISD 2 0 TEXT('MOIS DEPART')
A COLHDG('MOIS')
A RANGE(1 12)
A EDTCDE(Z)
A MOISE 2 0 TEXT('MOIS ENTREE')
A COLHDG('MOIS')
A RANGE(1 12)
A MOISF 2 0 TEXT('MOIS FACTURE')
A COLHDG('MOIS')
A RANGE(1 12)
A MOISN 2 0 TEXT('MOIS NAISSANCE')
A COLHDG('MOIS')
A RANGE(1 12)
A MOTIFD 20 TEXT('MOTIF DEPART')
A COLHDG('MOTIF' 'DEPART')
|
|
A NBE 2 0 TEXT('NB ENFANTS')
A COLHDG('NOMBRE' 'ENFANTS')
A COMP(GE 0)
A EDTWRD('0 ')
A NBJA 3 0 TEXT('NB JOUR ABSENCE')
A COLHDG('JOURS' 'ABSENCE')
A RANGE(0 365)
A EDTWRD(' 0 ')
A NIV 1 0 TEXT('NIVEAU')
A COLHDG('NIVEAU')
A RANGE(1 5)
A NOCLI 4 0 TEXT('NUMERO CLIENT')
A COLHDG('NO CLIENT')
A COMP(GE 1)
A NOCMDE 4 0 TEXT('NUMERO COMMANDE')
A COLHDG('NO CMDE')
A COMP(GE 1)
A NOFACT 4 0 TEXT('NUMERO FACTURE')
A COLHDG('NO FACTURE')
A COMP(GE 1)
A NOMP 20 TEXT('NOM EMPLOYE')
A COLHDG('NOM')
A COMP(NE ' ')
A NOM 10 TEXT('NOM MENUCMD')
A COLHDG('NOM')
A NSTOCK 7 0 TEXT('NOUVEAU STOCK')
A COMP(GE 0)
A EDTCDE(Z)
A PRENOM 20 TEXT('PRENOM DE L''EMPLOYE')
A COMP(NE ' ')
A PRIMP 1 TEXT('PRIME PANIER')
A COLHDG('PRIME PANIER')
A VALUES('O' 'N')
A PRIMS 1 TEXT('PRIME SALISSURE')
A COLHDG('PRIME SALISSURE')
A VALUES('O' 'N')
A RAISOC 25 TEXT('RAISON SOCIALE')
A COLHDG('RAISON SOCIALE')
A RANG 2 0 TEXT('RANGEE')
A COLHDG('RG')
A RANGE(1 20)
A EDTCDE(Z)
A PGMCLE 10A TEXT('ZONE CLE/PARAM/')
A COLHDG('CLE PGM')
|
|
A COMP(NE ' ')
A PRIXUNIT 7 2 TEXT('PRIX UNITAIRE')
A COLHDG('PU')
A COMP(GE 0)
A EDTCDE(3)
A VALHT 11 2 TEXT('VALEUR HT')
A COMP(GE 0)
A EDTCDE(3)
A SALBM 7 2 TEXT('SALAIRE BRUT MENSUEL')
A COLHDG('SALAIRE BRUT MENSUEL')
A COMP(GE 4400)
A EDTCDE(3)
A TOTVALHT 12 2 TEXT('TOTAL VALEUR H.T')
A COMP(GE 0)
A EDTCDE(3)
A TOTENRANO 8 0 TEXT('TOT ENREG EN ANOMALIE')
A COLHDG('TOTEANO')
A COMP(GE 0)
A EDTCDE(Z)
A TOTENTREE 7 0 TEXT('TOTAL DES ENTREES')
A COLHDG('TOTENTREE')
A COMP(GE 0) EDTCDE(Z)
A TOTPROD 4 0 TEXT('TOTAL PRODUIT')
A COMP(GE 0)
A EDTCDE(Z)
A TOTPRODS 5 0 TEXT('TOTAL PRODUITS SUP')
A EDTCDE(Z)
A TOTPRODANO 5 0 TEXT('TOT PROD EN ANOMALIE')
A COLHDG('TOTPANO')
A COMP(GE 0)
A EDTCDE(Z)
A TOTPRODMAJ 6 0 TEXT('TOT PROD MIS A JOUR')
A COLHDG('TOTPMAJ')
A COMP(GE 0)
A EDTCDE(Z)
A TOTSORTIE 7 0 TEXT('TOTAL DES SORTIES')
A COLHDG('TOTSORTIE')
A COMP(GE 0) EDTCDE(Z)
A TYPE 10 TEXT('TYPE MENUCMD')
A COLHDG('TYPE')
A TYPEMVT 1 TEXT('TYPE MOUVEMENT E/S')
A COLHDG('MV')
A VALUES('E' 'S')
A TYPP 2 TEXT('TYPE PAIEMENT')
|
|
A COLHDG('T-P')
A VALUES('TR' 'CH' 'EP')
A PC 4 2 TEXT('POURCENTAGE')
A COMP(GE 0)
A EDTCDE(3)
A PCS 4 2 TEXT('POURCENTAGE PROD SUP')
A COMP(GE 0)
A EDTCDE(3)
A SORTIE 5 0 TEXT('MVT EN SORTIE')
A COMP(GE 0)
A EDTCDE(Z)
A VILLE 25 TEXT('VILLE CLIENT')
A COLHDG('VILLE')
|
