Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Backoffice

Módulo:Financeiro (SIGAFIN)
Função:

Liquidação a pagar (FINA565)

País:Brasil

02. VISÃO GERAL

Ponto de entrada que permite manipular os movimentos bancários processados na rotina de liquidação a pagar.

03. PARÂMETROS

PosiçãoTipoDescrição
1VetorVetor contendo os Recnos da SE5

04. RETORNO

Não há.

05. EXEMPLO


Exemplo de execução
#include 'Protheus.ch'

User Function F565SE5()
	Local aRecno := AClone(ParamIxb[1])
	Local nCntFor := 0
	
	dbSelectArea("SE5")
	DbSetOrder(1)
	For nCntFor := 1 to Len(aRecno)
		SE5->(dbGoto(aRecno[nCntFor]))
		MSGAlert("Titulo posicionado na SE5 Filial:" + SE5->e5_filial + Chr(13)+Chr(10) + ", Data,"+ DtOC(SE5->e5_data) + Chr(13)+Chr(10) + ", "+;
		"Tipo," + SE5->e5_tipo + Chr(13)+Chr(10) + ", Moeda" + SE5->e5_moeda + Chr(13)+Chr(10) + ", "+;
		"Valor," + str(SE5->e5_valor ) + Chr(13)+Chr(10) + ", Natureza," + SE5->e5_natureza + Chr(13)+Chr(10) + ", "+;
		"Numero do cheque," + SE5->e5_numcheq + Chr(13)+Chr(10) + ", Documento," + SE5->e5_documen )
	Next nCntFor
Return