Árvore de páginas

Versões comparadas

Chave

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

...

Nome

Tipo

Descrição

lRetLógico

Se bloqueia ou não o valor digitado do preço unitário será atualizado, sendo:
.T. - Não bloqueia
.F. - Bloqueia

06. EXEMPLO

Bloco de código
languagecpp
#Include 'Protheus.ch'
#Include 'Totvs.ch'

User Function TMK150DEL()

	Local aParam   := PARAMIXB
	Local cAtend   := ""
	Local cCliente := ""
	Local cLoja    := ""

	If Len(aParam) > 0

		cAtend	 :=  aParam[1] //Código do Atendimento - Tipo: Caracter
		cCliente :=  aParam[2] //Código do Cliente - Tipo: Caracter
		cLoja    :=  aParam[3] //Loja do Cliente - Tipo: Caracter

	Endif

	If  cCliente == "FAT001"
		Alert("Atendimento" + cAtend  + "do Cliente " + cCliente + "Loja " + cLoja)
	EndIf


Return

...