FORUM MP | Cobol : Que veut dire FD + question Structure

COMMUNAUTE MP

Identifiez vous ...

DOMAINE MP

Bavardages

Langages Généraux

Langages Web

Langages DotNet

Autres langages

Dev. Jeux Video

Sécurité

Sys. Exploitation

Graphismes

Logiciels

Réseaux

Bases de données

Méthodologies

Emplois High-tech

Aide juridique

Articles juridiques

FORUM

CHAT MP IRC

Votre pseudo ...

Srv: irc.moteurprog.com

Chan: #MoteurProg

PARTICIPER

Plus de 3500 emplois.

Visiteur MP

Que veut dire FD + question Structure
	Forum : COBOL Sous Catégorie : Aucune Type du sujet : Sujet Normale FAQ : FAQ COBOL
		SUIVI PAR MAIL INACTIF
		AJOUTER MENTION RESOLU
		SUJET ACTIF
		N'APPARTIENT PAS A LA FAQ

PAGE : [1]

FORUM COBOL
	Page précedente	Page suivante

Visiteur MP
Membre du club

Inscrit :
Messages : 1241

#151060 Posté le 24/03/08 à 17:20

Bonjour tout le monde,

Nous somme occupés à étudier les fichiers en Cobol.

J'essaie d'analyser un code que nous avons reçu mais il y'a certaines choses que je ne comprends pas :

FILE SECTION. FD FICH-SAI. 01 TABLE-SAI. 02 TAB-FICH-SAI. 88 FIN-SAI VALUE HIGH-VALUES. 03 SAI-CHIFR PIC 9 OCCURS 10 TIMES.

Je ne comprends pas ce qu'est ce FD FICH-SAI. ?

Ensuite, on crée une structure qui est nommée TABLE-SAI

Je présûme que 02 redéfinie 01 ?

Le 88 est un nom condition, sauriez-vous me dire à quoi ça sert ici ?

Et le 03 je pense que l'on crée un tableau avec 10 cases ?

Je mets le code en entier en attaché.

Merci d'avance pour votre aide so precious.

beegees

HAUT DE PAGE

Publicité

Inscrit : X
Messages : X

#Aucun

HAUT DE PAGE

bul
Membre du club

Inscrit : 26/01/2004
Messages : 965

#151094 Posté le 25/03/08 à 09:46

bonjour,
si vous êtes en train d'étudier... y'a du boulot....

1° FD :
devant dans
Environment Division.
Input-Output Section.
File-Control.
on doit trouver
select FICH-SAI ....
qui, pour simplifier, décrit le fichier physiquement.

dans
Data Division.
File Section.
on trouve
FD FICH-SAI
qui décrit le fichier tel qu'il va être utilisé dans le programme
on trouvera dans la procedure division des choses comme
OPEN, CLOSE ??? FICH-SAI
READ FICH-SAI, WRITE TABLE-SAI...

2°Je présûme que 02 redéfinie 01 ?
pas tout à fait,
les 02 sont des sous-niveaux du 01 ( "ça découpe". )
qui, ici, est la structure des enregistrements du fichier

par exemple :
date=année+mois+jour on verrait, par exemple
01 dX.
03 aX.
05 am9 pic 99. millésime
05 aa9 pic 99. année
03 mX.
05 m9 pic 99. mois
03 jX.
05 j9 pic 99. jours

donc, dans l'exemple, l'enregistrement est constitué
de 10 octets numériques ( pic 9 occurs 10 )

88 permet de tester avec un nom-donnée plutôt
qu'un valeur, c'est plus lisible.
02 TAB-FICH-SAI.
88 FIN-SAI VALUE HIGH-VALUES.
test : if TAB-FICH-SAI = HIGH-VALUE
mieux : if FIN-SAI

là, ça me semble servir à déterminer le dernier enregistrement du fichier....
probablement inutile ( AT END existe en lecture ).

voili, voilou pour un ch'tit aperçu.
vous devriez trouver toutes les explications
dans les docs adéquates...

Cordialement.
__________________________
~ mon site ~ m'écrire ~
Laissez une adresse Mail où vous écrire, en évitant les spams
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

HAUT DE PAGE

HULK77
Modérateur :
- Cobol

Inscrit : 12/08/2004
Messages : 166

#151179 Posté le 26/03/08 à 15:44

Salut l'ami,

Pour compléter ce nous dit Bul,
FD veut dire File Description
(c'est à dire zone de description de fichier ) c'est là que l'on définit les
champs des structures de fichier.

Cela est souvent représenter sous forme d'arborescence, un peu comme en C.

Exemple :
FD FIC-PAIE
01 ENR-PAIE.
02 CLE-PAIE.
03 MATR1-PAIE PIC 9(08).
03 MATR2-PAIE PIC X(10).
02 LIBEL1-PAIE PIC X(35).
02 LIBEL2-PAIE PIC X(35).

etc ...

N'hésite pas à poser des questions, si besoin.

HULK77
__________________________
Ma fabrique de chemises tourne à plein régime !!!

HAUT DE PAGE


	Page précédente	Page suivante
FORUM COBOL

PAGE : [1]

.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.