Producto: | |||||||
---|---|---|---|---|---|---|---|
Línea de producto: | |||||||
Segmento: | |||||||
Módulo: | |||||||
Función: |
| ||||||
País: | México | ||||||
Ticket: | No aplica | ||||||
Requisito/Story/Issue (informe el requisito vinculado): | DMINA-24204 |
Punto de Entrada en la rutina de Generación de Documentos Pedimentos (MATA447B), con el objetivo de si se agregan campos específicos en la tabla de Encabezado de factura (RSE) o Ítems de factura (RSF) éstos sean pasados a la factura de entrada (tablas SF1/SD1).
En la rutina de Generación de Documentos Pedimentos (MATA447B), dentro de la función encargada de Generar facturas de entrada por medio de la Rutina Automática (GenFacEnt()) se agrega la ejecución del punto de entrada M447BFGA().
El Punto de Entrada se ejecuta 2 veces, la primera para el Encabezado (RSE) y la segunda para los Ítems (RSF), determinando por medio del segundo parámetro a qué tabla se adiciona(n) el/los campo(s).
En la función de usuario se debe construir un arreglo con el/los nuevo(s) valor(es) que el usuario determine, respetando si es para Encabezado (RSE/SF1) o para Ítems (RSF/SD1).
La función debe retornar dicho arreglo.
Ejemplos del Punto de Entrada para Encabezado/Ítems, solo Encabezado y solo Ítems:
//Encabezado e Ítems User Function M447BFGA() Local aAddFlds := {} // Arreglo a retornar Local cAlias := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems. Local cTable := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s). If cTable == "RSE" //Encabezado aAdd( aAddFlds, {"F1_TEXTO1", (cAlias)->RSE_TEXTO1, Nil} ) aAdd( aAddFlds, {"F1_TEXTO2", (cAlias)->RSE_TEXTO2, Nil} ) ElseIf cTable == "RSF" //Ítems aAdd( aAddFlds, {"D1_TEXTO1", (cAlias)->RSF_TEXTO1, Nil} ) aAdd( aAddFlds, {"D1_TEXTO2", (cAlias)->RSF_TEXTO2, Nil} ) EndIf Return (aAddFlds) //Solo encabezado User Function M447BFGA() Local aAddFlds := {} // Arreglo a retornar Local cAlias := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems. Local cTable := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s). If cTable == "RSE" //Encabezado aAdd( aAddFlds, {"F1_TEXTO1", (cAlias)->RSE_TEXTO1, Nil} ) aAdd( aAddFlds, {"F1_TEXTO2", (cAlias)->RSE_TEXTO2, Nil} ) EndIf Return (aAddFlds) //Solo ítems User Function M447BFGA() Local aAddFlds := {} // Arreglo a retornar Local cAlias := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems. Local cTable := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s). If cTable == "RSF" //Ítems aAdd( aAddFlds, {"D1_TEXTO1", (cAlias)->RSF_TEXTO1, Nil} ) aAdd( aAddFlds, {"D1_TEXTO2", (cAlias)->RSF_TEXTO2, Nil} ) EndIf Return (aAddFlds) |