LOT001 — Layout LOT001

Visão Geral

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

Descrição

Consulta baseada em LOTEPRODUCAO, com junção em ITEM, LOTEPRODUCAOMP, USUARIO, PESSOA, PARMFATUR, filtrada por CD_EMPRESA, NR_LOTE, CD_ITEM.

Chamada

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

SQL Base

Pedido

SELECT L.CD_EMPRESA, L.NR_LOTE, L.CD_ITEM, I.DS_ITEM, L.QT_PRODUCAO, LM.CD_MATERIAPRIMA, IM.DS_ITEM DS_MATERIAPRIMA, LM.QT_MATERIAPRIMA, CASE WHEN (L.NR_LOTEORIGEM IS NULL
  OR L.NR_LOTEORIGEM = -1) THEN 'PA' ELSE 'SA' END DS_TPLOTE, I.SG_UNIDMED, IM.SG_UNIDMED SG_UNIDMEDMATPRIMA, L.DT_LOTE, UF.CD_USUARIO, COALESCE(PUF.NM_PESSOA, UF.NM_USUARIO) NM_USUARIOFECHAMENTO, L.DT_FECHAMENTO, L.CD_USUARIOLANCTO, COALESCE(PUA.NM_PESSOA, UA.NM_USUARIO) NM_USUARIOABERTURA, L.DS_OBSERVACAO, PF.DS_LOGOTIPO , LM.QT_ORIGEM
FROM LOTEPRODUCAO L
INNER JOIN ITEM I ON (I.CD_ITEM = L.CD_ITEM)
INNER JOIN LOTEPRODUCAOMP LM ON (LM.CD_EMPRESA = L.CD_EMPRESA
  AND LM.NR_LOTE = L.NR_LOTE
  AND LM.CD_ITEM = L.CD_ITEM)
INNER JOIN ITEM IM ON (IM.CD_ITEM = LM.CD_MATERIAPRIMA)
LEFT JOIN USUARIO UA ON (UA.CD_USUARIO = L.CD_USUARIOLANCTO)
LEFT JOIN PESSOA PUA ON (PUA.CD_PESSOA = UA.CD_PESSOA)
LEFT JOIN USUARIO UF ON (UF.CD_USUARIO = L.CD_USUARIOFECHAMENTO)
LEFT JOIN PESSOA PUF ON (PUF.CD_PESSOA = UF.CD_PESSOA)
INNER JOIN PARMFATUR PF ON (PF.CD_EMPRESA = L.CD_EMPRESA)
WHERE L.CD_EMPRESA = :CD_EMPRESA
  AND L.NR_LOTE = :NR_LOTE
  AND L.CD_ITEM = :CD_ITEM
ORDER BY LM.CD_MATERIAPRIMA CD_EMPRESA 1 NR_LOTE CD_ITEM
SELECT P.CD_ITEM, I.DS_ITEM, P.BI_IMGFICHA, P.DS_IMGFICHAEXTENCAO, P.DS_INSTRUCAO
FROM PRODUCAO P
INNER JOIN ITEM I ON (I.CD_ITEM = P.CD_ITEM)
WHERE P.CD_EMPRESA = :CD_EMPRESA
  AND P.CD_ITEM = :CD_ITEM CD_EMPRESA 1 CD_ITEM

Tabelas Utilizadas

Tabela	Uso
ITEM	referenciada nas queries do layout
LOTEPRODUCAO	referenciada nas queries do layout
LOTEPRODUCAOMP	referenciada nas queries do layout
PARMFATUR	referenciada nas queries do layout
PESSOA	referenciada nas queries do layout
PRODUCAO	referenciada nas queries do layout
USUARIO	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LOT001/ULOT001.pas
• DFM: source/LOT001/ULOT001.dfm
• Package: source/LOT001/LOT001.dpk