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 4

  • VSAM Arquivos relativos

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.

Depois que o comando WRITE é executado, a informação ainda está disponível em identifier-1.

Para arquivos OUTPUT, o comando WRITE causa as seguintes ações:

Se ACCESS IS SEQUENTIAL for especificado:

O primeiro registro liberado é o número 1, o segundo registro liberado é o número 2 e assim por diante. Se a RELATIVE KEY é especificada no File-Control, o registro liberado é colocado dentro da mesma durante a execução do comando WRITE.

Se ACCESS IS RANDOM ou ACCESS IS DYNAMIC for especificado, a RELATIVE KEY deve receber o endereço da mesma antes que o comando WRITE seja executado.


Sintaxe.