Fols Scripts

-- QC21196
-- Script de correction d'une erreur a la cloture sur les statistiques (split folio).
-- 2 variables a modifier : nom de la DB / code hotel

use Exxxx -- Nom de la database : E + code hotel
Set nocount on
Declare @Error int
Declare @NbRec int
DECLARE @HOTEID int

select @HOTEID = hote_id from hotel
where hote_code = 'xxxx'-- Code hotel a modifier sans le H
-- Query
-- Issue where services contain PRDH null [TABLE FOLIO_LINE]
CREATE TABLE #PrdhNull
(
LIGN_ID int,
LIGN_SPLIT_GROUP_ID int
)
INSERT INTO #PrdhNull
SELECT LIGN_ID, LIGN_SPLIT_GROUP_ID FROM FOLIO_LINE
WHERE PRDH_ID is NULL
AND HOTE_ID = @HOTEID
-- Variable declaration for cursor
DECLARE
@LIGN int,
@LSG int
DECLARE rate_cursor cursor for
SELECT LIGN_ID, LIGN_SPLIT_GROUP_ID FROM #PrdhNull
OPEN rate_cursor
FETCH NEXT FROM rate_cursor INTO @LIGN,@LSG
-- Start of the cursor
WHILE @@FETCH_STATUS = 0
BEGIN
-- Update of table hotel_price_periods_week
UPDATE FOLIO_LINE
SET PRDH_ID = (SELECT PRDH_ID FROM FOLIO_LINE WHERE LIGN_ID = @LSG)
WHERE LIGN_ID = @LIGN
AND HOTE_ID = @HOTEID
FETCH NEXT FROM rate_cursor INTO @LIGN,@LSG
END
CLOSE RATE_CURSOR
DEALLOCATE rate_cursor
-- END of cursor
-- Delete of temporary table #DOUBLON
DROP TABLE #PrdhNull
-------------------------------------------------
-- End query
set @NbRec = @@rowcount
Set @Error = @@error If @Error <> 0 Goto Err
Print 'Correction effectuée : ' + LTrim(Str(@NbRec)) + ' enregistrements affectés'
Err:
If @Error<> 0
Begin
Raiserror ('Error the treatment" - ERROR NUMBER : %d ', 16, -1,'', ' ', @Error)
End