MODULO: CONTABILIDADE PROCEDIMENTO ESPECIAL ASSUNTO: CTPECOMP - VS. 3.501 COMUNICACAO ENTRE FILIAIS (PANAMBRA) OBJETIVO: Identificacao para Atualizacao de arquivos entre filiais Remotas. (ARQUIVO FORA DE SEQUENCIA) ARQUIVOS: 1. SIRCA031-NL'S #31 2. SIRCA31A-HISTORICO DE NL'S #35 3. SIRCA032-NUMERADOR DE LANCAMENTOS #32 4. SIRCA036-LANCAMENTOS AUTOMATICOS #36 5. SIRCA518-TABELA GENERICA #68 Estes arquivos deverao ser verificados neste procedimento pelo Utilitario DFESTAT. Verificar visualmente o tamanho destes arquivos e preferencialmente, reindexe os indices ou utilize o CHGESTRU para atualizar a Estrutura. Faca o BACKUP destas estruturas antes de executar sua atualizacao. PROGRAMAS: TRANSMISSAO 1. SIRCP685-TRANSMISSAO LCTOS AUTOMATICOS 2. SIRCP795-TRANSMISSAO DE NL'S RECEPCAO 1. SIRCP686-RECEPCAO/ATUALIZACAO LCTOS AUTOMATICOS 2. SIRCP796-RECECPAO DE NL'S ETAPAS: LANCAMENTOS AUTOMATICOS (Prefixo S685 dos arquivos-texto) 1. Identificar se houve atualizacao parcial na recepcao: Selecionar registros (query) do arquivo SIRCA036, pelo campo NUMARQUI = Data Juliana (do processamento). Visualizar campos REFERMOV, FILORIGE, FILDESTI e DATA-MOVI. Caso a selecao identifique Lancamentos de Origem Remo-ta e ja Atualizados (REFERMOV > 20000) consultar pelo programa SIRCP744 para posterior comparaca entre o Lancamento Atualizado e os Arquivos do Diretorio da Caixa -Postal LOCAL. 2. Verificar Sequencia da Tabela Generica (SIR686): Esta Tabela Grava a ultima sequencia do arquivo recebido das Filiais REMOTAS, os quais sao identificados pelo Codigo da CAIXA- POSTAL. Atraves do Log do Programa, substituir o campo Extra pelo informado "NUMERO DO ARQUIVO ATUAL" subtraido de 1 (uma) unidade. Por Exemplo; se o Numero do Arquivo Atual for igual a 100, substituir o campo Extra referente ao codigo da Filial Remota por 99.Executar o programa para a data-de-referencia, para que os Lancamentos sejam atualizados. EXEMPLOS: O exemplo abaixo, identifica as situacoes da Tabela Generica em POA, CSL e PLT. O codigo da Tabela SIR685, identifica os arquivos-textos gerados para as respectivas Caixas-postais DESTINO. O codigo da Tabela SIR686, identifica os arquivos-textos recebidos das respectivas Caixas-postais ORIGEM. Tabela de Transmissao e Recepcao em POA: ======================================== Codigo da Tabela.: SIR685 ----------+----+----------+------------------------------------------- Codigo |Tipo|Extra |.... ...10.... ...20.... ...30.... ...40... ----------+----+----------+ : | : | : | : CSL | 0 |84 #A#|/PRDPOA/SIRCX/CXP/CSL/S685POA.019 | | | PLT | 0 |85 #B#|/PRDPOA/SIRCX/CXP/PLT/S685POA.019 | | | Situacao da Tabela Generica para os arquivos Gerados em POA para CSL e PLT. Codigo da Tabela.: SIR686 ----------+----+----------+-------------------------------------------- Codigo |Tipo| Extra |.... ...10.... ...20.... ...30.... ...40.... ----------+----+----------+ : | : | : | : CSL | 0 |78 #C#|/PRDPOA/SIRCX/CXP/POA/S685CSL.019 | | | PLT | 0 |86 #F#|/PRDPOA/SIRCX/CXP/POA/S685PLT.019 | | | Situacao da Tabela Generica para os arquivos Gerados em CSL e PLT para POA. Tabela de Transmissao e Recepcao em CSL: ======================================== Codigo da Tabela.: SIR685 ----------+----+----------+-------------------------------------------- Codigo |Tipo| Extra |.... ...10.... ...20.... ...30.... ...40.... ----------+----+----------+ : | : | : | : POA | 0 |78 #C#|/PRDPOA/SIRCX/CXP/POA/S685CSL.019 | | | PLT | 0 |70 #D#|/PRDPOA/SIRCX/CXP/PLT/S685CSL.019 | | | Situacao da Tabela Generica para os arquivos Gerados em CSL para POA e PLT. Codigo da Tabela.: SIR686 ----------+----+----------+-------------------------------------------- Codigo |Tipo| Extra |.... ...10.... ...20.... ...30.... ...40.... ----------+----+----------+ : | : | : | : POA | 0 |84 #A#|/PRDPOA/SIRCX/CXP/CSL/S685POA.019 | | | PLT | 0 |75 #E#|/PRDPOA/SIRCX/CXP/CSL/S685PLT.019 | | | Situacao da Tabela Generica para os arquivos Gerados em POA e PlT para CSL. Tabela de Transmissao e Recepcao em PLT: ======================================== Codigo da Tabela.: SIR685 ----------+----+----------+-------------------------------------------- Codigo |Tipo| Extra |.... ...10.... ...20.... ...30.... ...40.... ----------+----+----------+ : | : | : | : CSL | 0 |75 #E#|/PRDPOA/SIRCX/CXP/CSL/S685PLT.019 | | | POA | 0 |86 #F#|/PRDPOA/SIRCX/CXP/POA/S685PLT.019 | | | Situacao da Tabela Generica para os arquivos Gerados em PLT para CSL e POA. Codigo da Tabela.: SIR686 ----------+----+----------+-------------------------------------------- Codigo |Tipo| Extra |.... ...10.... ...20.... ...30.... ...40.... ----------+----+----------+ : | : | : | : CSL | 0 |70 #D#|/PRDPOA/SIRCX/CXP/PLT/S685CSL.019 | | | POA | 0 |85 #B#|/PRDPOA/SIRCX/CXP/PLT/S685POA.019 | | | Situacao da Tabela Generica para os arquivos Gerados em CSL e POA para PLT. Este exemplo, identifica a situacao apos a recepcao executada pelo programa SIRCP686, onde se pode identificar as Tabelas e como devem estar gravadas.Para melhor visualizacao foram colocados identificadores entre o caracter #, demonstrando desta forma como ficam os indicadores em sua ORIGEM e DESTINO. LANCAMENTOS A CORRESPONDER (NL'S) Identificados atraves do prefixo S795. Estes arquivos sao gerados para atualizacao no arquivo (SIRCA031), de prefixo S7951 + Caixa-Postal + Data-Juliana e, para atualizacao no Movimento Contabil da Matriz dos lancamentos das Filiais Remotas, de prefixo S795M + Caixa-Postal + Data-Juliana. O procedimento para verificacao na Tabela Generica, se aplica igualmente ao estabelecido para os Lancamentos Automaticos, com a unica diferenca na Recepcao para atualizacao na Matriz, que alem do arquivo a Corresponder (prefixo S7951),tambem recebe o arquivo de prefixo S795M, das demais filiais REMOTAS.