Menu principal                 [Fechar]


CICS - Acesso as informações do sistema


Volta a página anterior

Volta ao Menu Principal


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

CICS - Acesso as informações do sistema

O CICS mantém acompanhamento de certos dados que o programa de aplicação pode necessitar durante a execução, dados tais como numero da tarefa, hora e data.

O CICS registra este tipo de dados internos em áreas que o programa de aplicação nao tem acesso direto.
Contudo, o CICS copia os dados num bloco de interface de execução (EIB) que é criado na hora em que a tarefa é iniciada. Existe um EIB por tarefa.
O tradutor de comandos automaticamente inclui uma copia do EIB no programa de aplicação.

O EIB para uma tarefa armazena informações que o programa de aplicação pode então pesquisar usando-se os nomes dos campos. segue os nomes de alguns campos e seus conteúdos.

Campo Tamanho Explicação
EIBDATE S9(007) Data em que teve inicio a tarefa. Este campo está no formato decimal compactado com o seguinte layout: 00AADDD
EIBTIME S9(007) Hora em que teve inicio a tarefa. Este campo está no formato decimal compactado com o seguinte layout: 0HHMMSS
EIBTRNID X(004) Identificação da tarefa
EIBTRMID X(004) Identificação do terminal que está associado a tarefa
EIBAID X(001) Contém a última tecla de 'função programada' digitada pelo operador
EIBPOSN S9(004) Posição do cursor na tela na hora da última entrada. este campo está no formato computational (COMP)
EIBCALEN S9(004) Contem o tamanho da area de comunicacao (COMMAREA) passada para a TASK. Se nao foi passada nenhuma COMMAREA, este campo terá o valor igual a zeros. Este campo está no formato computational (COMP)

Para a atualização da data e hora do sistema há o comando ASKTIME que atualiza os campos EIBTIME e EIBDATE do EIB, com a data e a hora em que o comando é executado.

Exemplo para programa COBOL:



            EXEC     CICS              
                     ASKTIME    
            END-EXEC.