Histórico da Página

...

...

#Include "Protheus.ch"
User Function TMALTCLI()
    Local aRet      := {}
    Local cCliente  := AllTrim(PARAMIXB[1])
    Local cCliNovo  := ''
    Local cLoja     := AllTrim(PARAMIXB[2])
    Local cLojaNova := ''

    cCliNovo    := 'SP0001'
    cLojaNova   := '01'

    MsgInfo('Vou trocar o cliente: ' + cCliente + ' e loja:  ' + cLoja,  +' pelo cliente novo: '+ cCliNovo + ' e loja nova: ' + cLojaNova)

    AAdd(aRet, cCliNovo)
    AAdd(aRet, cLojaNova)

Return aRet

03. DEMAIS INFORMAÇÕES

• A execução do ponto de entrada TMALTCLI, é realizada somente em momento de processamento do calculo.

• O exemplo foi criado com base na rotina TMSA040 - Cotação de frete. Porém Entretanto, esse ponto de entrada também é chamado em outras rotinas também. 
  As rotinas são:
  TMSA011
  TMSA040
  TMSA050
  TMSA180
  TMSA200
  TMSA360
  TMSA460
  TMSA491
  TMSA500
  TMSA670
  TMSA853
  TMSA980
  TMSAE80
  TMSAF05
  TMSAI70
  A execução do ponto de entrada TMSA040, é realizada somente em momento de processamento do calculo.
  
  

04. ASSUNTOS RELACIONADOS

• Não há

...