Versões comparadas

Chave

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


Remito de entrada(estrela) (MATA102N - SIGACOM)

  Rascunho
Esta rutina permite el registro de cualquier movimiento de entrada de mercaderías, hecho a través de un remito proveniente de proveedores, o de la mejora proveniente de clientes.
La entrada de las mercaderías inicia un proceso de actualización en línea (On Line) de datos de stock y costos.
El primer parámetro determina el tipo de remito que se está registrando.

Cada país utiliza una nomenclatura para identificar el remito de entrada:

(estrela)

 


Nombre

Países

Remito

Image Removed Image Removed Image Removed Image Removed Image Removed Image Removed

Image Added Image Added Image Added Image Added Image Added Image Added

Remision

Image Removed Image Removed Image Removed

Image Added Image Added Image Added

Conduce

Image Removed Image Removed Image Removed

Image Added Image Added Image Added

Nota de Entrega

Image Removed

Image Added

Guia de Remision

Image Removed

Image Added

Guia de Recepcion

Image Removed

Image Added



...

Procedimientos
Para incluir un remito de entrada:

...

Se abrirá la pantalla de inclusión. En la parte superior de esta pantalla, se encuentran los campos que compondrán el encabezado del remito. En el medio de la pantalla, están los ítems del remito y en la parte inferior, las Carpetas del pie de página
 5. Complete los datos de acuerdo con la orientación del help de campo.
6. Verifique los datos y confirme.

Image Removed

Image Added Importante:
Cuando el parámetro MV_DISTMOV esté activo, se abrirá la pantalla para distribución de la cantidad de entrada en direcciones/números de serie, inmediatamente después de confirmar la inclusión de entrada, facturas de entrada, remito de entrada o apuntes de producción.  



Aviso
titleImportante

Para la utilización de la rutina automática, utilizando la función MsExecAuto(), debe ser ejecutada la instrucción SetFunName("MATA102N").
A continuación, se muestra un ejemplo de utilización:

Bloco de código
languagecpp
titleEjemplo de ejecución automática
linenumberstrue
collapsetrue
#INCLUDE "RWMAKE.CH"								//Importación de librearías
#INCLUDE "TBICONN.CH"   							//Importación de librearías
  
User Function xMta102n()
    Local _aCabec       := {}						//Arreglo con los datos del encabezado
    Local _aItens       := {}						//Arreglo con los datos de los ítems
    Local aLinha        := {}						//Arreglo de trabajo
    Local cDoc          := ""						//Inicialización del número de documento
 
    Private aRecsSF1    := {}						//Arreglo para vínculo de Notas
    Private lMsErroAuto := .F.						//Control de ejecución de rutina
  
    cDoc :=  FWInputBox("Número documento", "") 	//Ventana emergente donde será introducido el número de documento
  
    //Encabezado
    aadd(_aCabec,{"F1_FILIAL","0101"})				//Filial
    aadd(_aCabec,{"F1_DOC",cDoc})					//Número de Documento
    aadd(_aCabec,{"F1_SERIE","REM"})				//Serie
    aadd(_aCabec,{"F1_FORNECE","000001"})			//Proveedor
    aadd(_aCabec,{"F1_LOJA","01"})					//Tienda
    aadd(_aCabec,{"F1_TIPO","N"})					//Tipo de Factura
    aadd(_aCabec,{"F1_FORMUL","N"})					//Formulario Propio
    aadd(_aCabec,{"F1_EMISSAO",dDataBase})			//Fecha de Emisión
    aadd(_aCabec,{"F1_TXMOEDA",1})					//Tasa de la Moneda
    aadd(_aCabec,{"F1_TIPODOC","60"})				//Identificador de Documento
  
    //Ítems
    aadd(_aItens,{"D1_COD","0101001        ",NIL})	//Código del Producto
    aadd(_aItens,{"D1_QUANT",1,NIL})				//Cantidad
    aadd(_aItens,{"D1_VUNIT",712.00,NIL})			//Valor Unitario
    aadd(_aItens,{"D1_TOTAL",712.00,NIL})			//Total
    aadd(_aItens,{"D1_TES","001",NIL})				//TES
    aadd(_AItens,{"D1_TIPO","N",NIL})				//Tipo del Documento
    aadd(_AItens,{"D1_CUSTO",712.00,NIL})			//Costo de Entrada Moneda 1
    aadd(_AItens,{"D1_CUSORI",712.00,NIL})			//Costo Original Moneda 1
    aadd(aLinha,_aItens)							//Se agrega el arreglo de Ítems al arreglo de Trabajo
    
    SetFunName("MATA102N")							//Se establece el "nombre" de la función ejecutante como "MATA102N"

    MsExecAuto({|x, y, z| Mata102N(x, y, z)}, _aCabec, aLinha, 3)			//Ejecución automática por medio de MsExecAuto
  
    If lMsErroAuto
        MostraErro()														//Si se detonó algún error, es mostrado
    Else
        MsgInfo("Remito de Entrada incluido: " + cDoc, "ExecAuto MATA102N") //Si no hubo error, se envía mensaje de proceso exitoso.
    Endif   
  
Return Nil																	//Fin de la ejecución


...

Acciones relacionadas

Además de los campos, en esta pantalla, existen algunas acciones que apoyan al usuario dependiendo de cada tipo de factura:

  • Normal.



  • Mejora