Histórico da Página
01.
...
DATOS GENERALES
| ProdutoProducto: |
| |||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| Linha Línea de Produtoproducto: | ||||||||||
| Segmento: |
| ||||||||
| Módulo: | Financeiro Financiero (SIGAFIN) | |||||||||
| FunçãoFunción: | Compensação Compensación entre carteiras carteras (FINA450) | |||||||||
| País: | Brasil |
02.
...
VISIÓN GENERAL
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ção | Tipo | Descrição |
|---|---|---|
| 1 | Vetor | Vetor contendo os RECNOs da tabela SE5 gerados pela rotina. |
04.
...
DEVOLUCIÓN
Não há.
05.
...
EJEMPLO
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#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 |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas