Histórico da Página
...
Nome | Tipo | Descrição | Default | Obrigatório | Referência |
---|---|---|---|---|---|
PARAMIXB | Numérico | Parâmetro com a numeração para cancelamento |
05. RETORNO
Retorno | Tipo | Descrição | Obrigatório |
---|---|---|---|
nOpcao | Numérico | Variável numérica usada para validar o cancelamento de orçamentos: 1 - Realiza o cancelamento. Qualquer outro valor, não cancela. | Sim |
...
06. EXEMPLO
Neste exemplo validamos o cancelamento retornando mensagem de confirmação em tela, caso seja negado, o conteúdo enviado será zero, fazendo com que o cancelamento não ocorra.
Bloco de código | ||||
---|---|---|---|---|
| ||||
#INCLUDE 'PROTHEUS.CH' User Function M415CANC() //Armazena o ambiente ativo para restaurar ao fim do processo Local aArea := GetArea() as array Local nOpcao := PARAMIXB as numeric Local cOrcamento := SCJ->CJ_NUM as character Local lRet := .F. as logical //ArmazenaValida oopção ambiente ativo para restaurar ao fim do processo RestArea(aArea) de cancelamento If !IsBlind() lRet := MsgYesNo("Confirme o cancelamento do orçamento: "+cOrcamento+"","Sim","Não") Else lRet := .F. EndIf if !lRet nOpcao := 0 endif //Restaura o ambiente ativo no início da chamada RestArea(aArea) Return nOpcao |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas