ST_OBRIGAORCAMENTOOS — Obriga Orçamento para Abrir OS
Tela de configuração: OFI001 — Parâmetros de Oficina Localização na tela: Aba Ordem 3 — Checkbox "Obriga orçamento para abrir OS" Tabela / Campo:
PARMOFICINA.ST_OBRIGAORCAMENTOOSTipo:CHAR(1)—S/NValor padrão:N(Não obriga)
Comportamento Geral
Quando habilitado (S), o sistema bloqueia a abertura direta de uma Ordem de Serviço (OS) sem que exista um orçamento vinculado. Ao tentar salvar uma OS nova (número ainda vazio) sem informar o campo NR_ORCAMENTO, o sistema exibe o erro W-1800 e impede a gravação.
A validação ocorre no evento BeforePost da tabela tabORDEMSERVICO dentro de MOF001 (tela de manutenção de OS), lendo o parâmetro via ParmOficina.Values['ST_OBRIGAORCAMENTOOS'].
Telas impactadas
| Tela | Efeito |
|---|---|
| MOF001 — Manutenção de Ordem de Serviço | Impede salvar OS sem orçamento vinculado quando parâmetro = S |
Campos envolvidos
| Campo | Tabela | Papel |
|---|---|---|
ST_OBRIGAORCAMENTOOS | PARMOFICINA | Parâmetro (esta tela) |
NR_ORCAMENTO | ORDEMSERVICO | Campo validado — deve estar preenchido quando parâmetro = S |
Opções disponíveis
S — Obriga orçamento para abrir OS
| O que faz | Detalhe |
|---|---|
| Bloqueio | Impede salvar OS sem NR_ORCAMENTO preenchido |
| Exige | Orçamento vinculado à OS antes de salvar |
| Restrição | Só se aplica a OS novas (campo NR_ORDEMSERVICO vazio) |
Simulação passo a passo
- Acesse OFI001 (Parâmetros de Oficina), aba Ordem 3.
- Marque o checkbox "Obriga orçamento para abrir OS".
- Salve os parâmetros.
- Abra MOF001 e inicie uma nova OS.
- Preencha os dados obrigatórios, mas deixe o campo Orçamento vazio.
- Tente salvar a OS pressionando o botão de gravação.
Resultado esperado: O sistema exibe a mensagem de erro W-1800 e não permite salvar a OS. É necessário informar um número de orçamento válido no campo NR_ORCAMENTO antes de concluir a gravação.
N — Não obriga orçamento (padrão)
| O que faz | Detalhe |
|---|---|
| Permite | Salvar OS sem orçamento vinculado |
| Valor padrão | Atribuído automaticamente ao inserir novo registro em PARMOFICINA |
Simulação passo a passo
- Acesse OFI001 (Parâmetros de Oficina), aba Ordem 3.
- Certifique-se de que o checkbox "Obriga orçamento para abrir OS" esteja desmarcado.
- Salve os parâmetros.
- Abra MOF001 e inicie uma nova OS.
- Preencha os dados obrigatórios, mas deixe o campo Orçamento vazio.
- Tente salvar a OS.
Resultado esperado: A OS é salva normalmente sem exigir orçamento vinculado.
Procedures impactadas
Rotinas Delphi com referência direta ao campo
| Rotina | Arquivo | Linha | Evidência |
|---|---|---|---|
TdmMOF001.tabORDEMSERVICOBeforePost | source/MOF001/UdmMOF001.pas | 1976 | Valida ParmOficina.Values['ST_OBRIGAORCAMENTOOS'] = 'S' e lança W-1800 se NR_ORCAMENTO vazio |
TdmOFI001.tabPARMOFICINAAfterInsert | source/OFI001/UdmOFI001.pas | 391 | Define valor padrão 'N' ao inserir novo registro |
chkST_OBRIGAORCAMENTOOSMouseMove | source/OFI001/UOFI001.pas | 657 | Exibe dica (hint) ao posicionar mouse sobre o checkbox |
Referências SQL diretas ao campo em Scripts/
Não foi encontrada referência direta ao campo ST_OBRIGAORCAMENTOOS em procedures ou views SQL. As procedures listadas abaixo utilizam a tabela PARMOFICINA mas não citam este campo — não há impacto funcional direto identificado:
PARCELA_FINANC_MNF017PARCELA_FINANCIAMENTOREABRE_OSRETORNA_MOTIVOBLOQUEIORETORNA_PRECOITEMVERIFICA_BLOQUEIOVIEW_DOCUMENTOSBLOQUEADOSVIEW_ROF004/VIEW_ROF004B/VIEW_ROF004B_V2VIEW_ROF008