Linha Microsiga Protheus

Page tree

Ponto de Entrada - MA103REPRAT

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGACOM - Compras

Rotina:

Rotina

Nome Técnico

Documento de Entrada

MATA103

Issues / Ticket :MMAN-56 / Ticket: 98363

País(es):

Brasil

Banco(s) de Dados:

Todos

Sistemas Operacionais:

Todos

Versão:Todas

Ponto de Entrada

Descrição:

O ponto de entrada MA103REPRAT altera os registros do aColsSDE no momento da réplica do rateio ao clicar na opção Todos.

Eventos:

Este Ponto de Entrada somente será executado ao clicar na opção Todos na réplica do rateio. É executado no momento da criação do valor da última posição do array AColsSDE.

Programa Fonte:

MATA103X.PRX

Função:

A103RatCC - Rateio por centro de custo

Parâmetros:
ParâmetroTipoDescrição
PARAMIXB[1]ArrayCabeçalho da tabela SDE com para extrair a ordem dos campos.
PARAMIXB[2]ArrayVariável de retorno com os valores alterados.
Retorno:

PARAMIXB[2] : variável de retorno com os valores alterados

Exemplo:
USER FUNCTION MA103REPRAT
Local aHeadSDE := PARAMIXB[1]
Local aColsSDE := PARAMIXB[2]
Local nX
Local nZcusto1 := aScan(aHeadSDE,{|x| AllTrim(x[2]) == "DE_ZCUSTO1"} )

 For nX:=1 TO Len(aColsSDE[1][2]) //Len(aColsSDE[1][2]) para ver quantas linhas tem no Rateio
	aColsSDE[Len(aColsSDE)][2][nX][nZcusto1]:= 321 //Len(aColsSDE) para atualizar a última posição do array, como dito na observação é a ultima posição que está sendo alterada no momento da execução do PE
Next
Return aColsSDE