Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 8

changes.mady.by.user Cristian Eduardo Porras Franco

Gravado em

comparado com

Nova versão 9

changes.mady.by.user Usuário desconhecido (eli.salatiel)

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:LOCXNF.PRW 
País:Uruguay - URU
Ticket:N/A
Requisito/Story/Issue (informe el requisito vinculado):DMICNS-15002


02. SITUACIÓN/REQUISITO

Al ejecutar el ExecAuto "xMta101n" no se informa el campo Modalidad - F1_NATUREZ de la tabla encabezado de la factura (SF1).

03. SOLUCIÓN

Se localiza tratamiento para cuando se ejecute el ExecAuto el campo de Modalidad - F1_NATUREZ sea informado.

...

Totvs custom tabs box
tabsConfiguraciones Previas, Flujo de Prueba, Punto de Entrada, Paso 04
idspaso1,paso2,paso3
Totvs custom tabs box items
defaultyes
referenciapaso1

Añadir:

Proveedor (SIGACOM >> Actualizaciones  | Archivos | Proveedores).

TES (SIGACOM >> Actualizaciones | Archivos | Tipo de entrada y salida).

Producto (SIGACOM >> Actualizaciones | Archivos | Productos).


Compilar la función de usuario (xMta101n) con los datos agregados anteriormente.

Una vez compilada la función de usuario anterior ir al configurador y agregar al Menú. 

Totvs custom tabs box items
defaultno
referenciapaso2

Ir al menú donde se agregó la función de usuario y ejecutar.

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

Totvs custom tabs box items
defaultno
referenciapaso3

Ejemplo del ExecAuto "xMta101n"

Bloco de código
languagejava
themeMidnight
titlexMta101n
#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 })	  		 	  		 
	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

...