...
| 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 |
06 |
|---|
| 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 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).
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 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:
| Bloco de código |
|---|
| language | delphi |
|---|
| theme | Eclipse |
|---|
| title | M447BFGA |
|---|
|
//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) |
| Card documentos |
|---|
| Informacao | Use esse box para destacar informações relevantes e/ou de destaqueLa presente solución aplica para versión de Protheus 12.1.2210 con garantía extendida o superior. |
|---|
| Titulo | IMPORTANTE! |
|---|
|
04. ASUNTOS RELACIONADOS
