Histórico da Página

#include "rwmake.ch"
#include "Topconn.ch"
#include "protheus.ch"
  
 
#include 'protheus.ch'  
 
User Function SPDFIS06() 

//Parametro somente informativo para indicação de qual cadastro considerar no parametro"Alias" abaixo: SA1 ou SA2 (somente informativo) .
Local cAlias1 := ParamixB[1] 
//Parametro com o registro posicionado na SFT e demaisjá tabelasrelacionado paracom ,as SA1,demais SA2,tabelas SB1, etc... do SPED FISCAL
Local cAlias2 := ParamixB[2] 

Local cEndereco := ""
Local cNumero   := ""                              
 
If cAlias1 == "SA1" 
    //Cadastro de Cliente       
    cEndereco := (cAlias2)->A1_END        
    cNumero   := "155" 
Else        
    cEndereco := (cAlias2)->A2_END
    // Cadastro de Fornecedor       
    cNumero   := "155" 
Endif
 
Return {cEndereco,cNumero}