Home

Linha Microsiga Protheus

Páginas filhas
  • PEC031 - Visualização do detalhe do produto

PEC031 - Visualização do detalhe do produto

 

Revisão: 24/04/2006

Abrangência

Versão 8.11


 

Sintaxe

PEC031 ( ) --> Nil

Parâmetros

Argumento

Tipo

Descrição

Retorno

Tipo

Descrição

(NULO)

Nil

Descrição

 

Ponto de entrada do Portal do Cliente -> CRM -> Catálogo de produtos. Este ponto é usado na rotina PWSC030.PRW, na visualização do detalhe do produto.

 


Parâmetro

 

PARAMIXB[1]

  • 1 – Detalhes do produto
  • 2 – Tabelas de preço
  • 3 – Posição de estoque

Exemplo


User Function PEC031()

Local cParam  := PARAMIXB[1]
Local aReturn  := {}

Do Case
 Case cParam == 1
  aadd( aReturn, 'PRODUCTCODE' )
  aadd( aReturn, 'DESCRIPTION' )
  aadd( aReturn, 'SCIENCEDESCRIPTION' )
  aadd( aReturn, 'DESCRIPTIONMEASUREUNIT' )
  aadd( aReturn, 'DESCRIPTIONSECONDMEASUREUNIT' )
  aadd( aReturn, 'DESCRIPTIONTYPEOFPRODUCT' )
  aadd( aReturn, 'DESCRIPTIONGROUPOFPRODUCT' )
  aadd( aReturn, 'NCM' )
  aadd( aReturn, 'QUANTITYPERPACKAGE' )
  aadd( aReturn, 'ORDERPOINT' )
  aadd( aReturn, 'NETWEIGHT' )
  aadd( aReturn, 'GROSSWEIGHT' )
  aadd( aReturn, 'LEADTIME' )
  aadd( aReturn, 'TYPEOFLEADTIME' )
  aadd( aReturn, 'ECONOMICLOT' )
  aadd( aReturn, 'MINIMUMLOT' )
  aadd( aReturn, 'MINIMUMGRADE' )
  aadd( aReturn, 'TERMOFVALIDATY' )
  aadd( aReturn, 'BARCODE' )
  aadd( aReturn, 'STORAGELENGHT' )
  aadd( aReturn, 'STORAGEWIDTH' )
  aadd( aReturn, 'STORAGEHEIGHT' )
  aadd( aReturn, 'STORAGEMAXIMUMPILING' )
  aadd( aReturn, 'STANDARDWAREHOUSE' )
 Case cParam == 2
  aadd( aReturn, 'PRODUCTCODE' )
  aadd( aReturn, 'PAYMENTPLANCODE' )
  aadd( aReturn, 'PRICETABLECODE' )
  aadd( aReturn, 'PRICE' )
  aadd( aReturn, 'QUANTITYLIMIT' )
  aadd( aReturn, 'CURRENCY' )
  aadd( aReturn, 'CURRENCYSIMBOL' )
 Case cParam == 3
  aadd( aReturn, 'PRODUCTCODE' )
  aadd( aReturn, 'QUANTITY' )
  aadd( aReturn, 'CURRENCY' )
  aadd( aReturn, 'CURRENCYSIMBOL' )
  aadd( aReturn, 'TYPEOFBALANCE' )
  aadd( aReturn, 'DESCRIPTIONTYPEOFBALANCE' )
  aadd( aReturn, 'WAREHOUSE' )
EndCase

Return aReturn