Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (rafael.voltz), última alteração em 09 ago, 2018

Ponto de Entrada para validar a ação de vincular e remover vínculo do Painel Financeiro

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

OGC120

Painel Financeiro



Ponto de Entrada:

OGC120CVLD 

País(es):

Todos

Pacote:12.1.23

Ponto de Entrada

Localização:

Ao salvar a vinculação ou remoção do vínculo entre Previsão Financeira e Recebimento Antecipado

Programa Fonte:

OGC120CVLD 

Função:

Permitir validar os dados antes de efetivar o vínculo/desvinculo da Previsão Financeira e Recebimento Antecipado (RA).

Parâmetros:
NomeTipoDescriçãoObrigatório
PARAMIXB[1]CharAção realizada (1 - Vínculo, 2 - Desvinculo)Sim
PARAMIXB[2]Array

Array com os dados da previsão financeira.

Exemplo:

{ cFilial, cCodCTR, cItemPrev, cParcPrev, nVlrVinc}

Sim
PARAMIXB[2] Array

Array com os dados do Recebimento Antecipado (RA).

Exemplo:

{ cTipoRA, cPrefixRA, cNumRA, cParcRA, cFilTitRA}

Sim

Retorno:

Nome

Tipo

Descrição

Obrigatório

 lContinua

Lógico

Indica se o processo de vínculação/desvinculação deve continuar.

.T. = Continua a ação de vincular/desvincular.

.F. = Cancela a ação de vínculo/desvínculo.

Não

Exemplo:

User Function OGC120CVLD()
    Local lAcao    := PARAMIXB[1]
    Local aDadosPR := aClone(PARAMIXB[2])
    Local aDadosRA := aClone(PARAMIXB[3])
    Local lRet     := .T.

    If lAcao == "1"  //Ação de vincular
        If aDadosPR[05] > 10000
            MsgInfo("Somente é possível vincular até 10.000.")
            lRet := .F.
        EndIf            
    EndIf

Return lRet
  • Sem rótulos