Descrição: | Este ponto de entrada tem como finalidade permitir que o cliente customize o cálculo de imposto na rotina Orçamento por Fases (OFIXA011). |
Localização: | Mov. Oficina / Orc. por Fases |
Eventos: | OX001PecFis() MaFisRef("IT_CLASFIS","VS300",M->VS3_SITTRI) MaFisRef("IT_TES","VS300",M->VS3_CODTES)
OX001PecFis() MaFisRef("IT_CLASFIS","VS300",M->VS3_SITTRI) MaFisRef("IT_TES","VS300",M->VS3_CODTES)
If ExistBlock("OX001FIS") // Ponto de entrada para calculo da exceção fiscal ExecBlock("OX001FIS",.f.,.f.) EndIf
if M->VS3_QTDITE > 0
|
Programa Fonte: | OFIXX001 |
Função: | OX001PREPEC() |
Retorno: | N/A |
Exemplo:
User Function OX001FIS()
If Left(MaFisRet(n,"IT_CLASFIS"),1) $ "1.2.3.8" .and. !MaFisRet(n,"IT_CF") $ cExceRes13
MaFisRef("IT_ALIQICM","VS300",0)
Endif
Return
