Optimización de dbo.oTrx

-- UltraHost health check. Read only: no permanent changes, shows no card data.
-- Run with the UltraHost database selected.
SET NOCOUNT ON;
SET LOCK_TIMEOUT 5000;  -- report a blocked search instead of waiting

DECLARE @dias int = 30;  -- use the MAXDIASDEVOLUCION value from UltraHost.ini
DECLARE @pv int, @ori varchar(21);
SELECT TOP 1 @pv = iNroPV, @ori = iTicketPOS FROM dbo.oTrx
WHERE iNroPV > 0 AND iTicketPOS > '' ORDER BY iSQLId DESC;
SELECT @pv = ISNULL(@pv, 1), @ori = ISNULL(@ori, '1');

DECLARE @casos TABLE (id int IDENTITY, caso varchar(20), consulta varchar(30), filtro nvarchar(400));
DECLARE @pvs nvarchar(12) = CAST(@pv AS nvarchar(12));
INSERT @casos (caso, consulta, filtro) VALUES
('Original existe',   'Ya tiene anulacion', N'iTicketPOSOri=''' + @ori + N''' and iNroPV=''' + @pvs + N''' order by iSQLId desc'),
('Original existe',   'Es devolucion',      N'iTicketPOS=''' + @ori + N''' and iNroPV=''' + @pvs + N''' and (NOT((iNroMensaje=1) or (iNroMensaje=101) or (iNroMensaje=123))) order by iSQLId desc'),
('Original existe',   'Limite de dias',     N'iTicketPOS=''' + @ori + N''' and iNroPV=''' + @pvs + N''' and (datediff(day,dinsertdate,getdate())<=' + CAST(@dias AS nvarchar(12)) + N') order by iSQLId desc'),
('Original existe',   'Busca original',     N'iTicketPOS=''' + @ori + N''' and iNroPV=''' + @pvs + N''' order by iSQLId desc'),
('Original no existe','Ya tiene anulacion', N'iTicketPOSOri=''999999999'' and iNroPV=''' + @pvs + N''' order by iSQLId desc'),
('Original no existe','Es devolucion',      N'iTicketPOS=''999999999'' and iNroPV=''' + @pvs + N''' and (NOT((iNroMensaje=1) or (iNroMensaje=101) or (iNroMensaje=123))) order by iSQLId desc'),
('Original no existe','Limite de dias',     N'iTicketPOS=''999999999'' and iNroPV=''' + @pvs + N''' and (datediff(day,dinsertdate,getdate())<=' + CAST(@dias AS nvarchar(12)) + N') order by iSQLId desc'),
('Original no existe','Busca original',     N'iTicketPOS=''999999999'' and iNroPV=''' + @pvs + N''' order by iSQLId desc'),
('PV desconocido',    'Existe el PV',       N'iNroPV=''-1''');

DECLARE @res TABLE (id int, ms int, resultado varchar(60));
DECLARE @i int = 1, @n int, @w nvarchar(400), @ini datetime2, @r varchar(60);
SELECT @n = COUNT(*) FROM @casos;
WHILE @i <= @n
BEGIN
	SELECT @w = filtro FROM @casos WHERE id = @i;
	SET @ini = SYSDATETIME();
	BEGIN TRY
		EXEC (N'SELECT TOP 1 * INTO #r FROM dbo.oTrx WHERE ' + @w);
		SET @r = 'OK';
	END TRY
	BEGIN CATCH
		SET @r = CASE WHEN ERROR_NUMBER() = 1222 THEN 'BLOQUEADA' ELSE 'ERROR ' + CAST(ERROR_NUMBER() AS varchar(10)) END;
	END CATCH
	INSERT @res VALUES (@i, DATEDIFF(ms, @ini, SYSDATETIME()), @r);
	SET @i += 1;
END

-- 1) BuscarOperacionOriginal searches: all should be well under 100 ms
SELECT c.caso, c.consulta, r.ms, r.resultado,
       CASE WHEN r.resultado <> 'OK' OR r.ms >= 1000 THEN 'REVISAR' WHEN r.ms >= 100 THEN 'MIRAR' ELSE 'BIEN' END AS estado
FROM @casos c JOIN @res r ON r.id = c.id ORDER BY c.id;

-- 2) Bloated tables: a high kb_por_fila points to empty pages. Heaps cannot release them.
SELECT TOP 10 OBJECT_NAME(ps.object_id) AS tabla,
       CASE WHEN MAX(CASE WHEN ps.index_id = 0 THEN 1 ELSE 0 END) = 1 THEN 'HEAP' ELSE 'CLUSTERED' END AS tipo,
       SUM(CASE WHEN ps.index_id IN (0,1) THEN ps.row_count ELSE 0 END) AS filas,
       SUM(CASE WHEN ps.index_id IN (0,1) THEN ps.reserved_page_count ELSE 0 END)/128 AS mb_datos,
       SUM(ps.reserved_page_count)/128 AS mb_con_indices,
       SUM(CASE WHEN ps.index_id IN (0,1) THEN ps.reserved_page_count ELSE 0 END)*8
         / NULLIF(SUM(CASE WHEN ps.index_id IN (0,1) THEN ps.row_count ELSE 0 END),0) AS kb_por_fila
FROM sys.dm_db_partition_stats ps
WHERE OBJECTPROPERTY(ps.object_id,'IsUserTable') = 1
GROUP BY ps.object_id
ORDER BY mb_datos DESC;

-- 3) Blocking right now: should return no rows
SELECT r.session_id, r.blocking_session_id, r.wait_type, r.wait_time/1000 AS espera_seg, r.command,
       DB_NAME(r.database_id) AS base, s.host_name, s.program_name
FROM sys.dm_exec_requests r
JOIN sys.dm_exec_sessions s ON s.session_id = r.session_id
WHERE r.blocking_session_id <> 0;

-- 4) Open transactions older than 60 s: should return no rows
SELECT st.session_id, s.host_name, s.program_name, at.transaction_begin_time,
       DATEDIFF(second, at.transaction_begin_time, GETDATE()) AS abierta_seg
FROM sys.dm_tran_session_transactions st
JOIN sys.dm_tran_active_transactions at ON at.transaction_id = st.transaction_id
JOIN sys.dm_exec_sessions s ON s.session_id = st.session_id
WHERE DATEDIFF(second, at.transaction_begin_time, GETDATE()) > 60;

-- 5) Slowest statements since the plan cache started. Review the text before sharing it.
SELECT TOP 10 qs.execution_count AS veces,
       qs.total_elapsed_time/qs.execution_count/1000 AS prom_ms,
       qs.max_elapsed_time/1000 AS max_ms,
       qs.total_logical_reads/qs.execution_count AS prom_lecturas,
       qs.last_execution_time AS ultima,
       SUBSTRING(t.text, qs.statement_start_offset/2 + 1, 120) AS sql_texto
FROM sys.dm_exec_query_stats qs
CROSS APPLY sys.dm_exec_sql_text(qs.sql_handle) t
WHERE (t.dbid = DB_ID() OR t.text LIKE '%oTrx%')
  AND t.text NOT LIKE '%UltraHost health check%'
ORDER BY qs.max_elapsed_time DESC;

-- 6) Indexes SQL Server thinks are missing: a hint to evaluate, not an order
SELECT TOP 10 OBJECT_NAME(d.object_id) AS tabla, s.user_seeks, CAST(s.avg_user_impact AS int) AS impacto_pct,
       d.equality_columns, d.inequality_columns, d.included_columns
FROM sys.dm_db_missing_index_details d
JOIN sys.dm_db_missing_index_groups g ON g.index_handle = d.index_handle
JOIN sys.dm_db_missing_index_group_stats s ON s.group_handle = g.index_group_handle
WHERE d.database_id = DB_ID()
ORDER BY s.user_seeks * s.avg_user_impact DESC;