Línea de producto: | Microsiga Protheus® |
---|---|
Segmento: | Servicios |
Módulo: | Fiscal |
Programa fuente | SPEDFISCAL.PRW |
Punto de entrada que permite generar solamente un campo con las informaciones de dirección y número de registro de los participantes, registro 0150 SPEDFISCAL.
Parámetros del puento de entrada:
Nombre | Tipo | Descripción |
---|---|---|
PARAMIXB[1] | Array of Record | Informativo, con el "Alias" de la Tabla SA1 o SA2 relacionada en el siguiente parámetro. |
PARAMIXB[2] | Array of Record | Alias del registro posicionado |
Retorno:
Nombre | Tipo | Descripción |
---|---|---|
aRet | Array of Record | aRet[01] = Domicilio y dirección del inmueble aRet[02] = Número del inmueble |
#include "rwmake.ch" #include "Topconn.ch" #include "protheus.ch" #include 'protheus.ch' User Function SPDFIS06() //Parámetro solamente informativo para indicar el registro que se considerará en el siguiente "Alias": SA1 o SA2. Local cAlias1 := ParamixB[1] //Parámetro con el registro posicionado en la SFT y ya relacionado con las demás tablas del SPED FISCAL Local cAlias2 := ParamixB[2] Local cEndereco := "" Local cNumero := "" If cAlias1 == "SA1" //Registro de Cliente cEndereco := (cAlias2)->A1_END cNumero := "155" Else cEndereco := (cAlias2)->A2_END // Registro del proveedor cNumero := "155" Endif Return {cEndereco,cNumero}
No existe