Descrição

Permite acrescentar outras validações nas colunas da grid de produtos e/ou acessórios da proposta comercial

Exemplos

#include "protheus.ch"

User Function FT600COL1()
Local cVar := PARAMIXB[1]
Local nGet := PARAMIXB[2]
Local cMsg := ""
Local nOption := 0
Local lReturn := .T.

cMsg += "Coluna editada " + cVar + " da "

Do case
case nGet == 1
cMsg += " Grid de Produtos"
case nGet == 2
cMsg += " Grid de Acessórios"
Otherwise
cMsg += " nGet invalido"
EndCase

cMsg += ", Confirma?"

nOption := Aviso( "PE FT600COL1",cMsg, {"Sim","Não"})

lReturn := nOption == 1

Return lReturn

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

PARAMIXB[1], Caracter, contem o nome da coluna em edição
PARAMIXB[2], Numerico, 1 para a grid de produtos e 2 para a grid de acessórios

Retorno

Verdadeiro - validação aprovada

Programa Fonte

FATA600.PRW