Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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 FINA940.
Para o correto funcionamento, este Ponto de Entrada deve trabalhar em conjunto com o ponto de entrada F940PAR2.
O exemplo demonstra os dois pontos de entrada trabalhando juntos.

RetornoTipoDescrição
aRet1Array

Retorna um array com os parâmetros novos

03. PARÂMETROS

OrdemNomeTipo
1aPWiz3 = array com os parâmetros padrãoArray

04. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagejava
themeMidnight
titleExemplo F090FIL
linenumberstrue
#INCLUDE "PROTHEUS.CH"
User Function F940PAR1()
	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 F940PAR2()
	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

     Não há.