thierry/sql-scripts
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

sync

Browse Source
This commit is contained in:
Thierry Schork
2023-04-26 16:04:26 +02:00
parent 7e98e5e95b
commit 55c5554fa3
14 changed files with 848 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
OCTPDBA-565 manage index 23.2/.vs/OCTPDBA-565 manage index 23.2/v15/.ssms_suo Normal file
View File

Binary file not shown.

22
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2.ssmssln Normal file
View File

@@ -0,0 +1,22 @@
Microsoft Visual Studio Solution File, Format Version 12.00
# SQL Server Management Studio Solution File, Format Version 18.00
VisualStudioVersion = 15.0.28307.421
MinimumVisualStudioVersion = 10.0.40219.1
Project("{4F2E2C19-372F-40D8-9FA7-9D2138C6997A}") = "OCTPDBA-565 manage index 23.2", "OCTPDBA-565 manage index 23.2\OCTPDBA-565 manage index 23.2.ssmssqlproj", "{C97024D6-51B8-45F5-AB85-2F078896231D}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Default|Default = Default|Default
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{C97024D6-51B8-45F5-AB85-2F078896231D}.Default|Default.ActiveCfg = Default
{4513A253-D07C-4788-BECD-EE9E137E12C6}.Default|Default.ActiveCfg = Default
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {E928451A-DEEA-4C89-9EBD-4E5A6C689ED5}
EndGlobalSection
EndGlobal

52
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2.ssmssqlproj Normal file
View File

@@ -0,0 +1,52 @@
<?xml version="1.0"?>
<SqlWorkbenchSqlProject xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Name="OCTPDBA-565 manage index 23.2">
<Items>
<LogicalFolder Name="Connections" Type="2" Sorted="true">
<Items>
<ConnectionNode Name="(local):CENTRALINFRA\ua208700">
<Created>2023-04-21T15:44:01.3213141+02:00</Created>
<Type>SQL</Type>
<Server>(local)</Server>
<UserName />
<Authentication>Windows Authentication</Authentication>
<InitialDB />
<LoginTimeout>30</LoginTimeout>
<ExecutionTimeout>0</ExecutionTimeout>
<ConnectionProtocol>NotSpecified</ConnectionProtocol>
<ApplicationName>Microsoft SQL Server Management Studio - Query</ApplicationName>
</ConnectionNode>
<ConnectionNode Name="suncent:CENTRALINFRA\ua208700">
<Created>2023-04-21T15:15:13.4922177+02:00</Created>
<Type>SQL</Type>
<Server>suncent</Server>
<UserName />
<Authentication>Windows Authentication</Authentication>
<InitialDB>master</InitialDB>
<LoginTimeout>30</LoginTimeout>
<ExecutionTimeout>0</ExecutionTimeout>
<ConnectionProtocol>NotSpecified</ConnectionProtocol>
<ApplicationName>Microsoft SQL Server Management Studio - Query</ApplicationName>
</ConnectionNode>
</Items>
</LogicalFolder>
<LogicalFolder Name="Queries" Type="0" Sorted="true">
<Items>
<FileNode Name="centrale.sql">
<AssociatedConnectionMoniker>8c91a03d-f9b4-46c0-a305-b5dcc79ff907:(local):True</AssociatedConnectionMoniker>
<AssociatedConnSrvName>(local)</AssociatedConnSrvName>
<AssociatedConnUserName />
<FullPath>centrale.sql</FullPath>
</FileNode>
<FileNode Name="pharmacies.sql">
<AssociatedConnectionMoniker>8c91a03d-f9b4-46c0-a305-b5dcc79ff907:(local):True</AssociatedConnectionMoniker>
<AssociatedConnSrvName>(local)</AssociatedConnSrvName>
<AssociatedConnUserName />
<FullPath>pharmacies.sql</FullPath>
</FileNode>
</Items>
</LogicalFolder>
<LogicalFolder Name="Miscellaneous" Type="3" Sorted="true">
<Items />
</LogicalFolder>
</Items>
</SqlWorkbenchSqlProject>

175
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2/centrale.sql Normal file
View File

@@ -0,0 +1,175 @@
/*=============================================================================
OCTPDBA-565
Manage indexes followig 23.2 release branch
Parameters
----------------------
Context
----------------------
suncent
Creation : 21.04.2023 / TSC
Modifications:
=============================================================================*/
USE arizona
DECLARE @business VARCHAR(20);
SELECT @business = [Business]
FROM [master].[cfg].[InstanceContext];
--BEGIN TRANSACTION
SET XACT_ABORT ON;
SET NOCOUNT ON;
IF @business= 'TPCENT'
BEGIN
/* Item_criteria. drop XIF1041Item_criteria (ITCR_criteria)*/
IF EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'XIF1041Item_criteria'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_criteria')
)BEGIN
EXEC('use arizona; DROP INDEX dbo.Item_criteria.XIF1041Item_criteria;')
PRINT 'drop XIF1041Item_criteria'
END
/* Item_criteria. replace XIF1039Item_criteria with NCIX_Item_criteria_COL_ITCR_item*/
IF EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'XIF1039Item_criteria'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_criteria')
)BEGIN
EXEC('use arizona; DROP INDEX dbo.Item_criteria.XIF1039Item_criteria;')
PRINT 'drop XIF1039Item_criteria'
END
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Item_criteria_COL_ITCR_item'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_criteria')
)BEGIN
CREATE NONCLUSTERED INDEX NCIX_Item_criteria_COL_ITCR_item ON [Arizona].[dbo].[Item_criteria]([ITCR_item])
INCLUDE([ITCR_criteria]);
PRINT 'create NCIX_Item_criteria_COL_ITCR_item'
END
/* Document_line */
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Document_line_COL_DL_to_be_invoiced'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Document_line')
)BEGIN
CREATE INDEX [NCIX_Document_line_COL_DL_to_be_invoiced] ON [Arizona].[dbo].[Document_line] ([DL_type], [DL_to_be_invoiced]) INCLUDE ([DL_document_header]);
PRINT 'create NCIX_Document_line_COL_DL_to_be_invoiced'
END
/* Fixed_price. */
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Fixed_price_COL_FP_tariff_type'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Fixed_price')
)BEGIN
CREATE INDEX [NCIX_Fixed_price_COL_FP_tariff_type] ON [Arizona].[dbo].[Fixed_price] ([FP_tariff_type], [FP_price_code],[FP_start_date]) INCLUDE ([Fixed_price_ID], [FP_item], [FP_end_date], [FP_tax_incl_price_per_unit], [FP_quantity]);
PRINT 'create NCIX_Fixed_price_COL_FP_tariff_type'
END
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Fixed_price_COL_FP_tariff_type_FP_start_date'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Fixed_price')
)BEGIN
CREATE INDEX [NCIX_Fixed_price_COL_FP_tariff_type_FP_start_date] ON [Arizona].[dbo].[Fixed_price] ([FP_tariff_type],[FP_start_date]) INCLUDE ([Fixed_price_ID], [FP_item], [FP_price_code], [FP_end_date], [FP_tax_incl_price_per_unit], [FP_quantity]);
PRINT 'create xxx'
END
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Fixed_price_COL_FP_price_code'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Fixed_price')
)BEGIN
CREATE INDEX [NCIX_Fixed_price_COL_FP_price_code] ON [Arizona].[dbo].[Fixed_price] ([FP_price_code],[FP_start_date]) INCLUDE ([Fixed_price_ID], [FP_item], [FP_end_date], [FP_tax_incl_price_per_unit]);
PRINT 'create NCIX_Fixed_price_COL_FP_price_code'
END
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Fixed_price_COL_FP_subsidiary'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Fixed_price')
)BEGIN
CREATE INDEX [NCIX_Fixed_price_COL_FP_subsidiary] ON [Arizona].[dbo].[Fixed_price] ([FP_subsidiary], [FP_end_date]) INCLUDE ([Fixed_price_ID], [FP_tariff_type], [FP_item], [FP_address], [FP_currency], [FP_price_code], [FP_start_date])
PRINT 'create xxx'
END
/* item_key */
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Item_key_COL_ITK_subsidiary'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_key')
)BEGIN
CREATE INDEX [NCIX_Item_key_COL_ITK_subsidiary] ON [Arizona].[dbo].[Item_key] ([ITK_subsidiary], [ITK_type]) INCLUDE ([ITK_item], [ITK_key]);
PRINT 'create NCIX_Item_key_COL_ITK_subsidiary'
END
/*Item_statistics_yearly. heap table with no indexes*/
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Item_statistics_yearly_COL_ITSTAY_item'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_statistics_yearly')
)BEGIN
CREATE INDEX [NCIX_Item_statistics_yearly_COL_ITSTAY_item] ON [Arizona].[dbo].[Item_statistics_yearly] ([ITSTAY_item], [ITSTAY_inventory_type], [ITSTAY_organizational_unit], [ITSTAY_year]) INCLUDE ([Item_statistics_yearly_id]);
PRINT 'create NCIX_Item_statistics_yearly_COL_ITSTAY_item'
END
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Item_statistics_yearly_COL_ITSTAY_year'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_statistics_yearly')
)BEGIN
CREATE INDEX [NCIX_Item_statistics_yearly_COL_ITSTAY_year] ON [Arizona].[dbo].[Item_statistics_yearly] ([ITSTAY_year]) INCLUDE ([ITSTAY_item], [ITSTAY_inventory_type], [ITSTAY_organizational_unit]);
PRINT 'create NCIX_Item_statistics_yearly_COL_ITSTAY_year'
END
/*Item_status_history.*/
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [Arizona].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_Item_status_history_COL_ITSH_value_date'
AND [x].[object_id] = OBJECT_ID('arizona.dbo.Item_status_history')
)BEGIN
CREATE INDEX [NCIX_Item_status_history_COL_ITSH_value_date] ON [Arizona].[dbo].[Item_status_history] ([ITSH_value_date]) INCLUDE ([ITSH_item], [ITSH_item_context_status]);
PRINT 'create NCIX_Item_status_history_COL_ITSH_value_date'
END
/* ------------------------------------------------------ */
IF NOT EXISTS(
SELECT [x].[index_id]
FROM [PharmIndexTP].[sys].[indexes] x
WHERE [x].[name] = 'NCIX_mapping_PHGD_CompendiumText_COL_PHGD_CPDTXT_GUID'
AND [x].[object_id] = OBJECT_ID('PharmIndexTP.dbo.mapping_PHGD_CompendiumText')
)BEGIN
CREATE INDEX [NCIX_mapping_PHGD_CompendiumText_COL_PHGD_CPDTXT_GUID] ON [PharmIndexTP].[dbo].[mapping_PHGD_CompendiumText] ([PHGD_CPDTXT_GUID])
INCLUDE ([PHGD_CPDTXT_key], [PHGD_CPDTXT_language], [PHGD_CPDTXT_sequence], [PHGD_CPDTXT_text], [PHGD_CPDTXT_status]);
PRINT 'create NCIX_mapping_PHGD_CompendiumText_COL_PHGD_CPDTXT_GUID'
END
END
--ROLLBACK TRANSACTION

232
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2/desc.txt Normal file
View File

@@ -0,0 +1,232 @@
/*
octpdba-497 () have removed openrowset to amavitaLiveAPS, everything is centralised now.
Each procs that have been altered exists with a copy with the suffix "octpdba-497" (typo in some, where the suffix is ctpdba-497).
The copy with the suffix holds the old code.
usage of openrowset on suncent
Object name Schema Database Type
ABD_Cent_Load dbo ArizonaCUST Procedures
ABD_Cent_Load_CTPDBA-497 dbo ArizonaCUST Procedures
ACC_Cent_Load dbo ArizonaCUST Procedures
ACC_Cent_Load_CTPDBA-497 dbo ArizonaCUST Procedures
AP_Cent_Load dbo ArizonaCUST Procedures
AP_Cent_Load_OCTPDBA-497 dbo ArizonaCUST Procedures
APR_Cent_Load dbo ArizonaCUST Procedures
aps_Central_Annual_Inventory_Load dbo ArizonaCUST Procedures
aps_GAL_olpFACT_controle_PHA dbo ArizonaCUST Procedures
aps_SUN_Cession_Creances dbo ArizonaCUST Procedures
aps_SUN_Get_Balanced_Scorecard_Data_From_Central dbo ArizonaCUST Procedures
AS_Cent_Load dbo ArizonaCUST Procedures
AS_Cent_Load__OCTPDBA-497 dbo ArizonaCUST Procedures
AT_Cent_Aggregated_Data_Load dbo ArizonaCUST Procedures
AT_Cent_Aggregated_Data_Load_OCTPDBA-497 dbo ArizonaCUST Procedures
AT_Cent_Extract_specific_pd_codes dbo ArizonaCUST Procedures
AT_Cent_Load dbo ArizonaCUST Procedures
CRMCRD_Cent_Load dbo ArizonaCUST Procedures
CRMCRD_Cent_Load_OCTPDBA-497 dbo ArizonaCUST Procedures
CRSH_Cent_Load dbo ArizonaCUST Procedures
CRSO_Cent_Load dbo ArizonaCUST Procedures
CRSO_Cent_Load_OCTPDBA-497 dbo ArizonaCUST Procedures
DHICI_Cent_Load dbo ArizonaCUST Procedures
DHICI_Cent_Load_OCTPDBA-497 dbo ArizonaCUST Procedures
FM_Cent_Load dbo ArizonaCUST Procedures
ITSC_Cent_Load dbo ArizonaCUST Procedures
SSRS_CR_Sales_Select_For_CR_Operation dbo ArizonaCUST Procedures
SSRS_Galenicare_Invoice_Payment_List dbo ArizonaCUST Procedures
stuff that stinks:
ABD_Cent_Load
user sqlSyncAccountingExtractionUsr with it's password in the proc
ACC_Cent_Load
seems that SA passwords are in there.
not the actual SA passwords, might be old code that was not adapted
AP_Cent_Load
user sqlSyncAccountingExtractionUsr with it's password in the proc
AT_Cent_Load
Still have a link to AMAVITALIVEAPS
reports:
FidelityCardSales
Rapport KO. Son lancement remonte le message suivant
An error has occurred during report processing. (rsProcessingAborted)
Query execution failed for dataset 'DSMain'. (rsErrorExecutingCommand)
Could not find stored procedure 'Extraction_Galenicare_Sales_Fidelity_Card'.
Lors de la sélection de la "company", lance une query sur Gaia qui retourne toutes les OU de tous les formats ainsi que les "cost centers"
---------------------------
with Pharmacy ([Company], [Code], [Code_name]) as
(
select coalesce(asub.Code, OU_subsidiary_prefix)
, OU_code
, OU_code + ' ' + OU_short_name
from [crs].[vwOrganizationalUnit] ou with (nolock)
inner join phar.address_criteria adcr with (nolock)
on ou.OU_pharmacy_code = adcr.ADCR_pharmacy_code
and ou.OU_address = adcr.ADCR_address
inner join phar.criteria cr with (nolock)
on adcr.ADCR_criteria = cr.Criteria_ID
and adcr.ADCR_pharmacy_code = cr.CR_pharmacy_code
inner join [phar].[Criteria_type] crt with (nolock)
on cr.CR_criteria_type = crt.Criteria_type_ID
and cr.CR_pharmacy_code = crt.CRT_pharmacy_code
left join crs.AdditionalSubsidiaryLink asl with (nolock)
on ou.Reference_Organizational_unit_ID = asl.OrganizationalUnitId
left join crs.AdditionalSubsidiary asub with (nolock)
on asl.AdditionalSubsidiaryId = asub.AdditionalSubsidiaryId
where crt.CRT_type = 1 and crt.crt_code = 'ENV'
and ou.OU_subsidiary_prefix is not null
)
select 1 as Position, [Company], null as [Code], '<All>' as [Code_name]
from [Pharmacy]
union
select 2 as Position, [Company], [Code], [Code_name]
from Pharmacy
order by Position, Company, Code
with CostCenter([Code], [Company])
as
(SELECT pcck.PCCK_key AS [Code],
coalesce(asub.Code, ou.OU_subsidiary_prefix) AS [Company]
from crs.vwOrganizationalUnit ou with (nolock)
left join crs.AdditionalSubsidiaryLink asl with (nolock)
on ou.Reference_Organizational_unit_ID = asl.OrganizationalUnitId
left join crs.AdditionalSubsidiary asub with (nolock)
on asl.AdditionalSubsidiaryId = asub.AdditionalSubsidiaryId
inner join phar.Profit_cost_center_key pcck with (nolock)
on pcck.PCCK_profit_cost_center = ou.OU_profit_cost_center
and pcck.PCCK_pharmacy_code = ou.OU_pharmacy_code
inner join phar.Fiscal_year fy with (nolock)
on fy.Fiscal_year_ID = pcck.PCCK_fiscal_year
and fy.FY_pharmacy_code = pcck.PCCK_pharmacy_code
and fy.FY_subsidiary = ou.OU_subsidiary
and fy.FY_number = 2022
and pcck.PCCK_type = Case When coalesce(asub.Code, ou.OU_subsidiary_prefix) in ('CVI', 'SUN') Then 3
Else 1 End
where ou.OU_centrale_code = 'G')
SELECT 1 as Position, null as [Code], '<All>' as [Code_name], null as [Company] from CostCenter
union
SELECT 2 as Position, null as [Code], '<All>' as [Code_name], [Company] from CostCenter
union
SELECT 3 as Position, [Code], [Code] as [Code_name], [Company] from CostCenter
order by Position, Company, Code
---------------------------
LifeStageInvoices
l'ouverture rdu rapport lance 2 query. la 1ere liste les "cost centeers" comme dans le rapport précédent
Démarre la query suivante en environ 38 secondes:
----------------
exec sp_executesql N'SELECT dh.DH_doc_number AS InvoiceNumber,
dh.DH_value_date AS InvoiceDate,
et.ET_debit_base_amount AS InvoiceAmount,
dh.DH_sold_to_text AS CustomerName,
coalesce(et.ET_debit_base_amount, 0) - coalesce(SUM(etr.ETR_base_amount), 0) AS DueAmount,
dh.DH_invoice_group AS LifeStageNumber,
ins.PHIN_name_german AS [Debtor]
FROM [Gaia].[phar].[Document_header] dh WITH (nolock)
INNER JOIN phar.Entry et WITH (nolock)
ON dh.document_header_id = et.ET_document_header
AND dh.dh_account = et.Et_account
AND dh.DH_pharmacy_code = et.ET_pharmacy_code
LEFT JOIN phar.Entry_reconciliation etr WITH (nolock)
ON et.Entry_ID = etr.ETR_entry
AND et.ET_pharmacy_code = etr.ETR_pharmacy_code
left join phar.PH_insurance as ins with (nolock)
on ins.PHIN_address = dh.DH_send_bill_to
and left(ins.PHIN_pharmacy_code, 1) = left(dh.DH_pharmacy_code, 1)
WHERE dh.DH_invoice_group IS NOT NULL
AND dh.DH_our_ref LIKE ''LifeStage%''
AND dh.DH_pharmacy_code = @PharmacyLifeStage
GROUP BY dh.DH_doc_number,
dh.Document_header_ID,
dh.DH_value_date,
et.ET_debit_base_amount,
dh.DH_sold_to_text,
dh.DH_BVR_reference,
dh.DH_account,
dh.DH_invoice_group,
dh.DH_our_ref,
et.ET_reconciliation_status,
ins.PHIN_name_german
HAVING ((@LifeStageInvoiceNumber is not null AND dh.DH_invoice_group like @LifeStageInvoiceNumber + ''%'')
OR (@TriaPharmInvoiceNumber is not null AND @LifeStageInvoiceNumber is null AND dh.DH_Doc_number like @TriaPharmInvoiceNumber + ''%'')
OR (@LifeStageInvoiceNumber is null AND @TriaPharmInvoiceNumber is null AND dh.DH_value_date between @InvoiceDateFrom AND isnull(@InvoiceDateTo, cast(getDate() as date))
AND (@OpenedInvoice = 0 OR isnull(et.ET_reconciliation_status, 1) = 1)));',N'@InvoiceDateFrom datetime,@InvoiceDateTo nvarchar(4000),@LifeStageInvoiceNumber nvarchar(4000),@OpenedInvoice bit,@TriaPharmInvoiceNumber nvarchar(4000),@PharmacyLifeStage nvarchar(6)',@InvoiceDateFrom='2022-01-01 00:00:00',@InvoiceDateTo=NULL,@LifeStageInvoiceNumber=NULL,@OpenedInvoice=1,@TriaPharmInvoiceNumber=NULL,@PharmacyLifeStage=N'GAM316'
----------------
OpenInvoiceDetails:
nécessite un "master id", l'entrée de data bidon remonte la query suivante lancée:
-------------------
(@InvoiceDateFrom datetime,@InvoiceDateTo nvarchar(4000),@LifeStageInvoiceNumber nvarchar(4000),@OpenedInvoice bit,@TriaPharmInvoiceNumber nvarchar(4000),@PharmacyLifeStage nvarchar(6))SELECT dh.DH_doc_number AS InvoiceNumber,
dh.DH_value_date AS InvoiceDate,
et.ET_debit_base_amount AS InvoiceAmount,
dh.DH_sold_to_text AS CustomerName,
coalesce(et.ET_debit_base_amount, 0) - coalesce(SUM(etr.ETR_base_amount), 0) AS DueAmount,
dh.DH_invoice_group AS LifeStageNumber,
ins.PHIN_name_german AS [Debtor]
FROM [Gaia].[phar].[Document_header] dh WITH (nolock)
INNER JOIN phar.Entry et WITH (nolock)
ON dh.document_header_id = et.ET_document_header
AND dh.dh_account = et.Et_account
AND dh.DH_pharmacy_code = et.ET_pharmacy_code
LEFT JOIN phar.Entry_reconciliation etr WITH (nolock)
ON et.Entry_ID = etr.ETR_entry
AND et.ET_pharmacy_code = etr.ETR_pharmacy_code
left join phar.PH_insurance as ins with (nolock)
on ins.PHIN_address = dh.DH_send_bill_to
and left(ins.PHIN_pharmacy_code, 1) = left(dh.DH_pharmacy_code, 1)
WHERE dh.DH_invoice_group IS NOT NULL
AND dh.DH_our_ref LIKE 'LifeStage%'
AND dh.DH_pharmacy_code = @PharmacyLifeStage
GROUP BY dh.DH_doc_number,
dh.Document_header_ID,
dh.DH_value_date,
et.ET_debit_base_amount,
dh.DH_sold_to_text,
dh.DH_BVR_reference,
dh.DH_account,
dh.DH_invoice_group,
dh.DH_our_ref,
et.ET_reconciliation_status,
ins.PHIN_name_german
HAVING ((@LifeStageInvoiceNumber is not null AND dh.DH_invoice_group like @LifeStageInvoiceNumber + '%')
OR (@TriaPharmInvoiceNumber is not null AND @LifeStageInvoiceNumber is null AND dh.DH_Doc_number like @TriaPharmInvoiceNumber + '%')
OR (@LifeStageInvoiceNumber is null AND @TriaPharmInvoiceNumber is null AND dh.DH_value_date between @InvoiceDateFrom AND isnull(@InvoiceDateTo, cast(getDate() as date))
AND (@OpenedInvoice = 0 OR isnull(et.ET_reconciliation_status, 1) = 1)));
-------------------
OpenInvoice:
lance une query en entrant sur le rapport pour lister les formats et les OU.
-----------------
select ou.Organizational_unit_ID [Reference_Organizational_unit_ID],
case when charindex(ou.OU_code,ou.OU_short_name) > 0 then ou.OU_short_name else ou.OU_short_name + ' ' + ou.OU_code end [Name]
from phar.Organizational_unit as ou
join [crs].[vwSubsidiary] as sub
on sub.Reference_Subsidiary_ID = ou.OU_subsidiary
join phar.PH_organizational_unit as phou
on phou.PHOU_organizational_unit = ou.Organizational_unit_ID
and phou.PHOU_pharmacy_code = ou.OU_pharmacy_code
left join phar.Organizational_unit ou2
on ou2.OU_master_ID = ou.Organizational_unit_ID and ou2.OU_pharmacy_code = 'A00000'
where ou.OU_pharmacy_code = 'G00000'
and ou.OU_subsidiary = 1
order by ou.OU_subsidiary, ou.OU_short_name
select sub.Reference_Subsidiary_ID,
sub.SUB_prefix
from crs.vwSubsidiary sub with (nolock)
-----------------
Le lancement du report lance la proc reportOpenInvoice qui mouline bien sur Gaia
-----------------
exec crs.ReportOpenInvoices @Format=N'1',@Pharmacy=N'185;157;249;339;366;205;142;308;186;354;285;296;148;298;341;284;322;290;169;144;349;173;163;133;348;342;146;261;124;174;248;137;260;202;117;156;194;254;207;287;334;247;227;153;552;345;663;306;128;130;129;327;131;844;843;300;189;295;338;333;217;110;161;198;329;111;109;270;210;330;103;343;854;224;340;336;272;145;328;166;346;136;859;122;134;135;125;314;118;307;123;760;292;164;120;301;291;195;282;721;571;132;317;114;113;112;115;119;305;302;570;319;544;140;323;373;320;138;139;303;344;318;147;274;310;358;357;359;574;575;873;321;311;175;360;388;331;216;560;143;126;559;299;121;781;335;304',@InvoiceNumber=NULL,@NegativeAmount=0
-----------------
*/

70
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2/pharmacies.sql Normal file
View File

@@ -0,0 +1,70 @@
/*=============================================================================
OCTPDBA-565
Manage indexes followig 23.2 release branch
Parameters
----------------------
Context
----------------------
Every pharmacies
Creation : 21.04.2023 / TSC
Modifications:
=============================================================================*/
USE [Arizona]
GO
/*
Item_criteria
drop old constraints. 2 can be merged and 1 is not used
XIEAPS2Item_criteria = dbo.Item_criteria(ITCR_master_ID) ==> to drop, not used
XIF1039Item_criteria = dbo.Item_criteria(ITCR_item) ==> becomes an include on the index on ITCR_criteria
XIF1041Item_criteria = dbo.Item_criteria(ITCR_criteria)
*/
IF INDEXPROPERTY(OBJECT_ID('dbo.Item_criteria'), 'XIEAPS2Item_criteria' , 'IndexID' ) IS NOT NULL BEGIN;
DROP INDEX dbo.Item_criteria.XIEAPS2Item_criteria;
END;
GO
IF INDEXPROPERTY(OBJECT_ID('dbo.Item_criteria'), 'XIF1039Item_criteria' , 'IndexID' ) IS NOT NULL BEGIN;
DROP INDEX dbo.Item_criteria.XIF1039Item_criteria;
END;
GO
IF INDEXPROPERTY(OBJECT_ID('dbo.Item_criteria'), 'XIF1041Item_criteria' , 'IndexID' ) IS NOT NULL BEGIN;
DROP INDEX dbo.Item_criteria.XIF1041Item_criteria;
END;
GO
IF INDEXPROPERTY(OBJECT_ID('dbo.Item_criteria'), 'NCIX_Item_criteria_COL_ITCR_criteria' , 'IndexID' ) IS NULL BEGIN;
CREATE NONCLUSTERED INDEX NCIX_Item_criteria_COL_ITCR_criteria ON dbo.Item_criteria(ITCR_criteria)
INCLUDE(ITCR_item);
END;
GO
/* ------------------------------------------------------ */
/*
Document_line
the index NCIX_Document_line_COL_DL_type is not used.
Adapt it to follow the recommendation
*/
-- NCIX_Document_line_COL_DL_type
IF INDEXPROPERTY(OBJECT_ID('dbo.Document_line'), 'NCIX_Document_line_COL_DL_type' , 'IndexID' ) IS NOT NULL BEGIN;
DROP INDEX [dbo].[Document_line].[NCIX_Document_line_COL_DL_type];
END;
GO
IF INDEXPROPERTY(OBJECT_ID('dbo.Document_line'), 'NCIX_Document_line_COL_DL_type' , 'IndexID' ) IS NULL BEGIN;
CREATE INDEX [NCIX_Document_line_COL_DL_type] ON [dbo].[Document_line]([DL_type], [DL_to_be_invoiced])
INCLUDE([DL_document_header]);
END;
GO

89
OCTPDBA-565 manage index 23.2/OCTPDBA-565 manage index 23.2/revert central.sql Normal file
View File

@@ -0,0 +1,89 @@
/*=============================================================================
What does it does ?
Parameters
----------------------
Context
----------------------
What is the context, where does it needs to run ?
Creation : 25.04.2023 / TSC
Modifications:
=============================================================================*/
SET XACT_ABORT ON;
SET NOCOUNT ON;
USE [Arizona]
-- XIF1039Item_criteria
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_criteria'), 'XIF1039Item_criteria' , 'IndexID' ) IS NULL BEGIN;
CREATE INDEX XIF1039Item_criteria ON arizona.dbo.Item_criteria(ITCR_item);
END;
GO
-- XIF1041Item_criteria
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_criteria'), 'XIF1041Item_criteria' , 'IndexID' ) IS NULL BEGIN;
CREATE INDEX XIF1041Item_criteria ON arizona.dbo.Item_criteria(ITCR_criteria);
END;
GO
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_criteria'), 'NCIX_Item_criteria_COL_ITCR_item' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Item_criteria.NCIX_Item_criteria_COL_ITCR_item
END
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.document_line'), 'NCIX_Document_line_COL_DL_to_be_invoiced' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.[Document_line].NCIX_Document_line_COL_DL_to_be_invoiced
END
/* Fixed_price. */
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Fixed_price'), 'NCIX_Fixed_price_COL_FP_tariff_type' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX [dbo].[Fixed_price].[NCIX_Fixed_price_COL_FP_tariff_type]
END
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Fixed_price'), 'NCIX_Fixed_price_COL_FP_tariff_type_FP_start_date' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Fixed_price.[NCIX_Fixed_price_COL_FP_tariff_type_FP_start_date]
END
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Fixed_price'), 'NCIX_Fixed_price_COL_FP_price_code' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Fixed_price.[NCIX_Fixed_price_COL_FP_price_code]
END
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Fixed_price'), 'NCIX_Fixed_price_COL_FP_subsidiary' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Fixed_price.[NCIX_Fixed_price_COL_FP_subsidiary]
END
/* item_key */
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_key'), 'NCIX_Item_key_COL_ITK_subsidiary' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Item_key.[NCIX_Item_key_COL_ITK_subsidiary]
END
/*Item_statistics_yearly. heap table with no indexes*/
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_statistics_yearly'), 'NCIX_Item_statistics_yearly_COL_ITSTAY_item' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Item_statistics_yearly.[NCIX_Item_statistics_yearly_COL_ITSTAY_item]
END
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_statistics_yearly'), 'NCIX_Item_statistics_yearly_COL_ITSTAY_year' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Item_statistics_yearly.[NCIX_Item_statistics_yearly_COL_ITSTAY_year]
END
/*Item_status_history.*/
IF INDEXPROPERTY(OBJECT_ID('arizona.dbo.Item_status_history'), 'NCIX_Item_status_history_COL_ITSH_value_date' , 'IndexID' ) IS NOT NULL BEGIN
DROP INDEX dbo.Item_status_history.[NCIX_Item_status_history_COL_ITSH_value_date]
END
/* ------------------------------------------------------ */
USE [PharmIndexTP]
IF INDEXPROPERTY(OBJECT_ID('PharmIndexTP.dbo.mapping_PHGD_CompendiumText'), 'NCIX_mapping_PHGD_CompendiumText_COL_PHGD_CPDTXT_GUID' , 'IndexID' ) IS NULL BEGIN
DROP INDEX dbo.mapping_PHGD_CompendiumText.[NCIX_mapping_PHGD_CompendiumText_COL_PHGD_CPDTXT_GUID]
END