LOP017 — Layout LOP017

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 ORDEMPRODUCAO, com junção em ITEM, PARMFATUR, filtrada por CD_EMPRESA, NR_ORDEMPRODUCAO, ITEMORDEMPROD, JO, CD_ITEM.

Chamada

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

SQL Base

OrdemProducao

SELECT OP.CD_EMPRESA, OP.NR_ORDEMPRODUCAO, OP.DT_INICIOPRODUCAO, OP.DT_FIMPRODUCAO, OP.DS_OBSERVACAO, PARM.DS_LOGOTIPO, I.DS_ITEM, OP.QT_PRODUZIDA, I.DS_ESPECIFICACAO
FROM ORDEMPRODUCAO OP
INNER JOIN ITEM I ON (I.CD_ITEM = OP.CD_ITEM)
LEFT JOIN PARMFATUR PARM ON (PARM.CD_EMPRESA = OP.CD_EMPRESA)
WHERE OP.CD_EMPRESA = :CD_EMPRESA
  AND OP.NR_ORDEMPRODUCAO = :NR_ORDEMPRODUCAO CD_EMPRESA 1 NR_ORDEMPRODUCAO
SELECT ITEMORDEMPROD.CD_EMPRESA, ITEMORDEMPROD.NR_ORDEMPRODUCAO, ITEMORDEMPROD.CD_MATERIAPRIMA, ITEMORDEMPROD.CD_MATERIAPRIMA||' '||ITEM.DS_ITEM DS_ITEM, ITEMORDEMPROD.QT_ITEMPRODUCAO
FROM ITEMORDEMPROD
INNER JOIN ITEM ON (ITEM.CD_ITEM = ITEMORDEMPROD.CD_MATERIAPRIMA)
WHERE ITEMORDEMPROD.CD_EMPRESA = :CD_EMPRESA
  AND ITEMORDEMPROD.NR_ORDEMPRODUCAO = :NR_ORDEMPRODUCAO
ORDER BY ITEMORDEMPROD.CD_MATERIAPRIMA CD_EMPRESA 1 NR_ORDEMPRODUCAO

Tabelas Utilizadas

Tabela	Uso
ITEM	referenciada nas queries do layout
ITEMORDEMPROD	referenciada nas queries do layout
ORDEMPRODUCAO	referenciada nas queries do layout
PARMFATUR	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LOP017/ULOP017.pas
• DFM: source/LOP017/ULOP017.dfm
• Package: source/LOP017/LOP017.dpk