Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (andre.luiz), última alteração em 30 jun, 2016

Implementado ponto de entrada que permite validar o cancelamento de uma transferência de ativos

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAATF - Ativo Fixo

Função:

AF060ExeCa() - Executa o cancelamento de transferência (filial ou contábil) dos ativos imobilizados selecionados.

Situação/Requisito:

Solicitação de um ponto de entrada que possa realizar  validação no cancelamento de transferência na rotina ATFA060.

Solução/Implementação:

Implementado o ponto de entrada AF060VLC na função AF060ExeCa() que tem como finalidade validar a efetivação do cancelamento de uma transferência de ativos:

TVKFEX_DT_Ponto_de_entrada_AF060VLC

Chamados relacionados:

TVKFEX

Ponto de entrada AF060VLC que permite validar o cancelamento de transferência de ativos

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAATF - Ativo Fixo

Rotina:

Rotina

Nome Técnico

ATFA060

Transferência de Ativos

Ponto de Entrada:

AF060VLC

Chamados Relacionados

TVKFEX

País(es):

Todos homologados pelo Protheus

Banco(s) de Dados:

Todos homologados pelo Protheus

Sistema(s) Operacional(is):

Todos homologados pelo Protheus

Descrição

Implementado o ponto de entrada AF060VLC que permite o usuário criar validações na efetivação de um cancelamento de transferência de um ativo imobilizado.

 

Ponto de Entrada

Descrição:

Ponto de entrada que permite validar o prosseguimento do cancelamento de uma transferência efetuada de um ativo

Eventos:

lAf060Vlc := ExistBlock("AF060VLC")

Programa Fonte:

ATFA060.PRX

Função:

AF060ExeCa() - Executa o cancelamento de transferência (filial ou contábil) dos ativos imobilizados selecionados

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lCont

Lógico

Se .T. permite o cancelamento da transferência.

Se .F. não permite o prosseguimento do cancelamento da transferência.

SIM

 

Exemplo:

#Include 'Protheus.ch'

User Function AF060VLC()

Local nOpcao := paramixb[1]
Local cLoteAtf := paramixb[2]

If MsgYesNo ("Deseja prosseguir com o cancelamento de transferência? ","Cancelamento Transferência")
lRet:= .T. 
Else
lRet:= .F.
MsgInfo ("Transferência não permitida!")
EndIf

Return lRet