Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Monica Virginia Barrantes de Villanueva

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Monica Virginia Barrantes de Villanueva

Gravado em

Chave

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

01. DADOS GERAIS

Produto:

Solucoes_totvs_cross
SolucaoCrossTOTVS Backoffice

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoBackoffice

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

Compensação entre carteiras (FINA450)

País:Brasil

02. VISÃO GERAL

Ponto de entrada que permite manipular as movimentações geradas pela compensação entre carteiras. É chamado após a compensação de todos os títulos.

03. PARÂMETROS


PosiçãoTipoDescrição
1VetorVetor contendo os RECNOs da tabela SE5 gerados pela rotina.

04. RETORNO

Não há.

05. EXEMPLO


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

User Function F450SE5()
	Local aArray := aClone(ParamIXB) // Array aSE5Recs contendo os RECNO da SE5 envolvidos na compensação
	Local nI
	Local nReg

	DbSelectArea("SE5")
	nReg := Recno() // Guarda a atual posição na tabela de Mov. Bancários

	For nI := 1 to Len(aArray)
		DbGoTo(aArray[nI][2])
		If aArray[nI][1] == "P"
			MsgInfo("Compensação de título a Pagar. " + chr(10) + chr(13) + "N° do título: " + SE5->E5_NUMERO)
		Else
			MsgInfo("Compensação a receber. " + chr(10) + chr(13) + "N° do título: " + SE5->E5_NUMERO)	
		EndIf
	next

	DbGoTo(nReg) // Posiciona na SE5 na posição inicial
Return NIL

...