Você pode usar SET para fazer qualquer dos seguintes:
.-,----------------------------. V | >>-SET----+-registro----+-SCAN (Procurar Adiante)-+--+-+--;---->< | '-VAZIO-------------------' | +-item de registro de linha SQL--NULO--------+ | .-,---------------. | | V | | +-mapa----+-PAGE-------+--+------------------+ | +-ALARME-----+ | | '-+-LIMPAR-+-' | | '-VAZIO--' | | .-,-----------------. | | V | | +-item de mapa----+-CURSOR-------+--+--------+ | +-FULL---------+ | | '-+-NORMAL---+-' | | '-DEFINIDO-' | | .-,-----------------. | | V | | '-item de mapa----+-CURSOR-------+--+--------' +-FULL---------+ +-cor----------+ +-ext-hilite---+ +-MODIFICADO---+ +-+-CLARO--+---+ | '-ESCURO-' | '-+-PROTEGER-+-' '-AUTOSKIP-'
>>-+-MONO-----+------------------------------------------------>< +-AZUL-----+ +-ROSA-----+ +-AMARELO--+ +-TURQ-----+ +-VERMELHO-+ +-VERDE----+ '-BRANCO---'
>>-+-NOHILITE-+------------------------------------------------>< +-PISCAR---+ +-RVIDEO---+ '-USCORE---'
Atributo | Descrição |
---|---|
registro | Nome de um registro. |
item de registro de linha SQL | Nome de um item de dados de um registro de linha SQL. O nome do item pode ser qualificado pelo nome do registro. |
mapa | Nome de um mapa. |
item de mapa | O nome de um campo variável de um mapa. Itens de mapa podem ser subscritos, qualificados ou ambos. |
SCAN | Utilizado para estabelecer a posição de procura para um arquivo indexado
ou banco de dados de DL/I sem ter de usar uma opção de E/S INQUIRY. Se
o registro for um arquivo indexado, a ação tomada depende da próxima opção
selecionada.
Um registro SET SCAN com um valor chave definido para todos os bytes X'FF' anteriores a um SCANBACK, define o indicador de posição em todos os ambientes até o final do arquivo, de modo que o próximo SCANBACK recupera o último registro no arquivo. Para registros DL/I, você deve definir o valor de chave do segmento e os valores de chave dos segmentos ascendentes dele, se houverem segmentos ascendentes, no banco de dados DL/I. Se o registro estiver em um banco de dados DL/I e a próxima opção executada para o registro for um SCAN utilizando argumentos de pesquisa padrão, então a chamada DL/I é modificada para recuperar a primeira ocorrência do registro no banco de dados após ou na posição indicada pelo valor chave do segmento e os valores chaves de seus segmentos pais no banco de dados. O registro SET SCAN pode ser usado apenas com chamadas DL/I com Procura no Ascendente igual a Não e listas SSA não modificadas. Se a próxima opção executada para este segmento for uma função SCAN DL/I com uma lista SSA modificada, a execução é encerrada. Se a próxima opção executada para o segmento não for um SCAN, a condição é redefinida e ignorada. |
VAZIO | Utilizado para inicializar todas os itens de dados em um registro
(brancos para itens de dados de caractere, mistos e DBCS; zeros para
itens de dados numéricos; e zeros binários para itens de dados binários e
hexadecimais).
Se o registro for um registro de memória de trabalho, os itens de nível-77 não são afetados pela instrução SET record EMPTY . Para uma estrutura de dados subdividida, uma instrução SET record EMPTY executa a mesma coisa que especificar instruções MOVE individuais dos valores padrão para cada item de dados na estrutura. Se especificado para um mapa, o EMPTY faz com que o conteúdo de cada campo do mapa seja definido em 0 para campos numéricos ou brancos para campos de caracteres, mistos ou DBCS. Os atributos do campo não são alterados. |
NULO | Define o indicador de nulo de um item em uma estrutura do registro de linha SQL para a condição nula (valor -1). A condição não tem efeito em itens não pertencentes aos registros de linha SQL. |
PAGE | Utilizado para limpar a exibição ou avançar o papel para a parte superior
da próxima página antes da próxima opção de E/S CONVERSE ou DISPLAY.
Essa condição afeta o dispositivo da próxima opção de E/S CONVERSE ou DISPLAY de qualquer mapa, não apenas aquela especificada na instrução SET. Um SET PAGE automático é realizado quando aparece um mapa fixo diferente que seria posicionado em uma das linhas definidas em um mapa fixo já exibido (a menos que os mapas se correspondam exatamente na posição inicial e na profundidade). Se esse mapa for o primeiro de um programa e estiver indo para uma impressora, o usuário do programa deverá posicionar o papel no alto da página antes de executar o programa, a menos que seja usado um SET mapa PAGE. Se um programa de chamada e chamado estiverem sendo impressos no mesmo arquivo, um mapa CLOSE poderá ser emitido antes do primeiro DISPLAY no programa chamado para garantir que o papel esteja posicionado corretamente para o programa chamado. |
ALARME | Faz o alarme da exibição disparar na próxima opção de E/S CONVERSE quando aparecer o mapa especificado. |
LIMPAR | Redefine o mapa para seu estado originalmente definido. O mapa especificado não tem de ser o próximo mapa exibido. Os atributos e o conteúdo dos campos são definidos com os valores originais estipulados para o mapa. |
CURSOR | Coloca o cursor na primeira posição do campo de um mapa quando o mapa aparece. Se mais que um CURSOR do campo de mapa SET for emitido para um mapa, o cursor será posicionado no campo de mapa da última instrução SET emitida. O estado do CURSOR não afeta nenhuma outra condição. |
NORMAL | Exibe os dados com intensidade normal, e o campo de um mapa é definido como UNPROTECTED e UNMODIFIED. As únicas condições que podem ser usadas com NORMAL são CURSOR e FULL. |
DEFINIDO | Exibe os dados com os atributos originalmente definidos para o campo do mapa. As únicas condições que podem ser usadas com DEFINED são CURSOR e FULL. |
FULL | Usado para lembrar os usuários do programa de que um campo deverá ser
completamente preenchido.
Os asteriscos são colocados em um campo em branco ou vazio quando o mapa é exibido pela opção de E/S CONVERSE. Quando o usuário do programa digita dados no campo de variável, quaisquer asteriscos restantes são parte dos dados. Se o campo de um mapa tem um caractere de preenchimento diferente do padrão especificado, esse caractere será usado no lugar dos asteriscos. Os asteriscos aparecem somente no mapa, e não na memória interna se o campo do mapa não estiver definido como MODIFIED. O usuário do programa deve limpar o campo dos asteriscos se os dados forem digitados nos campos para evitar que os asteriscos sejam passados para o programa. O FULL permanece em vigor até que uma outra instrução do item de mapa SET desse campo seja executada ou algo mais seja feito para limpar os atributos do campo, tal como um SET mapa CLEAR. O SET FULL é destinado a cada item, não à estrutura do mapa. O SET de um campo de mapa misto vazio FULL faz os asteriscos de byte único aparecerem no campo do mapa da próxima vez que ele for exibido. Para ser considerado vazio, o campo do mapa deve conter todos os espaços em branco de byte único. Se o programa quiser que o uso do item de mapa SET FULL seja honrado, o grupo de mapas deverá ser gerado com a opção de geração /SETFULL. Se a opção de geração /NOSETFULL for especificada, o programa dos serviços de mapeamento não colocarão um asterisco (*) nos campos que foram definidos como cheios. |
cor | Define o atributo da cor de um campo de mapa como uma destas cores: monocromática, azul, rosa, amarelo, turquesa, vermelho, verde e branco. |
ext-hilite | Define o atributo do destaque estendido de um campo do mapa como um destes valores: sem destaque estendido, piscante, vídeo reverso ou sublinhado. |
MODIFICADO | Usado para definir o status do campo variável para modificado.
Isto obriga o conteúdo do campo de variável a voltar para o programa na
próxima opção de processo CONVERSE.
A condição modificada não tem nenhum efeito no campo do mapa até que o mapa seja convertido. Uma instrução TEST MODIFIED antes de um mapa ser convertido não dá uma condição verdadeira como resultado dessa instrução SET. Essa instrução também pode ser usada para forçar a edição dos dados (caracteres não em branco ou numéricos não-zero) em um campo quando o mapa for convertido. A condição modificada é redefinida antes da próxima exibição de um mapa, a menos que uma outra instrução MODIFIED do campo de mapa SET seja executada. |
CLARO | Exibe o campo de um mapa com intensidade de brilho.
Se você estiver executando em uma exibição colorida e todos os campos de mapa estiverem definidos com cores padrão, o operando CLARO fará a cor de um campo desprotegido normal ser alterada de verde para vermelho. (Um campo protegido normal passa de azul para branco.) Caso contrário, nenhuma alteração de cor acontece. |
ESCURO | Usado para impedir que o campo variável exiba dados.
ESCURO é geralmente usado por razões de segurança, tal como senhas. |
PROTEGER | Protege um campo de mapa da modificação feita por um usuário.
PROTEGER e AUTOSKIP não podem ser especificados juntos porque AUTOSKIP força PROTEGER. |
AUTOSKIP | Protege um campo de mapa da modificação feita por um usuário, fazendo o cursor pular esse campo. |
Quando a instrução SET é utilizada para definir um campo de mapa com atributos diferentes do cursor, cor ou destaque estendido, os atributos especificados agem como uma substituição completa de todos os atributos diferentes do cursor, cor, destaque estendido, numérico e atributos fold especificados na definição do mapa.
Quando a instrução SET for utilizada para atribuir os atributos cor e destaque estendido aos itens do mapa da variável, você poderá especificar somente o atributo de uma cor e um destaque estendido. Eles podem ser combinados com qualquer outro valor de atributo do item de mapa, exceto DEFINED e NORMAL. O DEFINED e o CLEAR redefinem os atributos cor e destaque estendido como aqueles originalmente definidos na definição do mapa. O NORMAL não tem efeito em cor, nem no destaque estendido.
As seguintes instruções também se aplicam aos atributos cor e destaque estendido:
Ambiente | Considerações de Compatibilidade |
---|---|
VM CMS | Nenhum. |
VM batch | Nenhum. |
CICS para MVS/ESA | Nenhum. |
MVS/TSO | Nenhum. |
MVS batch | Nenhum. |
IMS/VS | Nenhum. |
IMS BMP | Nenhum. |
CICS para VSE | Nenhum. |
VSE batch | Nenhum. |
CICS para OS/2 | Nenhum. |
OS/400 | Nenhum. |
OS/2 (GUI) | Somente instruções suportadas são:
|
Windows (GUI) | Igual a OS/2 (GUI). |
OS/2 (C++) | Nenhum. |
AIX | Nenhum. |
HP-UX | Nenhum. |
CICS for AIX | Nenhum. |
Windows NT | Nenhum. |
CICS para Windows NT | Nenhum. |
Dispositivo de Teste | Nenhum. |
Para redefinir MAP1 para seu estado original:
SET MAP1 CLEAR;
Para limpar o painel e redefinir MAP1 para seu estado original antes que ele apareça, e para soar o alarme do terminal quando o MAP1 aparecer:
SET MAP1 PAGE, CLEAR, ALARM;
Para definir todos os campos em um registro chamado REC1 para zero (itens de dados numéricos) ou em branco (itens de dados de caracteres):
SET REC1 EMPTY;
Para definir a cor como vermelho e o destaque estendido como piscante:
SET MAPITEM RED,BLINK;
Para definir o destaque estendido para vídeo reverso, a fim de proteger um campo de mapa, e definir a cor como turquesa:
SET MAPITEM RVIDEO,PROTECT,TURQ;