Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Computer Programspråk >> Content

    Hur man läser Flat File flera gånger i COBOL

    Läsa en platt fil flera gånger i den tredje generationens dator programmeringsspråk Common Oriented Business Language ( COBOL ) är en enkel process . Det kräver en del programmering skicklighet , men liksom vissa kunskaper i COBOL . Utvecklad ca 1960 av Dr Grace Murray Hooper är COBOL fortfarande används i stor utsträckning , främst av näringslivet . Det ritades , delvis för att bearbeta stora mängder data med minimala eller enkla affärer beräkningar . Saker du behöver : Aktuellt användarmanual för COBOL miljö
    Aktuellt COBOL manuell
    Visa fler instruktioner
    1

    Logga in på datorn miljö där du kommer att koda , sammanställa och köra din COBOL -program . Ta upp editorn där du kommer att skriva och redigera program . Genomföra denna uppgift varierar beroende på miljön typ . Kontrollera den aktuella bruksanvisningen för COBOL miljön
    2

    Type detta program mall , för vilka information ska fyllas i under efterföljande steg : .

    NAMNET DIVISION.Program - ID . Program ID here.Author . Ditt namn Here.Installation . Mitt företag computer.Date Written . . MM /DD /YYYY.REMARKS.Program beskrivning här

    MILJÖ SECTION.INPUT - OUTPUT SECTION.FILE - CONTROL.SELECT Input - FileASSIGN till "C : \\ TMP \\ SAMPIN.TXT " Organisation är LINE SEQUENTIAL .

    SELECT Print - fileASSIGN till "C : \\ TMP \\ SAMPOUT.TXT " Organisation är LINE SEQUENTIAL

    DATA DIVISION.FILE SECTION.FD Input - File post innehåller 10 tecken .01 . INPUT - REC.05 LAST - NAME PIC X ( 10 ) . FD Print - File post innehåller 10 tecken .01 OUTPUT - REC PIC X ( 10 ) .WORKING LAGRING SECTION.01 Läs - CNT pic 9 ( 9 ) blir värdet noll . 01 Läs - LMT pic 9 ( 9 ) blir värdet noll .

    GÅNG DIVISION.OPEN INGÅNG - fileOUTPUT Print - file.Set Läs - CNT till 0.Set Läs - LMT till 5.Read - file.READ input - fil AT END Gå till End-of PGM . Lägg 1 till Läs - CNT . FLYTTA INPUT - RECORD på OUTPUT - RECORD . SKRIV OUTPUT - RECORD.Add 1 till Läs - lmt.If Läs - LMT = 5 Gå till end-of - PGMElseGo till Läs - file.End - av - PGM.If Läs - cnt = 0 Display " Input - filen är tom " . CLOSE Input - fil , tryck - file.STOP RUN .
    3

    Samla information från flera källor för identifiering division av programmet mallen du skrev . Ta bort texten i fälten Identifiering Division , och ersätta den med den information du samlar . Ändra programmets namn , rätt program namnet ska vara i programmets specifikationer . Lägg till ditt namn som författare . För skrivdatum , använd aktuellt datum med hjälp av två tecken för månad och dag och fyra tecken för året . För installation anger du den miljö där du kan köra ditt program , som bör vara i bruksanvisningen . Knappa in en beskrivning av programmet under avsnittet "Anmärkningar" . Kontrollera aktuell COBOL handboken och bruksanvisningen , och knappa in all övrig information som krävs för att identifiera det program till specifika omvärld . För detta steg och efterföljande steg ,
    4

    Typ uppgifterna i programmet mallens fält miljödelen . Miljö § första avsnittet är det Configuration avsnitt . För ändamålen enligt föreliggande exempel, även , antag att källan - dator och objekt - datorn är densamma . Av den anledningen är det Configuration avsnitt elimineras .

    Ersätt data för Input - Output avsnitt , vilket är den andra delen av miljö avsnitt . Genom att använda "Select" uttalanden , skriver i identifierande information om de använda in-och utdata -filer . Hitta information och specifikationer i bruksanvisningen . Uppgifterna för " tilldela " klausulen beror på den specifika miljön .
    5

    titt på specifikationerna , och bestämmer hur många gånger den flata filen ska läsas in. Om specifikationerna anger ett visst antal gånger filen ska läsas , och sedan ändrar Läs - LMT variabel i Data Division från " noll " till det antal som anges i förfrågningsunderlaget . Också ändra läsning - LMT = 5 räknare från " 5 " till det värde som anges i specifikationerna i förfarandet Division .
    P Om filen ska läsas tills " End -of - File" och sedan radera Läs - LMT variabel från Data Division . Stryk de två rader kod i förfarandet Division " Om Läs - LMT = 5 Gå till End -of - PGM Else . " Addera

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur du ändrar fältgrupp Color
    ·Hur Anpassa gvim för HTML Coding
    ·Så här importerar en CSV -fil för DB2
    ·Inaktivera Windows-autentisering i IIS
    ·Hur du returnerar en sträng från en klass
    ·Hur kan jag konvertera en sträng till datum i Oracle
    ·Hur man ställer in en IRC Bouncer
    ·Hur man simulera en läcka i MATLAB
    ·Hur man gör datorn Animation
    ·Hur Exit AVG 9
    Utvalda artiklarna
    ·Hur man skapar en ny DAT -fil i Matlab
    ·ListBox Visual Basic Tutorial
    ·Kärna Java Tutorials
    ·Samtidighetskontroll Tekniker
    ·C + + Microsoft Tutorial Visual
    ·Hur man gör ett upprepande Progress Bar i VB
    ·Hur Uppdatera tid Med VBScript
    ·Jämförelse av sorteringsalgoritmer
    ·En NetBeans 6.8 UML Tutorial
    ·Hur man använder funktionen Template Överbelastning i…
    Copyright © Dator Kunskap http://www.dator.xyz