DMICNS-15002 DT ExecAuto "xMta101n" No graba campo F1_NATUREZ URU

01. DATOS GENERALES

Producto

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Backoffice

Módulo:

SIGACOM - Compras

Función:

Rutina	Nombre Técnico
LOCXARG.PRG	Funciones genéricas para Notas Fiscales Argentina.
LOCXBOL.PRW	Funciones genéricas para Notas Fiscales Bolivia.
LOCXCOL.PRW	Funciones genéricas para Notas Fiscales Colombia.
LOCXDOM.PRW	Funciones genéricas para Notas Fiscales República Dominicana.
LOCXEQU.PRW	Funciones genéricas para Notas Fiscales Ecuador.
LOCXEUA.PRW	Funciones genéricas para Notas Fiscales Estados Unidos.
LOCXMEX.PRW	Funciones genéricas para Notas Fiscales México.
LOCXNF2.PRW	Funciones genéricas para Notas Fiscales.
LOCXNF.PRW	Notas Fiscales.
LOCXPER.PRW	Funciones genéricas para Notas Fiscales Perú.
MATA942.PRW	Estado Vs. Ing. Brutos (CCO).

País:

Uruguay - URU

Ticket:

N/A

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

DMICNS-15002

02. SITUACIÓN/REQUISITO

Al ejecutar la rutina automática de la Factura de Entrada (MATA101N), el sistema no graba el campo Modalidad - F1_NATUREZ de la tabla encabezado de la factura (SF1).

03. SOLUCIÓN

Se realiza el tratamiento para cuando sea ejecutada la rutina automática el campo de Modalidad - F1_NATUREZ sea guardado.

Añadir:

Proveedor (SIGACOM >> Actualizaciones | Archivos | Proveedores).
TES (SIGACOM >> Actualizaciones | Archivos | Tipo de entrada y salida).
Producto (SIGACOM >> Actualizaciones | Archivos | Productos).
Modalidad (SIGACOM >> Actualizaciones | Archivos | Modalidades).

Ejecutar rutina automática de la Factura de Entrada (ver ejemplo RDMake) con los datos agregados anteriormente.

Crear un RDMake que ejecute la rutina automática de la Factura de Entrada, indicando la Modalidad (F1_NATUREZ)

Verificar la grabación del campo de Modalidad - F1_NATUREZ de la tabla encabezado de la factura (SF1).

Ejemplo del RDMake "xMta101n"

xMta101n

#INCLUDE "RWMAKE.CH"
#INCLUDE "TBICONN.CH"   

// Ejemplo de Factura de Entrada - Tipo - Normal //

User Function xMta101n()

	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"	, "P15002"			, Nil })	
	AAdd( aCab, { "F1_LOJA"		, "01"				, Nil })	
	AAdd( aCab, { "F1_SERIE"	, "A  "				, Nil })	 
	AAdd( aCab, { "F1_DOC"		, cDoc				, Nil })
	AAdd( aCab, { "F1_NATUREZ"	, "OTROS"			, 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"		, "DU"				, Nil })

	// Item	

	AADD( aLin, { "D1_FILIAL"	, xFilial("SD1")	, Nil })
	AADD( aLin, { "D1_ITEM"		, "0001"   			, Nil })
	AAdd( aLin, { "D1_COD"		, "000001"			, Nil })
	AAdd( aLin, { "D1_UM"     	, "UN"				, Nil })
	AAdd( aLin, { "D1_QUANT"	, 2					, Nil })					
	AAdd( aLin, { "D1_VUNIT"  	, 5000				, Nil })					
	AAdd( aLin, { "D1_TOTAL"  	, 10000				, Nil })
	AAdd( aLin, { "D1_TES" 		, "001" 			, Nil })
	AAdd( aLin, { "D1_CF"		, "112"				, 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

04. INFORMACIÓN ADICIONAL

N/A.

05. ASUNTOS RELACIONADOS

Árvore de páginas