Histórico da Página

Descrição

Ponto de entrada FINA460A substitui os pontos de entrada abaixo.

A460VALLIN: Executado na inclusão de linhas de parcelas da liquidação a receber;
F460BOT: Executado para inclusão de botões no botão Ações Relacionadas da liquidação a receber;
F460CAN: Executado no cancelamento da tela de geração de liquidação a receber;
F460CON: Executado no cancelamento da tela de geração de liquidação a receber;
F460GRV: Executado após a gravação de dados da geração de liquidação a receber;
F460SAID: Executado no cancelamento da tela de geração de liquidação a receber;
F460TOK: Executado na validação de toda tela de geração de liquidação a receber;
FA460CON: Executado na confirmação da tela de geração de liquidação a receber;
FA460LOK: Executado na validação da linha de parcelas da liquidação a receber.

Localização

Contas a Receber / Liquidação

Exemplos

Preview

Veja também

ER_PCREQ-7721-Liquidação_Contas_a_Receber

Idioma	Português(Brasil)
Versões	Microsiga_Protheus12
Sistemas Operacionais Suportados	Todos
Compatível com as Bases de Dados	Todas

Updates

Parâmetros


Retorno	O retorno é de acordo com o bloco/ponto de entrada desejado.

Eventos de chamada do Ponto de Entrada

Variáveis


Programa Fonte	FINA460.PRW/FINA460A.PRW

User Function FINA460A()

Local aParam := PARAMIXB
Local xRet := .T.
Local oObj := ''
Local cIdPonto := ''
Local cIdModel := ''
Local nLinha := 0
Local nQtdLinhas:= 0
Local cMsg := ''
Local cClasse := ""

If aParam <> NIL
oObj := aParam[1]
  cIdPonto := aParam[2]
  cIdModel := aParam[3]

  If cIdPonto == 'MODELPOS' // Bloco substitui o ponto de entrada F460TOK e FA460CON
      cMsg := 'Chamada na validação total do formulário (MODELPOS).' + CRLF
      cMsg += 'ID ' + cIdModel + CRLF
      If cClasse == 'FWFORMGRID' // Bloco substitui o ponto de entrada FA460LOK, validação do Grid, utilizar o ID de Model 'TITGERFO2'
          nQtdLinhas := oObj:Length()
           nLinha := oObj:GetLine()

          cMsg += 'É um FORMGRID com ' + Alltrim( Str( nQtdLinhas ) ) + ' linha(s).' + CRLF
          cMsg += 'Posicionado na linha ' + Alltrim( Str( nLinha ) ) + CRLF

...

Árvore de páginas

Versões comparadas

Versão antiga 4

Nova versão Atual

Chave