Menu principal                 [Fechar]


Linguagem de programação COBOL - SET


Volta a página anterior

Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF.

 A declaração SET pode ser usada para:
  • Inicializar os valores de índices ou identificadores usados para se referenciar a elementos de uma tabela
  • Incrementar ou decrementar um índice
  • Fixa o status de uma variavel externa em ON ou OFF
  • Movimentar dados a fim de deixar variaveis condicionais verdadeiras

O seu formato geral é:

Sintaxe do comando SET


Primeiro exemplo
 SET - Formato 1

Sintaxe do comando SET


Quando o formato 1 da declaração SET é executada, o valor atual do campo receptor é substituído pelo valor do campo enviado (com conversão).

index-name-1
identifier-1
Campos receptores.
Tem que ser um item elementar inteiro.

Identifier-1 não pode ser um item de dados do tipo ponto flutuante.

index-name-2
Campo enviado.
O valor antes que a declaração SET fosse executada tem que corresponder ao número de ocorrência da tabela associada.

identifier-2
Campo enviado.
Tem que ser um item elementar inteiro.

Identifier-2 não pode ser um item de dados do tipo ponto flutuante.

integer-1
Campo enviado.
Tem que ser um inteiro positivo.


 SET - Formato 2

Sintaxe do comando SET


Quando o formato 2 da declaração SET é executada, o valor do campo receptor é aumentado (UP BY) ou diminuido (DOWN BY) por um valor que corresponde ao valor no campo enviando.

index-name-3
Campo receptor.
O valor do index-name tem antes e depois da execução da declaração SET que corresponder ao número de ocorrência da tabela associada.

identifier-3
Campo enviado.
Tem que ser um item elementar inteiro.

Identifier-3 não pode ser um item de dados do tipo ponto flutuante.

integer-2
Campo enviado.
Tem que ser um item elementar inteiro.


 SET - Formato 3

Sintaxe do comando SET


Quando o formato 3 da declaração SET é executado, o estado de cada chave externa associada com o mnemonic-name especificado é retornado ON ou OFF.

mnemonic-name
Para o formato 3 cada mnemonic-name deve ser associado com um interruptor externo, o estado de qual pode ser alterado. As únicas chaves externas permitidas são: UPSI-0 até UPSI-7.

É modificado o estado de cada chave externa associada com o mnemonic-name especificado tal que o resultante de valor de verdade de avaliação de uma condição associada com aquela chave r refletirá um em estado se o ON frase é especificado, ou um fora estado se o OFF frase é especificado.


 SET - Formato 4

Sintaxe do comando SET


Quando o formato 4 da declaração SET é executada, é colocado o valor associado com um condição (condition-name) em sua variável condicional.

condition-name-1
Deve ser associado com uma variável condicional.

condição-nome-1
Deve ser associado com uma variável condicional.
Se mais de uma literal é especificado na cláusula de VALUE da condição (condition-name-1), sua variável condicional associada é fixada ao primeiro literal.

Se multiplas condição (condition-names) são especifica, os resultados são igual a se uma declaração SET separada tinha sido escrita para cada condição-nome na mesma ordem na qual os condição-nomes são especificados.



Volta para o início da página

Volta a página anterior

Volta ao Menu Principal