Reporte de asientos x tipo de documento

Cordial Saludo:

Comparto con ustedes este reporte de los asientos generados por tipo de documento.

SELECT T0.[TransId],T0.[TransType], Tipo= CASE T0.[TransType] WHEN ’18’ THEN ‘ENTRADA’ WHEN ’14’ THEN ‘NOTA CREDITO CLIENTE’ WHEN ’19’ THEN ‘NOTA CREDITO CLIENTE’ WHEN ’20’ THEN ‘NOTA CREDITO PROVEEDOR’ WHEN ’21’ THEN ‘DEVOLUCION ENTRADA’  WHEN ’30’ THEN ‘ASIENTO’  WHEN ’24’ THEN ‘PAGO RECIBIDO’  WHEN ’46’ THEN ‘PAGO EFECTUADO’  WHEN ’15’ THEN ‘DESPACHO’  WHEN ’13’ THEN ‘FACTURA’  WHEN ‘202’ THEN ‘ENSAMBLE FIGURACION’  WHEN ‘321’ THEN ‘RECONCILIACION’ WHEN ’21’ THEN ‘DEVOLUCION ENTRADA’  WHEN ’59’ THEN ‘RECIBO PRODUCCION’  WHEN ’60’ THEN ‘EMISION DE PRODUCCION’  WHEN ’67’ THEN ‘TRASLADO’  ELSE ‘N/A’ END, T0.[BaseRef],  T0.[RefDate], T0.[DueDate], T0.[TaxDate],  T0.[Memo], T1.[Line_ID], T1.[Account], T1.[Debit], T1.[Credit], T1.[OcrCode2], T1.[Project] FROM OJDT T0  INNER JOIN JDT1 T1 ON T0.TransId = T1.TransId WHERE T0.[RefDate] between [%0] and [%1]