Histórico da Página
Gravar/Alterar campos da OS automática.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||||||||||||||||||
Segmento: | Manufatura | ||||||||||||||||||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||||||||||||||||||
Rotinas que chamam: |
| ||||||||||||||||||||||||
Issues Relacionadas | DNG-21844 | ||||||||||||||||||||||||
País(es): | Todos | ||||||||||||||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||||||||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de entrada chamado após a gravação de uma Ordem de Serviço automática para inclusão/alteração de campos desejados. |
Programas Fonte: |
|
Função: | NGGERAOS1() |
Parâmetros: |
|
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#INCLUDE 'TOTVS.ch' User Function NGGEROS1() Local cOrdem := PARAMIXB[1] Local cPlano := PARAMIXB[2] Local cBem := PARAMIXB[3] DBSelectArea( 'STJ' ) DbSetOrder(1) If DbSeek( FwxFilial('STJ') + cOrdem + cPlano ) STJ->( RECLOCK( 'STJ', .F. ) ) STJ->TJ_SITUACA := 'P' MsUnlock('STJ') EndIf Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas