Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Ao utilizar o ponto de entrada FA473005 podemos efetuar validações de usuário na rotina FI473Pos (pós validação do modelo de dados).

03. PARÂMETROS

        oModel - Modelo da rotina de conciliação bancária  Não há.


04. RETORNO

Nome

Tipo

Descrição

lRet

Lógico

Retorno logico lógico da validação do da rotina FI473Pos

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleFA473005
linenumberstrue
#INCLUDE '"TOTVS.CH'"

/*/{Protheus.doc} FA473001FA473005
Ponto de entrada paralocalizado executarna operaçõespós novalidação final da rotina F473Concil após o controledo modelo de transação.
 
oModel - Modelo da rotina de conciliaçao bancária
 dados.

@type       Function
@author     TOTVS
@since      18/11/2020
@return     @lRetlRet
/*/

User Function FA473005
    Local oModel        := Paramixb
    Local oModelDet		:= oModel:GetModel("CONDETAIL")
    Local lRet          := .T.   
    oModel		:= FWModelActiveFwModelActive()
    
    If oModel:isActive()

        Local oModelDet		:= oModel:GetModel("CONDETAIL")
     Local   lRet          := .T.

        	If Len(oModelDet:aLINESCHANGEDGetValue("IG_DTEXTR") > 0dDATABASE
            	lRet          := .TF.
            MsgAlert	Help("Ateração efetuada")
, 1, "FA473005",, "A data do titulo é Else
superior a data do         lRetsistema", 1)           := .F.
            MsgAlert("Nenhum registro alterado")
        EndIf
    
    Else
        MsgAlert("Modelo não foi ativado")
    Endif
Return(lRet)
	EndIf


Return lRet