Ponto de Entrada - Lj900DGP
Este Ponto de Entrada é executado na rotina LOJA900D , para indicar se a característica do produto deve ou não ir para a integração.
Descrição: | Atualizações\Cadastros | ||||||||
Localização: | E-commerce | ||||||||
Eventos: | Monitor Serv. CiaShop | ||||||||
Programa Fonte: | LOJA900D - Características | ||||||||
Função: | Protheus | ||||||||
Parâmetos: |
| ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch
User Function Lj900DGP()
Local cProduto := ""
local lGera := .t.
Local aArea := {}
//Tratamento dos parâmetros de entrada
If ValType(PARAMIXB) == "A" .AND. Len(PARAMIXB) >= 1 .AND. ;
ValType(PARAMIXB[1]) == "C"
cProduto := PARAMIXB[1]
//Os dados de descrição do e-commerce, ficam na tabela SB5
aArea := SB5->(GetArea())
SB5->( dbSetOrder(1) )
SB5->( dbSeek( xFilial("SB5") + cProduto ) )
lGera := SB5->(Found() .AND. Empty(B5_ECSEQ2))
RestArea(aArea)
EndIf
Return lGera