Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • POS_ADIA – Manipular variáveis de Solicitação de Viagem.

Ponto-de-Entrada: POS_ADIA – Manipular variáveis de Solicitação de Viagem.
Abrangências: Microsiga Protheus 10
Versões: Todas
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição: 
O ponto de entrada POS_ADIA permite que sejam manipuladas as variáveis apresentadas na tela de solicitação de viagens. Será acionado após clicar no botão Calcular na tela de Solicitação de Viagens. Caso seja acionado o botão OK da mesma tela o ponto de entrada também será executado, devido o conceito da rotina realizar os cálculos após clicar OK.
Programa Fonte 
AE_SV001_AP6.PRW
Sintaxe

POS_ADIA – Manipular variáveis de Solicitação de Viagem. ( [ _cQuem ], [ _cAntec ], [ _dEmissao ], [ _cFunc ], [ _cSupImd ], [ _cDGRar ], [ _cEmpCli ], [ _cCodCidade ], [ _cCC ], [ _mMotivo ], [ _mObs ], [ _dSaida ], [ _dChegada ], [ _cHoraId ], [ _cHoraVt ], [ _nFatCli ], [ _nFatMic ], [ _lAdiant ], [ _lPassag ], [ _lHosped ], [ _nValorR ], [ _nValorU ], [ _cHosped ], [ _cSolPor ], [ _lAlocVeic ] ) --> aTeste

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
_cQuem Caracter Empresa/Filial
_cAntec Array of Record Antecedência
_dEmissao Array of Record Data da emissão da solicitação
_cFunc Array of Record Funcionário/Solicitante
_cSupImd Array of Record Aprovador 1
_cDGRar Array of Record Aprovador 2
_cEmpCli Array of Record Cliente
_cCodCidade Array of Record Código da cidade do cliente
_cCC Array of Record Centro de Custo
_mMotivo Array of Record Motivo da Solicitação
_mObs Array of Record Observações da Solicitação
_dSaida Array of Record Data da Saída do Solicitante
_dChegada Array of Record Data da Chegada do Solicitante
_cHoraId Array of Record Hora de Ida
_cHoraVt Array of Record Hora de Volta
_nFatCli Array of Record Percentual de faturamento do cliente nos valores da viagem
_nFatMic Array of Record Percentual de faturamento da empresa nos valores da viagem
_lAdiant Array of Record Se possui Adiantamento
_lPassag Array of Record Se possui Passagem
_lHosped Array of Record Se possui Hospedagem
_nValorR Array of Record Valor em Real
_nValorU Array of Record Valor em Dolar
_cHosped Array of Record Hotel
_cSolPor Array of Record Usuário responsável pela solicitação
_lAlocVeic Array of Record Alocação de Veículo
Retorno
    aTeste(array_of_record)
  • O Retorno deve ser de um array com 3 posiçõesPrimeira Posição = nValorR (Referente ao valor em Real)Segunda Posição = nValorU (Referente ao valor em Dolar)Terceira posição = lRet (Variável lógica informando se o conteúdo do Array é verdadeiro ou falso.)
Exemplos 
User Function POS_ADIA()Local _cQuem := paramixb[1]Local _cAntec := paramixb[2]Local _dEmissao := paramixb[3]Local _cFunc := paramixb[4]Local _cSupImd := paramixb[5]Local _cDGRar := paramixb[6] Local _cEmpCli := paramixb[7]Local _cCodCidade := paramixb[8]Local _cCC := paramixb[9] Local _mMotivo := paramixb[10]Local _mObs := paramixb[11]Local _dSaida := paramixb[12]Local _dChegada := paramixb[13]Local _cHoraId := paramixb[14]Local _cHoraVt := paramixb[15]Local _nFatCli := paramixb[16]Local _nFatMic := paramixb[17]Local _lAdiant := paramixb[18]Local _lPassag := paramixb[19]Local _lHosped := paramixb[20]Local _nValorR := paramixb[21]Local _nValorU := paramixb[22]Local _cHosped := paramixb[23]Local _cSolPor := paramixb[24]Local _lAlocVeic := paramixb[25]Local lRet := .T.Local aTeste := {}aadd(aTeste,_nValorR+100)aadd(aTeste,_nValorU+100)aadd(aTeste,lRet) Return aTeste