Advertisement
filhotecmail

SqlPesqprod

Feb 15th, 2018
313
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SQL 4.64 KB | None | 0 0
  1. BEGIN
  2.   FOR
  3.     SELECT
  4.           P.ID ,
  5.            P.LANC_SITUACAO,
  6.             P.DATA,
  7.              P.HORA,
  8.               LEFT(P.USUARIO,15),
  9.                P.CLI_ID,
  10.                 P.SAT_SIT,
  11.                  P.NFE_ID,
  12.                   P.ENTREGA_SIT,
  13.                    P.NFE_SIT,
  14.                     P.SIT_PAGAMENTO,
  15.                      P.TIPO_LANC,
  16.                       P.CHNFE,
  17.                        P.VTOTALPROD,
  18.                         P.VDESC,
  19.                          P.VACRES,
  20.                           P.VTOTAL,
  21.                            P.QTDITENS,
  22.                             P.VTOTSDESC,
  23.                              P.OBSPED,
  24.                               P.OBSNFE,
  25.                                D.CLI_ID,
  26.                                D.CLI_NOME,
  27.                                  D.ID_PED,
  28.                                   D.ID,
  29.                                    D.CLI_CPFCNPJ
  30.                                    FROM NFEPED_DESTINATARIO D
  31.  
  32.                                     LEFT JOIN NFEPED P ON (D.ID = P.CLI_ID)
  33.  
  34.                                  WHERE
  35.                                  (
  36.                                    ( P.DATA BETWEEN :PDATEINI AND :PDATEFIM )
  37.                                   )
  38.                                   AND
  39.                                   (
  40.                                    ( D.CLI_NOME LIKE :PDEST )
  41.  
  42.                                     )
  43.                                   AND
  44.                                   (
  45.                                    (  P.ID LIKE :PIDLANC  )
  46.                                    )
  47.  
  48.                                   AND
  49.                                    (
  50.                                   ( D.CLI_CPFCNPJ LIKE :PCPFCNPJ )
  51.                                    )
  52.                                    AND
  53.                                    (
  54.                                     ( P.usuario LIKE :PUSER )
  55.                                    )
  56.  
  57.                                      AND
  58.                                    (
  59.  
  60.                                     ( P.SAT_SIT  LIKE :PSATSIT )
  61.                                      OR ( :PSATSIT IS NOT NULL )
  62.                                      OR ( :psatsit <> 'TODOS' )
  63.  
  64.                                    )
  65.  
  66.                                      AND
  67.                                    (
  68.  
  69.                                     ( P.lanc_situacao  LIKE :PSITLANCAMENTO )
  70.                                       OR ( :PSITLANCAMENTO IS NULL )
  71.  
  72.                                    )
  73.  
  74.                                      AND
  75.                                    (
  76.  
  77.                                     ( P.nfe_sit  LIKE :PSITNFE ) OR ( :PSITNFE IS NULL )
  78.  
  79.  
  80.                                    )
  81.  
  82.                                       AND
  83.                                    (
  84.  
  85.                                     ( P.entrega_sit  LIKE :PSITENTREGA ) OR ( :PSITENTREGA IS NOT NULL )
  86.                                     OR  ( :PSITENTREGA <> 'TODOS' )
  87.  
  88.                                    )
  89.  
  90.                                       AND
  91.                                    (
  92.  
  93.                                     ( P.chnfe  LIKE :PCHAVENFE ) OR ( :PCHAVENFE IS NOT NULL )
  94.  
  95.  
  96.                                    )
  97.  
  98.                                   AND
  99.  
  100.                                   (
  101.  
  102.                                    EXISTS( SELECT nfe_peditens.numped,
  103.                                           nfe_peditens.det_items_prod_xprod
  104.                                           FROM nfe_peditens
  105.                                            WHERE
  106.                                              (
  107.                                               ( nfe_peditens.numped = P.id )
  108.                                              ) AND
  109.                                              (
  110.                                               ( nfe_peditens.det_items_prod_xprod
  111.                                             CONTAINING :PDESCPROD )
  112.  
  113.  
  114.                                             ) )
  115.  
  116.                                    )
  117.  
  118.  
  119.                                  ORDER BY DATA ASC
  120.     INTO :ID,
  121.          :LANC_SITUACAO,
  122.          :DATA,
  123.          :HORA,
  124.          :USUARIO,
  125.          :CLI_ID,
  126.          :SAT_SIT,
  127.          :NFE_ID,
  128.          :ENTREGA_SIT,
  129.          :NFE_SIT,
  130.          :SIT_PAGAMENTO,
  131.          :TIPO_LANC,
  132.          :CHNFE,
  133.          :VTOTALPROD,
  134.          :VDESC,
  135.          :VACRES,
  136.          :VTOTAL,
  137.          :QTDITENS,
  138.          :VTOTSDESC,
  139.          :OBSPED,
  140.          :OBSNFE,
  141.          :CLI_ID1,
  142.          :CLI_NOME,
  143.          :ID_PED,
  144.          :ID1,
  145.          :CLI_CPFCNPJ
  146.   DO
  147.   BEGIN
  148.     SUSPEND;
  149.   END
  150. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement