Exibir origem

01. DADOS GERAIS

Produto:
Linha de Produto:
Segmento:
Módulo:
Função:	MatxFuna - Genérico ( Contabilizações )
País:	Brasil
Ticket:	Interno
Requisito/Story/Issue:	DSERCTR1-35327

02. SITUAÇÃO/REQUISITO

O ponto de entrada CT5CPOS permite a execução de alguma regra específica do usuário, conforme informações recebidas pelo array, baseado no Lançamento Padronizado ( CTBA080 ) posicionado.

03. SOLUÇÃO

#INCLUDE "PROTHEUS.ch"
#INCLUDE "rwmake.ch"


User Function CT5CPOS( aCT5 )     

	Local aLP :=  PARAMIXB[1]
    
    If aLP[1] == "801"
        FuncaoDesejada() //Regra desejada realizando algum funcionamento com base no critérios estabelecidos com base no retorno do lançamento padrão
    Endif  

Return

O array conta com 2 posições sendo:

Linha Microsiga Protheus > DT PE CT5CPOS Manipulação de dados da CT5 BRA > image2022-5-9_17-23-17.png

A posição aLP[1] é a posição que mostra o Código do lançamento padrão ( CT5_LANPAD ) posicionado( no exemplo 801 ).

Já na posição aLP[2] irá conter todos os dados do lançamento padrão de código 801, ou seja nesse exemplo foi retornado 4 sequências cadastradas com o mesmo código de lançamento padrão 801.

Observação: O array retorna apenas os lançamentos padrões que estão ativos ( CT5_STATUS igual à 1).

// Ponto de entrada para tratamento do conteudo do CT5
If Existblock("CT5CPOS") .And. !lSimula
	Execblock("CT5CPOS",.F.,.F.,{aCT5[nX]})
Endif

As alterações realizadas no PE são de responsabilidade de quem os utiliza, como também os impactos gerados por esse ponto de entrada.

04. DEMAIS INFORMAÇÕES

Parâmetros:

Parâmetro	Tipo	Descrição	Obrigatório
PARAMIXB[1] - aCT5	Array	Array com as informações do ponto de lançamento posicionado contendo seus campos e valores para manipulação desejada	Sim

,
Retorno:

Retorno	Tipo	Descrição	Obrigatório
Não se aplica	Não se aplica	Não se aplica, manipulação é realizada conforme retorno do parâmetro PARAMIXB[1]	Não

05. ASSUNTOS RELACIONADOS

Não se aplica.