Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
M110STTS - Inclusão de interface após gravar a solicitação
M110STTS - Inclusão de interface após gravar a solicitação

Ponto-de-Entrada: M110STTS - Inclusão de interface após gravar a solicitação


 

Versões:
Advanced Protheus 7.10 ,
Microsiga Protheus
8.11 , Microsiga Protheus 10
12
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:
Espanhol , Inglês
Todos

 


Descrição:

LOCALIZAÇÃO : Function A110Inclui, A110Altera, e A110Deleta responsaveis pela inclusão, alteração, exclusão e cópia das Solicitações de Compras.
EM QUE PONTO : Após a gravação da Solicitação pela função A110Grava em inclusão, alteração e exclusão , localizado fora da transação possibilitando assim a inclusao de interface após a gravação de todas as solicitações.

Programa Fonte
MATA110.PRX
Sintaxe

M110STTS - Inclusão de interface após gravar a solicitação ( < PARAMIXB> , < PARAMIXB>, <PARAMIXB>, <PARAMIXB>  ) --> NIL

Parâmetros:

 

 
Nome
  
Tipo
  
Descrição
 
 
Default
  
Obrigatório
 
 
Referência
  
PARAMIXB
  Array of Record  Paramixb
[1]
=
CaractereNumero da Solicitação
 
    

X
     PARAMIXB

Paramixb[2] = Nr. da opção (1=inclusão / 2=alteração / 3=exclusão)

Paramixb[3] =

PARAMIXB

PARAMIXB

  

array_of_record

array_of_record

array_of_record

  

[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



PARAMIXB[4]
= Elemento
LógicoElemento não usado
.
     X    

 

Retorno
NIL
    (nulo)
  • Nenhum retorno requerido



Retorno

NIL (nulo) Nenhum retorno requerido
Exemplos
Exemplos
Bloco de código
languagecpp
firstline1
titleExemplo
linenumberstrue
User Function M110STTS()


Local cNumSol	:= Paramixb[1]
Local nOpt		:= Paramixb[2]
do

Local lCopia	:= Paramixb[3]

Do case	
	case nOpt == 
3
1		
		msgalert("Solicitação "+alltrim(cNumSol)+" incluída com sucesso!")	
	case nOpt == 
4
2		
		msgalert("Solicitação "+alltrim(cNumSol)+" alterada com sucesso!")   	
	case nOpt == 
5
3		
		msgalert("Solicitação "+alltrim(cNumSol)+" excluída com sucesso!")
endcaseReturn

Endcase
	
Return Nil