Gravar/Alterar campos da OS automática por contador.
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-22009 | ||||||||||||||||||||||||||||||||||
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: | NGGPREVAUT() |
Parâmetros: |
|
Exemplo:
#Include 'Totvs.ch' User Function MntAltOs() Local nOrdem Local nMeord := Val( Paramixb[1] ) Local nMaord := Val( Paramixb[2] ) For nOrdem := nMeord to nMaord DbSelectArea('STJ') DbSetOrder(1) If DbSeek( FwxFilial( 'STJ' ) + StrZero( nOrdem, 6 ) ) Reclock('STJ', .F.) STJ->TJ_SITUACA := 'P' STJ->(MsUnlock()) EndIf Next nOrdem Return
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas