Versões: | Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Disponível no meio da função PvCond, que efetua a validação e troca de condição de pagamento escolhida pelo usuário. A mesma permitirá que seja passado um filtro para a consulta padrão que será aberta pela função acima, onde poderemos selecionar os registros a serem apresentados ao usuário.
Exemplo:
Function U_SFAPV014(PARAMIXB)
Local aCabPed := PARAMIXB[1]
Local aFilter := {}
Local cNivVen := HA3->HA3_NIVEL // Nivel do Vendedor
Local nTotVen := aCabPed[12,1] // Campo TOTAL DO PEDIDODbSelectArea('HE4')
DbSetOrder(1)
If DbSeek(RetFilial('HE4'))While !EOF()
If cNivVen >= HE4->HE4_NIVEL // Se o nivel do vendedor for igual ou maior que o da condicao ele podera ve-la
// Se o Valor do TOTAL DO PEDIDO estiver entre o Valor Inferior e o Valor Superior da Tabela ela sera mostrada tambem
If nTotVen >= HE4->HE4_INFER .and. nTotVen <= HE4->HE4_SUPERAADD(aFilter,{HE4->HE4_CODIGO})
EndIf
EndIf
DbSelectArea('HE4')
DbSkip()
EndDoEndIf
Return aFilter
.PRW
SFAPV014 - Validação da troca de condição de pagamento ( < PARAMIXB> ) --> aFilter
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
PARAMIXB | Array of Record | 1 - aCabPed, array com conteudo dos Gets | X |
-
aFilter(vetor)
- Array contendo os códigos das Condições de Pagamento que deverão ser filtrados pela consulta padrão ao ser acionado o botão da Condição de Pagamento na tela de Pedido de Vendas.