Versões comparadas

Chave

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

...

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

...

06. EJEMPLO DE CONFIGURACIÓN PARA TRANSFERENCIA


Informações
titleImportante

La herramienta MILE tiene una limitación donde importaciones que no utilizan campos de SX3 tengan una limitación de importación de 10 caracteres.

De esta manera, como la rutina de transferencia necesita que el layout utilice las variables, si existiera la necesidad de importar un campo donde el contenido tenga más de 10 caracteres, en el campo de condición debe informarse la variable de devolución, de acuerdo con lo siguiente:

xContent  := aDataTXT[2], .T. 


Ejemplo:

Suponiendo que en el archivo de importación la posición de beneficiario tenga más de 10 carateres, el layout debe configurarse con la siguinte información:

Image Added




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 dedel 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



Bloco de código

...

language

...

java

...

theme

...

Midnight

...

firstline

...

1

...

title

...

UF100TR

...

linenumberstrue
#INCLUDE "TOTVS.ch"

...


/*/{Protheus.doc} User Function

...

 UF100TR
    Realiza tratamentos para processar MILE da rotina FINA100 opção 7 - Transferência
    @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

// retirar espaços dos identificadores e do conteúdo dos campos do Execauto FINA100 (Exemplo: "CBCOORIG " alterar para "CBCOORIG" // , "341       " alterar para "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


...