7/24/2019 Tp Cobol III

1/5

Lenguaje Orientado a la Administracin Cobol Trabajo Prctico 3 NatanaelManrique 388!

Arc"i#os CO$OL

%n CO$OL& un arc"i#o es una coleccin de registros relacionados'

(n registro es una coleccin de cam)os usados )ara describir una entidad'

(no o ms cam)os en conjunto *orman un registro' %l tama+o acumulado detodos los cam)os en un registro se denomina tama+o del registro' Los

registros )resentes en un arc"i#o )ueden ser de longitud ,ja o #ariable'

Los registros )ueden ser *-sicos& tambi.n denominados bloques&

corres)ondientes a la in*ormacin e/istente en un dis)ositi#o e/terno0 o

lgicos& corres)odientes a la in*ormacin usada )or el )rograma' %n un

)rograma de CO$OL& solo un registro )uede ser mani)ulado en un

momento& 1 es el llamado registro lgico'

(n cam)o se em)lea )ara indicar los datos almacenados acerca de un

elemento en )articular' %l n2mero de caracteres en un cam)o es conocidocomo el tama+o del cam)o' (n cam)o )uede tener los siguientes atributos

cla#es )rimarias& que son cam)os 2nicos )ara cada registro& 1 son utili4ados

)ara identi,car un registro )articular0 cla#es secundarias que )ueden o no

ser cam)os 2nicos 1 se em)lean )aara la b2squeda de datos relacionados0 1

descri)tores& que son los cam)os usados )ara describir una entidad'

Organi4acin de los arc"i#os

La organi4acin de los arc"i#os indica cmo los registros se organi4an

dentro de un arc"i#o' %/isten di*erentes ti)os de organi4aciones de arc"i#os

)ara incrementar la e,cioencia del acceso a los registros' Los distintos ti)os

son

5ecuencial

5ecuencial inde/ada

6elati#a

Arc"i#os secuenciales

(n arc"i#o secuencial consiste en registros que son almacenados 1

accedidos en orden secuencial' Los )rinci)ales atributos de la organi4acin

secuencial son

Los registros debenen ser leidos en orden secuencial' Por ejem)lo&

)ara leer el registro n2mero 7& los 9 anteriores deben ser leidos'

Pgina 7 de :

7/24/2019 Tp Cobol III

2/5

Lenguaje Orientado a la Administracin Cobol Trabajo Prctico 3 NatanaelManrique 388!

Los registros son escritos en *orma secuencial' (n nue#o registro no

)uede ser insertado entre otros& solo )uede insertarse al ,nal del

arc"i#o'

Luego de ubicar un registro en un arc"i#o secuencial& no es )osible

borrar& acortar o alargar el registro'

%l orden de los registros& una #e4 insertados& nunca )uede ser

cambiado'

La actuali4acin de los registros es )osible' (n registro )uede ser

sobreescrito& si la longitud del nue#o registro es la misma que la del

#iejo'

Tambi.n e/iste un ti)o es)ecial de arc"i#o secuencial llamado arc"i#o

secuencial de l-nea& cu1a 2nica di*erencia es que ubica un )ar C6;L La #ariable ,leerror contiene un cdigo de estado luego de cada

o)eracin de aec"i#os'

d> ?ebe indicarse un n2mero de ni#el = )or cada arc"i#o' %l

nombre luego del n2mero de ni#el debe ser el mismo que el

declarado luego de 5%L%CT'

e> Pueden declararse di*erentes ti)os de registro luego del n2mero de

ni#el' %l arc"i#o )uede contener una combinacin de registros de

#arios ti)os'

*> La #ariable del cdigo de error debe declararse en la seccin DorEing

storage'

@erbos utili4ados )ara el manejo de arc"i#os

OP%N

5e debe ejecutar OP%N )re#iamente al uso de cualquier arc"i#o&

1a que es la manera en que se establece contacto entre el

)rograma 1 el arc"i#o en disco'

CLO5%

Cuando un )rograma no necesita #ol#er a acceder a un arc"i#o& se

debe ejecu1ar la sentencia CLO5% )ara cerrarlo& 1 as- guardar los

cambios reali4ados' Adems& si se quiere cambiar el modo en que

un arc"i#o es abierto& )re#iamente debe cerrarse'

6%A?

5e em)lea F6T% cuando se quiere leer una l-ne o un registro del

arc"i#o' La )rimera #e4 que se ejecute 6%A? luego de un OP%N& se

Pgina G de :

7/24/2019 Tp Cobol III

5/5

Lenguaje Orientado a la Administracin Cobol Trabajo Prctico 3 NatanaelManrique 388!

leer la )rimera l-nea o el )rimer registro del arc"i#o' Cada 6%A?

sucesi#o a#an4ar una )osicin "asta alcan4ar el ,nal del arc"i#o'

Cuando se intenta leer un registro luego de la 2ltima )osicin del

arc"i#o& la clusula AT %N? entra en e*ecto& )or lo que se

dentendr la lectura'

F6T%

La instruccin F6T% se utili4a )ara insertar una nue#a l-ne o

registro en un arc"i#o'

$ibliogra*-a

"tt);;DDD'csis'ul'ie;cobol;course;

"tt);;DDD'tutorials)oint'com;cobol;cobolHquicEHguide'"tm

"tt);;DDD'main*rames3I'com;

"tt);;DDD'bu'ac'in;sdeHbooE;bcaHcobol')d*

"tt);;Deb'cse'o"iostate'edu;Jsgomori;37G;langre*'"tmlKbD4

ig13lr: CO$OL

ig1:lr Language 6e*erence

ig1:)g Programming Buide

Pgina : de :

http://www.csis.ul.ie/cobol/course/http://www.tutorialspoint.com/cobol/cobol_quick_guide.htmhttp://www.mainframes360.com/http://www.b-u.ac.in/sde_book/bca_cobol.pdfhttp://web.cse.ohio-state.edu/~sgomori/314/langref.html#bwzhttp://www.tutorialspoint.com/cobol/cobol_quick_guide.htmhttp://www.mainframes360.com/http://www.b-u.ac.in/sde_book/bca_cobol.pdfhttp://web.cse.ohio-state.edu/~sgomori/314/langref.html#bwzhttp://www.csis.ul.ie/cobol/course/