Árvore de páginas


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:BackOffice / Serviços
Módulo:Financeiro
Função:FINA667
Requisito/Story/Issue (informe o requisito relacionado) :DSERFINP-29425


02. DESCRIÇÃO

A finalidade do ponto de entrada F667ALCAPR é permitir alterar o código do aprovador do Adiantamento solicitado na Viagem.

03. EXEMPLO DE UTILIZAÇÃO


F667ALCAPR
#Include 'Protheus.ch'

User Function F667ALCAPR()

	Local aParam    := PARAMIXB  //[1] = participante, [2] = cod. viagem
	Local cRet      := ""
	Local cAreaAnt  := GetArea()

	dbSelectArea("RD0")
	cRet := RD0->RD0_APSUBS

	If cAreaAnt <> Nil .and. !Empty(cAreaAnt)
    	dbSelectArea(cAreaAnt)
	EndIf

Return cRet
Parâmetros RecebidosTipoDescrição
PARAMIXB[1]CCódigo do participante
PARAMIXB[2]CCódigo da viagem
RetornoTipoDescrição
cRetCCódigo do participante ao qual a regra aplicada no ponto de entrada definiu que será o aprovador do adiantamento

04. DEMAIS INFORMAÇÕES

Não há.


05. ASSUNTOS RELACIONADOS

         Não há.