ÍNDICE

1. Visión general
2. Ejemplo de utilización
3. Estructura de datos.
   
4. Tablas utilizadas
5. Migrador ZC1 vs. F73

01. VISIÓN GENERAL

Este archivo permite la importación del Flujo presupuestario por modalidad del PCO – Planificación y control presupuestario para el Financiero. Se utilizará para vincular las Modalidades con las Cuentas presupuestarias, este vínculo se utilizará posteriormente en la importación de los valores registrados en Planificación y control presupuestario al Presupuesto del Financiero.

02. EJEMPLO DE UTILIZACIÓN

 Incluir

En la opción incluir, se mostrará la siguiente pantalla con encabezado e ítems, donde el encabezado es una visualización de la tabla de Modalidades (SED) de los campos código y descripción, y los ítems la relación que se registrará en la tabla de  F73.

Los Campos, De A Cuenta presupuestaria tienen la consulta estándar de la tabla AK5, Clase tiene la consulta estándar de la tabla AK6, De A Centro de costo tienen la consulta estándar de la tabla CTT, De A Ítem contable tienen la consulta estándar de la tabla CTD y De A Clase de valor tienen la consulta estándar de la tabla CTH.

De los campos mencionados anteriormente, excepto el Campo De A Cuenta presupuestaria, si estuvieran vacíos indicará que todos serán seleccionados.

Al hacer clic en Confirmar, la rutina grabará la digitación y no permitirá una nueva inclusión para la modalidad 001 de acuerdo con el ejemplo anterior, permitiendo solamente la modificación.

Podrán incluirse varias líneas para componer el valor de la modalidad con las cuentas presupuestarias, no podrá repetirse el conjunto de cuenta presupuestaria más clase más centro de costo más ítem contable más clase de valor en más de una modalidad.

Modificar

En la opción Modificar, se mostrará la pantalla de Modalidades vs. Cuentas Presupuestarias mencionada anteriormente en el ítem Incluir con el registro marcado en el browse para el debido mantenimiento, si aún no existiera la relación el sistema avisa que debe utilizarse la opción Incluir.

Visualizar

En la opción Visualizar se mostrará la pantalla Modalidades vs. Cuentas presupuestarias mencionada anteriormente en el ítem incluir con el registro marcado en el browse para la debida visualización.

Borrar

En la opción Borrar, se mostrará la pantalla Modalidades vs. Cuentas presupuestarias mencionada anteriormente en el ítem incluir con el registro marcado en el browse para la debida confirmación del borrado.

Importar

En la opción Importar, se mostrarán las preguntas para la selección de los saldos presupuestarios por importar al financiero, después de completar las preguntas  y confirmar la operación, el sistema inicia el proceso de transferencia alimentando la tabla SE7 – Presupuesto financiero con los valores obtenidos en el cálculo de las cuentas presupuestarias listadas en la tabla F73.

El cálculo mencionado anteriormente es la suma de los saldos de las cuentas presupuestarias vigentes relacionadas para cada modalidad, este resultado se grabará en su respectivo período en el financiero.

Preguntas

1 – De Período – Informar la fecha inicial que se utilizará para la importación de los valores.

2 – A Período – Informar la fecha final que se utilizará para la importación de los valores.

3 – Tipo de saldo– Informar el Tipo de saldo que se utilizará para la importación de los valores(habilitar consulta estándar para esta pregunta.

4 – Moneda destino – Informar la Moneda que se utilizará en el presupuesto financiero(habilitar consulta estándar para esta pregunta.

5 – De Modalidad – Informar la modalidad inicial para la importación. (habilitar consulta estándar para esta pregunta)

6 – A Modalidad – Informar la modalidad final para la importación. (habilitar consulta estándar para esta pregunta)

7 – De Cuenta presupuestaria – Informar la cuenta presupuestaria inicial para la importación. (habilitar consulta estándar para esta pregunta)

8 – A Cuenta presupuestaria – Informar la cuenta presupuestaria final para la importación. (habilitar consulta estándar para esta pregunta)

Después del procesamiento debe mostrarse una pantalla en el formato Browse con las opciones de Confirmar o Anular, con los datos generados en la importación, en el formato de los campos del presupuesto financiero, el usuario debe visualizar la pantalla y efectuar la debida verificación, confirmando o anulando la operación.

Después de la confirmación no existirá reversión o anulación del proceso, este procedimiento debe realizarse manualmente en el archivo de presupuestos financieros.

Los datos importados siempre se sobrepondrán al existente en el archivo de Presupuesto financiero.

03. ESTRUCTURA DE DATOS

Tabla

Principales campos

Validaciones

*La función FIN272Vld() será responsable por todas las validaciones de campos

Índice

Disparadores

04. TABLAS

• F73 Modalidad vs. Cuentas presupuestarias.
• SED Modalidades.
• AK5 Cuentas presupuestarias.
• AK6 Clases presupuestarias.
• CTT Centro de costo.
• CTD Ítem contable.
• CTH Clases de valor.

05. MIGRADOR ZC1 x F73

Este RdMake tiene por finalidad transferir los datos de la tabla de cliente (ZC1) a la nueva tabla de datos (F73) Modalidad vs. Cuentas presupuestarias.  

#INCLUDE "protheus.ch"
#INCLUDE "rwmake.ch"
#INCLUDE "TBICONN.ch"
#Include "TOTVS.CH"

USER FUNCTION Migrador()

Local lOk := .F.

PREPARE ENVIRONMENT EMPRESA cEmpAnt FILIAL cFilAnt MODULO "FIN" TABLES "ZC1","F73","SED"

If ChkFile("ZC1")
    DbSelectArea("ZC1")
    ZC1->(dbSetOrder(1))//ZC1_FILIAL+ZC1_NATUR+ZC1_ITEM 
    ZC1->(dbGoTop())//POSICIONA NO PRIMEIRO REGISTRO DA ZC1
Endif

If ChkFile("F73")
    DbSelectArea("F73")
    F73->(dbSetOrder(1))//F73_FILIAL+F73_NATUR+F73_ITEM 
    F73->(dbGoTop())//POSICIONA NO PRIMEIRO REGISTRO DA F73
Endif

Begin Transaction

    While !("ZC1")->( Eof())
        Reclock("F73",.T.)
            F73->F73_FILIAL  := ZC1->ZC1_FILIAL
			F73->F73_NATUR   := ZC1->ZC1_NATUR
            F73->F73_ITEM    := ZC1->ZC1_ITEM 
            F73->F73_COINI   := ZC1->ZC1_COINI
            F73->F73_COFIM   := ZC1->ZC1_COFIM 
            F73->F73_CLASSE  := ZC1->ZC1_CLASSE
            F73->F73_CCINI   := ZC1->ZC1_CCINI 
            F73->F73_CCFIM   := ZC1->ZC1_CCFIM
            F73->F73_ITCTBI  := ZC1->ZC1_ITCTBI
            F73->F73_ITCTBF  := ZC1->ZC1_ITCTBF 
            F73->F73_CLVRLI  := ZC1->ZC1_CLVRLI
            F73->F73_CLVRLF  := ZC1->ZC1_CLVRLF
            lOk := .T.
		F73->(MsUnlock())

        ZC1->(Dbskip())
    Enddo

    ZC1->(DbCloseArea())
    F73->(DbCloseArea())

    If lOk
        MsgAlert("Migração realizada com sucesso!")
    else
        DisarmTransaction()
        MsgAlert("Falha na migração execute novamente!")
    Endif

End Transaction   

RESET ENVIRONMENT

Return Nil