PE M110STTS - Inclusão de interface após gravar a Solicitação de Compra

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	TOTVS Backoffice (Linha Protheus) - Compras (SIGACOM)
Função:	MATA110 - Solicitação de Compra
País:	Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :

02. DESCRIÇÃO

O ponto se encontra no final da inclusão, alteração, exclusão e cópia das Solicitações de Compras, possibilitando assim a inclusão de interface após a gravação de todas as solicitações.

03. LOCALIZAÇÃO

Após a gravação da Solicitação de Compra pela função A110Grava em inclusão, alteração e exclusão , localizado fora da transação.

04. PARAMETROS

Nome	Tipo	Descrição	Obrigatório
PARAMIXB[1]	Caractere	Numero da Solicitação	X
PARAMIXB[2]	Numérico	Operação: 1 = Inclusão 2 = Alteração 3 = Exclusão	X
PARAMIXB[3]	Lógico	Se a Solicitação de Compra é originada de uma cópia (tipo: LÓGICO)
PARAMIXB[4]	Lógico	Elemento não usado

05. RETORNO

Não há.

06. EXEMPLO DE UTILIZAÇÃO

ADVPL

#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} User Function M110STTS
   PE Inclusão de interface após gravar a solicitação
   @type Function
   @since 13/11/2024
   @author user
/*/


User Function M110STTS()
 
Local cNumSol   := Paramixb[1] //número da SC
Local nOpt      := Paramixb[2] //opção
Local lCopia    := Paramixb[3] //se a SC é cópia
 
Do Case
    Case nOpt == 1    
        msgalert("Solicitação "+alltrim(cNumSol)+" incluída com sucesso!")
    Case nOpt == 2    
        msgalert("Solicitação "+alltrim(cNumSol)+" alterada com sucesso!")    
    Case nOpt == 3    
        msgalert("Solicitação "+alltrim(cNumSol)+" excluída com sucesso!")
EndCase
     
Return Nil

Árvore de páginas