01. DATOS GENERALES
Producto: | Solucoes_totvs_cross |
---|
SolucaoCross | TOTVS Backoffice |
---|
|
Solucoes_totvs_parceirosexptotvs |
---|
|
|
---|
Línea de producto: | |
---|
Segmento: | |
---|
Módulo: | Modulos_cross_segmentos |
---|
ModulosCrossSegmentos | TOTVS Backoffice (Linha Protheus) - Compras (SIGACOM) |
---|
|
Modulos_totvs_prestadores_de_servicos |
---|
|
---|
Función: | Rutina | Nombre Técnico | Fecha |
---|
MATA447B | Generación de Documentos Pedimentos | --11/09/2024 |
|
---|
País: | México |
---|
Ticket: | No aplica |
---|
Requisito/Story/Issue (informe el requisito vinculado): | DMINA-24204 |
---|
02. DESCRIPCIÓN
Punto de Entrada en la rutina de Generación de Documentos Pedimentos (MATA447B), con el objetivo de que si se agregan campos específicos en la tabla de Encabezado de factura (RSE) o Ítems de factura (RSF) éstos , estos sean pasados a la factura de entrada (tablas SF1/SD1los campos correspondientes en la tabla de Encabezado de Facturas de Entrada (SF1).
03. INFORMACIÓN ADICIONAL
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 M447BFGAM447BSF1().
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) los nuevos campos y los respectivos valores 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:
Bloco de código |
---|
language | delphi |
---|
theme | Eclipse |
---|
title | M447BFGA |
---|
|
//Encabezado e Ítems
User Function M447BFGAM447BSF1()
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 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) |
Card documentos |
---|
Informacao | La presente solución aplica para versión de Protheus 12.1.2210 con garantía extendida o superior. |
---|
Titulo | IMPORTANTE! |
---|
|
04. ASUNTOS RELACIONADOS