GFEA0613 - Permitir 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: | Permitir a alteração de uma negociação já liberada | ||||||||
Localização: | Na função que realiza a validação inicial do model | ||||||||
Programa Fonte: | GFEA061A - Negociação da Tabela de Frete | ||||||||
Parâmetros: |
| ||||||||
Retorno: |
| ||||||||
Observação: |
Exemplo: GFEA0613
User Function GFEA0613() Local nOpc := PARAMIXB[1] Local lRet := .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