01. DATOS GENERALES

Línea de producto:Microsiga Protheus®
Segmento:Servicios
Módulo:Fiscal
Programa fuenteSPEDFISCAL.PRW


02. DESCRIPCIÓN

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.

03. ESPECIFICACIÓN

Parámetros del puento de entrada:

NombreTipoDescripció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:

NombreTipoDescripción
aRetArray of Record

aRet[01] = Domicilio y dirección del inmueble

aRet[02] = Número del inmueble

04. EJEMPLO DE UTILIZACIÓN


SPDFIS06
#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}


05. OTRAS INFORMACIONES

No existe