Versões comparadas

Chave

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

...

Procedimientos
Para incluir un remito de entrada:

  1. Wiki Markup
    En la entrada de la rutina se solicitará el tipo de remito que se digitará (esta configuración se puede modificar en cualquier momento en la rutina mediante la tecla \[F12\]).
  2. Complete los datos de acuerdo con la orientación del help de campo y confirme.
  3. Se abrirá una nueva pantalla de parámetros, en que es necesario informar las configuraciones generales de la rutina.  Aparecerá una pantalla con los remitos ya emitidos.
  4. Seleccione la opción Incluir.

...

 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:

...