Exibir origem

01. DADOS GERAIS

Produto:
Linha de Produto:
Segmento:
Módulo:	Ativo Fixo(SIGAATF)
Função:	Cálculo Mensal (ATFA050)
Ticket:	9577322
Requisito/Story/Issue:	DSERCTR1-28364

02. SITUAÇÃO/REQUISITO

O ponto de entrada AF050VTP permite verificar se existem certos tipos de ativos que não foram tratados ao executar a rotina de Cálculo Mensal(ATFA050), retornando dentro da regra os tipos desejados para serem verificados.

03. SOLUÇÃO

Realizado documentação do PE.

O exemplo demonstrado é meramente ilustrativo. A regra, o funcionamento e os impactos gerados pelo ponto de entrada no sistema são de responsabilidade do cliente que o utiliza.

04. DEMAIS INFORMAÇÕES

Parâmetros:

Parâmetro	Tipo	Descrição	Obrigatório
PARAMIXB[1]	None	Não se aplica	Não

Retorno:

Retorno	Tipo	Descrição	Obrigatório
Array	Array	Tipo dos bens a serem avaliados que não foram tratados	Sim

#include "protheus.ch"
 
User Function AF050VTP()
    Local aBensTipos        :=  {'55','56','57'}
    //Outras regras dependendo do que deseja ser avaliado e validado
 
Return aBensTipos

		If ExistBlock("AF050VTP")
			If lResult .and. !AFA050VlTp(cFilDe, cFilAte)
				If IsBlind()
					LogRecord( 'ID:AF050VLTP' )
				Else
					HELP(" ",1,"AF050VLTP",,STR0033,1,0)    //"Existem ativo(s) com tipo nao tratado"
				EndIf
				lResult := .F.
			EndIf
		EndIf

	If ExistBlock("AF050VTP")
		aAux := ExecBlock( "AF050VTP", .F., .F. )
		If ValType(aAux)=="A"
			For nX := 1 to Len(aAux)
				If ValType(aAux[nX])=="C"
					AADD(aTipos, aAux[nX])
				EndIf
			Next
		EndIf
	Endif

05. ASSUNTOS RELACIONADOS

Não se aplica.

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>