PE PCOA1805

01. DADOS GERAIS

02. DESCRIÇÃO

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

03. DEMAIS INFORMAÇÕES

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

04. ASSUNTOS RELACIONADOS

• Não se aplica.