Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Diego Abel Rivera Hernandez

Gravado em

comparado com

Nova versão 7

changes.mady.by.user Alberto Rodriguez Lopez

Gravado em

Chave

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

01. DATOS GENERALES


Producto

Solucoes_espanhol
SolucaoTOTVS Backoffice

Línea de producto: 

Linhas_totvs_espanhol
LinhaLínea Protheus

Segmento:

Segmentos_totvs_espanhol
SegmentoBackoffice

Módulo:SIGACOM - Compras
Función:
Rutina(s)Nombre TécnicoFecha
FISA015Certificados de Retención.03/11/2022
País:Ecuador
Ticket:15388037
Requisito/Story/Issue (informe el requisito vinculado):DMINA-17348



02. SITUACIÓN/REQUISITO

Al intentar crear una Factura de Entrada que genera certificado de retención gestada por el MSExecAuto de la MATA101N, muestra mensaje de Generación de certificado, se solicita que cuando sea usada como rutina automática no envíe al usuario la pregunta ni el impreso del certificado.


03. SOLUCIÓN

En la rutina Certificados de Retención (FISA015) dentro de la función fGrvCrt() se incluye validación para cuando se gesta Factura de Entrada con certificado de retención de manera automática, no muestre pregunta, impresión, ni confirmación de generación del certificado.

...

Totvs custom tabs box
tabsPre-condiciones,PasosProcedimiento
idsPre-condiciones,Pasos
Totvs custom tabs box items
defaultyes
referenciaPre-condiciones
  1. Realizar un respaldo del repositorio (archivo .rpo)
  2. Aplicar el parche correspondiente al issue DMINA-17348.
  3. Validar que la rutina actualizada coincida con la indicada en la sección 01. DATOS GENERALES del presente Documento Técnico.
  4. En el módulo Compras (SIGACOM) desde el menú Actualizaciones | Archivos | Proveedores (MATA020)
    • Configurar un Proveedor, para la generación de la Factura de Entrada por medio del ExecAuto.
  5. En el módulo Compras (SIGACOM) desde el menú Actualizaciones | Archivos | Productos (MATA010)
    • Configurar un Producto, para la generación de la Factura de Entrada por medio del ExecAuto.
  6. En el módulo Compras (SIGACOM) desde el menú Actualizaciones | Archivos | Tipos de Entrada y Salida (MATA080)
    • Configurar un Tipo de Entrada (TES), para la generación de la Factura de Entrada por medio del ExecAuto.
    • Debe incluir impuesto que genere de retención y el correspondiente certificado. 
  7. Compilar la rutina que contenga la Función de Usuario con el ExecAuto a la rutina MATA101N (Ver ejemplo en la sección 04. INFORMACIÓN ADICIONAL)
  8. En el módulo Configurador (SIGACFG) desde el menú Entorno| Archivos | Menú (CFGX013)
    • Incluir en el menú la rutina para generación de Factura de Entrada por medio de ExecAuto.
  9. Contar con una TES que genere cálculo de retenciones.
Totvs custom tabs box items
defaultno
referenciaPasos
  1. Ir al menú donde se agregó la rutina con la Función de Usuario y ejecutar el proceso.
  2. Una vez finalizado, verificar la grabación correcta de la Factura de Entrada con Certificado de retención.


04. INFORMACIÓN ADICIONAL

Ejemplo de ExecAuto a función de usuario para ExecAuto de la rutina MATA101N - Entrada por Compra:


Bloco de código
languagedelphi
titleExecAuto
#INCLUDE "RWMAKE.CH"
#INCLUDE "TBICONN.CH"  
 
// Ejemplo de Factura de Entrada - Tipo - Normal //
 
User Function ExcAuMT101n()
 
    Local aCab          := {}   // Array con datos de encabezado
    Local aLin          := {}   // Array con datos de ítem
    Local aItem         := {}   // Array de ítems
    Local cDoc          := ""   // String con el número de documento
    Private lMsErroAuto := .F.  // Control de ejecución de rutina
 
    cDoc :=  FWInputBox("Número de Factura", "")    // Informar número de documento, ejemplo: "000000000001"
 
    // Encabezado  
 
    AADD( aCab, { "F1_FILIAL"   , xFilial("SF1")    , Nil })
    AAdd( aCab, { "F1_FORNECE"  , "P17348"          , Nil })   
    AAdd( aCab, { "F1_LOJA"     , "01"              , Nil })   
    AAdd( aCab, { "F1_SERIE"    , "LRR"             , Nil })    
    AAdd( aCab, { "F1_DOC"      , cDoc              , Nil })
    AAdd( aCab, { "F1_NATUREZ"  , "EFECTIVO"        , Nil }) // Modalidad                       
    AAdd( aCab, { "F1_TIPO"     , "N"               , Nil })
    AAdd( aCab, { "F1_FORMUL"   , "N"               , Nil })
    AAdd( aCab, { "F1_TIPODOC"  , "10"              , Nil })
    AAdd( aCab, { "F1_ESPECIE"  , "NF "             , Nil })
    AAdd( aCab, { "F1_EMISSAO"  , dDataBase         , Nil })
    AAdd( aCab, { "F1_DTDIGIT"  , dDataBase         , Nil })
    AAdd( aCab, { "F1_MOEDA"    , 1                 , Nil })
    AAdd( aCab, { "F1_TXMOEDA"  , 1                 , Nil })
    AAdd( aCab, { "F1_COND"     , "001"             , Nil })
    AAdd( aCab, { "F1_EST"      , "10"              , Nil })
 
    // Item
 
    AADD( aLin, { "D1_FILIAL"   , xFilial("SD1")    , Nil })
    AADD( aLin, { "D1_ITEM"     , "0001"            , Nil })
    AAdd( aLin, { "D1_COD"      , "D17348"          , Nil })
    AAdd( aLin, { "D1_UM"       , "UN"              , Nil })
    AAdd( aLin, { "D1_QUANT"    , 1                 , Nil })                   
    AAdd( aLin, { "D1_VUNIT"    , 1000              , Nil })                   
    AAdd( aLin, { "D1_TOTAL"    , 1000              , Nil })
    AAdd( aLin, { "D1_TES"      , "077"             , Nil })
    AAdd( aLin, { "D1_CF"       , "1102"            , Nil })
    AAdd( aLin, { "D1_CONCEPT"  , "303"             , Nil })
 
    AAdd( aItem, aLin)
 
    // Ejecuta Rutina Automática
    MSExecAuto( { |x,y| MATA101N(x,y) }, aCab, aItem, 3 )
     
    If lMsErroAuto     
        MsgStop("Error en la grabación de la factura!")
        MostraErro()   
    Else   
        msgInfo("Factura de Entrada incluida: " + cDoc, "MsExecAuto MATA101N")
    EndIf
 
Return

...

Card documentos
InformacaoSolución disponible para Protheus versión 12.1.27 (que cuente con garantía extendida), 12.1.33 y posterior que cuente con las rutinas actualizadas a una fecha igual o posterior a las indicadas en el presente documento técnico.
Titulo¡IMPORTANTE!


05. ASUNTOS RELACIONADOS

...

Certificado de Retención FISA015 EQU


Templatedocumentos