Abrangências: | Protheus 10 |
Versões: | Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todas TotvsDbAccess |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Português (Brasil) , Espanhol , Inglês |
A função PcoRetSld tem como finalidade retornar o saldo do cubo para a chave informada, em uma determinada data.
PCOXSLD.PRW
PCORETSLD - Retornar o Saldo ( cConfigcChavedData ) --> aSaldo
-
aSaldo(array_of_record)
- Array com Saldos Débito/Crédito
A finalidade desta função é retornar o saldo do cubo da chave informada em uma determinada data.
Exemplificando:
Cubo "01" com as Dimensões : Conta Orçamentaria (12 Posições)+ Centro de Custo (9 Posições) + Tipo de Saldo (2 Posições) (Tamanhos retirados do X3_TAMANHO dos campos)
Conta Orcamentaria: '1000 ' - Recursos Extras
Centro de Custo: '345 ' - Produção de Engrenagens
Tipo de Saldo: 'OR' - Orçado
Por combinação temos a seguinte chave: '1000 345 PR'
Saldo Final em 31/01/2008 - 200,00 a crédito na moeda 1
31/03/2008 - 400,00 a crédito na moeda 1
O retorno da função deve ser atribuido a uma variável do tipo array. Este array de retorno terá as seguintes características:
Array multidimensional com 2 (dois) elementos
- 1o. Elemento conterá um sub-array com os valores a crédito nas 5 moedas disponíveis
Estrutura do sub-array
- Saldo a crédito na moeda 1
- Saldo a crédito na moeda 2
- Saldo a crédito na moeda 3
- Saldo a crédito na moeda 4
- Saldo a crédito na moeda 5
- 2o. Elemento conterá um sub-array com os valores a débito nas 5 moedas
Estrutura do sub-array
- Saldo a débito na moeda 1
- Saldo a débito na moeda 2
- Saldo a débito na moeda 3
- Saldo a débito na moeda 4
- Saldo a débito na moeda 5
//programa para retornar os saldos do exemplo descritoLocal aSaldoCuboLocal dDataLocal nXLocal cChave := "1000 345 PR"Local cCodCubo := "01"dData := CtoD("31/01/08")aSaldoCubo := PcoRetSld(cCodCubo, cChave, dData)Conout("Saldo Cubo em 31/01/08 - Crédito Moeda 1 ===> "+Transform(aSaldoCubo[1,1], "@E 999,999,999.99"))//Saldo Cubo em 31/01/08 - Crédito Moeda 1 ===> 200,00Conout("Saldo Cubo em 31/01/08 - Débito Moeda 1 ===> "+Transform(aSaldoCubo[2,1], "@E 999,999,999.99"))//Saldo Cubo em 31/01/08 - Débito Moeda 1 ===> 0,00
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cConfig | Caracter | Código do Cubo Gerencial | X | ||||||||||||||
cChave | Caracter | Chave a ser Consultada | X | ||||||||||||||
dData | Caracter | Data do Saldo | X |