Histórico da Página

#include "rwmake.ch"
#include "Topconn.ch"
#include "protheus.ch"
 

#include 'protheus.ch'  

User Function SPDFIS06()  

Local cAlias := ParamixB[1]	
Local cEndereco := ""
Local cNumero   := ""                            	

If cAlias == "SA1"  
	//Cadastro de Cliente		 
	cEndereco := (cAlias)->A1_END		 
	cNumero   := "155"	
Else 		 
	cEndereco := (cAlias)->A2_END 
	// Cadastro de Fornecedor		 
	cNumero   := "155"	
Endif

Return {cEndereco,cNumero}