Árvore de páginas

Versões comparadas

Chave

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

...

Portuguese

Pagetitle
M461VTot - Verifica o total da Nota Fiscal e Condição de Pagamento
M461VTot - Verifica o total da Nota Fiscal e Condição de Pagamento

Ponto-de-Entrada: M461VTot - Verifica o total da Nota Fiscal e Condição de Pagamento


Abrangências:Microsiga Protheus 10 , Microsiga Protheus 11
Versões:Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil) , Português (Portugal) , Espanhol , Inglês


Descrição:
Este ponto de entrada verifica o total da Nota Fiscal e a condição de pagamento escolhida, antes de sua geração.
Eventos
Programa Fonte
MATA461.PRX
Sintaxe

M461VTot - Verifica o total da Nota Fiscal e Condição de Pagamento ( < nTotal> , < nRecnoE4> ) --> lGeraVTot

Parâmetros:



Nome

Tipo

Descrição

Default

Obrigatório

Referência

nTotal

Numérico

Valor total da nota




X




nRecnoE4

Array of Record

RECNO da condição de pagamento escolhida.




X




Retorno
lGeraVTot
    (logico)
  • .T. Continua no processo de geração de nota. .F. Não gera a Nota Fiscal
Observações
Exemplos
User Function M461VTot()Local aArea		:= GetArea()Local nValTot	:= PARAMIXB[1] // Valor total da notaLocal nRecnoE4	:= PARAMIXB[2] // RECNO da condição de pagamentoLocal 	lRet := .T.If nValTot < 20	dbSelectArea("SE4")	SE4->(dbGoTo(nRecnoE4))	If AllTrim(E4_FORMA) $ "BOL" 		Alert("Opção indisponível para este valor, Corrija o Pedido") 		lRet := .F.		EndIfEndIf	RestArea(aArea)Return lRet

Exemplo:

Bloco de código
languagec#
linenumberstrue
#Include 'Protheus.ch'

User Function PMA220BSA()

Local aButtons := {}

aAdd(aButtons,{"Teste","MsgSolAlm",0,2,,.T.})

Return aButtons


Function MsgSolAlm()

Alert("PE: PMA220BSA")

Return


Variáveis



Nome

Tipo

Escopo

Pode Alterar

descrição




Array of Record

Global

Não