Linha Microsiga Protheus

Árvore de páginas

01. DATOS GENERALES


Producto

TOTVS Backoffice

Línea de producto: 

Línea Protheus

Segmento:

Backoffice

Módulo:SIGAFIN - Financiero
Función:
Rutina(s):Nombre Técnico:
CONSCCARG.PRWConsulta de Cuenta corriente en la AFIP Orden de pago.
FECREDAMB.PRWParametriza el Totvs Services para el webservice WSFECRED.
FINA847.PRWBrowse Orden de pago Mod. II.
FINA850.PRWOrden de pago Mod. II.
FINA850A.PRWComplemento Orden de pago Mod. II.
FINA850I.PRWComplemento Orden de pago Mod. II.
FINA855.PRWNueva orden previa de pago.
FINRETARG.PRWCálculo de retenciones Mod. II - Estructura.
FINRETGAN.PRWCálculo de retención de ganancias.
FINRETIBB.PRWCálculo de retención de IIBB.
FINRETIVA.PRWCálculo de retención de IVA.
FINRETMUN.PRWCálculo de retención de Municipalidades.
FINRETSLI.PRWCálculo de retención SLI.
FINRETSUS.PRWCálculo de retención de SUSS.
TRFFECRED.PRWFunción que realiza la transferencia de la aceptación en la rutina de Orden previa de pago AFIP.
TRFOPARG.PRWTransferencia de aceptación en la rutina Orden de pago.
TRFOPCRED.PRWTransferencia de aceptación en la rutina Orden de pago.
CERTGAN.PRW*Certificado Retención de ganancias.
CERTIB.PRW*Certificado Retención de Ing. Brutos.
CERTIVSUS.PRW*Certificado Retención de IVA y SUSS.
CERTRMUN.PRW*Certificado Retención de Municipalidades.
País:Argentina
Ticket:No Aplica
Requisito/Story/Issue (informe el requisito vinculado):DMICNS-10588


02. SITUACIÓN/REQUISITO

Se tiene la necesidad de dar mantenimiento a las rutinas pertinentes para la ejecución de los casos automatizados mediante ADVPR.


03. SOLUCIÓN

Se realiza la adaptación de las rutinas FINA850 y FINA850a, para poder efectuar los casos automatizados de la rutina FINA847, mediante ADVPR y rutina Automática.


 

Ejecución de Automatizados.

  1. Descargar los componentes más actuales (Protheus_Data, RPO, Base de Datos).
  2. Aplicar el parche del Robot.
    1. P12_SetupRobo_spa_lobo_guara.ptm
  3. Descargar y compilar los scripts deseados.
    1. FINA847TestSuite
    2. FINA847TestGroup
    3. FINA847TestCase


Ejecución Manual.

  1. Por medio del módulo de configuración(SIGACFG) realizar la configuración de los parámetros pertinentes para el cálculo de Impuestos.
    1. MV_AGENTE = SSSSS - Indicar si cliente SIGA es agente de retención de diferentes impuestos (verificar documentación de impuestos)    
    2. MV_AGIIBB = BA|CF|TU - Define para que provincias o ciudades el usuario es agente de retención de IIBB.                                           
  2. En la rutina de Monedas (MATA090) que se encuentra en menú perteneciente al módulo de Financiero (Actualizaciones | Archivos) es necesario que se informe el valor de moneda.
  3. En la rutina de Productos (MATA010) que se encuentra en menú perteneciente al módulo de Compras (Actualizaciones | Archivos) debe de registrar un producto para realizar sus pruebas.
  4. En la rutina de Proveedores (MATA020) que se encuentra en menú perteneciente al módulo de Financiero (Actualizaciones | Archivos) debe de ingresar un proveedor.
  5. En la rutina de Tipos de Entrada y Salida (MATA080) que se encuentra en menú perteneciente al módulo de Financiero (Actualizaciones | Archivos) es necesario contar con una TES que realice el cálculo de IVA.
  6. En la rutina de Factura de Entrada (MATA101N) que se encuentra en menú perteneciente al módulo de Compras (Actualizaciones | Facturas) debe de ingresar un nueva Nota Fiscal.


Ejecución de Rutina Automática. 

  1. Es necesario tener la rutina compilada con la función para ejecutar el execauto de la FINA847.

Ejecución de Automatizados.

  1. Mediante el programa inicial FWMYTESTRUNNER, cargue la suite deseada.
  2. Ejecute la suite correspondiente (FINA847).
  3. Todos los casos deben de salir correctos (Carita Feliz Verde). 


Ejecución Manual.

  1. En el programa de Orden de Pago Mod. II (FINA847) que se encuentra en el módulo SIGAFIN (Actualizaciones | Proceso Mo II) debe de generar la OP para la factura previamente dada de alta.


Ejecución de Rutina Automática. 

Ejemplo de execauto de la FINA847:

#Include "PROTHEUS.CH"


User Function MyFINA847()
   Local oError := ErrorBlock({|e|ChecErro(e)}) //en caso de error
   Local cRetorno := ""
   Local nRetorno := 0
   Local aCab        := {}
   Local aLinha      := {}
   Local aItens      := {}
   Local aInfDoc     := {}
   Local aDocPag     := {}
   Local cForne      := "FIN087"
   Local cBanco      := "005"
   Local cAgencia    := "00005"
   Local cConta      := "0000000005"
   Local cTipoPg     := "EF"
   Local cNumTit     := "DOC087541"
   Local dFechaFP    := cToD("17/04/2019")
   Private lMsErroAuto := .F.

   AAdd( aCab, { "F1_FORNECE" , cForne       , Nil }) 
   AAdd( aCab, { "F1_LOJA"  , "01"     , Nil }) 
   AAdd( aCab, { "F1_NATUREZ"    , "000001"        , Nil }) 
   AAdd( aCab, { "F1_PAGO"   , "1"        , Nil }) 
   AAdd( aCab, { "F1_SOLFUN"  , ""     , Nil }) 
   AAdd( aCab, { "F1_VALBRUT"    , "1000"       , Nil }) 
   AAdd( aCab, { "F1_CF"    , "112"       , Nil }) 
   AAdd( aCab, { "F1_ZNGEO"      , ""     , Nil }) 
   AAdd( aCab, { "F1_GRPSUS"  , ""     , Nil })
   AAdd( aCab, { "F1_EST"  ,"BA"       , Nil})  
   AAdd( aCab, { "F1_NUMOP"   , ""           , Nil })
   AAdd( aCab, { "F1_OPCELT"  , "1" , Nil }) 
   AAdd( aCab, { "F1_RECNO"   , "01"         , Nil }) 

   aInfDoc     := {}
   AAdd( aInfDoc, { "Filial" , "D MG 01 "       , Nil } )
   AAdd( aInfDoc, { "Proveedor" , "FIN087"         , Nil } )
   AAdd( aInfDoc, { "Loja" , "01"         , Nil } )
   AAdd( aInfDoc, { "Prefijo" , "A  "        , Nil } )
   AAdd( aInfDoc, { "Numero" , "000000000000"         , Nil } )
   AAdd( aInfDoc, { "Parcela" , " "       , Nil } )
   AAdd( aInfDoc, { "Tipo" , "NF "        , Nil } )
   AAdd( aInfDoc, { "NumRec" , 34         , Nil } )
   AAdd( aInfDoc, { "valInfor" , 1000     , Nil } )
   AAdd( aInfDoc, { "Moneda" , 1       , Nil } )
   AAdd( aInfDoc, { "Juros" , 0        , Nil } )
   AAdd( aInfDoc, { "Multa" , 0     , Nil } )
   AAdd( aInfDoc, { "Descuento" , 0       , Nil } )
   AAdd(aDocPag,aInfDoc)     

   aLinha := {}            
   AAdd( aLinha, { "Tipo" , cTipoPg       , Nil } )
   AAdd( aLinha, { "Prefijo"     , cTipoPg         , Nil } )               
   AAdd( aLinha, { "NumDoc"   , cNumTit      , Nil } )               
   AAdd( aLinha, { "Parcela"  , " "    , Nil } )
   AAdd( aLinha, { "Valor"  , 1000.00          , Nil } )
   AAdd( aLinha, { "Moneda" , 1     , Nil } ) 
   AAdd( aLinha, { "FecEmi"   , dFechaFP     , Nil } )               
   AAdd( aLinha, { "FecVenc"     , dFechaFP        , Nil } )
   AAdd( aLinha, { "Banco", cBanco     , Nil } )  
   AAdd( aLinha, { "Agencia", cAgencia         , Nil } )
   AAdd( aLinha, { "Conta"    , cConta       , Nil } )    
   AAdd( aLinha, { "TalonCH"    , " "     , Nil } )  
   AAdd( aLinha, { "TipTalon"    , " "       , Nil } )  
   AAdd( aItens, aLinha)

   lMsErroAuto := .F.
   MSExecAuto({|x, y, z, a| FINA847(x, y, z, a)}, aCab, aDocPag, aItens, 3)

   If lMsErroAuto    
      MsgStop("Error de grabacion del registro.")  
      MostraErro()
   Else  
      MsgAlert('NF incluida con exito.')  
   EndIf

Return


04. INFORMACIÓN ADICIONAL


¡IMPORTANTE!

Para efectuar de manera satisfactoria los automatizados, es necesario mantener actualizados todos los componentes (Binarios, DBAccess, Protheus_Data y Base de Datos). El Protheus_Data y Base de Datos son actualizados diariamente en el portal.


05. ASUNTOS RELACIONADOS

* Funciones de usuario para impresión de los certificados de Retenciones, si se requiere la funcionalidad se tienen que compilar, en caso de tener personalizaciones, omita este paso y realice los ajustes, es importante verificar el documento técnico, para identificar cuáles fueron los cambios realizados, para garantizar que todas las configuraciones estén actualizadas: DMICNS-10308 DT Débitos técnicos ARG