Linha Microsiga Protheus

Árvore de páginas

TTLGMQ_AF251VLO_Manipulação_de_dados_da_Aquisição_pra_transferência

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços

Módulo:

Ativo Fixo.

Rotina:

Rotina

Nome Técnico

Aquisição por Transferência.

ATFA251.PRX

Ponto de Entrada:

AF251VLO.

Chamados Relacionados

TTLGMQ.

País(es):

Todos.

Banco(s) de Dados:

Todos Homologados.

Tabelas Utilizadas:

SN1, SN3.

Sistema(s) Operacional(is):

Todos Homologados.

Versões/Release:

11.80

Versão Corrigida:11.80
Versão Expedida:11.80

Descrição

Este ponto de entrada permite manipular os dados  das abas inferiores Totais do Rateio e Detalhes dos Impostos. São passados para o PE os objetos oGetDadTot e oGetDadImp que permitem a manipulação das abas inferiores respectivamente citadas acima. É executado por meio da função AF251VORIG chamada  tudoOk.

As variáveis da aba superior Dados do Bem e  Complementos são, respectivamente,  o array aCols e o objeto oGetDadosC que estão declaradas como private.

 

Ponto de Entrada

Descrição:

O ponto de entrada AF251VLO manipula os dados  das abas inferiores Totais do Rateio e Detalhes dos Impostos. São passados para o PE os objetos oGetDadTot e oGetDadImp que permitem a manipulação das abas inferiores respectivamente citadas acima. É executado por meio da função AF251VORIG chamada  tudoOk.

Localização:

Rotina customizada, não fica no menu padrão.

Eventos:

AF251VLO.

Programa Fonte:

ATFA251.PRX

Função:

AF251VORIG

Retorno:Vetor de 2 elementos como no exemplo. O primeiro elemento com oGetDadTot, o segundo com oGetDadImp manipulados ou não.

 

Exemplo:

#Include 'Protheus.ch'

User Function AF251VLO()
Local oGetDTot := paramixb[1]
Local oGetDadImp := paramixb[2]
/* -------------------------------------------------------------------------
chamada - ExecBlock( 'AF251VLO', .F., .F., {@oGetDadTot, @oGetDadImp})
Obs: oGetDadosC, objeto da aba superior "Complementos", é private
-------------------------------------------------------------------------- */
Alert("Ponto de Entrada Executado")
oGetDTot:aCols[1,4] := 20000
oGetDadImp:aCols[1][3]:= 10

oGetDTot:ForceRefresh()
oGetDadImp:ForceRefresh()

Return ({ oGetDTot, oGetDadImp })