Árvore de páginas

F473EFGR Gravação complementar de Efetivação

 

 

Descrição

Criado ponto de entrada F473EFGR utilizado para gravação complementar no momento da Efetivação da Concliliação Automática (FINA473)

 ObservaçãoNão é necessário Retorno..

Exemplos

 

#include 'totvs.ch'

 

USER FUNCTION F473EFGR
Local nRecno

 

nRecno := PARAMIXB

 

SE5->(DbGoto(nRecno))
RecLock("SE5", .F. )
SE5->E5_DOCUMEN := "F473EFGR"
MsUnlock()

Alert("Valor do Registro:" + cValToChar(SE5->E5_VALOR))

Return

 


Idioma

Português(Brasil)

Versões

Microsiga_Protheus12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

PARAMIXB (irá trazer o recno da SE5 que ocorreu a gravação)

Retorno

Sem retorno

Variáveis

PARAMIXB

Programa Fonte

FINA473A

F473EFE