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 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
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> ) --> NIL
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| PARAMIXB | Array of Record | Paramixb[1] = Numero da Solicitação | X | ||||||||||||||
| PARAMIXB | array_of_record | Paramixb[2] = Nr. da opção (3=inclusão / 4=alteração / 5=exclusão) | X |
Retorno
-
NIL(nulo)
- Nenhum retorno requerido
Exemplos
User Function M110STTS() Local cNumSol := Paramixb[1]Local nOpt := Paramixb[2]do case case nOpt == 3 msgalert("Solicitação "+alltrim(cNumSol)+" incluída com sucesso!") case nOpt == 4 msgalert("Solicitação "+alltrim(cNumSol)+" alterada com sucesso!") case nOpt == 5 msgalert("Solicitação "+alltrim(cNumSol)+" excluída com sucesso!") endcaseReturn Nil