Histórico da Página

...

aNewVet[1] := {3}//nPosRotina
aNewVet[2] := aClone(aVetores[1]) //aRotAuto
aNewVet[3] := {3} // nOpcAuto donde 3 = Pagar, 4 = Cobrar, incluso la opción puede ser según la posición de aVectores

Return aClone(aNewVet)

05. EJEMPLO DE ARCHIVO DE IMPORTACIÓN

02/01/2019;M1;3370,09;NAT1;237;1020;102030;BAJA AUTOMÁTICA FONDOS;BRADESCO;P;BA;02/01/2019
02/01/2019;M1;11736,10;NAT1;237;1020;102030;RESCATE INVERSFACIL;BRADESCO;P;BA;02/01/2019

...

Para la opción de Tranferencia entre cuentas o cajas (opción 7 del execauto del FINA100) se puede definir un layout de acuerdo con el execauto de FINA100.

Haga clic aquí para más detalles sobre execauto de transferencia.

...

BC1;BC101;BC101;001;BC2;BC202;BC202;001;CH;DOC400;400;HISTORICO DE TR;ITAU; 2;2;30/01/24

UF100TR

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

#INCLUDE "TOTVS.ch"
/*/{Protheus.doc} User Function UF100TR

Realiza

Realice tratamientos para procesar MILE de la rutina FINA100

opção

opción 7 - Transferencia
    @type Function
    @author Totvs
    @since 29/01/2024
    @version 1.0
/*/
User function UF100TR(lInterface, aInfos, aLayOut, aSaidas, aVetores)

Local aNewVet   := array(3)
Local nI        := 0

//

retire

Retire espacios de los identificadores y del contenido de los campos del Execauto FINA100 (Ejemplo: "CBCOORIG " modifique como "CBCOORIG" // , "341       " modifique a "341")
For nI := 1 To Len(aVetores[1])
    aVetores[1][nI][1] := AllTrim(aVetores[1][nI][1])
    If ValType(aVetores[1][nI][2]) == 'C'
        aVetores[1][nI][2] := AllTrim(aVetores[1][nI][2])
    EndIf
Next nI
aNewVet[1] := {0} //nPosRotina
aNewVet[2] := aClone(aVetores[1]) //aRotAuto
aNewVet[3] := {7} // Transferencia

Return aClone(aNewVet)

07. TABLAS UTILIZADAS

Movimientos bancarios - SE5

...

Atalhos

Árvore de páginas

Versões comparadas

Versão antiga 5

Nova versão 6

Chave

05. EJEMPLO DE ARCHIVO DE IMPORTACIÓN

07. TABLAS UTILIZADAS