Home

Linha Microsiga Protheus

Child pages
  • EECAF200-Manutenção de parcelas de câmbio
Skip to end of metadata
Go to start of metadata

Ponto-de-Entrada: EECAF200-Manutenção de parcelas de câmbio
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Brasil
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil)
Descrição:
Este ponto de entrada permite customizar qualquer informação referente aos dados do Câmbio de Exportação. 
Programa Fonte
EECAF200.PRW
Sintaxe

EECAF200-Manutenção de parcelas de câmbio ( [ DTNEGO_VALID ], [ AF200STATUS_ALTSTATUS ], [ ALTERA_PARCELA ], < AF200STATUS_ALTSTATUS> , [ ACERTA_TMP ], [ DESVIA_AJUSTE ], < AF200VALID_VALCAMPO> , < ALTERA_CSEEK_1> , < ALTERA_CSEEK_2> , [ AF200GPARC_ALTDTEMBA ] ) --> lRet

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
DTNEGO_VALIDCaracterPermite a substituição dos tratamentos padrões de validação do campo data de negociação, EEQ_DTNEGO.
AF200STATUS_ALTSTATUSArray of RecordPermite a alteração do status do PO, mesmo quando o mesmo possuir algum câmbio gerado.
ALTERA_PARCELAArray of RecordPermite customizar a informação do campo Parcela, utilizado na chave para baixa dos títulos no módulo Financeiro.
AF200STATUS_ALTSTATUSArray of RecordParâmetro que irá identificar o ponto de chamada do ponto de entrada EECAF200.X
ACERTA_TMPArray of RecordParâmetro permitirá alteração dos valores do campos de parcela na rotina de Câmbio.
DESVIA_AJUSTEArray of RecordParâmetro que permitirá desviar o ajuste das parcelas de câmbio.
AF200VALID_VALCAMPOcaracterPonto de entrada para criação ou alteração de uma validaçãoX
ALTERA_CSEEK_1caracterParâmetro que possibilitará alterar a variável cSeekX
ALTERA_CSEEK_2caracterParâmetro que possibilitará alterar a variável cSeekX
AF200GPARC_ALTDTEMBAcaracterPonto de entrada para alteração da variável dDtEmba que guarda a data do campo EEC_DTEMBA, este campo será usado em diversas validações
Retorno
    lRet()
  • Deve retornar .T. quando for realizada uma customização que substitua os tratamentos padrões do sistema.
Exemplos
User Function EECAF200()Local cParamIf ValType(ParamIXB) == "C"      cParam:= ParamIXBEndIfIf cParam == "ALTERA_CSEEK_1"   cSeek:= “Instruções” ElseIf cParam == "ALTERA_CSEEK_2"    cSeek:= “Instruções”ElseIf cParam == "AF200VALID_VALCAMPO"   MsgInfo("AF200VALID_VALCAMPO")ElseIf cParam == "AF200STATUS_ALTSTATUS"   MsgInfo("AF200STATUS_ALTSTATUS")ElseIf cParam == "AF200GPARC_ALTDTEMBA"   MsgInfo("AF200GPARC_ALTDTEMBA")EndIf                     ReturnUser Function EECAF200()Local lRet := .F.Local cParamIf ValType(ParamIXB) == "C"    cParam:= ParamIXBEndIfIf cParam == "AF200VALID_VALCAMPO"       [Instruções]   ElseIf cParam == "AF200STATUS_ALTSTATUS"   [Instruções]ElseIf cParam == "AF200GPARC_ALTDTEMBA"   [Instruções]Elseif cParam == "ACERTA_TMP"   [Instruções]Elseif cParam == "DESVIA_AJUSTE"EndIf                      Return lRet  User Function EECAF200()Local cParam,;      lRet      If ValType(ParamIXB) == "A"      cParam:= ParamIXB[1]   Else      cParam:= ParamIXB   EndIf   Do Case      Case cParam == "DTNEGO_VALID"         /* tratamentos customizados */         lRet:= .T.      Case cParam == "ALTERA_PARCELA"         //Instruções   EndCaseReturn lRet
Variáveis
NomeTipoEscopoPode Alterardescrição
cSeekCaracterPrivadoSim
dDtEmbaDataPrivadoSim