Examen de Juin 2010

HELMo Examen de Cobol Juin 2010Nom : Prénom :Informations pratiquesCet examen s’effectue à cours ouvert. Cela signifie que vous pouvez disposer de tous vosdocuments personnels. Aucun échange n’est autorisé durant l’épreuve. Aucunportable ni compilateur n’est autorisé durant l’examen.Il vous est également demandé de répondre sur le questionnaire que vous remettrez auterme de l’épreuve. Aucune feuille ne sera ajoutée à ce questionnaire. Si nécessaire, utilisezle verso en mentionnant clairement où se trouve la suite de votre réponse.Commencez par indiquer votre nom et votre prénom en haut de chaque page.Partie langage et compilation (/3)Question 1. Écrivez en CaML une fonction permettant d’inverser tous les éléments d’untableau, quel qu’en soit son type. Aidez-vous d’une fonction utilitaire si nécessaire.Question 2. Comment construire un compilateur pour le nouveau langage D s’exécutant surune machine N (P=Pascal ; M = machine M sur laquelle on peut exécuter un programme) :en disposant d’une machine M et des traducteurs / compilateurs suivants :L. Swinnen 1

HELMo Examen de Cobol Juin 2010Nom : Prénom :Partie langage Cobol (/17)Voici l’extrait d’un schéma entité-association :ArticleNum. ArticleTitreAuteurs[1-5]NomPrénomMailTexteid: Num. Article0-N Concerne1-1CommentaireNum. CommentaireAuteurNomPrénomMailTexteid: Num. CommentaireQuestion 3. On vous demande de traduire ce schéma entité-association en fichier(s) Cobol.Présicez l’organisation du (ou des) fichier(s). Il faut également préciser que des fichiersdifférents peuvent avoir des organisations différentes. Détaillez ensuite la structure desenregistrements. N’oubliez pas les clés identifiantes.FILE-CONTROL.FILE SECTION.L. Swinnen 2

HELMo Examen de Cobol Juin 2010Nom : Prénom :SituationDans le but d’éditer les factures concernant les ventes en ligne de contenu multimédia,l’entreprise SwilaMédia dispose des informations suivantes :• Le fichier décrivant les contenus multimédias indiquant, pour chaque contenu, sonidentifiant, sa description, son prix, l’identifiant de la catégorie auquel il appartient. Ils’agit d’un fichier séquentiel indexé pour lequel un module d’accèsstandard (SPMUL) existe déjà.• Le fichier des catégories de contenu mentionnant pour chaque catégorie, sonidentifiant, son intitulé et l’âge minimal requis. Il s’agit d’un fichier relatif pourlequel un module d’accès standard (SPCAT) existe déjà.• Le fichier des clients mentionnant l’ensemble des clients ayant commandé uncontenu multimédia. Il contient l’identifiant, les noms et prénoms, l’adresse, lalocalité et la date de naissance de chaque client. Il s’agit d’un fichier séquentielindexé pour lequel un module d’accès standard (SPCLI) existe déjà.• Le fichier mensuel de facturation qui contient, pour un client et une date donnée,l’ensemble des contenus téléchargés par ce client. Pour plus de facilité, le fichier esttrié suivant le numéro de client et la date de commande.On vous demande de créer un programme Cobol permettant de calculer les totaux à facturerpour tous les clients et contenus présent dans le fichier de facturation en produisant lerapport imprimé conforme au schéma suivant :FACTURECocaAv. du Luxembourg 55LIEGEMr.>>> Achat du 03/05/10Description Categorie Prix H.T. T.V.A.Friends, Saison 1 Tout public 8.00 1.68Friends, Saison 2 Tout public 8.00 1.68How I meet your mother 3.01 Tout public 0.99 0.20Total H. T. pour cet achat : 16.99TVA pour cet achat : 3.56>>> Achat du 10/05/10Description Categorie Prix H.T. T.V.A.(...) (...) (...) (...)Total H. T. pour cet achat : 28.99TVA pour cet achat : 6.08Total general (H.T) : 45.98TVA totale : 9.64Total a payer (TVAC) 55.62FACTURECroissantQuai St-Léonard 23LIEGE(...)Mr.Veillez bien à reproduire le rapport imprimé en tenant compte des formats des différentesdonnées. Veillez à utiliser toutes les options nécessaires à l’intérieur de la REPORT SECTION.L. Swinnen 3

HELMo Examen de Cobol Juin 2010Nom : Prénom :IDENTIFICATION DIVISION.PROGRAM-ID. EX0610.ENVIRONMENT DIVISION.INPUT-OUTPUT SECTION.FILE-CONTROL.SELECT fi-fac ASSIGN TO "factures"FILE STATUS IS st-fac.SELECT fi-rap ASSIGN TO "rap-1.txt".DATA DIVISION.FILE SECTION.FD fi-fac.01 facture.02 num-client PIC X(5).02 date-facture PIC X(6).02 tab-contenu OCCURS 50.03 id-contenu PIC X(5).FD fi-rap REPORT IS rap-1.WORKING-STORAGE SECTION. Autres données à définir :01 un-client.02 num-client PIC X(5).02 nom PIC X(30).02 prenom PIC X(30).02 adresse PIC X(100).02 localite PIC X(40).02 date-naissance PIC 9(6).01 un-contenu.02 id-contenu PIC X(5).02 description PIC X(100).02 prix PIC 9999V99.02 id-cat PIC 99.01 une-categorie.02 id-cat PIC 99.02 intitule PIC X(80).02 age-minimal PIC 999.77 statut PIC XX.77 st-fac PIC XX.77 code-op PIC 9.Question 4. Écrivez le code de la REPORT SECTION de sorte que celle-ci soit conforme auschéma présenté ci-avant. Respectez le format des données !REPORT SECTION.RDPAGE LIMIT 66 LINEHEADING 5 FIRST DETAIL 7 LAST DETAIL 35 FOOTING 45.L. Swinnen 4

HELMo Examen de Cobol Juin 2010Nom : Prénom :Question 5. Écrivez le code du programme Cobol. Il n’est pas nécessaire de vérifier lesaccès aux fichiers. Le fichier séquentiel de facturation est trié suivant le numéro de client etla date de commande.PROCEDURE DIVISION.En-avant.L. Swinnen 5

HELMo Examen de Cobol Juin 2010Nom : Prénom :Ouverture.MOVE 1 TO code-opCALL "SPCLI" USING code-op un-client statutCALL "SPMUL" USING code-op un-contenu statutCALL "SPCAT" USING code-op une-categorie statut.Lecture-client.MOVE 2 TO code-opCALL "SPCLI" USING code-op un-client statutMOVE 3 TO code-opCALL "SPCLI" USING code-op un-client statut.Lecture-contenu.MOVE 2 TO code-opCALL "SPMUL" USING code-op un-contenu statutMOVE 3 TO code-opCALL "SPMUL" USING code-op un-contenu statut.Lecture-categorie.MOVE 2 TO code-opCALL "SPCAT" USING code-op une-categorie statutMOVE 3 TO code-opCALL "SPCAT" USING code-op une-categorie statut.Fermeture.MOVE 9 TO code-opCALL "SPCLI" USING code-op un-client statutCALL "SPMUL" USING code-op un-contenu statutCALL "SPCAT" USING code-op une-categorie statut.END PROGRAM EX0610.L. Swinnen 6