Histórico da Página

01. DATOS GENERALES

Producto

Solucoes_espanhol

Solucao	TOTVS Backoffice

Línea de producto:

Linhas_totvs_espanhol

Linha	Línea Protheus

Segmento:

Segmentos_totvs_espanhol

Segmento	Backoffice

Módulo:

SIGAFIS - Libros Fiscales

Función:

Rutina	Nombre
FISA828.PRW	Pre-liquidaciones.
FIS828GRVFIN.PRW	Generación de documentos fiscales.
ARGWSLPEG.PRW	Transmisión de liquidaciones.

Ticket:

Requisito/Story/Issue (informe el requisito vinculado):

DMICNS-10044

02. SITUACIÓN/REQUISITO

Se realiza mantenimiento a las rutinas de liquidaciones para poder realizar testes automatizados y utilizar rutinas automáticas.

03. SOLUCIÓN

Se modificaron las rutinas "FISA828", "FIS828GRVFIN" y "ARGWSLPEG" para permitir automatización y rutinas automáticas.

Totvs custom tabs box

tabs	Carga de liquidación primaria, Carga de liquidación secundaria,Calculo de impuestos
ids	paso1,paso2,paso3

Totvs custom tabs box items

default	yes
referencia	paso1

//Ejemplo

User function LiqPrim()
Local oMdlTab
Local cEspecie := "1" //1 - Pagar, 2 - recibir
Local cLiquid := "1" //1 - Primaria, 2 - Secundaria
Local cTipLiq := "1" //1 - Parcial, 2 - Final, 3 - Total

oMdlTab := FwLoadModel("FISA828")

//Operación a realizar
oMdlTab:SetOperation(MODEL_OPERATION_INSERT)

oMdlTab:Activate()
oMdlTab:SetValue('NJC_MASTER', 'NJC_PTOEMI', "0001" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_PROVEN', "BA" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_PROPRO', "00001 " )
oMdlTab:SetValue('NJC_MASTER', 'NJC_TIPO ', cTipLiq )
oMdlTab:SetValue('NJC_MASTER', 'NJC_TPLIQ ', cLiquid )
oMdlTab:SetValue('NJC_MASTER', 'NJC_ESPLIQ', cEspecie )

oMdlTab:SetValue('NJC_MASTER', 'NJC_PROVOR', "BA" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_VENDED', "000001" ) //Código del proveedor
oMdlTab:SetValue('NJC_MASTER', 'NJC_LOJAVE', "01" ) //Loja del proveedor
oMdlTab:SetValue('NJC_MASTER', 'NJC_REMITO', "140120210001" ) //Número del remito a ser usado
oMdlTab:SetValue('NJC_MASTER', 'NJC_SERREM', "R " ) //Serie del remito a ser usado para la carga
oMdlTab:SetValue('NJC_MASTER', 'NJC_DATAFP', ddatabase )

oMdlTab:SetValue('NJC_MASTER', 'NJC_ACTCOR', "2" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_LIQCOR', "2" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_CORRED', "000001" ) //Codigo del corredor
oMdlTab:SetValue('NJC_MASTER', 'NJC_LOJCOR', "01" ) //Tienda del corredor

//Función para completar la información a partir del remito.
F828auto()

If oMdlTab:VldData()
oMdlTab:CommitData()
MsgInfo("Registro insertado con éxito.")
EndIf

oMdlTab:DeActivate()

Return

Totvs custom tabs box items

default	no
referencia	paso2

//Ejemplo

User function LiqSec()
Local oMdlTab
Local cEspecie := "2" //1 - Pagar, 2 - recibir
Local cLiquid := "2" //1 - Primaria, 2 - Secundaria
Local cTipLiq := "1" //1 - Parcial, 2 - Final, 3 - Total

oMdlTab := FwLoadModel("FISA828")

oMdlTab:SetOperation(MODEL_OPERATION_INSERT)
oMdlTab:Activate()
oMdlTab:SetValue('NJC_MASTER', 'NJC_PTOEMI', "0001" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_PROVEN', "BA" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_PROPRO', "00001 " )
oMdlTab:SetValue('NJC_MASTER', 'NJC_TIPO ', cTipLiq )
oMdlTab:SetValue('NJC_MASTER', 'NJC_TPLIQ ', cLiquid )
oMdlTab:SetValue('NJC_MASTER', 'NJC_ESPLIQ', cEspecie )

oMdlTab:SetValue('NJC_MASTER', 'NJC_PROVOR', "BA" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_CODPRO', "000001" ) //Código del cliente
oMdlTab:SetValue('NJC_MASTER', 'NJC_TIENDA', "01" ) //Tienda del cliente
oMdlTab:SetValue('NJC_MASTER', 'NJC_REMITO', "000100000029" ) //Número del remito a ser usado
oMdlTab:SetValue('NJC_MASTER', 'NJC_SERREM', "R " ) // Serie del remito a ser usado
oMdlTab:SetValue('NJC_MASTER', 'NJC_DATAFP', ddatabase )

oMdlTab:SetValue('NJC_MASTER', 'NJC_ACTCOR', "2" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_LIQCOR', "2" )
oMdlTab:SetValue('NJC_MASTER', 'NJC_CORRED', "000001" ) //Código del corredor
oMdlTab:SetValue('NJC_MASTER', 'NJC_LOJCOR', "01" ) //Tienda del corredor

//Función para completar la información a partir del remito.
F828auto()

If oMdlTab:VldData()
oMdlTab:CommitData()
MsgInfo("Registro insertado con éxito.")
EndIf

oMdlTab:DeActivate()

Return

Totvs custom tabs box items

default	no
referencia	paso3

//Ejemplo

User Function CalcLiq()
Local oMdlTab

oMdlTab := FwLoadModel("FISA828")

// Busqueda de liquidación 000000000001 para alterar
If NJC->(MsSeek(xFilial("NJC")+"000000000001",.T.))

oMdlTab:SetOperation(MODEL_OPERATION_UPDATE)
oMdlTab:Activate()

//Función de calculo de impuestos
Fis828Cal()

If oMdlTab:VldData()
oMdlTab:CommitData()

MsgInfo("Registro insertado con éxito.")
EndIf
oMdlTab:DeActivate()
EndIf

Return

04. INFORMACIÓN ADICIONAL

Documentos técnicos relacionados a las liquidaciones:

https://tdn.totvs.com/x/naGFI

https://tdn.totvs.com/x/60zoI

Card documentos

Informacao	Si no es usada la función F828auto() para completar la información, será necesario informar todos los datos necesarios incluyendo los datos de las operaciones/deducciones de la tabla NL4.
Titulo	¡IMPORTANTE!

Nota

La funcionalidad Liquidación de granos del módulo Fiscal quedará descontinuada el 01/07/2024, para mayor detalle consultar el siguiente enlace:

https://centraldeatendimento.totvs.com/hc/pt-br/articles/18371290987543-Aviso-de-descontinuaci%C3%B3n-de-Liquidaci%C3%B3n-de-granos-L%C3%ADnea-Protheus

05. ASUNTOS RELACIONADOS

No aplica

Templatedocumentos

HTML

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>

Árvore de páginas

Versões comparadas

Versão antiga 13

Nova versão Atual

Chave

01. DATOS GENERALES

02. SITUACIÓN/REQUISITO

03. SOLUCIÓN

04. INFORMACIÓN ADICIONAL

05. ASUNTOS RELACIONADOS