Histórico da Página
...
Descrição | EECAF200 - Manutenção do Câmbio | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Observações | Utilizado para alteração do status no controle de câmbio e do embarque após a liquidação | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Exemplos | User Function EECAF200() Local cParam := If(Type("ParamIxb") = "A", ParamIxb[1], If(Type("ParamIxb") = "C", ParamIxb, "")) If cParam == "PE_STATUS" MsgInfo("Entrou no ponto de entrada 'PE_STATUS'.") If EEC->(RecLock("EEC",.f.)) M->EEC_STATUS := "A" EndIf EndIf IF cParam == "INICIALIZA_EVENTOS" msginfo("Entrou no ponto de entrada 'INICIALIZA_EVENTOS'") ENDIF IF cParam == PE_ALT_PARC msginfo("Entrou no ponto de entrada 'PE_ALT_PARC'") ENDIF If cParam == "EVENTOS_NAO_GERADOS" //disponível para alteração a variável cEventosNaoGerados EndIf Do Case Case cParam == "AF200DPARC_PARCELA_CAMBIO" /* Exemplo de uso do ponto de entrada no momento da exclusão da parcela de câmbio, quando retirada a data do embarque. lDLoopEEQ:= .T. EndIf Case cParam == "AF200VALID_VALCAMPO" If nTipoDet == 6 //exclusão //não permite excluir EndIf Case cParam == "PE_VALIDA" nTipo:= ParamIXB[2] //é o mesmo conteúdo da variável nTipoDet //não permite excluir EndIf
nTipo:= ParamIXB[2] MsgInfo("Alteração da parcela de câmbio", "Aviso") EndIf Case cParam == "GRV_ITEM_CAMBIO" /* //processamento customizado EndIf */ Case cParam == "INC_CAMBIO" MsgInfo("Ponto de Entrada EECAF200 INC_CAMBIO", "INC_CAMBIO") Case cParam == "PE_GERPARC" MsgInfo("Ponto de Entrada EECAF200 PE_GERPARC", "PE_GERPARC") //customização após a gravação das parcelas de câmbio (EEQ) //EEQ->(DBSeek(xFilial() + M->EEC_PREEMB)) //Looping na tabela EEQ para customização das parcelas de câmbio geradas para o processo de embarque EndCase Return Nil | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Preview | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Veja também | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Idioma | Português(Brasil) | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Versões | Microsiga_Protheus12 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sistemas Operacionais Suportados | Todos | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Compatível com as Bases de Dados | Todas | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Updates | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Parâmetros |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Retorno | Nil | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Variáveis |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Programa Fonte | EECAF200.PRW |