Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Marcos Da Rocha Pires

Gravado em

comparado com

Nova versão 5

changes.mady.by.user Marcos Da Rocha Pires

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição:

O ponto de entrada PCOA5307 é chamado após a validação e mensagens do controle de contingência, possibilitando que o cliente realize avaliações especificas e defina se o registro pode ou não ser incluso.


Eventos:

Bloqueio orçamentário com controle de contingência.

Programa Fonte:

PCOA530

Função:

PCOA530

Parâmetros:
NomeTipoDescrição
ParamIxb[1] ArrayDados
do
orçamentários considerando o registro que
está sendo avaliado
se pretende incluir.
ParamIxb[2]LógicoIndica se na avaliação orçamentária padrão, o registro poderá ser incluso.

Retorno:

Tipo

Descrição

Obrigatório

Lógico

Indica se o movimento poderá ser incluso

Sim

Exemplo:

#include "Protheus.ch"

User Function PCOA5307()
Local

aDadosPE

lInclui := ParamIXB[1] //

Dados do registro
Local lInclui         

Indica se passou pelas validacoes padroes
Local aDadosPE := ParamIXB[2] //

Inclui movimento//Customizações
Alert("EXECUTADO PONTO DE ENTRADA

Dados orçamentários considerando o registro que se pretende incluir

lInclui := MsgYesNo("Na avaliação do Protheus, o registro " + If(lInclui,"será","não será") + " incluso. Você deseja incluir?" ,"Ponto de Entrada - PCOA5307")

Return lInclui