Linha Microsiga Protheus

Árvore de páginas

LJ7108 - Permite a alteração do código da tabela de preço, independente do código informado no parâmetro (MV_TABPAD)

Descrição:

Disponibilizar P.E para atuar no momento da seleção do produto, podendo alterar o código da tabela de preço DA1.

Eventos:

O ponto de entrada é executado assim que acionada a seleção de produto na tela de venda assistida, dando opção para alteração de uso da tabela de preço - DA0 e DA1.

Programa Fonte:LOJXFUNE.PRW

Parâmetros:

NomeTipoDescrição
ParamIxb[1]Carácter
Dado do tipo carácter, contendo o código da tabela padrão DA1
ParamIxb[2]Array
Dado do tipo Array contendo todos as posições de campo da tela de venda assistida, auxiliando assim na posição e identificação do valor do campo no momento de inclusão do produto.
Retorno:
NomeTipoDescrição
cTabRetCarácter

Retorno do código da tabela padrão DA1 alterado, para consulta do valor e retorno a tela.

Exemplo:


#include 'Protheus.ch'

//--------------------------------------------------------------
/*/{Protheus.doc} LJ7108
Descrição: Ponto de Entrada LJ7108 ocorre na função LjXETabPre
(Retorna a tabela de precos utilizada para o cliente) e permite
o cliente personalizar a tabela padrão a partir do parameto
MV_TABPAD, alterando o conteúdo da variável cTabRet
@author - Danilo Santos
@since 08/2017
/*/
//--------------------------------------------------------------
User Function LJ7108()

Local cTabRet := ParamIxb[1] //recebe código da tabela de preço (MV_TABPAD)
Local aPosCpo := ParamIxb[2] //campos do registro do item caso seja necessario a validacao de algum campo customizado

cTabRet := "005"  //força retorno da tabela 005

Return cTabRet