Linha Microsiga Protheus

Árvore de páginas

CTB500VLD -  Ponto de entrada para a validar arquivo texto a importar  

Validar se o arquivo TXT a ser importado

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

SIGACTB.

Rotina:

Rotina

Nome Técnico

CTBA500

Contabilização TXT

Ponto de Entrada:

CTB500VLD.

Chamados Relacionados

TUVUYZ.

País(es):

Todos.

Banco(s) de Dados:

Todos homologados para o Protheus.

Sistema(s) Operacional(is):

Todos homologados para o Protheus.

Descrição

O ponto de entrada CTB500VLD ira validar o arquivo texto a ser importado na rotina de contabilizacao TXT. Se o retorno do PE for .T. o sistema prossegue com a contailizacao, se .F. a contabilizcao sera interrompida.

Ponto de Entrada

Descrição:

Valida o arquivo TXT a ser importado na contabilizacao TXT.

Eventos:

If lCTB500VLD

lContinua := ExecBlock("CTB500VLD",.F.,.F.)
Endif

Programa Fonte:

CTBA500

Retorno:

Logico

 

Exemplo:

#Include 'Protheus.ch'

User Function CTB500VLD()

Local lRet  := .T.

/*  Se lRet for .T. , continua a contabilizacao

    se lRet fot .F. , contabiliza;'ao interrompida */

Return lRet

 

Pergunta Valida Recno Origem no CTBA500

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

Contabilidade Gerencial.

Rotina:

CTBA500.

Chamados Relacionados

TUVUYZ.

País(es):

Todos.

Banco(s) de Dados:

Todos Homologados.

Sistema(s) Operacional(is):

Todos Homologados.

Descrição da melhoria

        Criada a pergunta: "Valida Recno Origem? "

       Valida se o recno origem do arq .txt existe no alias informado na linha do arquivo txt. Somente informe 'Sim' nessa pergunta se os Campos CT5_TABORI e CT5_RECORI estiverem preenchidos.

        Caso escolha 'Sim" serão validadas no máximo 5.000 linhas do arquivo txt, linhas essas que poderão ser  impressas em relatório."