COBOL - Comando WRITE - www.cadcobol.com.br


Volta a página anterior

Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

WRITE - Formato 3

  • VSAM Arquivos indexados

record-name
      deve ser definido na FD da Data Division. Record-name deve ser qualificado. não pode ser associado com um arquico SORT ou MERGE.

FROM
      O resultado da execução do comando WRITE com FROM e o identifier-1 equivale a seguinte execução:

      MOVE identifier-1 TO record-name.
      WRITE record-name.

      A declaração MOVE é executada de acordo com as suas regras sem a cláusula CORRESPONDING.

identifier-1
   Deve ser da seguinte maneira:
      o nome de uma entrada da Working-Storage Section ou Linkage Section
      o nome de um registro descrito previamente em outro arquivo aberto
      Identifier-1 and record-name não podem ser referenciados na mesma area
      Identifier-1 pode ser um floating-point ou um item de dados DBCS.

Antes do comando WRITE ser executado, voce deve setar o valor da chave primaria.
Note que o valor da RECORD KEY deve ser única dentro do arquivo.

Se a cláusula ALTERNATE RECORD KEY for especificada no File-Control, a chave de cada registro deve ser única, a não ser que a frase DUPLICATES seja implementada. Se a frase DUPLICATES for espeficida o valor da ALTERNATE RECORD KEY pode não ser única.

Quando o ACCESS IS SEQUENTIAL é especificado no File-Control, os registro são liberados na order ascendente do valoe da RECORD KEY.

Quando o ACCESS IS RANDOM ou ACCESS IS DYNAMIC é especificado, os registros são liberados na ordem que o DESENVOLVER (Analista/Programador) desejar.


Sintaxe.