Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • F085MDEM - Permite customizar a taxa da moeda na Orden de Pago -- 111006

Ponto-de-Entrada: F085MDEM - Permite customizar a taxa da moeda na Orden de Pago
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Argentina , Bolívia , Chile , Colômbia , Costa Rica , El Salvador , Equador , Estados Unidos , México , Panamá , Paraguai , Peru , Porto Rico , Portugal , Rep. Dominicana , Uruguai , Venezuela
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Portugal) , Espanhol , Inglês
Descrição: 
O ponto de entrada F085MDEM permite ao usuário customizar a taxa da moeda utilizada na orden de pago quando efetuado um pagamento automático.
Programa Fonte 
FINA085A.PRW
Sintaxe

F085MDEM - Permite customizar a taxa da moeda na Orden de Pago ( [ ParamIxb ] ) --> aTaxasMoedas

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ParamIxb Array of Record Estrutura do array ParamIxbParamIxb[1] - aTitulos: Contém todos os títulos selecionados para a orden de pago automáticoEstrutura de aTitulos:[01] - Fornecedor[02] - Loja[03] - Valor[04] - Moeda[05] - Saldo[06] - Saldo 1[07] - Emissão[08] - Vencimento[09] - Prefixo[10] - Número[11] - Parcela[12] - Tipo[13] - Recno[14] - Ret. IVA[15] - Ret. IB[16] - Nome[17] - Juros[18] - Desconto[19] - Natureza[20] - Abatimento[21] - Valor a Pagar[22] - Multa ParamIbx[2] - aTaxasMoedas: Contém as taxas das moedas do dia (dDataBase)Estrutura de aTaxasMoedas:[01] - Moeda 1 [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara[02] - Moeda 2 [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara[0N] - Moeda N [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara
Retorno
    aTaxasMoedas(array_of_record)
  • Array deve conter a mesma estrutura do array passado como parâmetro através do ParamIxb[2], ou seja:Estrutura de aTaxasMoedas:[01] - Moeda 1 [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara[02] - Moeda 2 [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara[0N] - Moeda N [01] - Desc. Moeda [02] - Taxa da Moeda [03] - Máscara
Observações

O ponto de entrada é executado numa sequência de execuções. E a cada uma, a chamada do ponto de entrada refere-se a um título daqueles selecionados para a Orden de Pago. A lógica do ponto de entrada deve considerar a data passado como parâmetro no array ParamIxb[1] (estrutura descrito logo abaixo).

A cada execução consecutiva é devolvida a taxa da moeda para um título por vez.

o exemplo do código abaixo, possui lógica pronta para o tratamento de todos os títulos, servindo como base para o desenvolvimento de tratamentos adicionais para contemplar a situação que o usuário desejar.

 

Exemplos 
#include "rwmake.ch"#include "protheus.ch"User Function F085MDEM()Local aTit := aClone(ParamIxb[1])Local aMds := aClone(ParamIxb[2])Local nX   := 0DbSelectArea("SM2")DbSetorder(1)If DbSeek(aTit[7])	For nX := 1 To Len(aMds)		If nX != 1 //Não altero a moeda 1			aMds[nX][2] := SM2->&("M2_MOEDA"+AllTrim(Str(nX)))		EndIf	Next nXEndIfAlert("Executado ponto de entrada F085MDEM")Return aMds
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não