Examen de Juin 2010
Examen de Juin 2010
Examen de Juin 2010
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
HELMo <strong>Examen</strong> <strong>de</strong> Cobol <strong>Juin</strong> <strong>2010</strong>Nom : Prénom :Ouverture.MOVE 1 TO co<strong>de</strong>-opCALL "SPCLI" USING co<strong>de</strong>-op un-client statutCALL "SPMUL" USING co<strong>de</strong>-op un-contenu statutCALL "SPCAT" USING co<strong>de</strong>-op une-categorie statut.Lecture-client.MOVE 2 TO co<strong>de</strong>-opCALL "SPCLI" USING co<strong>de</strong>-op un-client statutMOVE 3 TO co<strong>de</strong>-opCALL "SPCLI" USING co<strong>de</strong>-op un-client statut.Lecture-contenu.MOVE 2 TO co<strong>de</strong>-opCALL "SPMUL" USING co<strong>de</strong>-op un-contenu statutMOVE 3 TO co<strong>de</strong>-opCALL "SPMUL" USING co<strong>de</strong>-op un-contenu statut.Lecture-categorie.MOVE 2 TO co<strong>de</strong>-opCALL "SPCAT" USING co<strong>de</strong>-op une-categorie statutMOVE 3 TO co<strong>de</strong>-opCALL "SPCAT" USING co<strong>de</strong>-op une-categorie statut.Fermeture.MOVE 9 TO co<strong>de</strong>-opCALL "SPCLI" USING co<strong>de</strong>-op un-client statutCALL "SPMUL" USING co<strong>de</strong>-op un-contenu statutCALL "SPCAT" USING co<strong>de</strong>-op une-categorie statut.END PROGRAM EX0610.L. Swinnen 6