01. DADOS GERAIS
Produto: | |
---|
Linha de Produto: | |
---|
Segmento: | |
---|
Módulo: |
TOTVS Backoffice (Linha Protheus) - Planejamento e Controle Orçamentário (SIGAPCO)
|
---|
Função: | PCOA050 |
---|
País: | Brasil |
---|
Ticket: | Interno |
---|
Requisito/Story/Issue | DSERCTR1-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.
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
04. ASSUNTOS RELACIONADOS