Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Prihláste sa k počítaču prostredie , kde budete kódu , kompiláciu a vykonávať svoje COBOL program . Vyvolajte editor , kde budete kľúč a upravovať svoj program . Splnenie tejto úlohy sa líšia v závislosti od typu prostredia . Pozrite sa na aktuálne užívateľská príručka pre COBOL prostredie
2
Opište programu šablónu , pre ktoré budú údaje vyplnené počas nasledujúcich krokov : .
IDENTIFIKÁCIA DIVISION.Program - ID . Program ID here.Author . Vaše meno Here.Installation . Moja firma computer.Date Napísali . MM /DD /Popis YYYY.REMARKS.Program tu
ŽIVOTNÉ PROSTREDIE SECTION.INPUT - OUTPUT SECTION.FILE - Control.Select Input - FileASSIGN TO " C : \\ TMP \\ SAMPIN.TXT " . Organizácia LINE SEQUENTIAL .
vyberte položku TLAČ - fileASSIGN TO " C : \\ TMP \\ SAMPOUT.TXT " organizácie LINE SEQUENTIAL
DATA DIVISION.FILE SECTION.FD RECORD Vstupný súbor obsahuje 10 znakov 0,01 . INPUT - REC.05 LAST - NAME pIC X ( 10 ) . FD RECORD tlače Súbor obsahuje 10 znakov .01 OUTPUT - REC pIC X ( 10 ) . WORKING SKLADOVANIE SECTION.01 čítanie cnt pic 9 ( 9 ) hodnota je rovná nule . 01 čítanie LMT pic 9 ( 9 ) hodnota je rovná nule .
POSTUP DIVISION.OPEN INPUT Input - fileOUTPUT Print - file.Set čítanie cnt na 0.Set čítanie LMT na 5.Read - file.READ vstupný súbor nA kONCI Prejsť na koniec - PGM . Pridať 1 pre čítanie CNT . MOVE INPUT - RECORD na výstup - RECORD . WRITE OUTPUT - RECORD.Add 1 pre čítanie lmt.If Read - Limit = 5. Prejdite na koniec - of - PGMElseGo pre čítanie file.End - of - PGM.If čítanie CNT = 0 Display " Vstupný súbor je prázdny " . CLOSE Vstupné súbor , Print - file.STOP RUN .
3
pozbierate čo najviac informácií z rôznych zdrojov pre identifikáciu divízie programu šablóny ste zadali . Zmažte text v poli Identifikácia divízie , a nahradiť ho informáciou , ktoré ste zhromažďovať . Zmena názvu programu , správny názov programu by mala byť v špecifikáciách programu . Pridať svoje meno ako autora . Pre napísané dátum , použiť aktuálny dátum pomocou dvoch znakov pre mesiac a deň a štyri znaky na rok . Pre oblasti inštalácie , do prostredia , v ktorom budete spustiť svoj program , ktorý by mal byť v návode na použitie . Zadajte popis programu v časti " Poznámky " . Pozrite sa na aktuálne COBOL na obsluhu a tento návod a kľúč na všetky ostatné informácie potrebné na identifikáciu programu na konkrétnom operačnom prostredí . Pre tento krok a následné kroky ,
4
Zadajte informácie o životnom prostredí § oblastiach programu šablóny . Prvá časť životného prostredia Sekcia je konfigurácia oddiel . Na účely tohto príkladu , aj keď sa predpokladá , že u zdroje počítača a objekt počítače sú rovnaké . Z tohto dôvodu sa do sekcie Konfigurácia je vylúčená .
Nahradiť dáta pre vstupné - výstupné sekcie , ktorá je druhá časť sekcie životného prostredia . Pomocou " SELECT " vyhlásenie , zadajte identifikačné údaje o vstupných a výstupných súborov používaných . Nájdite informácie a špecifikácie v užívateľskej príručke . Dáta pre " priradiť " klauzula závisí na konkrétnom prostredí .
5.
Pozrite sa na špecifikácie , a zistiť , koľkokrát bude plochý súbor čítať . Keď údaje naznačujú určitý počet opakovaní súboru je potrebné čítať , a potom zmeniť Read - LMT premennú v oddelení dát od " nuly " na číslo uvedené v súťažných podkladoch . Tiež zmeniť Read -Limit = 5 pult z " 5 " na hodnotu uvedenú v špecifikáciách v riadení divízie .
- Li súbor pre čítanie , kým " End - of - File " a potom odstráňte prečítajte si , LMT premennú z divízie dát . Odstráňte dva riadky kódu v oddelení riadenia " Ak Read - LMT = 5 Choď na End - of - PGM Else . "