Linha Microsiga Protheus

Árvore de páginas


ÍNDICE

  1. Visão Geral
  2. Exemplo de utilização

01. VISÃO GERAL

Localização: Function A681Inclui(cAlias,nReg,nOpc) - Responsável inclusão do movimento de estoque.

Em que ponto: É chamado antes de iniciar a gravação da perda total dos empenhos no apontamento quando a quantidade de perda for maior ou igual a quantidade já produzida. 

Finalidade: Não mostrar em tela a mensagem "Este apontamento indica PERDA TOTAL da OP. Encerra produção da OP nessa operação?"

Programa fonte: MATA681.PRX

Retorno: MTPERDA = .T. Não apresenta mensagem e faz o encerramento da OP.

                MTPERDA = .F. Apresenta mensagem se deseja encerrar a OP.

02. EXEMPLO DE UTILIZAÇÃO


#INCLUDE "TOTVS.ch"

User Function MTPERDA()
Local lRet := .T. //Não exibe mensagem quando quando a quantidade de perda for maior ou igual a quantidade já produzida. 

Return lRet