Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Francisco do Carmo de Oliveira

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Francisco do Carmo de Oliveira

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

02. VISÃO GERAL

O ponto de entrada F580BROW é utilizado no tratamento de dados que a serem exibidos no browse da liberação de contas a pagar.FA070BXL é utilizado para manipulação dos registros do contas a receber (SE1) baixados por Lote.

Será executado após a baixa de todos os títulos a receber, títulos baixados em LoteSerá executado antes da exibição do browse.

03. PARÂMETROS

Não há.

04. RETORNO

Tipo

NomeDescrição
ObjetoNilNILO objeto retorna um valor nuloponto de entrada retorná NIL.

05. EXEMPLO


Bloco de código
languagejava
themeMidnight
firstline1
titleExemplo de execução
linenumberstrue
#include 'Protheus.ch'     

  User Function F580BROWFA070BXL()

    Local cNum aAreaSe1 := SE1->(GetArea())

    SE1->(DbGoTop())

     := '000000001'
While SE1->(!EOF()) 
       Local cFiltro := ""
 If SE1->E1_LOTE == cLoteFin
        
    DbSelectAreaSE1->(RecLock("SE2SE1", .F.))
      
    cFiltro := "E2_FILIAL == '" + xFilial("SE2") + "' .AND.  SE1->E1_HIST := "P.E. FA070BXL EXECUTADO"
    cFiltro += "E2_NUM == '" + cNum + "'" SE1->(MsUnLock())
    
    DbSetFilter({|| &(cFiltro)}, cFiltro)Endif

    
    SE2SE1->(DbGoTopDbSkip())
    Enddo

Return    RestArea(NILaAreaSe1)

Return


Templatedocumentos