Actions
Feature #1837
openTask 18953: Añadir correos electrónicos de Fiscalías
Added by Estefany Santiago Trinidad 9 days ago. Updated 5 days ago.
Status:
Pending Review
Priority:
Normal
Assignee:
Category:
-
Target version:
Start date:
07/24/2026
Due date:
% Done:
0%
Estimated time:
20:00 h
Updated by Edwin X Borrero 9 days ago
- Status changed from Not Started to In Progress
- Assignee set to Edwin X Borrero
Updated by Repo Bot 5 days ago
- Status changed from In Progress to Pending Review
PR ready for review: EBS-SEEDBURY — Task 18953: Añadir correos electrónicos de Fiscalías → status: Pending Review
Updated by Edwin X Borrero 5 days ago
Cambios a la base de datos de TPI
CREATE TABLE SUMACProsecutorRegion (
Code int IDENTITY(1,1) NOT NULL,
DescriptionEN varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NOT NULL,
DescriptionES varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NOT NULL,
IsHidden bit DEFAULT 0 NOT NULL,
HiddenReason varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NULL,
CreatedDate datetime NOT NULL,
CreatedBy uniqueidentifier NOT NULL,
ModifiedDate datetime NOT NULL,
ModifiedBy uniqueidentifier NOT NULL,
UpdateVersion timestamp NOT NULL,
PersonId int NULL,
CONSTRAINT PK__SUMACProsecutorRegion PRIMARY KEY (Code),
CONSTRAINT FK__SUMACProsecutorRegionPersonId FOREIGN KEY (PersonId) REFERENCES dbo.SUMACPersonBase(PersonId)
)
INSERT INTO SUMACPersonType (ObjectTypeCode, DescriptionEN, DescriptionES, CreatedDate, CreatedBy, ModifiedDate, ModifiedBy)
VALUES (61, 'Prosecutor Region', 'Fiscalía de la Región', GETDATE(), '86FE697B-E340-4CFF-B331-7952ED0E4C27', GETDATE(), '86FE697B-E340-4CFF-B331-7952ED0E4C27')
-- Aguadilla
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Aguadilla', 'Fiscalía de Aguadilla', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('AGUADILLA', 'AGUADILLA', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
-- Distrito Aibonito
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Aibonito', 'Fiscalía de Distrito Aibonito', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('AIBONITO', 'AIBONITO', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito Arecibo
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Arecibo', 'Fiscalía de Distrito Arecibo', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('ARECIBO', 'ARECIBO', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito Bayamon
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Bayamón', 'Fiscalía de Distrito Bayamón', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('BAYAMÓN', 'BAYAMÓN', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito Caguas
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Caguas', 'Fiscalía de Distrito Caguas', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('CAGUAS', 'CAGUAS', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito de Carolina
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito de Carolina', 'Fiscalía de Distrito de Carolina', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('CAROLINA', 'CAROLINA', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito Fajardo
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Fajardo', 'Fiscalía de Distrito Fajardo', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('FAJARDO', 'FAJARDO', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito Guayama
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito Guayama', 'Fiscalía de Distrito Guayama', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('GUAYAMA', 'GUAYAMA', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito de Humacao
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito de Humacao', 'Fiscalía de Distrito de Humacao', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('HUMACAO', 'HUMACAO', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito de Mayaguez
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito de Mayaguez', 'Fiscalía de Distrito de Mayaguez', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('MAYAGUEZ', 'MAYAGUEZ', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Ponce
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
DECLARE @zipCode VARCHAR(250) = '00732'; -- editar
DECLARE @line1 VARCHAR(250) = 'Line 1'; -- editar
DECLARE @line2 VARCHAR(250) = 'Line 2'; -- editar
DECLARE @line3 VARCHAR(250) = 'Line 3'; -- editar
DECLARE @line4 VARCHAR(250) = 'Line 4'; -- editar
DECLARE @fullAddress VARCHAR(250) = CONCAT(@line1, ' ', @line2, ' ', @line3, ' ', @line4, ', ', 'Ponce, Puerto Rico, ', @zipCode); -- editar
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Ponce', 'Fiscalía de Ponce', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACAddress (RelatedRecordId, TypeCode, ZipCode, Line1, Line2, Line3, Line4, CountryCode, StateCode, CityCode, FullAddressEN, FullAddressES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (@recordId, 2, @zipCode, @line1, @line2, @line3, @line4, 254, 1, 81, @fullAddress, @fullAddress, @adminUser, @date, @adminUser, @date)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('PONCE', 'PONCE', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Distrito de San Juan
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Distrito de San Juan', 'Fiscalía de Distrito de San Juan', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('SAN JUAN', 'SAN JUAN', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
-- Utuado
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Utuado', 'Fiscalía de Utuado', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('UTUADO', 'UTUADO', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
Updated by Edwin X Borrero 5 days ago
Edwin X Borrero wrote in #note-3:
Cambios a la base de datos de TPI
CREATE TABLE SUMACProsecutorRegion ( Code int IDENTITY(1,1) NOT NULL, DescriptionEN varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NOT NULL, DescriptionES varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NOT NULL, IsHidden bit DEFAULT 0 NOT NULL, HiddenReason varchar(100) COLLATE SQL_Latin1_General_CP1_CI_AI NULL, CreatedDate datetime NOT NULL, CreatedBy uniqueidentifier NOT NULL, ModifiedDate datetime NOT NULL, ModifiedBy uniqueidentifier NOT NULL, UpdateVersion timestamp NOT NULL, PersonId int NULL, CONSTRAINT PK__SUMACProsecutorRegion PRIMARY KEY (Code), CONSTRAINT FK__SUMACProsecutorRegionPersonId FOREIGN KEY (PersonId) REFERENCES dbo.SUMACPersonBase(PersonId) ) INSERT INTO SUMACPersonType (ObjectTypeCode, DescriptionEN, DescriptionES, CreatedDate, CreatedBy, ModifiedDate, ModifiedBy) VALUES (61, 'Prosecutor Region', 'Fiscalía de la Región', GETDATE(), '86FE697B-E340-4CFF-B331-7952ED0E4C27', GETDATE(), '86FE697B-E340-4CFF-B331-7952ED0E4C27') -- Aguadilla SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Aguadilla', 'Fiscalía de Aguadilla', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('AGUADILLA', 'AGUADILLA', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; -- Distrito Aibonito SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Aibonito', 'Fiscalía de Distrito Aibonito', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('AIBONITO', 'AIBONITO', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito Arecibo SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Arecibo', 'Fiscalía de Distrito Arecibo', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('ARECIBO', 'ARECIBO', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito Bayamon SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Bayamón', 'Fiscalía de Distrito Bayamón', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('BAYAMÓN', 'BAYAMÓN', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito Caguas SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Caguas', 'Fiscalía de Distrito Caguas', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('CAGUAS', 'CAGUAS', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito de Carolina SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito de Carolina', 'Fiscalía de Distrito de Carolina', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('CAROLINA', 'CAROLINA', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito Fajardo SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Fajardo', 'Fiscalía de Distrito Fajardo', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('FAJARDO', 'FAJARDO', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito Guayama SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito Guayama', 'Fiscalía de Distrito Guayama', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('GUAYAMA', 'GUAYAMA', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito de Humacao SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito de Humacao', 'Fiscalía de Distrito de Humacao', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('HUMACAO', 'HUMACAO', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito de Mayaguez SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito de Mayaguez', 'Fiscalía de Distrito de Mayaguez', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('MAYAGUEZ', 'MAYAGUEZ', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Ponce SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; DECLARE @zipCode VARCHAR(250) = '00732'; -- editar DECLARE @line1 VARCHAR(250) = 'Line 1'; -- editar DECLARE @line2 VARCHAR(250) = 'Line 2'; -- editar DECLARE @line3 VARCHAR(250) = 'Line 3'; -- editar DECLARE @line4 VARCHAR(250) = 'Line 4'; -- editar DECLARE @fullAddress VARCHAR(250) = CONCAT(@line1, ' ', @line2, ' ', @line3, ' ', @line4, ', ', 'Ponce, Puerto Rico, ', @zipCode); -- editar BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Ponce', 'Fiscalía de Ponce', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACAddress (RelatedRecordId, TypeCode, ZipCode, Line1, Line2, Line3, Line4, CountryCode, StateCode, CityCode, FullAddressEN, FullAddressES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (@recordId, 2, @zipCode, @line1, @line2, @line3, @line4, 254, 1, 81, @fullAddress, @fullAddress, @adminUser, @date, @adminUser, @date) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('PONCE', 'PONCE', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Distrito de San Juan SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Distrito de San Juan', 'Fiscalía de Distrito de San Juan', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('SAN JUAN', 'SAN JUAN', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH; -- Utuado SET XACT_ABORT ON; DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E'; DECLARE @date DATETIME = GETDATE(); DECLARE @recordId INT, @personId INT; BEGIN TRY BEGIN TRANSACTION INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES (17, @adminUser, @date, @adminUser, @date) SET @recordId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACPersonBase (FirstName, FullName, Email, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate) VALUES ('Fiscalía de Utuado', 'Fiscalía de Utuado', 'janet.ramos@poderjudicial.pr', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date) SET @personId = CAST(SCOPE_IDENTITY() AS INT) INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId) VALUES ('UTUADO', 'UTUADO', @adminUser, @date, @adminUser, @date, @personId) COMMIT TRANSACTION END TRY BEGIN CATCH IF XACT_STATE() <> 0 ROLLBACK TRANSACTION; SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine; THROW; END CATCH;
Cambio en el tipo de dirección de la Fiscalía de Ponce
-- Ponce
SET XACT_ABORT ON;
DECLARE @adminUser UNIQUEIDENTIFIER = 'BA188E4A-E2B5-45F3-9835-32C94121C00E';
DECLARE @date DATETIME = GETDATE();
DECLARE @recordId INT, @personId INT;
DECLARE @zipCode VARCHAR(250) = '00732'; -- editar
DECLARE @line1 VARCHAR(250) = 'Line 1'; -- editar
DECLARE @line2 VARCHAR(250) = 'Line 2'; -- editar
DECLARE @line3 VARCHAR(250) = 'Line 3'; -- editar
DECLARE @line4 VARCHAR(250) = 'Line 4'; -- editar
DECLARE @fullAddress VARCHAR(250) = CONCAT(@line1, ' ', @line2, ' ', @line3, ' ', @line4, ', ', 'Ponce, Puerto Rico, ', @zipCode); -- editar
BEGIN TRY
BEGIN TRANSACTION
INSERT INTO SUMACRecord (ObjectTypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (17, @adminUser, @date, @adminUser, @date)
SET @recordId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACPersonBase (FirstName, FullName, WorkPhone, RecordId, TypeCode, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES ('Fiscalía de Ponce', 'Fiscalía de Ponce', '7870000000', @recordId, 3, @adminUser, @date, @adminUser, @date)
SET @personId = CAST(SCOPE_IDENTITY() AS INT)
INSERT INTO SUMACAddress (RelatedRecordId, TypeCode, ZipCode, Line1, Line2, Line3, Line4, CountryCode, StateCode, CityCode, FullAddressEN, FullAddressES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate)
VALUES (@recordId, 1, @zipCode, @line1, @line2, @line3, @line4, 254, 1, 81, @fullAddress, @fullAddress, @adminUser, @date, @adminUser, @date)
INSERT INTO SUMACProsecutorRegion (DescriptionEN, DescriptionES, CreatedBy, CreatedDate, ModifiedBy, ModifiedDate, PersonId)
VALUES ('PONCE', 'PONCE', @adminUser, @date, @adminUser, @date, @personId)
COMMIT TRANSACTION
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
SELECT ERROR_NUMBER() AS ErrNum, ERROR_MESSAGE() AS ErrMsg, ERROR_LINE() AS ErrLine;
THROW;
END CATCH;
Actions