PE calculo impostos
Função preencher o campo C5_TPPVIBQ
Revert "Função preencher o campo C5_TPPVIBQ"

This reverts commit f3f89aa454ff13fa02fa5d8d4f441a3c82ef4f7e.
Função para preenchimento dos campos no cabeçalho

M->C5_TPPVIBQ:= "V"
M->C5_CLICONS:= M->C5_CLIENTE
M->C5_LOJCONS:= M->C5_LOJACLI
M->C5_TRANSP := SCJ->CJ_TRANSP
M->C5_CODOBRA:= SA1->A1_CODOBRA
M->C5_TPFRETE:= iif(empty(SCJ->CJ_TPFRETE), "C", SCJ->CJ_TPFRETE)
M->C5_FRECOM := SCJ->CJ_FREEM