1176009_DMICNS-39_Punto de Entrada M143TODOK

Características del Requisito

Línea de Producto:

Microsiga Protheus.

Segmento:

Mercado internacional.

Módulo:

SIGACOM- Compras

Rutina:

Rutina

Nombre Técnico

MATA143.PRW

Despacho

Rutina(s) involucrada(s)

Nombre Técnico

M143TUDOK.PRW

Punto de Entrada M143TUDOK

Requisito/Story/Issue:DMICNS-39, DMICNS-930

País(es):

Todos

Base(s) de Datos:

Todas

Tablas utilizadas:

DBB - Invoices

DBC - Items

Sistema(s) operativo(s):

Todos.

Versiones: 11.80, 12.1.17

Descripción 

Se solicita la creación de un punto de entrada con las mismas características que el PE MT100TOK pero para la validación de los tipos de Facturas, diferentes a FOB y CIF en la rutina de Despacho (MATA143).

Procedimiento de Implantación 

Deberá aplicar el paquete de actualización (patch) relacionado a este llamado (respaldar RPO antes de aplicar). El patch contiene la actualización de los fuentes:

    • MATA143.PRW - Despacho 

Procedimiento de Utilización 


Ejemplo:

Configuraciones Previas.

  • Solicitud de Importación.
  • En base a la Solicitud de Importación registrar una Purchase Order.

  1. Dentro del módulo Compras (SIGACOM) en la rutina de Despacho (Actualizaciones|Importaciones) capturar los documentos a ser generados.

  2. Una vez capturados los documentos dentro de Acciones Relacionadas seleccionar Generar Documentos de Entrada.

  3. Seleccionar el Tipo de Documento a ser generados.

  4. Validar el proceso configurado dentro del Punto de Entrada M143TUDOK.

Punto de Entrada

Descripción:

Actualizaciones

Ubicación:

Importaciones

Eventos:

Punto de Entrada M143TUDOK

Programa Fuente:

M143TUDOK

Función:

Despacho

Respuesta:

Nombre

Tipo

Descripción

Obligatorio

 lRet

Lógico

Indica si se continúa el proceso o no por cada documento.

True - Continúa el proceso.

False - No continúa el proceso para ese documento.

Si

Parámetros:
NombreTipoDescripción
PARAMIXB[1]ArregloEncabezado del documento
PARAMIXB[1]ArregloItems del documento
PARAMIXB[1]CarácterTipo de Documento

 

Ejemplo:

#Include 'Protheus.ch'

User Function M143TODOK()
Local lRet := .T.
Local cTipoNFE := PARAMIXB[3]


If cTipoNFE == "5"

MsgAlert("Documento Entrada FOB: " + DBB->DBB_DOC)

ElseIf cTipoNFE == "6"

MsgAlert("Documento Entrada Flete: " + DBB->DBB_DOC)

ElseIf cTipoNFE == "7"

MsgAlert("Documento Entrada Seguro: " + DBB->DBB_DOC)

ElseIf cTipoNFE == "8"

MsgAlert("Documento Entrada CIF: " + DBB->DBB_DOC)

ElseIf cTipoNFE == "A"

MsgAlert("Documento Entrada Gastos: " + DBB->DBB_DOC)

ElseIf cTipoNFE == "D"

MsgAlert("Documento Entrada DUA: " + DBB->DBB_DOC)

EndIf


Return lRet