Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | PCOA180 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46829 |
O ponto de entrada PCOA1805 é responsável por preencher o array documentado no retorno para popular a tabela TMPAK2, que contém os itens orçamentários da visão gerencial.
O array de retorno deve ser estruturado conforme segue:
tamanho - variável (conforme filtros definidos na montagem da visão, sendo que para cada item da planilha deve constar um item no array).
aDadosAK2 := { {Item 1 }, ;
{Item 2 }, ;
.........
{Item n } }
onde cada sub-array Item n deve possuir a estrutura abaixo:
tamanho - Numero de campos da tabela AK2 + 4
onde os primeiros elementos contem um sub-array - { NOME DO CAMPO, CONTEUDO}
e os 4 ultimos elementos sao:
1-Operador (Somar/Subtrair definidos na montagem da visao)
2-Funcao Usuario definido na montagem da visao
3-Item da Conta Orcamentaria Gerencial
4-Ultimo elemento contem Recno() da tabela AK2
If ExistBlock("PCOA1805") If ValType( aDadosAK2 := ExecBlock( "PCOA1805", .F., .F. ) ) != "A" Conout(STR0021) //"Erro ao executar o ponto de entrada PCOA1806" lGrava := .F. EndIf EndIf |
USER FUNCTION PCOA1805 Local aArray := {} aAdd(aArray,"EXEMPLO DADOS") MsgAlert("CHAMADA DO PONTO DE ENTRADA: PCOA1805") Return aArray |
|