Programmation en c++

Procédure saisie des client (résultat : client)
Var
DNOCPTE : alphabétique
DNOM : alphabétique
DPRENOM : alphabétique
DNATCPTE : alphabétique
DADRESSE : alphabétique
DSEXE : caractère alphabétique
DANSOLDE : numérique
DEBUT
Tant que CT < 3 répéter
Ouvrir (client) en écriture
CT = 0
DEBUT1
Ecrire ‘Donnez la nature du compte du client’
Saisie DNATCPTE
Ecrire ‘donnez le solde d’ouverture’
Saisie ANSOLDE
Si (NOCPTE <= 3 et MVT <= 5) alors
DEBUT11
Ecrire ‘Donnez le numéro de compte du client’
Saisie NOCPTE
Ecrire ‘Donnez le Nom du client’
Saisie NOM
Ecrire ‘Donnez le Prénom du client’
Saisie PRENOM
Ecrire ‘Donnez l’Adresse du client’
Saisie ADRESSE
Ecrire ‘Donnez le sexe du client’
Saisie DSEXE
NCOPTE = DNOCPTE
NOM = DNOM
PRENOM = DPRENOM
NATCPTE = DNATCPTE
ADRESSE = DADRESSE
SEXE = DSEXE
ANSOLDE = DANSOLDE
Ecrire (client, ENREG)
CT = CT + 1 ;
Fin11
Sinon
Ecrire ‘solde d’ouverture insuffisante’
Fin1
Fermer (client)
Fin0.
Description du fichier du client
Type ENREG = Structure
DEBUT
NCOPTE : (8) caractères alphabétiques
NOM : (15) caractères alphabétiques

PRENOM : (25) caractères alphabétiques
SEXE : (1) caractère alphabétique
NATCPTE : (1) caractère alphabétique
ANSOLDE : (10) caractères alphabétiques
FIN
Client : fichier de ENREG
Organisation : séquentiel indexé
Access : direct
Clé : NCOPTE

Procédure Consultation (donnée client, résultat DNCOPTE, DNOM, DPRENOM, DADRESSE, DSEXE, DNATCPTE, DANSOLDE)
Var
WNUM : alphabétique
REP : (1) caractère alphabétique
DEBUT
Ouvrir (client) en lecture
Répéter jusqu’à ce que (REP = ‘N’) ou (REP =’n’)
Debut1
Ecrire ‘ Donnez le numéro de compte du client’
Saisie WNUM
NCOPTE = WNUM
Lire (client, ENREG)
Si clé invalide alors
Ecrire ‘Erreur sur le numéro de compte du client, vérifier SVP !)
Sinon
Début11
NCOPTE = DNOCPTE
NOM = DNOM
PRENOM = DPRENOM
NATCPTE = DNATCPTE
ADRESSE = DADRESSE
SEXE = DSEXE
ANSOLDE = DANSOLDE
Fin11
Ecrire ‘Voulez-vous faire d’autre consultation (O/N) ?’
Saisie REP
Fin1
Fermer (client)
FIN0
Procédure modification (donnée client, résultat client)
Var
WNUM : alphabétique
REP : (1) caractère alphabétique
DEBUT0
Ouvrir (client) en lecture / écrire
Répéter jusqu’à ce que (REP = ‘N’ ou REP = ‘n’)
Début1
Ecrire ‘Donnez la nouvelle adresse du client’
Saisie NADRESSE
Ecrire ‘Donnez la nouvelle nature du client’
Saisie NNATCPTE
Ecrire ‘Donnez le numéro du client’
Saisie WNUM
NCOPTE = WNUM
Lire (client, ENREG)
Si clé invalide alors
Ecrire ‘Erreur sur le numéro de compte saisie, veillez ressaisir un numéro SVP’
Sinon
Début11
Si NADRESSE # ‘’alors
ADRESSE = NADRESSE
Si NATCOPTE = NNATCOPTE
ANSOLDE = NANSOLDE
Réécrire (client ? ENREG°
FIN11
Ecrire ‘Voulez-vous faire une autre modification (O/N) ?’
Saisie REP
Fin1
Fermer (client)
Fin0
Description du fichier archive :
Type AENREG = structure
Début
ANCOPTE : (8) caractères alphabétiques
ANOM : (15) caractères alphabétiques
APRENOM : (25) caractères alphabétiques
ASEXE : (1) caractère alphabétique
ANATCPTE : (1) caractère alphabétique
AANSOLDE : (10) caractères alphabétiques
Fin.

Fonction suppression (donnée client, DNCOPTE résultat NCLIENT) : Booléen
Var
Trouve : booléen
Début0
Ouvrir (client) en lecture
Ouvrir (NCLIENT) en écriture
Lire (client, ENREG)
Trouve = faux
Tant que FF (client) = faux et Trouve = faux répéter
Début1
Si NCOPTE = DNCOPTE alors
Début11
Trouve = vrai
Ecrire (archive, ENREG)
Fin11
Sinon
Ecrire (NCLIENT, ENREG)
Lire (client, ENREG)
Fin1
Si Trouve = vrai et FF (client) = faux alors
Début2
Tant que FF (client) = faux répéter
Début21
Ecrire (NCLIENT, ENREG)
Lire (client, ENREG)
Fin21
Fin2
Suppression = trouve
Fermer (NCLIENT)
Fermer (client)
Fin0

Procédure MAJ (donnée CLIENT, résultat CLIENT, MVT)
Var
WNCOPTE : (8) caractères alphabétiques
WSENS : (1) caractère alphabétique
WMONTANT : numérique
REP : (1) caractère alphabétique
Début0
Ouvrir (client) en lecture / écriture
Répéter jusqu’à ce que (REP =’N’) ou (REP =’n’)
Début1
Ecrire ‘Donnez le numéro de compte SVP !’
Saisie WNCOPTE
NCOPTE = WNCOPTE
Lire (client, ENREG)
Si clé invalide alors
Ecrire ‘Erreur sur le numéro de client’
Sinon
Début11
Ecrire ‘ Donnez le sens de l’opération’
Saisie WSENS
Ecrire ‘ Donnez la date de l’opération’
Saisie WDATOP
Ecrire ‘ Donnez le montant de l’opération’
Saisie WMONTNANT
Si NATCOPTE = ‘C’alors
Début111
Si WSENS = ‘S’ et ANSOLDE => MONTANT
Début1111
ANSOLDE = ANSOLDE – MONTANT
Réécrire (client, ENREG)
MNCOPTE = WNOCPTE
SENS = WSENS
DATOP = WDATOP
MONTNANT = WMONTNANT
Ecrire (MVT, MENREG)
FIN1111
Sinon
Si WSENS = ‘S’ et ANSOLDE < MONTANT alors
Ecrire ‘retrait impossible, solde insuffisant’
Sinon
Si WSENS = ‘E’ alors
Début1112
ANSOLDE = ANSOLDE + MONTANT
Réécrire (client, ENREG)
MCOPTE = WNCOPTE
SENS = WSENS
DATOP = WDATOP
MONTANT = WMONTANT
Ecrire (MVT, MENREG)
Fin1112
Fin111
Si NATCOPTE = ‘E’ alors
Début112
Si WSENS = ‘S’alors
Ecrire ‘impossible, compte d’épargne’
Sinon
Début 1121
ANSOLDE = ANSOLDE + MMONTNANT
Réécrire (client, ENREG)
MCOPTE = WNOCPTE
SENS = WSENS
DATOP = WDATOP
MONTNANT = WMONTNANT
Ecrire (MVT, MENREG)
FIN1121
FIN112
FIN11
Ecrire ‘ un autre client (O/N) ?’
Saisie REP
Fin1
Fermer (client)
Fermer (MVT)
Fin0