Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Usuário desconhecido (fernando.gabriel)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user William Pianheri Batista Silva

Gravado em

Chave

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

...

04. PARÂMETROS

Nome

Tipo

Descrição

aParamIXBParamIXBVetor

Vetor com os dados do Atendimento, sendo:
[ 1 ]  - cAtend - Código do Atendimento - Tipo: Caracter

[ 2 ]  - cCliente - Código do Cliente - Tipo: Caracter

[ 3 ]  - cLoja - Loja do Cliente - Tipo: Caracter

...

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("Pedido Atendimento" + cAtend  + "do Cliente " + cCliente + "Loja " + cLoja)
	EndIf


Return

...