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.

Observações

Está presente na Função Fa070GrvSe5()

Exemplos

User Function SE5FI070()

  Local aArea := GetArea()
  DbSelectArea("SE5")
  SE5->(RecLock("SE5",.F.))

      SE5->E5_CCD    := '000000001'
      SE5->E5_CCC    := '000000002'

  SE5->(MsUnlock()) 
  RestArea(aArea)

Return

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

User Function FINM010()
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

Português(Brasil)

Versões

Versões_12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas