VI. Organigrammes des données et Algorithmes
A. Organigrammes des Données
GESTION DES PRODUITS
PRODUIT
ECRAN
UT : GESTION DES PRODUITS
CLAVIER
CLAVIER
GESTION DES CLIENTS
CLIENT
ECRAN
UT : GESTION DES CLIENTS
CLAVIER
GESTION DES FACTURES
PRODUIT
CLIENT
ECRAN
UT : EDITION DES FACTURES
CLAVIER
FACTURE
IMPRESSION DE LA FACTURE
FACTURE
AGENCE
ECRAN
UT : IMPRESSION DE LA FACTURE
CLAVIER
CLAVIER
ETAT DE LA FACTURE
GESTION DES FOURNISSEURS
FOURNISSEUR
ECRAN
UT : GESTION DES FOURNISSEURS
CLAVIER
IMPRESSION DES PRODUITS
ECRAN
CLAVIER
CLAVIER
ETAT DES PRODUITS
UT : IMPRESSION DE LA LISTE DES PRODUITS
PRODUIT
AGENCE
GESTION DES COMMANDES
COMMANDE
ECRAN
UT : GESTION DES COMMANDES
CLAVIER
IMPRESSION DES COMMANDES
COMMANDE
AGENCE
ECRAN
CLAVIER
CLAVIER
UT : IMPRESSION DE LA COMMANDE
ETAT DE LA COMMANDE
B. ALGORITHMES
Algorithmes
Déclaration du fichier PRODUIT
Fichier PRODUIT (Organisation Séquentielle
Indexée)
Clé Codprod (accès direct)
Enrégistrement PROD
Design : chaine de caractère
PU : monétaire
Qtéprod : numérique
FIN enregistrement
Variables
Rep, Choix : chaine de caractères
Codprod : caractère
Trouve : booléen
Début
Ouvrir PRODUIT (Lecture/Ecriture)
Lire PROD
Si Fin fichier alors
Saisir
PROD.Design, PROD.PU, PROD.Qtéprod
2
1
Ecrire PROD
Sinon
Afficher («Entrer le code du produit«)
2
1
Saisir (Codprod)
Tant que Codprod <> « «
Faire
Trouve Faux
Tant que (pas fin fichier produit) (et
pas trouve) Faire
Si Codprod = PROD.Codprod
Alors
Trouve
vrai
Sinon
Lire PROD
Fsi
Si Trouve Alors
Afficher («PROD.Design, PROD.PU,
PROD.Qtéprod«)
Afficher («Voulez-vous modifier ou supprimer cet
enregistre-
Ment ?«, (M/S))
Saisir Choix
Suivant Choix Faire
«M«
Saisir PROD.Design, PROD.PU, PROD.Qtéprod
Réecrire PROD
Si erreur Clé Alors
Afficher («problème d'écrirture«)
5
4
3
2
1
Fsi
6
«S«
2
3
4
5
6
1
Afficher («Etre vous sure de supprimer cet
enregistrement«,(O/N))
Saisir Rep
Si Rep = O Alors
Supprimer PROD.Codprod
Supprimer PROD.Codprod, PROD.Design, PROD.PU,
PROD.Qtéprod
Fsi
Fsuivant
Sinon
Saisir PORD.Design, PROD.PU, PROD.Qtéprod
Ecrire PROD
Fsi
Afficher («Entrer le Code produit ou valider pour
sortir«)
Saisir Codprod
Fin Tant Que
Fin Tant Que
Fsi
Fermer PRODUIT
FIN
Déclaration du Fichier FACTURE
Fichier FACTURE (Organisation Séquentielle
Indexée)
Clé Numfact (accès direct)
Enrégistrement FACT
Acompt : caractère
TVA : monétaire
TTC : numérique
Echéance : Date
Règlement : Chaine de caractères
DatFact : Date
FIN enregistrement
Variables
Rep, Choix : chaine de caractères
Numfact : caractère
Trouve : booléen
Debut
Ouvrir FACTURE (Lecture/Ecriture)
Lire FACT
Si Fin fichier alors
Saisir
FACT.Acompt, FACT.TVA, FACT.TTC, FACT.Echéance,
FACT.Règlement,
2
1
FACT.Date
Ecrire FACT
2
1
Sinon
Afficher («Entrer le numero de la
facture«)
Saisir (Numfact)
Tant que Numfact <> « «
Faire
Trouve Faux
Tant que (pas fin fichier facture) (et
pas trouve) Faire
Si Numfact = FACT.Numfact
Alors
Trouve Vrai
Sinon
Liste FACT
Fsi
Si Trouve Alors
Afficher FACT.Acompt, FACT.TVA, FACT.TTC,
FACT.Echéance, FACT.Règlement, FACT.Date
Afficher («Voulez-vous modifier ou supprimer cet
Enregistrement ?«, (M/S))
Saisir Choix
Suivant Choix Faire
« M«
6
5
Saisir FACT.Acompt, FACT.TVA, FACT.TTC,
4
3
2
1
FACT. Echéance, FACT.Règlement, FACT.Date
Réécrie FACT
2
1
Si erreur Clé Alors
4
5
6
3
Afficher («problème d'écriture«)
Fsi
« S«
Afficher (« Etre vous sure de supprimer cet enre-
Gistrement ?«,(O/N))
Saisir Rep
Si Rep = O Alors
Supprimer FACT.Numfact
Supprimer FACT.Numfact, FACT.Acompt,
FACT.TVA, FACT.TTC, FACT.Echéance,
FACT.Règlement, FACT.Date
Fsi
Fin Suivant
Sinon
Saisir FACT.Acompt, FACT.TVA, FACT.TTC,
FACT.Echéance, FACT.Règlement, FACT.Date
Ecrire FACT
Fsi
Afficher (« Entrer le numero de la facture ou
valider
Pour sortir«)
Saisir Numfact
Fin Tant Que
Fin Tant Que
Fsi
Ferme FACTURE
FIN
| 
