Hvordan bruke en Array i COBOL

Hvordan bruke en Array i COBOL


I en verden av databehandling og programmering, er COBOL anerkjent som en av de mest nyttige verktøyene i markedet. Kraften, detaljnivå og veltalenhet av dette språket gjør at du kan utføre kompliserte oppgaver som behandling matriser og flerdimensjonale tabeller. Som et eksempel, tenk et stort forsikringsselskap delt inn i fire regioner av landet, hver region deles inn i fem byer, hver by delt inn i tre distrikter, hvert distrikt har tre kontorer og hvert kontor kan ha fire avdelinger. Du kan generere detaljert regnskap og skattemessige rapporter ved hjelp av en matrise i COBOL å behandle disse typer henvendelser

Bruksanvisning

1 Bestem hvor du ønsker å formatere og strukturere rapporten. I eksempelet gitt, kan det være lurt å kjøre en månedlig rapport over antall og summer daglige krav behandlet og utbetalt innen hver avdeling ved kontoret i distriktet, innen byen, innen regionen. Inngangs posten hierarkiet er sortert etter region.

2 Gå til "Working-Storage Section" av programmet og definere matrisen. Rekorden struktur og syntaks vil være "01 Array." Det vil være fire regioner: 05 Region pic x (10). Innenfor hver region vil være fem byer: 10 By Oppstår fem ganger indeksert av city-indeksen pic x (25). Innenfor hver by vil være tre distrikter: 15 District oppstår tre ganger indeksert av dist-indeksen pic x (25). Underordnet District vil være Office: 20 Kontor oppstår tre ganger indeksert av kontor-indeksen pic x (30) og innen Office er Department: 25 Institutt Oppstår fire ganger indeksert av dept-indeksen pic x (30).

3 Kode lese uttalelsen for ditt innspill til Working-Storage § og fylle ut feltene tilsvarende. I dette eksempelet vil hver inngang posten har et område på 10 bytes i begynnelsen, et sett av fem byer i 25 byte hver, tre distrikter av 25 byte hver, tre kontorplasseringer på 30 bytes hver og fire avdelinger med 30 byte hver.

4 Lag et avsnitt med et navn i prosedyren divisjon. Som et eksempel: «Fylle-the-Array" og kode uttalelsene som følger. "Utfør Move-the-Cities varierende city-indeksen fra en av en til city-indeksen er større enn 5, Sent varierende District fra 1 til 1 før dist-indeksen er større enn 3, Sent Office fra en av en til Office er større enn 4, etter avdeling fra en etter en til avdeling er større enn 4. "det er viktig å merke seg at den innerste løkken blir utført først. det vil si, Department, da Kontor, deretter District, og deretter by vil sløyfe og prosess som i bestille.

5 Utfør beregningene og hente verdiene du ønsker i løpet av looping som er forutbestemt for rapporten. Etterpå kompilere programmet og sørge for at oppføringen er fri for syntaksfeil.

6 Kjør programmet som en test og undersøke utgang.