II - UNITES DE TRAITEMENTS
A-Menu de l'application
MENU
REQUÊTES
Etat lettre d'autorisation.
Liste de tous les étudiants.
Liste des demandes de stage d'une période
donnée.
Etat d'attestation
ADMINISTRATION
Gestion d'utilisateur
OUTILS
A propos
?
FICHIERS
Filière
Etablissement
Changer de session
QUITTER
TRAITEMENTS
Enregistrement des étudiants.
Enregistrement des demandes de stage.
Enregistrement des stages.
Enregistrement des Attestations délivrées.
B-Enregistrements de quelques tables
v Filière
Ø Formulaire
Ø ECRAN
Organigramme
CLAVIER
UT1
BORDEREAUX
FILIERE
UT1 : Filière
Ø Dictionnaire des variables
|
SAISIE
|
Code, Libellé
|
|
AFFICHAGE
|
-
|
|
MODIFICATION
|
Libellé
|
Ø Tableau des donnés
utilisés
|
PROPRIETE
|
NATURE
|
TABLE
|
|
Codfil, Libfil
|
Ecriture
|
FILIERE
|
Ø Rédaction de l'algorithme
Algorithme filière
Fichier FILIERE (OSI, accès direct, clé
Codfil)
Enregistrement FIL
Codfil, Libfil : chaîne de
caractères
FinEnregistrement
Variable
Choix : chaîne de caractères
DEBUT
Ouvrir FIL (LECTURE/ECRITURE)
Afficher ``Entrer A pour ajouter une filière,
M pour modifier une filière, S pour supprimer une
filière ou valider pour quitter.''
Saisir Choix
Tant que Choix < > `` '' faire
Afficher ``Entrer le code de la filière''
Saisir Vcode
Tant que Vcode < > `` '' faire
Suivant Choix Faire
``A'' : FIL.Codfil Vcode
Afficher ``Entrer le libellé de la filière''
Saisir FIL.Libfil
ECRIRE FIL
4
3
1
2
1
4
3
2
Si ERREUR-CLE
Alors
Afficher ``Cette filière existe déjà''
Finsi
``M'' : Clé Vcode
Lire FIL
Si ERREUR-CLE
Alors
Afficher ``Cette filière n'existe pas''
Sinon
Afficher ``FIL.Lib''
Saisir FIL.Libfil
Réécrire FIL
Si ERREUR-CLE
Alors
Afficher ``Erreur sur disque''
Finsi
Finsi
``S'' : Clé Vcode
Lire FIL
Si ERREUR-CLE
Alors
Afficher ``Cette filière n'existe pas''
Sinon
Afficher ``Le libellé de la filière''
Supprimer FIL
Si ERREUR-CLE
Alors
1
2
3
4
Afficher ``Erreur sur disque''
5
Finsi
2
1
3
5
4
Finsi
Finsuivant
Afficher ``Entrer le code de la filière''
Saisir Vcode
Fintantque
Afficher ``Entrer A pour ajouter une filière, M pour
modifier une filière , S pour supprimer une filière ou valider
pour quitter.''
Saisir ``Choix''
Fintantque
Fermer FILIERE
FIN
v Enregistrement des
étudiants
Ø Formulaire
Ø Organigramme
ETABLISSEMENT
FILIERE
ECRAN
CLAVIER
UT2
BORDEREAUX
ETUDIANT
UT2 : Enregistrement des étudiantsØ
Dictionnaire des variables
|
SAISIE
|
Numéro(ETUDIANT), Nom(ETUDIANT), Prénom(ETUDIANT),
Adresse(ETUDIANT), Téléphone(ETUDIANT), Code(FILIERE),
Code(ETABLISSEMENT)
|
|
AFFICHAGE
|
Libellé(FILERE), Libellé(ETABLISSEMENT)
|
Ø Tableau des données
utilisées
|
PROPRIETE
|
NATURE
|
TABLE
|
|
Codfil, Libfil
|
Lecture
|
FILIERE
|
|
Codetabl, Libetabl
|
Lecture
|
ETABLISSEMENT
|
|
NumEtu, NomEtu, PrenomEtu, AdruEtu, AdrvilEtu, TelEtu, Codfil,
Codetabl
|
Ecriture
|
ETUDIANT
|
Ø Rédaction de
l'algorithme
Algorithme enrgistrement_des_étudiants
Fichier FILIERE (OSI, accès direct, clé1
Codfil)
Enregistrement FIL
Codfil, Libfil :chaîne de caractères
FinEnregistrement
Fichier ETABLISSEMENT (OSI, accès direct, clé2
Codetabl)
Enregistrement ETA
Codetabl, Libetabl, Adruetabl, Adrviletabl,
Teletabl :chaîne de caractères
FinEnregistrement
Fichier ETUDIANT (OSI, accès direct, clé3
NumEtu)
Enregistrement ETU
NumEtu, NomEtu, PrenomEtu, AdruEtu : chaîne de
caractères
AdrvilEtu, TelEtu, Codfil, Codetabl : chaîne de
caractères
FinEnregistrement
Variable
Choix, Fcod: chaîne de caractères
DEBUT
Ouvrir FILIERE (LECTURE)
Ouvrir ETABLISSEMENT (LECTURE)
Ouvrir ETUDIANT (LECTURE/ECRITURE)
Afficher ``Entrer A pour ajouter une filière, M
pour modifier une filière, S pour supprimer une
filière ou valider pour quitter.''
Saisir Choix
Tant que Choix < > `` '' faire
Afficher ``Entrer le code de la filière''
Saisir Fcod
Tant que Fcod < > `` '' faire
Suivant Choix Faire
``A'': ETU.Codfil Fcod
Clé1 ETU.Codfil
Lire FIL
Si ERREUR-CLE
Alors
Afficher ``Cette filière n'existe pas''
Sinon
Afficher ``FIL.Libfil''
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Saisir ETU.Codetabl
Tant que ETU.Codetabl < > `` '' faire
Clé2 ETU.Codetabl
Lire ETA
6
5
4
3
2
1
6
5
4
3
2
1
Si ERREUR-CLE
Alors
Afficher ``Cette établissement n'existe pas''
Sinon
Afficher ``ETA.Libetabl''
Afficher ``Entrer le numéro de l'étudiant ou
valider pour autre établissement''
Saisir ETU.NumEtu
Tant que ETU.NumEtu < > `` '' faire
Saisir ETU.NomEtu, Saisir ETU.PrenomEtu
Saisir ETU.AdrueEtu, Saisir ETU.AdrvilEtu
Saisir ETU.TelEtu
Ecrire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant existe déjà''
Finsi
Afficher ``Entrer le numéro de l'étudiant ou
valider pour autre établissement''
Saisir ETU.NumEtu
Fintantque
Finsi
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Saisir ETU.Codetabl
Fintantque
Finsi
4
3
2
1
2
4
3
1
``M'': ETU.Codfil Fcod
Clé1 ETU.Codfil
Lire FIL
Si ERREUR-CLE
Alors
Afficher ``Cette filière n'existe pas''
Sinon
Afficher ``FIL.Libfil''
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Saisir ETU.Codetabl
Tant que ETU.Codetabl < > `` '' faire
Clé2 ETU.Codetabl
Lire ETA
Si ERREUR-CLE
Alors
Afficher ``Cette établissement n'existe pas''
Sinon
Afficher ``ETA.Libetabl''
Afficher ``Entrer le numéro de l'étudiant ou
valider pour sortir''
Saisir ETU.NumEtu
Tant que ETU.NumEtu < > `` '' faire
Clé3 ETU.NumEtu
Lire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant existe pas''
9
8
7
6
4
3
2
1
Sinon
5
9
7
8
6
5
4
3
2
1
Afficher ``ETU.NomEtu''
Saisir ETU.NomEtu
Réécrire ETU
Si ERREUR-CLE
Alors
Afficher ``Erreur sur le disque''
Finsi
Finsi
Afficher ``Entrer le numéro de l'étudiant ou
valider pour autre établissement''
Fintantque
Finsi
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Fintantque
Finsi
``S'': ETU.Codfil Fcod
Clé1 ETU.Codfil
Lire FIL
Si ERREUR-CLE
Alors
Afficher ``Cette filière n'existe pas''
Sinon
Afficher ``FIL.Libfil''
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Saisir ETU.Codetabl
Tant que ETU.Codetabl < > `` '' faire
Clé2 ETU.Codetabl
5
4
2
3
6
1
Lire ETA
6
5
3
2
1
4
Si ERREUR-CLE
Alors
Afficher ``Cette établissement n'existe pas''
Sinon
Afficher ``ETA.Libetabl''
Afficher ``Entrer le numéro de l'étudiant ou
valider pour sortir''
Saisir ETU.NumEtu
Tant que ETU.NumEtu < > `` '' faire
Clé3 ETU.NumEtu
Lire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant existe pas''
Sinon
Afficher ``ETU.NomEtu''
Supprimer ETU.NomEtu
Si ERREUR-CLE
Alors
Afficher ``Erreur sur le disque''
Finsi
Finsi
Afficher ``Entrer le numéro de l'étudiant ou
valider pour autre établissement''
Fintantque
Finsi
Afficher ``Entrer le code de l'établissement de
l'étudiant ou valider pour autre filière''
Saisir ETU.Codetabl
Fintantque
Finsi
3
2
1
Finsuivant
3
2
1
Afficher ``Entrer le code de la filière de
l'étudiant''
Saisir Fcod
Fintantque
Afficher ``Entrer A pour ajouter une filière, M
pour modifier une filière, S pour supprimer une filière ou
valider pour quitter.''
Saisir choix
Fintantque
Fermer FILIERE, ETABLISSEMENT, ETUDIANT
FIN
v Enregistrement des demandes de
stages
Ø Formulaire
Ø Organigramme
ETUDIANT
ECRAN
CLAVIER
UT3
BORDEREAUX
DEMANDE
UT3 : Enregistrement des demandes de
stagesØ Dictionnaire des variables
|
SAISIE
|
Numéro(DEMANDE), Date(DEMANDE), Durée
solicité(DEMANDE), Numéro (ETUDIANT)
|
|
AFFICHAGE
|
Nom(ETUDIANT), Prénom(ETUDIANT)
|
Ø Tableau des données
utilisées
|
PROPRIETE
|
NATURE
|
TABLE
|
|
NumEtu, NomEtu, PrenomEtu
|
Lecture
|
ETUDIANT
|
|
Numdemande,Datedemande, Duresolicite, NumEtu
|
Ecriture
|
DEMANDE
|
Ø Rédaction de
l'algorithme
Algorithme enrgistrement_des_demandes_de_stages
Fichier ETUDIANT (OSI, accès direct, clé1
NumEtu)
Enregistrement ETU
NumEtu, NomEtu, PrenomEtu, AdruEtu : chaîne de
caractères
AdrvilEtu, TelEtu, Codfil, Codetabl : chaîne de
caractères
FinEnregistrement
Fichier DEMANDE (OSI, accès direct, clé2
Numdemande)
Enregistrement DEM
Numdemande, Duresolicite, NumEtu: chaîne de
caractères
Datedemande : Date
FinEnregistrement
Variable
Choix, FNum, XNum:chaîne de caractères
DEBUT
Ouvrir ETUDIANT (LECTURE)
Ouvrir DEMANDE (LECTURE/ECRITURE)
1
1
Afficher ``Entrer A pour ajouter une filière et un
établissement, M pour modifier une filière et un
établissement, S pour supprimer une filière et un
établissement ou valider pour quitter.''
Saisir Choix
Tant que Choix < > `` '' faire
Afficher ``Entrer le numéro de
l'étudiant''
Saisir FNum
Tant que FNum < > `` '' faire
Suivant Choix Faire
``A'': DEM.NumEtu FNum
Clé1 DEM.NumEtu
Lire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant n'existe pas''
Sinon
Afficher ``ETU.NomEtu''
Afficher ``ETU.PrenomEtu''
Afficher ``Entrer le numéro de la demande ou valider
pour autre étudiant''
Saisir DEM.Numdemande
Tant que DEM.Numdemande < > `` '' faire
Saisir DEM.Datedemande,
Saisir DEM.Duresolicite
Ecrire DEM
Si ERREUR-CLE
Alors
Afficher ``Cette demande existe déjà''
6
5
4
3
2
1
Finsi
5
6
4
3
2
1
Afficher ``Entrer le numéro de la demande ou valider
pour autre étudiant''
Saisir DEM.Numdemande
Fintantque
Finsi
``M'': DEM.NumEtu FNum
Clé1 DEM.NumEtu
Lire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant n'existe pas''
Sinon
Afficher ``ETU.NomEtu''
Afficher ``Entrer le numéro de la demande ou valider
pour sortir''
Saisir XNum
Tant que XNum < > `` '' faire
Clé2 XNum
Lire DEM
Si ERREUR-CLE
Alors
Afficher ``Cette demande n'existe pas''
Sinon
Afficher ``DEM.Datedemande''
Saisir DEM.Datedemande
Afficher ``DEM.Duresolicite''
Saisir DEM.Duresolicite
Réécrire DEM
7
6
3
2
1
4
5
7
6
5
4
3
2
1
Si ERREUR-CLE
Alors
Afficher ``Erreur sur le disque''
Finsi
Finsi
Afficher ``Entrer le numéro de la demande ou
valider pour autre étudiant''
Fintantque
Finsi
``S'': DEM.NumEtu FNum
Clé1 DEM.NumEtu
Lire ETU
Si ERREUR-CLE
Alors
Afficher ``Cet étudiant n'existe pas''
Sinon
Afficher ``ETU.NomEtu''
Afficher ``Entrer le numéro de la demande ou valider
pour sortir''
Saisir XNum
Tant que XNum < > `` '' faire
Clé2 XNum
Lire DEM
Si ERREUR-CLE
Alors
Afficher ``Cette demande n'existe pas''
Sinon
Afficher ``DEM.Datedemande''
4
3
2
7
Supprimer DEM.Datedemande
6
5
1
7
6
5
4
3
2
1
Si ERREUR-CLE
Alors
Afficher ``Erreur sur le disque''
Finsi
Finsi
Afficher ``Entrer le numéro de la demande ou
valider pour autre étudiant''
Saisir XNum
Fintantque
Finsi
Finsuivant
Afficher ``Entrer le numéro de l'étudiant''
Saisir FNum
Fintantque
Afficher ``Entrer A pour ajouter une filière et un
établissement, M pour modifier une filière et un
établissement, S pour supprimer une filière et un
établissement ou valider pour quitter.''
Saisir Choix
Fintantque
Fermer ETUDIANT, DEMANDE
FIN
| 
