Linha Microsiga Protheus

Árvore de páginas

Incluído ponto de entrada na validação da exclusão de títulos

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAGPE

Rotina:

Rotina

Nome Técnico

Cadastro de movimentação dos títulos

GPEM660.PRX

Chamados Relacionados

TVLVF3

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Descrição

Incluído o ponto de entrada GP660VLD para complementar a validação da rotina de exclusão de títulos. Atualmente para excluir um titulo presenta na tabela RC1 -  Movimentações de Títulos - o sistema verifica se as informações do título foram enviadas para o financeiro, verificando se o titulo foi baixado, o ponto de entrada deverá retornar um conteúdo lógico para complementar essa validação, retornando verdadeiro (.T.) o registro não poderá ser excluído.

Ponto de Entrada

Descrição:

Validação da exclusão de títulos

Eventos:

Exclusão de títulos através da rotina de manutenção de títulos.

Programa Fonte:

GPEM660.PRX

Função:

Cadastro de movimentação dos títulos

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lRet

Lógico

Indica se um título pode ou não ser excluído

Sim

 

Exemplo:

#Include 'Protheus.ch'

User Function GP660VLD()

     Local aArea := GetArea()
     Local lRet := .F.

     //Compara a parcela do título
     If AllTrim(RC1->RC1_PARC) == AllTrim(SE2->E2_PARCELA)
          lRet := .T.
     EndIf

     RestArea(aArea)

Return lRet