Histórico da Página
F200CUS e F650CUS - Ignora a validação de tipo de registro
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||
Segmento: | Serviços | ||||||
Módulo: | Financeiro | ||||||
Rotina: |
| ||||||
Ponto de Entrada: | F200CUS e F650CUS | ||||||
Chamados Relacionados | TVDJKN | ||||||
Banco(s) de Dados: | Todos | ||||||
Sistema(s) Operacional(is): | Todos |
Descrição
Pontos de entradas criados para ignorar o tipo de registro lido. Válido apenas para modelo 1.
Ponto de Entrada
Descrição: | FINA200 - Retorno da comunicação bancária FINR650 - Relatório de Retorno da comunicação bancária | ||||||||
Eventos: | Retorno da comunicação bancária Relatório de Retorno da comunicação bancária | ||||||||
Programa Fonte: | FINA200 FINR650 | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function F650CUS()
Local lRet := .F.
If Alltrim(MV_PAR02) $ "custodia.ret"
lRet := .T.
EndIf
Return lRet
#include 'Protheus.ch'
User Function F200CUS()
Local lRet := .F.
If Alltrim(MV_PAR05) $ "custodia.ret"
lRet := .T.
EndIf
Return lRet