Histórico da Página
Descrição | O ponto de entrada SE5FI070 será executado após a gravação da SE5 da baixa a receber, permitindo gravar dados complementares na tabela SE5. Ele será chamado para cada registro gravado na SE5. |
|---|---|
Observações | Está presente na Função Fa070GrvSe5() Para a versão 12, poderá ser utilizado pontos de entrada em MVC, verificar as seguintes documentações: Ponto de entrada para gravação de dados complementares nas tabelas FK´s e SE5 |
Exemplos | User Function SE5FI070() Local aArea := GetArea() |
SE5→(RecLock("SE5",.F.)) If SE5→E5_TIPO == 'BOL' SE5->E5_CCD := '000000001' EndIf SE5->(MsUnlock()) Return |
|---|
Idioma
.)
Local aParam := PARAMIXB
Local lRet := .T.
Local oObj := ''
Local oTst := ''
Local cIdPonto := ''
Local cIdModel := ''
If aParam <> NIL
oObj := aParam[1]
cIdPonto := aParam[2]
cIdModel := aParam[3]
If cIdPonto == 'FORMCOMMITTTSPRE'
If cIdModel == 'FK1DETAIL'
oObj:SetValue( "FK1_LOTE", '1000' )
EndIf
EndIf
EndIf
idioma | Português(Brasil) |
|---|---|
Versões | Versões_Anteriores |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Eventos de chamada do Ponto de Entrada | ExecBlock('SE5FI070',.F.,.F |
Descrição
O ponto de entrada FINM010 será executado pela rotina de baixas a receber, o momento da sua execução sera definido conforme o ID de execução que for utilizado.
Observações
O ponto de entrada SE5FI070() a partir da versão 12 não é mais usado, agora utilizamos o ponto de entrada em MVC.
FINM010 é o modelo de dados usado pela rotina de baixas a receber, e por isso é o ponto de entrada da rotina.
Em MVC criamos um único ponto de entrada e este é chamado em vários momentos dentro do fonte desenvolvido, sua ação sera determinada pelo ID de execução. |
|---|
Documentação sobre pontos de entrada em MVC:
http://tdn.totvs.com/display/public/mp/Pontos+de+Entrada+para+fontes+Advpl+desenvolvidos+utilizando+o+conceito+MVC
Exemplos
Local aParam := PARAMIXB
Local lRet := .T.
Local oObj := ''
Local oTst := ''
Local cIdPonto := ''
Local cIdModel := ''
If aParam <> NIL
oObj := aParam[1]
cIdPonto := aParam[2]
cIdModel := aParam[3]
If cIdPonto == 'FORMCOMMITTTSPRE'
If cIdModel == 'FK1DETAIL'
oObj:SetValue( "FK1_LOTE", '1000' )
EndIf
EndIf
EndIf
Return lRet
Idioma
) |
|---|
Versões
Versões_12
Sistemas Operacionais Suportados
Todos
Compatível com as Bases de Dados
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas