PECOMSE3 - Customização da Comissão do Gestão de Concessionária

Este Ponto de Entrada tem a finalidade de customizar a comissão do gestão de concessionária, e
encontra-se no final da gravação da tabela de Comissão do DMS.

User Function PECOMSE3()

MsgInfo("Ponto de Entrada PECOMSE3 executado com sucesso!")

Return()

Português(Brasil)

Todas

Todos

Todas

N/A

N/A

&& Mostra Help Caso nao exista comissao cadastrada para vendedor

If lHelp .and. lMosHelp
Help(" ",1,"CNOCOMISS")
EndIf

&& Volta arquivos para suas respectivas condicoes
VEK->(DbSetOrder(nIndVEK))
VEK->(DbGoTo(nPosVEK))
SA3->(DbSetOrder(nIndSA3))
SA3->(DbGoTo(nPosSA3))

//Ponto de Entrada no final da função de gravação da tabela de Comissão do DMS
if ExistBlock("PECOMSE3")
ExecBlock("PECOMSE3",.f.,.f.)
Endif

If !Empty(cSele)
DbSelectArea(cSele)
EndIf

VEIFUNC.PRW