Histórico da Página

Ponto de Entrada

O ponto de entrada FA080POS é chamado apos carregar os dados do titulo a ser baixado, antes da visualização de informações na tela.
Deste modo será possível alterar variavéis de memória com os dados do título. Variáveis disponibilizadas : cBanco , cAgencia, cConta, cCheque

Atualizações > Contas à Pagar> Baixas a Pagar manual

Após clicar no botão baixar

FINA080

Exemplo:

#Include 'Protheus.ch'

User Function FA080POS()

Local _nOpc
Local _nRecSA6 := SA6->(Recno())

_nOpc:= Aviso("PE.FA080POS","Deseja Alterar informações para o Caixa Geral",{"SIM","NAO"})

If _nOpc == 1

DbSelectArea("SA6")
SA6->(DbGotop())
SA6->(DbSeek(xFilial("SA6")+"CX1"))

cBanco := SA6->A6_COD
cAgencia := SA6->A6_AGENCIA
cConta := SA6->A6_NUMCON
cCheque := "22222"

SA6->(DbGoto(_nRecSA6))

Endif

Return