PEV193 - Inclusão de apontamentos de visita

Abrangência

Sintaxe

PEV193 ( < Codigo da Enchoide > ) --> Nil

Parâmetros

Retorno

Descrição

Ponto de entrada do Portal do Vendedor -> Representante Comercial -> Apontamentos de Visita,  este ponto é usado na rotina  PWSV190.PRW , para alteração dos campos:

Na tela de inclusão de apontamentos de visita,

Exemplo de ponto de entrada:

User Function PEV193()

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

Do Case
 Case cParam == 1
  //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  //³ Campos a serem mostrados                      ³
  //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  aAdd( aReturn, { 'SELLERCODE', 'D' } )
  aAdd( aReturn, 'REGISTERDATE' )
  aAdd( aReturn, 'CONTACTSEQUENCE' )
  aAdd( aReturn, { 'CUSTOMERCODE', 'N', { 'BRWCUSTOMER', ;
              { 'CCUSTOMERCODE', 'CCODE' }, ;
              { 'CCUSTOMERUNIT', 'CUNIT' } ;
             }, ;
             { 'CCODE', 'CUNIT', 'CDESCRIPTION' } } )
  aAdd( aReturn, 'CUSTOMERUNIT' )
  aAdd( aReturn, 'EVENTCODE' )
  aAdd( aReturn, 'OPPORTUNITYID' )
 Case cParam == 2
  //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  //³ Campos a serem mostrados                      ³
  //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
   aAdd( aReturn, { 'PRODUCTCODE', 'N', { 'GETCATALOG', ;
              { 'CPRODUCTCODE', 'CPRODUCTCODE' } ;
             }, ;
             { 'CPRODUCTCODE', 'CDESCRIPTION' } } )
   aAdd( aReturn, 'QUANTITY' )
   aAdd( aReturn, 'UNITVALUE' )
   aAdd( aReturn, { 'TOTALVALUE', 'D' } )
   
 Case cParam == 3
  //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  //³ Campos a serem mostrados                      ³
  //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  
  aAdd( aReturn, 'SELLERCODE' )
  aAdd( aReturn, 'REGISTERDATE' )
  aAdd( aReturn, 'CONTACTSEQUENCE' )
  aAdd( aReturn, 'CUSTOMERCODE' )
  aAdd( aReturn, 'CUSTOMERUNIT' )
  aAdd( aReturn, 'EVENTCODE' )
  aAdd( aReturn, 'OPPORTUNITYID' )               
 
 
EndCase

Return aReturn

Grupos Relacionados
	DEM / Sistemas / Pontos de Entrada / Portal Protheus