Histórico da Página
GFEA0613 -
Retirar Controle de Aprovação Tabela de FretePermitir a alteração de uma negociação já liberada
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Supply Chain - Logística |
Módulo: | SIGAGFE |
Ponto de Entrada - GFEA0613
Descrição:Em construção | Permitir a alteração de uma negociação já liberada | ||||||||||||||||
Localização:Em construção | Na função que realiza a validação inicial do model | ||||||||||||||||
Programa Fonte: | GFEA061A - Negociação da Tabela de Frete | ||||||||||||||||
Parâmetros: |
PARAMIXB[1] | Array | Assunto produto padrão | Sim | PARAMIXB[2] | Array | Mensagem produto padrão | Sim |
| ||||||||
Retorno: |
| ||||||||||||||||
Observação: |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
User Function GFEA0613() Local nOpc cAssunto := PARAMIXB[1] Local lRet cMensagem := PARAMIXB[2] // Realiza a modificação nos arrays conforme a necessidade Return {cAssunto, cMensagem}.T. //chama somente se estiver com situação Liberada If (nOpc == 4 .and. (IsInCallStack("GFEA061A") .or. IsInCallStack("GFEA061"))) .and. GV9->GV9_SIT == "2" .AND. MsgYesNo("Confirma a alteração desta negociação? Ela já está liberada e esta ação fará com que a negociação retorne para a situação [Em Negociação]", "ATENÇÃO") DbSelectArea("GV9") If RecLock("GV9", .F.) GV9->GV9_SIT := "1" GV9->GV9_ENVAPR := "2" GV9->GV9_SITMLA := "1" GV9->(MsUnlock()) lRet := .F. EndIf EndIf Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas