...
Producto: |
| ||||
---|---|---|---|---|---|
Línea de producto: | Línea Protheus | ||||
Segmento: |
| ||||
Módulo: | Financiero (SIGAFIN) | ||||
Función: | Compensación entre 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. |
Não háNo hay.
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include 'Protheus.ch' User Function F450SE5() Local aArray := aClone(ParamIXB) // Array aSE5Recs contendocon oslos RECNO de dala SE5 involucrados envolvidosen 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 |
---|
...