Advertisement
geracino

view tesouraria

Nov 20th, 2023
1,949
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 2.20 KB | Source Code | 0 0
  1. SELECT A.NROPDV,
  2.        A.CODOPERADOR,
  3.        O.NOME DESCOPERADOR,
  4.        A.DTAMOVIMENTO,
  5.        A.NROTURNO,
  6.        A.NROEMPRESA,
  7.        A.NROEMPRESAMAE,
  8.        A.NROENVELOPE,
  9.        ABS(A.VLRLANCTO) VLRSANGRIA,
  10.        A.TIPO,
  11.        F.FORMAPAGTOREDUZ TIPO_DESCRICAO,
  12.        NVL(A.TIPOSANGRIA,'L') TIPOSANGRIA,
  13.        'LOJA' TIPOSANGRIA_DESC,
  14.        A.NROFORMAPAGTO,
  15.        A.DTAHORLANCTO,
  16.        A.TIPOEVENTO,
  17.        NVL(A.SANGRIACANCELADA,'N') SANGRIACANCELADA,
  18.        NULL GTV,
  19.        MFL_FINANCEIRO.SEQSUPERVISOR,
  20.        O.NOME AS SUPERVISOR
  21. FROM   FI_TSNMOVIMENTODETALHADOIMP A,
  22.        FIV_TSNOPERADORCAIXA O,
  23.        MRL_FORMAPAGTO F,
  24.        MFL_FINANCEIRO
  25. WHERE  A.TIPOEVENTO = 'G'
  26. AND    NVL(A.TIPOSANGRIA,'L') = 'L'
  27. AND    A.NROEMPRESA = O.NROEMPRESA
  28. AND    A.CODOPERADOR = O.CODOPERADOR
  29. AND    A.NROFORMAPAGTO = F.NROFORMAPAGTO
  30. AND    MFL_FINANCEIRO.SEQFINANCEIRO = A.SEQFINANCEIRO
  31. AND    MFL_FINANCEIRO.SEQSUPERVISOR = O.CODOPERADOR
  32. UNION ALL
  33. SELECT B.NROPDV,
  34.        B.CODOPERADOR,
  35.        O.NOME,
  36.        B.DTAMOVIMENTO,
  37.        B.NROTURNO,
  38.        B.NROEMPRESA,
  39.        B.NROEMPRESAMAE,
  40.        B.NROENVELOPE,
  41.        B.VLRSANGRIA,
  42.        B.TIPO,
  43.        CASE B.TIPO
  44.             WHEN 'CAN' THEN 'CANCELAMENTO'
  45.             WHEN 'CHP' THEN 'CHEQUE A PRAZO'
  46.             WHEN 'CHV' THEN 'CHEQUE À VISTA'
  47.             WHEN 'CON' THEN 'CONVÊNIO'
  48.             WHEN 'CRC' THEN 'CARTÃO DE CRÉDITO'
  49.             WHEN 'CRD' THEN 'CARTÃO DE DÉBITO'
  50.             WHEN 'TCK' THEN 'TICKET'
  51.             WHEN 'DIN' THEN 'DINHEIRO'
  52.             WHEN 'OUT' THEN 'OUTROS'
  53.             WHEN 'QUE' THEN 'QUEBRA DE CAIXA'
  54.             WHEN 'SOB' THEN 'SOBRA DE CAIXA'
  55.        END TIPO_DESCRICAO,
  56.        B.TIPOSANGRIA,
  57.        CASE B.TIPOSANGRIA
  58.             WHEN 'S' THEN 'SEGURADORA'
  59.        ELSE 'TIPO DE SANGRIA INVÁLIDO' END,
  60.        C.NROFORMAPAGTO,
  61.        B.DTAHORLANCAMENTO,
  62.        'G',
  63.        NULL,
  64.        B.GTV,
  65.        NULL,
  66.        NULL
  67. FROM   FI_TSMOVTOSANGRIA B,
  68.        FIV_TSNOPERADORCAIXA O,
  69.        FI_TSCODMOVIMENTO C
  70. WHERE  B.NROEMPRESA = O.NROEMPRESA
  71. AND    B.CODOPERADOR = O.CODOPERADOR
  72. AND    B.NROEMPRESAMAE = C.NROEMPRESAMAE
  73. AND    B.TIPO = C.TIPO
  74. AND    B.CODMOVIMENTO = C.CODMOVIMENTO;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement