Contabilidad TXT – CTBA500 -- 111019

Documento: Contabilidad TXT – CTBA500

Esta rutina actualiza el CT2, CT3, CT6, CT7 por la importación de datos de un archivo TXT, utilizando un archivo 'DEFINIDO PREVIAMENTE" exigido por Microsiga Protheus para importación. Algunos cuidados se deben tomar en el montaje del archivo txt.

Instrucciones para montaje del archivo TXT.

El proceso de contabilidad TXT pasa por 3 etapas, donde: (1) Configuración de los TXT, (2) Configuración del asiento estándar y (3) Ejecución de la contabilidad TXT (Contabilidad)

- (1) Configuración de los TXT

        Se debe configurar un archivo texto prestando atención solamente en dos imposiciones del sistema :

        - Los tres primeros caracteres de la línea se deben referir al cód. del asiento estándar registrado para esta finalidad.

        - La cantidad de bytes es decir, columnas utilizadas por registro (línea), lo define el usuario, porque esta información lo pide el sistema en las preguntas cuando se ejecuta la contabilidad TXT, vamos a utilizar por ejemplo 512 bytes(columnas), hasta el máximo de 999 bytes.

         
 Observación: Recuerde que los caracteres de control de carro (CHR(10+13)) cuentan como 2 caracteres y deben estar situados en las columnas

          511 y 512.

- (2) Configuración de asiento estándar

        Se debe configurar, de acuerdo con el layout del archivo TXT, un asiento estándar cuyo código debe estar en el intervalo entre 001 y 499, este debe contener en sus campos las funciones para lectura de archivos texto (LerVal() y LerStr()).

- (3) Ejemplo de configuración.

Archivo .TXT 
200  X 123456   123456 Asiento de Fact. n. 00001  1000,25        ddmmaa o ddmmaaaa
|        |         |        |            |                                                |
|        |         |        |            |                                                |->Valor (posición 50 tam 6)
|        |         |        |            |
|        |         |        |            |->Descripción (posición 24 tam 24)
|        |         |        |
|        |         |        |->Cuenta Crédito (posición 17 tam 6)
|        |         |
|        |         | ->Cuenta Débito (posición 8 tam 6)
|        |
|        |-> Informativo para el TXT
|
|->Número del asiento estándar (posición 1 tam 3)

Informaciones que deben estar contenidas en los campos respectivos del asiento estándar.

Código: 200

Cuenta Débito : LerStr(8,6)

Cuenta Crédito: LerStr(17,6)

Historial : LerStr(24,24)

Valor : LerVal(50,6)

Fecha : LerData(70,6) para ddmmaa, o lerdata(70,8) para ddmmaaaa.

Observación:

1 - Al realizar una contabilidad TXT, en la que el asiento contable tiene más de una secuencia, el archivo TXT se debe construir con todas las secuencias de los asientos en la misma línea, y en cada secuencia de asiento indique la columna que será leída por las funciones LERSTR, LERVAL y LERDATA.
 
2 - Al utilizar la función LerData() para cambiar la fecha base del sistema, que se utiliza como la fecha del asiento contable, el parámetro 5 - Salta Línea en Doc. debe estar configurado con Sí, porque cada línea puede ser una fecha diferente y, en este caso, después de ejecutar la función el sistema muestra la pantalla de contabilidad. Si el parámetro está configurado con No, el sistema considerará la fecha de la última línea procesada.

3 - Para que todas las líneas tengan acceso es necesario informar otro byte más del que existe en el archivo en los parámetros de importación TXT. Ej: Si la línea del archivo TXT tiene 240 caracteres se deben configurar los parámetros de importación con 241 bytes.