F950PAR1 - Inclui parâmetros

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Serviços
Módulo:	Financeiro

02. CONCEITO

Ponto de Entrada que permite incluir novos parâmetros na rotina FINA950.
Para o correto funcionamento, este Ponto de Entrada deve trabalhar em conjunto com o ponto de entrada F950PAR2.
O exemplo demonstra os dois pontos de entrada trabalhando juntos.

Retorno	Tipo	Descrição
aRet1	Array	Retorna um array com os parâmetros novos

03. PARÂMETROS

Ordem	Nome	Tipo
1	aPWiz3 = array com os parâmetros padrão	Array

04. EXEMPLO DE UTILIZAÇÃO

Exemplo F090FIL

#INCLUDE "PROTHEUS.CH"
User Function F950PAR1()
	Local aRet1 := aClone(paramixb[1])
	
	aAdd(aRet1,{ 1,	"Tp. Titulo De"   	,Space(TamSx3('E1_TIPO')[1])	,X3Picture('E1_TIPO')	,"","SE1","",50,	.F.}) 
	aAdd(aRet1,{ 1,	"Tp. Titulo Ate"	,Space(TamSx3('E1_TIPO')[1])	,X3Picture('E1_TIPO')	,"","SE1","",50,	.F.})
Return aRet1User 

Function F950PAR2()
	Local aRet2 := aClone(paramixb[1])

	aAdd(aRet2,Space(TamSx3('E1_TIPO')[1]))
	aAdd(aRet2,Replicate( "Z" , TamSx3('E1_TIPO')[1]))
Return aRet2

05. DEMAIS INFORMAÇÕES

Não há.

06. ASSUNTOS RELACIONADOS