LOP019 — Layout LOP019

Visão Geral

Layout de impressão da família LOP (Ordem de Serviço). Acionado via ExecLayout a partir das telas que imprimem este tipo de documento.

Descrição

Consulta baseada em ORDEMSERVITEM, com junção em ORDEMSERVICO, ITEM, HABILITA_PESOQTDE, TIPOCALCULO, filtrada por CD_EMPRESA, NR_LOTEPRODUCAO, TP_UNIDADE, SERVICOITEM, JO, CD_ITEM (+2).

Chamada

ExecLayout(Connection, [
  // 0 - Nome do Layout
  // 1 - Cod Empresa
  // 2 - Nr Ordem Producao
  // 3 - Path Servidor
  // 4 - Visualiza -> V  ou  Imprime -> I
  // 5 - Cd Usuario
  // 6 - Nr Lote
]);

SQL Base

tabproduto

SELECT ORDEMSERVITEM.CD_SERVICO, ITEM.DS_ITEM, COALESCE(H.SG_QTDE, H.SG_PESO) QT_SERVICO, OS.NR_LOTEPRODUCAO, COALESCE(ITEM.SG_UNIDMED, ITEM.SG_UNIDALT) SG_MED, ORDEMSERVITEM.DT_ABERTURA, ORDEMSERVITEM.DT_REGISTRO
FROM ORDEMSERVITEM
LEFT JOIN ORDEMSERVICO OS ON (OS.CD_EMPRESA = ORDEMSERVITEM.CD_EMPRESA
  AND OS.NR_ORDEMSERVICO =ORDEMSERVITEM.NR_ORDEMSERVICO)
INNER JOIN ITEM ON (ITEM.CD_ITEM = ORDEMSERVITEM.CD_SERVICO)
LEFT JOIN HABILITA_PESOQTDE(ITEM.CD_ITEM) H ON (1=1)
WHERE ORDEMSERVITEM.CD_EMPRESA = :CD_EMPRESA
  AND OS.NR_LOTEPRODUCAO = :NR_LOTEPRODUCAO CD_EMPRESA NR_LOTEPRODUCAO
SELECT SERVICOITEM.CD_EMPRESA, SERVICOITEM.CD_ITEM, CASE WHEN TC.TP_UNIDADE = 'Q' THEN SERVICOITEM.QT_SERVICOITEM ELSE SERVICOITEM.PS_SERVICOITEM END PS_SERVICOITEM, COALESCE(ITEM.SG_UNIDMED, ITEM.SG_UNIDALT) SG_MED, ITEM.DS_ITEM
FROM SERVICOITEM
INNER JOIN ITEM ON (ITEM.CD_ITEM = SERVICOITEM.CD_ITEM)
INNER JOIN TIPOCALCULO TC ON (TC.CD_TIPOCALCULO = ITEM.CD_TIPOCALCULO)
LEFT JOIN ORDEMSERVICO OS ON (OS.CD_EMPRESA = SERVICOITEM.CD_EMPRESA
  AND OS.NR_ORDEMSERVICO = SERVICOITEM.NR_ORDEMSERVICO)
LEFT JOIN HABILITA_PESOQTDE(ITEM.CD_ITEM) H ON (1=1)
WHERE SERVICOITEM.CD_EMPRESA = :CD_EMPRESA
  AND OS.NR_LOTEPRODUCAO = :NR_LOTEPRODUCAO
ORDER BY SERVICOITEM.CD_ITEM CD_EMPRESA NR_LOTEPRODUCAO

Tabelas Utilizadas

Tabela	Uso
HABILITA_PESOQTDE	referenciada nas queries do layout
ITEM	referenciada nas queries do layout
ORDEMSERVICO	referenciada nas queries do layout
ORDEMSERVITEM	referenciada nas queries do layout
SERVICOITEM	referenciada nas queries do layout
TIPOCALCULO	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LOP019/ULOP019.pas
• DFM: source/LOP019/ULOP019.dfm
• Package: source/LOP019/LOP019.dpk