Versões: | Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Disponível no final da função PvTrocaTra, que efetua a chamada da Consulta Padrão de Transportadora a qual será escolhida pelo usuário. A mesma permitirá que sejam efetuadas modificações ou preenchimentos automáticos em GETs e outras validações que forem necessárias na tela de pedido de vendas, quando da alteração ou escolha de uma transportadora.
Exempo:
Function U_SFAPV009(PARAMIXB)
Local aCabPed := PARAMIXB[1]
Local aObj := PARAMIXB[2]
Local nPosTpEnt := ScanArray(aCabPed,HC5->(FieldPos('HC5_TIPENT')),,,2)
Local nPosTpTra := ScanArray(aCabPed,HC5->(FieldPos('HC5_TRANSP')),,,2)
If Alltrim((aCabPed[nPosTpTra,1])) = '99'
aCabPed[nPosTpEnt,1] := '1'
ElseIf Alltrim((aCabPed[nPosTpTra,1])) = '900000'
aCabPed[nPosTpEnt,1] := '2'
EndIf
Return Nil
.PRW
SFAPV009 - Chamada a Consulta Padrão de Transportadora ( < PARAMIXB> ) --> Nil
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
PARAMIXB | Array of Record | 1 - aCabPed, array com conteudo dos Gets 2 - aObj, array contendo cada um dos objetos da tela (Gets, Buttons, etc.) | X |
-
Nil(nulo)
- Nil