The Common Business- Oriented Language , COBOL , tilbyr en rekke måter å få tilgang data i minnet. I COBOL , definerer du dataelementer som poster, tellere og midlertidige matematiske variabler i et område kalt Working Storage Seksjon for Data Division . Når definert, bruker du de variablene bare ved å henvise til dem ved navn . Hvis du trenger å referere til en byte inne i en variabel , sette opp en påfølgende variabel ved hjelp av COBOL er " omdefinerer "-klausul . Hvis du oppretter ny variabel som en matrise, kan du referere til noen enkelt byte i første variabel. Instruksjoner
en

Opprett en minnevariabel i arbeidslivet lagring, som i følgende eksempel : en

WORKING - LAGRING SECTION.01 DISPLAY - VARIABLES.05 DISPLAY - OMRÅDET PIC X ( 30 ) .

Dette setter opp en variabel kalt "DISPLAY - området."
2

Definer en ny variabel etter første bruker redefinerer klausulen. Denne variabelen er en matrise. Den refererer til de samme dataene som den første variabel ved hjelp av det nye navnet .

05 DISPLAY-BY TES omdefinerer DISPLAY - AREAOCCURS 30 GANGER indeksert av DISPLAY - INDEXPIC X ( 1 ) .

Den " indeksert av " klausulen definerer en indeks variabel. Du trenger ikke definere det andre steder i arbeidslivet Storage , da dette vil generere en feil. Størrelsen på det opprinnelige feltet , DISPLAY - området, er det samme som DISPLAY - BYTES som redefinerer den. Et felt som har en byte forekommer 30 ganger er det samme som en 30 - byte felt .
3

Sett opp en en- byte Working Storage felt der for å motta data , som dette eksempelet illustrerer : .

05 SINGLE-BYT E - FIELD PIC X ( 1 )
4

Flytt noen data til den første variabelen i "Prosedyre Division " av programmet, som i følgende eksempel : .

MOVE INPUT - posten for å vise - OMRÅDET
5

Sett verdien i matrisen indeks til å byte du ønsker. Denne linjen bør følge den forrige i programmets Prosedyre Division . I COBOL , i motsetning til de fleste andre språk enn Fortran , har det første elementet en indeks av en, ikke null. Så hvis du vil referere til den første byte i feltet , setter indeksen til en, som vist i følgende eksempel : en

SET DISPLAY - indeksen til en
6

Move. byte du nettopp har valgt til feltet du satt opp til å motta data . For å gjøre dette , angir du matrisen feltet og dets tilknyttede indeksen som i følgende utsagn:

MOVE DISPLAY - byte ( DISPLAY - indeks) for å enkelbits - FIELD
bilder .