Discussion :

[frglyon]

Bonjour,
j'aimerai écrire un outil très rapidement (via awk ? sed ? que sais-je), qui me permette de lister des lignes appartenant à des fichiers sources cobol se trouvant dans un répertoire AIX.

La ligne à rechercher contient le statement Cobol NEXT SENTENCE et je veux afficher les lignes encadrant cet ordre avec le IF de départ et le END-IF (voire le point) de fin.
Exemple de source :
IF condition
NEXT SENTENCE
else
action 1
action 2
END-IF.

Comment faire svp ? avec en plus des lignes, le nom du fichier ...

Merci d'avance pour celles & ceux qui ont la gentillesse de me répondre,
Cordialement,
Frédéric.

[AAWOOPY56]

Slt frglyon et bonne année,

Je ne sais pas si ta demande est tjrs d’actualité si c’est le cas pourrais-tu me transmettre un échantillon du fichier à traiter

A+

[gangsoleil]

Bonjour,

Le plus simple consiste a afficher 5 lignes avant et apres le NEXT SENTENCE :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

find AIX -name "*.cobol" -exec grep -5 -- "NEXT SENTENCE" {} \; -print

Sinon, si tu veux vraiment te limiter au if / end if, je crains que ce ne soit beaucoup plus complexe.