01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:PCOA050
País:Brasil
Ticket:Interno
Requisito/Story/IssueDSERCTR1-46748

02. DESCRIÇÃO

O ponto de entrada PCO50GRV permite gravar informações complementares relacionadas ao movimento orçamentário no módulo SIGAPCO. Ele permite a inclusão de dados adicionais que não estão contemplados no padrão do sistema, oferecendo flexibilidade para atender a requisitos específicos do cliente ou do processo orçamentário.

03. DEMAIS INFORMAÇÕES


ExecBlock("PCO50GRV",.f.,.f.,{nCallOpcx})
#Include 'Protheus.ch'

User Function PCO50GRV()

	Local nOpcAux := PARAMIXB[1]

	If nOpcAux == 3 .OR. nOpcAux == 4 //inclusao ou alteracao
		MsgAlert("Evidencia de Ponto de Entrada : PCO50GRV")
		RecLock("AKD", .F.) //.F. pq neste momento registro na AKD ja esta gravado
		//campo de usuario AKD_CPOUSU (C) 10 criado via configurador
		AKD->AKD_CPOUSU := If(nOpcAux==3,"MOV.INCL.", "MOV.ALTER.")
		MsUnlock()
	EndIf

Return
  • Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
  • Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.

04. ASSUNTOS RELACIONADOS