Muitas chamadas aos programas de conversão divisas todos os módulos.
Os sub-programas de conversão são : CONVERT(), CONVERT2(), CONVERT3(), CONVERT_TAB(), CONVERT2_TAB(), CONVERT3_TAB() e COURSITE
Parâmetros comuns a todos os sub-programas.
Variáveis | Definição |
Value Char DEVORG | Data de origem |
Value Char DEVDES | Divisa destino |
Value Char DEVSOC | Divisa de sociedade |
Value Integer TYPCOURS | Tipo de câmbio |
Value Date DATCOURS | Data do câmbio |
Value Decimal MTORG | Montante de origem |
Value Decimal MTDES | Montante destino |
Variável Integer STAT | Estatuto de devolução |
Parâmetro suplementar para os programas CONVERT3 e CONVERT3_TAB
Variável | Definição |
Valor Integer ARODEC | Arredondamento |
Parâmetros ao programa COURSITE.
Variáveis | Definição |
Value Char DEVORG | Data de origem |
Value Char SITE | Estabelecimento |
Value Inteiro : TYPCOURS | Tipo de câmbio |
Value Date DATCOURS | Data do câmbio |
Variável Inteiro : STAT | Estatuto de devolução |
Local Char DEVDES | Divisa destino que é a divisa de sociedade |
A leitura da tabela das divisas
Variáveis | Definições |
Local Char DEV1 (GLONCUR) | Divisa filtrando o campo CURDEN da tabela TABCHANGE |
Local Char DEV2 (GLONCUR) | Divisa filtrando o campo CUR da tabela TABCHANGE |
Local Decimal COURS | Modificação da divisa |