Descrição | Ponto de entrada para alterar a forma de rateio para um processo de Conta e Ordem. |
---|---|
Observações | |
Exemplos | User Function EICCO100() |
Local cExecute:= ""
If Type("ParamIXB") == "C"
cExecute := ParamIXB
EndIf
Do Case
Case cExecute == "RATEIO"
If GetMV("MV_CODTXSI",,"XXX") == Left(aWorkMarcaMPE1,3)
nRateio:= (WorkItens->WN_FOB_R+WorkItens->WN_FRETE+WorkItens->WN_SEGURO)/nCIFTotal
MsgInfo("Taxa Siscomex rateada por CIF!")
Endif
End Case
Return
Preview | |
---|---|
Veja também | |
Idioma | Português(Brasil) |
Versões | Microsiga_Protheus11 |
Sistemas Operacionais Suportados | Todos |
Compatível com as Bases de Dados | Todas |
Updates | |
Parâmetros | RATEIO |
Retorno | Nil |
Eventos de chamada do Ponto de Entrada | |
Variáveis | nRateio |
Programa Fonte | EICCO100.PRW |