...
ProdutoProducto: |
| ||||
---|---|---|---|---|---|
Linha Línea de Produtoproducto: |
Linha | Linha Línea Protheus | |||
Segmento: |
| ||||
Módulo: | Financeiro Financiero (SIGAFIN) | ||||
FunçãoFunción: | Compensação Compensación entre carteiras carteras (FINA450) | ||||
País: | Brasil |
...
Ponto Punto de entrada que permite manipular as movimentações geradas pela compensação entre carteiras. É chamado após a compensação de todos os manejar los movimientos generados por la compensación entre carteras. Se llamada después de la compensación de todos los títulos.
...
PosiçãoPosición | Tipo | DescriçãoDescripción | |
---|---|---|---|
1 | Vetor | Vector | Vector con los RECNO de la tabla SE5 generados por medio de la rutinaVetor contendo os RECNOs da tabela SE5 gerados pela rotina. |
...
No hay
...
Não há.
...
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include 'Protheus.ch' User Function F450SE5() Local aArray := aClone(ParamIXB) // Array aSE5Recs contendocon oslos RECNO de dala SE5 envolvidosinvolucrados en nala compensaçãocompensación Local nI Local nReg DbSelectArea("SE5") nReg := Recno() // Graba Guardala aactual atualposición posiçãoen nala tabelatabla de Mov. BancáriosBancarios For nI := 1 to Len(aArray) DbGoTo(aArray[nI][2]) If aArray[nI][1] == "P" MsgInfo("CompensaçãoCompensación de título apor Pagarpagar. " + chr(10) + chr(13) + "N° dodel título: " + SE5->E5_NUMERO) Else MsgInfo("CompensaçãoCompensación apor recebercobrar. " + chr(10) + chr(13) + "N° dodel título: " + SE5->E5_NUMERO) EndIf next DbGoTo(nReg) // Se ubica Posicionaen nala SE5 en nala posiçãoposición inicial Return NIL |
Templatedocumentos |
---|
...