Pagos con Tarjetas Online

WITH PagosTarjetaOnline AS (
    SELECT *
    FROM dbo.dE_DDMP
    WHERE iNroSuc = 55
      AND iNroPos = 1
      AND iNroZ = 20260785
      AND uId = 6
)
SELECT
    m.iNroSuc,
    m.iNroPos,
    m.iNroZ,
    m.lTicket,
    m.cComprobante,
    m.cDescripcion,
    m.dImporte,
    m.cCliente,
    m.cBarCode,
    m.cPlan,
    t.cDocumento,
    t.cTelefono,
    t.iNroCupon,
    t.lTrace,
    t.cAutorizacion,
    t.iNroX_Card,
    t.iOpCode,
    t.iLote,
    t.cTerminal,
    t.cComercio,
    t.iEsAnulacion,
    t.iSqlId
FROM PagosTarjetaOnline m
LEFT JOIN dbo.dE_Cards t
  ON  m.iNroSuc = t.iNroSuc
  AND m.iNroPos = t.iNroPos
  AND m.iNroZ = t.iNroZ
  AND m.lTicket = t.lTicket
  AND m.uId = t.uId
  AND m.uIdId = t.uIdId
  AND LTRIM(RTRIM(m.cComprobante))
      = CONVERT(varchar(30), t.iNroX_Card)
  AND ABS(CAST(m.dImporte AS decimal(18,4))
      - CAST(t.dImporte AS decimal(18,4))) < 0.01
  AND t.iOpCode = 1
ORDER BY m.lTicket, m.iId;

WITH CobrosTarjetaOnline AS (
    SELECT *
    FROM dbo.dE_CoPa
    WHERE iNroSuc = 55
      AND iNroPos = 1
      AND iNroZ = 20260785
      AND uId = 6
)
SELECT
    c.iNroSuc, c.iNroPos, c.iNroZ, c.lTicket,
    c.cComprobante, c.cDescripcion, c.dImporte, c.lStampTime,
    t.iNroX_Card, t.lTicket AS lTicketCards,
    t.cAutorizacion, t.iSqlId, t.cRespuesta
FROM CobrosTarjetaOnline c
LEFT JOIN dbo.dE_Cards t
  ON  c.iNroSuc = t.iNroSuc
  AND c.iNroPos = t.iNroPos
  AND c.iNroZ = t.iNroZ
  AND c.uId = t.uId
  AND c.uIdId = t.uIdId
  AND LTRIM(RTRIM(c.cComprobante))
      = CONVERT(varchar(30), t.iNroX_Card)
  AND ABS(CAST(c.dImporte AS decimal(18,4))
      - CAST(t.dImporte AS decimal(18,4))) < 0.01
  AND t.iOpCode = 1
ORDER BY c.lStampTime, c.iId;

SELECT
    a.iNroSuc, a.iNroPos, a.iNroZ,
    a.iNroX_Card AS RI_Anulacion,
    a.iNroX_CardOri AS RI_Original,
    a.dImporte, a.cAutorizacion, a.iSqlId,
    o.iNroZ AS Z_Original, o.lTicket AS Ticket_Original,
    CASE
      WHEN v.iId IS NOT NULL THEN 'VENTA'
      WHEN c.iId IS NOT NULL THEN 'CUENTA_CORRIENTE'
      ELSE 'ORIGEN_NO_ENCONTRADO'
    END AS OrigenOriginal
FROM dbo.dE_Cards a
LEFT JOIN dbo.dE_Cards o
  ON  o.iNroSuc = a.iNroSuc
  AND o.iNroPos = a.iNroPos
  AND o.iNroX_Card = a.iNroX_CardOri
  AND o.iOpCode = 1
LEFT JOIN dbo.dE_DDMP v
  ON  v.iNroSuc = o.iNroSuc AND v.iNroPos = o.iNroPos
  AND LTRIM(RTRIM(v.cComprobante)) = CONVERT(varchar(30), o.iNroX_Card)
  AND v.uId = o.uId AND v.uIdId = o.uIdId
  AND ABS(CAST(v.dImporte AS decimal(18,4)) - CAST(o.dImporte AS decimal(18,4))) < 0.01
LEFT JOIN dbo.dE_CoPa c
  ON  c.iNroSuc = o.iNroSuc AND c.iNroPos = o.iNroPos
  AND LTRIM(RTRIM(c.cComprobante)) = CONVERT(varchar(30), o.iNroX_Card)
  AND c.uId = o.uId AND c.uIdId = o.uIdId
  AND ABS(CAST(c.dImporte AS decimal(18,4)) - CAST(o.dImporte AS decimal(18,4))) < 0.01
WHERE a.iOpCode = 3
  AND a.iNroSuc = @Sucursal
  AND a.iNroPos = @POS
  AND a.iNroZ = @CierreZ
ORDER BY a.id;