diff --git a/PROMS/DataLoader/App.config b/PROMS/DataLoader/App.config
deleted file mode 100644
index 55bfd659..00000000
--- a/PROMS/DataLoader/App.config
+++ /dev/null
@@ -1,178 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Checked
-
-
- Unchecked
-
-
- Checked
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Data Source=.\SQLEXPRESS;Initial Catalog={DBName};Integrated Security=True
-
-
- VEPROMS
-
-
-
-
-
-
-
-
- Unchecked
-
-
- 0
-
-
- 1
-
-
- Checked
-
-
- Checked
-
-
- 0
-
-
- Phase1
-
-
- Phase2
-
-
- Phase3
-
-
- c:\development\fmtall
-
-
- c:\development\genmacall
-
-
- False
-
-
- Phase4
-
-
-
-
-
- 0
-
-
- -1
-
-
- False
-
-
- False
-
-
- False
-
-
- 0
-
-
-
-
diff --git a/PROMS/DataLoader/App.config.org b/PROMS/DataLoader/App.config.org
deleted file mode 100644
index 2f3501bd..00000000
--- a/PROMS/DataLoader/App.config.org
+++ /dev/null
@@ -1,177 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Checked
-
-
- Unchecked
-
-
- Checked
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Data Source=.\SQLEXPRESS;Initial Catalog={DBName};Integrated Security=True
-
-
- VEPROMS
-
-
-
-
-
-
-
-
- Unchecked
-
-
- 0
-
-
- 1
-
-
- Checked
-
-
- Checked
-
-
- 0
-
-
- Phase1
-
-
- Phase2
-
-
- Phase3
-
-
- c:\development\fmtall
-
-
- c:\development\genmacall
-
-
- False
-
-
- Phase4
-
-
-
-
-
- 0
-
-
- -1
-
-
- False
-
-
- False
-
-
- False
-
-
-
-
diff --git a/PROMS/DataLoader/Applicability.cs b/PROMS/DataLoader/Applicability.cs
deleted file mode 100644
index a035ca6e..00000000
--- a/PROMS/DataLoader/Applicability.cs
+++ /dev/null
@@ -1,38 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.IO;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public Dictionary MyProcAPL;
- private static Dictionary GetApple(string proc)
- {
- Dictionary procAPL = new Dictionary();
- FileInfo myFile = new FileInfo(proc);
- FileStream fs = myFile.OpenRead();
- BinaryReader br = new BinaryReader(fs);
- byte[] myBuff = new byte[myFile.Length];
- br.Read(myBuff, 0, (int)myFile.Length);
- br.Close();
- fs.Close();
- int offset = 0;
- while (offset < myBuff.Length)
- {
- string recnum = Encoding.Default.GetString(myBuff, offset, 8);
- int applicability = BitConverter.ToInt32(myBuff, offset + 8);
- string applicabilityToStr = string.Format("{0:X8}", applicability);
- //4294967296
- if (!procAPL.ContainsKey(recnum))
- procAPL.Add(recnum, applicabilityToStr);
- else
- if (procAPL[recnum] != applicabilityToStr)
- procAPL[recnum] = applicabilityToStr;
- offset += 12;
- }
- return procAPL;
- }
- }
-}
diff --git a/PROMS/DataLoader/Applicability.cs.bak b/PROMS/DataLoader/Applicability.cs.bak
deleted file mode 100644
index f64e87fe..00000000
--- a/PROMS/DataLoader/Applicability.cs.bak
+++ /dev/null
@@ -1,40 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.IO;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public Dictionary MyProcAPL;
- private static Dictionary GetApple(string proc)
- {
- Dictionary procAPL = new Dictionary();
- FileInfo myFile = new FileInfo(proc);
- FileStream fs = myFile.OpenRead();
- BinaryReader br = new BinaryReader(fs);
- byte[] myBuff = new byte[myFile.Length];
- br.Read(myBuff, 0, (int)myFile.Length);
- br.Close();
- fs.Close();
- int offset = 0;
- while (offset < myBuff.Length)
- {
- string recnum = Encoding.Default.GetString(myBuff, offset, 8);
- //if ((myFile.Name.ToUpper() == "PROC000.APL" && (recnum == "00002491")))
- // System.Threading.Thread.Sleep(1000);
- int applicability = BitConverter.ToInt32(myBuff, offset + 8);
- string applicabilityToStr = string.Format("{0:X8}", applicability);
- //4294967296
- if (!procAPL.ContainsKey(recnum))
- procAPL.Add(recnum, applicabilityToStr);
- else
- if (procAPL[recnum] != applicabilityToStr)
- procAPL[recnum] = applicabilityToStr;
- offset += 12;
- }
- return procAPL;
- }
- }
-}
diff --git a/PROMS/DataLoader/Approve.cs b/PROMS/DataLoader/Approve.cs
deleted file mode 100644
index e96f9943..00000000
--- a/PROMS/DataLoader/Approve.cs
+++ /dev/null
@@ -1,516 +0,0 @@
-//using System;
-using System.Collections.Generic;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using System.IO;
-using System.Data.OleDb;
-using System.Data;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public bool BuildApprovedRevision()
- {
- if(!frmMain.RunScript("PROMSApproveApprove.sql", frmMain.DBName)) return false;
- bool rv = false;
- using (Stage myStage = GetApprovedStage())
- {
- if (myStage == null)
- return rv;
- DocVersionInfoList dvil = DocVersionInfoList.Get();
- foreach (DocVersionInfo dvi in dvil)
- {
- if (dvi.Procedures.Count > 0)
- {
- if (!frmMain.MySettings.OnlyThisSet || frmMain.ProcedureSetPath.ToUpper() == dvi.MyFolder.Title.ToUpper())
- {
- string approvedFolder = dvi.MyFolder.Title + @"\APPROVED";
- //B2012-094 fix
- if (!Directory.Exists(approvedFolder)) frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved folder does not exist";
- else if (!File.Exists(approvedFolder + @"\SET.DBF")) frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Set.dbf does not exist";
- else if (!File.Exists(approvedFolder + @"\USAGERO.DBF")) frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved UsageRO.dbf does not exist";
- else if (!Directory.Exists(approvedFolder + @"\PDFS")) frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Pdfs folder does not exist";
- else if (Directory.GetFiles(approvedFolder + @"\PDFS","*.PDF").Length == 0) frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Pdfs folder does not contain any pdf files";
- else rv |= BuildApprovedRevision(myStage, approvedFolder, dvi);
- }
- }
- }
- }
- return rv;
- }
-
- private static Stage GetApprovedStage()
- {
- StageInfoList sil = StageInfoList.Get();
- foreach (StageInfo si in sil)
- {
- if (si.Name.ToUpper() == "APPROVED")
- return si.Get();
- }
- return null;
- }
- private bool BuildApprovedRevision(Stage myStage, string approvedFolder, DocVersionInfo dvi)
- {
- bool rv = false;
- if (dvi.MultiUnitCount <= 1)
- {
- ApprovedFolder af = new ApprovedFolder(approvedFolder);
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- rv |= BuildApprovedRevision(myStage, af, pi, 0);
- }
- }
- else
- {
- ApprovedFolder af = new ApprovedFolder(approvedFolder, dvi);
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- for (int i = 1; i <= dvi.MultiUnitCount; i++)
- rv |= BuildApprovedRevision(myStage, af, pi, i);
- }
- }
- return rv;
- }
- private bool BuildApprovedRevision(Stage myStage, ApprovedFolder af, ProcedureInfo pi, int selectedSlave)
- {
- bool rv = false;
- if (selectedSlave > 0)
- pi.MyDocVersion.DocVersionConfig.SelectedSlave = selectedSlave;
- frmMain.MyInfo = string.Format("Loading approved data for Procedure: {0}", pi.DisplayNumber);
- // if working draft procedure does not exist in approved folder, don't bother processing
- if (!af.EntryFromProc.ContainsKey(pi.DisplayNumber)) return rv;
- using (Revision revision = CreateRevision(af, pi))
- {
- System.DateTime dts = pi.DTS;
- string userID = af.EntryFromProc[pi.DisplayNumber].UserID;
- using (Version version = Version.MakeVersion(revision, myStage, GetPDF(af,pi), GetSummaryPDF(), dts, userID))
- {
- using (Check check = Check.MakeCheck(revision, myStage, af.BuildConsistencyChecks(pi)))
- {
- rv |= true;
- }
- }
- }
- if(!rv)
- frmMain.MyInfo = string.Format("Loading Procedure: {0} FAILED MISERABLY", pi.DisplayNumber);
- return rv;
- }
- private byte[] GetSummaryPDF()
- {
- return null;
- }
- private byte[] GetPDF(ApprovedFolder af, ProcedureInfo pi)
- {
- string pdf = string.Format(@"{0}\PDFS\{1}.pdf", af.Path, pi.DisplayNumber);
- FileInfo pdfFile = new FileInfo(pdf);
- if (pdfFile.Exists)
- {
- FileStream fs = pdfFile.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
- byte[] pdfBuf = new byte[pdfFile.Length];
- fs.Read(pdfBuf, 0, pdfBuf.Length);
- fs.Close();
- return pdfBuf;
- }
- return null;
- }
- private Revision CreateRevision(ApprovedFolder af, ProcedureInfo pi)
- {
- int typeID = 1; //revision not tempmod
- ProcInfo pinf = af.EntryFromProc[pi.DisplayNumber];
- string revisionNumber = pinf.Rev;
- System.DateTime revisionDate = System.DateTime.Parse(pinf.RevDate ?? "1/1/1980");
- string notes = "Migration Of Current Approved Revision";
- RevisionConfig cfg = new RevisionConfig();
- cfg.History_StartDate = pinf.StartDateTime;
- if (pi.MyDocVersion.DocVersionConfig.SelectedSlave > 0)
- cfg.Applicability_Index = pi.MyDocVersion.DocVersionConfig.SelectedSlave;
- string config = cfg.ToString();
- System.DateTime dts = pi.DTS;
- string userID = pinf.UserID;
- return Revision.MakeRevision(pi.ItemID, typeID, revisionNumber, revisionDate, notes, config, dts, userID);
- }
- }
- public partial class ApprovedFolder
- {
- private OleDbConnection _Connection;
- public OleDbConnection Connection
- {
- get
- {
- if(_Connection == null)
- _Connection = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + _Path + ";Extended Properties=dBase III;Persist Security Info=False");
- return _Connection;
- }
- }
- private string _Path;
- public string Path
- {
- get { return _Path; }
- set { _Path = value; }
- }
- private System.DateTime _ROFstDate = System.DateTime.MinValue;
- public System.DateTime ROFstDate
- {
- get
- {
- if (_ROFstDate == System.DateTime.MinValue)
- {
- FileInfo fi = new FileInfo(string.Format(@"{0}\ro.fst",Path));
- if(fi.Exists)
- _ROFstDate = fi.LastWriteTimeUtc;
- }
- return _ROFstDate;
- }
- }
-
- private Dictionary _ROValues = new Dictionary();
- private Dictionary _LibDocDates = new Dictionary();
- private Dictionary> _ProcROs = new Dictionary>();
- private Dictionary> _LibROs = new Dictionary>();
- private Dictionary> _LibDocs = new Dictionary>();
-
- public string BuildConsistencyChecks(ProcedureInfo proc)
- {
- /*
-
-
-
-
-
-
-
-
- */
- ConsistencyChecks cc = new ConsistencyChecks();
- cc.ItemID = proc.ItemID;
- BuildROChecks(cc, proc);
- BuildLibDocChecks(cc, proc);
- return cc.ToString().Replace("OldDocDate=\"0001-01-01T00:00:00\"", "");
- }
-
- private void BuildLibDocChecks(ConsistencyChecks cc, ProcedureInfo proc)
- {
- if (_LibDocs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string libdoc in _LibDocs[proc.DisplayNumber])
- {
- FileInfo fi = new FileInfo(string.Format(@"{0}\RTFFILES\{1}.LIB",Path,libdoc));
- if (fi.Exists)
- {
- //if (proc.MyDocVersion.VersionID > 1)
- // System.Threading.Thread.Sleep(5000);
- int docid = GetDocID(libdoc, proc.MyDocVersion.VersionID);
- if (docid > 0)
- cc.LibDocConsistency.AddLibDocCheck(docid, fi.LastWriteTimeUtc);
- }
- }
- }
- }
-
- private int GetDocID(string libdoc, int versionid)
- {
- DocumentInfo di = DocumentInfo.GetByLibDocName(libdoc, versionid);
- return di.DocID;
- }
-
- private void BuildROChecks(ConsistencyChecks cc, ProcedureInfo proc)
- {
- cc.ROConsistency.ROFstDate = ROFstDate;
- if (_ProcROs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string roid in _ProcROs[proc.DisplayNumber])
- cc.ROConsistency.AddROCheck(FormatROID(roid), GetROValue(FormatROID(roid)));
- }
- //int cnt = cc.ROConsistency.MyROChecks.Length;
- if (_LibDocs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string libdoc in _LibDocs[proc.DisplayNumber])
- {
- if (_LibROs.ContainsKey(libdoc))
- {
- foreach (string roid in _LibROs[libdoc])
- cc.ROConsistency.AddROCheck(FormatROID(roid), GetROValue(FormatROID(roid)));
- }
- }
- }
- }
-
- private string GetROValue(string roid)
- {
- if (!_ROValues.ContainsKey(roid))
- {
- //if (roid.Contains("000128"))
- // System.Console.WriteLine();
- //string ss = _Lookup.GetRoValue(roid);
- //ss = ItemInfo.ConvertToDisplayText(ss);
- //ss = ss.Replace('\n', ';');
-
- _ROValues.Add(roid, PrepareForXML(ItemInfo.ConvertToDisplayText(_Lookup.GetRoValue(roid))));
- }
- return _ROValues[roid];
- }
-
- private string PrepareForXML(string rovalue)
- {
- StringBuilder sb = new StringBuilder();
- foreach (char c in rovalue)
- {
- if (c < ' ')
- sb.Append(string.Format(@"\x{0:X4}", (int)c));
- else
- sb.Append(c);
- }
- return sb.ToString();
- }
- private string FormatROID(string roid)
- {
- if (roid.Length == 16 && roid.EndsWith("0000"))
- return roid.Substring(0, 12).ToUpper();
- return roid.ToUpper();
- }
-
- private Dictionary _EntryFromProc;
- public Dictionary EntryFromProc
- {
- get
- {
- if (_EntryFromProc == null)
- _EntryFromProc = FillEntryFromProc();
- return _EntryFromProc;
- }
- }
- private Dictionary FillEntryFromProc()
- {
- Dictionary rv = new Dictionary();
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select * from [set] where entry is not null", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- if (!rv.ContainsKey(dr["NUMBER"].ToString()))
- rv.Add(dr["NUMBER"].ToString(), new ProcInfo(dr, Path));
- }
- }
- return rv;
- }
- private ROFSTLookup _Lookup;
- public ApprovedFolder(string path)
- {
- _Path = path;
- FillROs();
- FillLibDocs();
- _Lookup = new ROFSTLookup(string.Format(@"{0}\RO.FST", Path));
- }
- public ApprovedFolder(string path, DocVersionInfo dvi)
- {
- _Path = path;
- FillROs();
- FillLibDocs();
- _Lookup = new ROFSTLookup(string.Format(@"{0}\RO.FST", Path));
- _EntryFromProc = FillEntryFromProcMulti(dvi);
- }
-
- private Dictionary FillEntryFromProcMulti(DocVersionInfo dvi)
- {
- Dictionary rv = new Dictionary();
- for (int i = 1; i <= dvi.MultiUnitCount; i++)
- {
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- pi.MyDocVersion.DocVersionConfig.SelectedSlave = i;
- rv.Add(pi.DisplayNumber, new ProcInfo(pi, Path));
- }
- }
- return rv;
- }
-
- private void FillLibDocs()
- {
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select distinct FROMNUMBER, TONUMBER from [tran] where tonumber like 'DOC%'", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- string number = dr["FROMNUMBER"].ToString();
- string libdoc = dr["TONUMBER"].ToString();
- if (!_LibDocs.ContainsKey(number))
- _LibDocs.Add(number, new List());
- if (!_LibDocs[number].Contains(libdoc))
- _LibDocs[number].Add(libdoc);
- }
- }
- }
- }
-
- private void FillROs()
- {
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select distinct NUMBER, ROID from [usagero]", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- string number = dr["NUMBER"].ToString();
- string roid = dr["ROID"].ToString();
- if (number.StartsWith("DOC"))
- {
- if (!_LibROs.ContainsKey(number))
- _LibROs.Add(number, new List());
- if (!_LibROs[number].Contains(roid))
- _LibROs[number].Add(roid);
- }
- else
- {
- if (!_ProcROs.ContainsKey(number))
- _ProcROs.Add(number, new List());
- if (!_ProcROs[number].Contains(roid))
- _ProcROs[number].Add(roid);
- }
- }
- }
- }
- }
- }
- public partial class ProcInfo
- {
- private log4net.ILog log;
- private string _Number;
- public string Number
- {
- get { return _Number; }
- set { _Number = value; }
- }
- private string _Entry;
- public string Entry
- {
- get { return _Entry; }
- set { _Entry = value; }
- }
- private string _UserID;
- public string UserID
- {
- get { return _UserID; }
- set { _UserID = value; }
- }
- private System.DateTime _StartDateTime;
- public System.DateTime StartDateTime
- {
- get { return _StartDateTime; }
- set { _StartDateTime = value; }
- }
- private string _Rev;
- public string Rev
- {
- get { return _Rev; }
- set { _Rev = value; }
- }
- private string _RevDate;
- public string RevDate
- {
- get { return _RevDate; }
- set { _RevDate = value; }
- }
- private string _ReviewDate;
- public string ReviewDate
- {
- get { return _ReviewDate; }
- set { _ReviewDate = value; }
- }
- public ProcInfo(ProcedureInfo pi, string afpath)
- {
- Number = pi.DisplayNumber;
- Entry = pi.DisplayText;
- UserID = pi.UserID;
- StartDateTime = pi.DTS;
- RevDate = pi.ProcedureConfig.Print_RevDate;
- Rev = pi.ProcedureConfig.Print_Rev;
- }
- public ProcInfo(DataRow dr, string afpath)
- {
- Number = dr["NUMBER"].ToString();
- Entry = dr["ENTRY"].ToString();
- UserID = dr["INITIALS"].ToString();
- if (UserID == string.Empty) UserID = "UNKNOWN";
- //string date = GetDTS(dr["DATE"].ToString(), dr["TIME"].ToString()).ToString("MM/dd/yyyy HH:MM");//System.DateTime.Parse(dr["DATE"].ToString()).ToString("MM/dd/yyyy");
- //string time = dr["TIME"].ToString();
- //if (time.EndsWith(":"))
- // date += " " + time.Substring(0, 2) + ":" + time.Substring(2, 2);
- //else
- // date += " " + time.Substring(0, 2) + ":" + time.Substring(3, 2);
- //StartDateTime = System.DateTime.Parse(date);
- StartDateTime = GetDTS(dr["DATE"].ToString(), dr["TIME"].ToString());
- RevDate = StartDateTime.ToString("MM/dd/yyyy");
- FixItems fis = new FixItems(new FileInfo(string.Format(@"{0}\{1}.fix", afpath, Entry)));
- if (fis.Count > 0)
- {
- Rev = fis[0].Rev;
- RevDate = fis[0].RevDate ?? GetDBFRevDate(afpath);
- ReviewDate = fis[0].ReviewDate;
- }
- }
- public System.DateTime GetDTS(string date, string time)
- {
- // Set the date/time stamp. If there is no 'date', set the date
- // to 1/1/2000 (this can be changed!). If there is not 'time',
- // set the time to 0:0:0 (midnight).
-
- System.DateTime dts = System.DateTime.Now;
- string month = "01";
- string day = "01";
- string year = "2000";
- string hour = "";
- string minute = "";
- try
- {
- if (date != null && date != "")
- {
- int indx1 = date.IndexOf("/");
- month = date.Substring(0, indx1);
- int indx2 = date.IndexOf("/", indx1 + 1);
- day = date.Substring(indx1 + 1, indx2 - indx1 - 1);
- year = date.Substring(indx2 + 1, 4);
- }
- if (time == null || time == "")
- {
- hour = "0";
- minute = "0";
- }
- else
- {
-
- hour = time.Substring(0, 2);
- int indxc = time.IndexOfAny(":A-".ToCharArray());
- if (indxc == time.Length - 1)
- minute = time.Substring(2, 2);
- else
- minute = time.Substring(indxc + 1, time.Length - indxc - 1);
- }
- dts = new System.DateTime(System.Convert.ToInt32(year), System.Convert.ToInt32(month), System.Convert.ToInt32(day),
- System.Convert.ToInt32(hour), System.Convert.ToInt32(minute), 0);
- }
- catch (System.Exception ex)
- {
- log.ErrorFormat("Bad Date/Time {0} {1}. Set to NOW.", date, time);
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- //frmMain.AddError(ex, "Bad Date/Time {0} {1}", date, time);
- log.ErrorFormat(ex.StackTrace);
- return dts;
- }
- return dts;
- }
-
- private string GetDBFRevDate(string afpath)
- {
- FileInfo fi = new FileInfo(afpath + @"\" + Entry + ".dbf");
- if (fi.Exists)
- return fi.LastWriteTime.ToShortDateString();
- return null;
- }
- }
-
-}
diff --git a/PROMS/DataLoader/Approve.cs.bak b/PROMS/DataLoader/Approve.cs.bak
deleted file mode 100644
index c12dee64..00000000
--- a/PROMS/DataLoader/Approve.cs.bak
+++ /dev/null
@@ -1,521 +0,0 @@
-//using System;
-using System.Collections.Generic;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using System.IO;
-using System.Data.OleDb;
-using System.Data;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public bool BuildApprovedRevision()
- {
- if(!frmMain.RunScript("PROMSApproveApprove.sql", frmMain.MySettings.DBName)) return false;
- bool rv = false;
- using (Stage myStage = GetApprovedStage())
- {
- if (myStage == null)
- return rv;
- DocVersionInfoList dvil = DocVersionInfoList.Get();
- foreach (DocVersionInfo dvi in dvil)
- {
- if (dvi.Procedures.Count > 0)
- {
- if (!frmMain.MySettings.OnlyThisSet || frmMain.MySettings.ProcedureSetPath.ToUpper() == dvi.MyFolder.Title.ToUpper())
- {
- string approvedFolder = dvi.MyFolder.Title + @"\APPROVED";
- //B2012-094 fix
- if (!Directory.Exists(approvedFolder))
- frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved folder does not exist";
- else if (!File.Exists(approvedFolder + @"\SET.DBF"))
- frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Set.dbf does not exist";
- else if (!File.Exists(approvedFolder + @"\USAGERO.DBF"))
- frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved UsageRO.dbf does not exist";
- else if (!Directory.Exists(approvedFolder + @"\PDFS"))
- frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Pdfs folder does not exist";
- else if (Directory.GetFiles(approvedFolder + @"\PDFS", "*.PDF").Length == 0)
- frmMain.MyWarning = "**** " + dvi.MyFolder.Title + " Approved Pdfs folder does not contain any pdf files";
- else rv |= BuildApprovedRevision(myStage, approvedFolder, dvi);
- }
- }
- }
- }
- return rv;
- }
-
- private static Stage GetApprovedStage()
- {
- StageInfoList sil = StageInfoList.Get();
- foreach (StageInfo si in sil)
- {
- if (si.Name.ToUpper() == "APPROVED")
- return si.Get();
- }
- return null;
- }
- private bool BuildApprovedRevision(Stage myStage, string approvedFolder, DocVersionInfo dvi)
- {
- bool rv = false;
- if (dvi.MultiUnitCount <= 1)
- {
- ApprovedFolder af = new ApprovedFolder(approvedFolder);
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- rv |= BuildApprovedRevision(myStage, af, pi, 0);
- }
- }
- else
- {
- ApprovedFolder af = new ApprovedFolder(approvedFolder, dvi);
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- for (int i = 1; i <= dvi.MultiUnitCount; i++)
- rv |= BuildApprovedRevision(myStage, af, pi, i);
- }
- }
- return rv;
- }
- private bool BuildApprovedRevision(Stage myStage, ApprovedFolder af, ProcedureInfo pi, int selectedSlave)
- {
- bool rv = false;
- if (selectedSlave > 0)
- pi.MyDocVersion.DocVersionConfig.SelectedSlave = selectedSlave;
- frmMain.MyInfo = string.Format("Loading approved data for Procedure: {0}", pi.DisplayNumber);
- // if working draft procedure does not exist in approved folder, don't bother processing
- if (!af.EntryFromProc.ContainsKey(pi.DisplayNumber)) return rv;
- using (Revision revision = CreateRevision(af, pi))
- {
- System.DateTime dts = pi.DTS;
- string userID = af.EntryFromProc[pi.DisplayNumber].UserID;
- using (Version version = Version.MakeVersion(revision, myStage, GetPDF(af,pi), GetSummaryPDF(), dts, userID))
- {
- using (Check check = Check.MakeCheck(revision, myStage, af.BuildConsistencyChecks(pi)))
- {
- rv |= true;
- }
- }
- }
- if(!rv)
- frmMain.MyInfo = string.Format("Loading Procedure: {0} FAILED MISERABLY", pi.DisplayNumber);
- return rv;
- }
- private byte[] GetSummaryPDF()
- {
- return null;
- }
- private byte[] GetPDF(ApprovedFolder af, ProcedureInfo pi)
- {
- string pdf = string.Format(@"{0}\PDFS\{1}.pdf", af.Path, pi.DisplayNumber);
- FileInfo pdfFile = new FileInfo(pdf);
- if (pdfFile.Exists)
- {
- FileStream fs = pdfFile.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
- byte[] pdfBuf = new byte[pdfFile.Length];
- fs.Read(pdfBuf, 0, pdfBuf.Length);
- fs.Close();
- return pdfBuf;
- }
- return null;
- }
- private Revision CreateRevision(ApprovedFolder af, ProcedureInfo pi)
- {
- int typeID = 1; //revision not tempmod
- ProcInfo pinf = af.EntryFromProc[pi.DisplayNumber];
- string revisionNumber = pinf.Rev;
- System.DateTime revisionDate = System.DateTime.Parse(pinf.RevDate ?? "1/1/1980");
- string notes = "Migration Of Current Approved Revision";
- RevisionConfig cfg = new RevisionConfig();
- cfg.History_StartDate = pinf.StartDateTime;
- if (pi.MyDocVersion.DocVersionConfig.SelectedSlave > 0)
- cfg.Applicability_Index = pi.MyDocVersion.DocVersionConfig.SelectedSlave;
- string config = cfg.ToString();
- System.DateTime dts = pi.DTS;
- string userID = pinf.UserID;
- return Revision.MakeRevision(pi.ItemID, typeID, revisionNumber, revisionDate, notes, config, dts, userID);
- }
- }
- public partial class ApprovedFolder
- {
- private OleDbConnection _Connection;
- public OleDbConnection Connection
- {
- get
- {
- if(_Connection == null)
- _Connection = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + _Path + ";Extended Properties=dBase III;Persist Security Info=False");
- return _Connection;
- }
- }
- private string _Path;
- public string Path
- {
- get { return _Path; }
- set { _Path = value; }
- }
- private System.DateTime _ROFstDate = System.DateTime.MinValue;
- public System.DateTime ROFstDate
- {
- get
- {
- if (_ROFstDate == System.DateTime.MinValue)
- {
- FileInfo fi = new FileInfo(string.Format(@"{0}\ro.fst",Path));
- if(fi.Exists)
- _ROFstDate = fi.LastWriteTimeUtc;
- }
- return _ROFstDate;
- }
- }
-
- private Dictionary _ROValues = new Dictionary();
- private Dictionary _LibDocDates = new Dictionary();
- private Dictionary> _ProcROs = new Dictionary>();
- private Dictionary> _LibROs = new Dictionary>();
- private Dictionary> _LibDocs = new Dictionary>();
-
- public string BuildConsistencyChecks(ProcedureInfo proc)
- {
- /*
-
-
-
-
-
-
-
-
- */
- ConsistencyChecks cc = new ConsistencyChecks();
- cc.ItemID = proc.ItemID;
- BuildROChecks(cc, proc);
- BuildLibDocChecks(cc, proc);
- return cc.ToString().Replace("OldDocDate=\"0001-01-01T00:00:00\"", "");
- }
-
- private void BuildLibDocChecks(ConsistencyChecks cc, ProcedureInfo proc)
- {
- if (_LibDocs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string libdoc in _LibDocs[proc.DisplayNumber])
- {
- FileInfo fi = new FileInfo(string.Format(@"{0}\RTFFILES\{1}.LIB",Path,libdoc));
- if (fi.Exists)
- {
- //if (proc.MyDocVersion.VersionID > 1)
- // System.Threading.Thread.Sleep(5000);
- int docid = GetDocID(libdoc, proc.MyDocVersion.VersionID);
- if (docid > 0)
- cc.LibDocConsistency.AddLibDocCheck(docid, fi.LastWriteTimeUtc);
- }
- }
- }
- }
-
- private int GetDocID(string libdoc, int versionid)
- {
- DocumentInfo di = DocumentInfo.GetByLibDocName(libdoc, versionid);
- return di.DocID;
- }
-
- private void BuildROChecks(ConsistencyChecks cc, ProcedureInfo proc)
- {
- cc.ROConsistency.ROFstDate = ROFstDate;
- if (_ProcROs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string roid in _ProcROs[proc.DisplayNumber])
- cc.ROConsistency.AddROCheck(FormatROID(roid), GetROValue(FormatROID(roid)));
- }
- //int cnt = cc.ROConsistency.MyROChecks.Length;
- if (_LibDocs.ContainsKey(proc.DisplayNumber))
- {
- foreach (string libdoc in _LibDocs[proc.DisplayNumber])
- {
- if (_LibROs.ContainsKey(libdoc))
- {
- foreach (string roid in _LibROs[libdoc])
- cc.ROConsistency.AddROCheck(FormatROID(roid), GetROValue(FormatROID(roid)));
- }
- }
- }
- }
-
- private string GetROValue(string roid)
- {
- if (!_ROValues.ContainsKey(roid))
- {
- //if (roid.Contains("000128"))
- // System.Console.WriteLine();
- //string ss = _Lookup.GetRoValue(roid);
- //ss = ItemInfo.ConvertToDisplayText(ss);
- //ss = ss.Replace('\n', ';');
-
- _ROValues.Add(roid, PrepareForXML(ItemInfo.ConvertToDisplayText(_Lookup.GetRoValue(roid))));
- }
- return _ROValues[roid];
- }
-
- private string PrepareForXML(string rovalue)
- {
- StringBuilder sb = new StringBuilder();
- foreach (char c in rovalue)
- {
- if (c < ' ')
- sb.Append(string.Format(@"\x{0:X4}", (int)c));
- else
- sb.Append(c);
- }
- return sb.ToString();
- }
- private string FormatROID(string roid)
- {
- if (roid.Length == 16 && roid.EndsWith("0000"))
- return roid.Substring(0, 12).ToUpper();
- return roid.ToUpper();
- }
-
- private Dictionary _EntryFromProc;
- public Dictionary EntryFromProc
- {
- get
- {
- if (_EntryFromProc == null)
- _EntryFromProc = FillEntryFromProc();
- return _EntryFromProc;
- }
- }
- private Dictionary FillEntryFromProc()
- {
- Dictionary rv = new Dictionary();
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select * from [set] where entry is not null", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- if (!rv.ContainsKey(dr["NUMBER"].ToString()))
- rv.Add(dr["NUMBER"].ToString(), new ProcInfo(dr, Path));
- }
- }
- return rv;
- }
- private ROFSTLookup _Lookup;
- public ApprovedFolder(string path)
- {
- _Path = path;
- FillROs();
- FillLibDocs();
- _Lookup = new ROFSTLookup(string.Format(@"{0}\RO.FST", Path));
- }
- public ApprovedFolder(string path, DocVersionInfo dvi)
- {
- _Path = path;
- FillROs();
- FillLibDocs();
- _Lookup = new ROFSTLookup(string.Format(@"{0}\RO.FST", Path));
- _EntryFromProc = FillEntryFromProcMulti(dvi);
- }
-
- private Dictionary FillEntryFromProcMulti(DocVersionInfo dvi)
- {
- Dictionary rv = new Dictionary();
- for (int i = 1; i <= dvi.MultiUnitCount; i++)
- {
- foreach (ProcedureInfo pi in dvi.Procedures)
- {
- pi.MyDocVersion.DocVersionConfig.SelectedSlave = i;
- rv.Add(pi.DisplayNumber, new ProcInfo(pi, Path));
- }
- }
- return rv;
- }
-
- private void FillLibDocs()
- {
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select distinct FROMNUMBER, TONUMBER from [tran] where tonumber like 'DOC%'", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- string number = dr["FROMNUMBER"].ToString();
- string libdoc = dr["TONUMBER"].ToString();
- if (!_LibDocs.ContainsKey(number))
- _LibDocs.Add(number, new List());
- if (!_LibDocs[number].Contains(libdoc))
- _LibDocs[number].Add(libdoc);
- }
- }
- }
- }
-
- private void FillROs()
- {
- using (OleDbDataAdapter da = new OleDbDataAdapter("Select distinct NUMBER, ROID from [usagero]", Connection))
- {
- using (DataSet ds = new DataSet())
- {
- da.Fill(ds);
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- string number = dr["NUMBER"].ToString();
- string roid = dr["ROID"].ToString();
- if (number.StartsWith("DOC"))
- {
- if (!_LibROs.ContainsKey(number))
- _LibROs.Add(number, new List());
- if (!_LibROs[number].Contains(roid))
- _LibROs[number].Add(roid);
- }
- else
- {
- if (!_ProcROs.ContainsKey(number))
- _ProcROs.Add(number, new List());
- if (!_ProcROs[number].Contains(roid))
- _ProcROs[number].Add(roid);
- }
- }
- }
- }
- }
- }
- public partial class ProcInfo
- {
- private log4net.ILog log;
- private string _Number;
- public string Number
- {
- get { return _Number; }
- set { _Number = value; }
- }
- private string _Entry;
- public string Entry
- {
- get { return _Entry; }
- set { _Entry = value; }
- }
- private string _UserID;
- public string UserID
- {
- get { return _UserID; }
- set { _UserID = value; }
- }
- private System.DateTime _StartDateTime;
- public System.DateTime StartDateTime
- {
- get { return _StartDateTime; }
- set { _StartDateTime = value; }
- }
- private string _Rev;
- public string Rev
- {
- get { return _Rev; }
- set { _Rev = value; }
- }
- private string _RevDate;
- public string RevDate
- {
- get { return _RevDate; }
- set { _RevDate = value; }
- }
- private string _ReviewDate;
- public string ReviewDate
- {
- get { return _ReviewDate; }
- set { _ReviewDate = value; }
- }
- public ProcInfo(ProcedureInfo pi, string afpath)
- {
- Number = pi.DisplayNumber;
- Entry = pi.DisplayText;
- UserID = pi.UserID;
- StartDateTime = pi.DTS;
- RevDate = pi.ProcedureConfig.Print_RevDate;
- Rev = pi.ProcedureConfig.Print_Rev;
- }
- public ProcInfo(DataRow dr, string afpath)
- {
- Number = dr["NUMBER"].ToString();
- Entry = dr["ENTRY"].ToString();
- UserID = dr["INITIALS"].ToString();
- if (UserID == string.Empty) UserID = "UNKNOWN";
- //string date = GetDTS(dr["DATE"].ToString(), dr["TIME"].ToString()).ToString("MM/dd/yyyy HH:MM");//System.DateTime.Parse(dr["DATE"].ToString()).ToString("MM/dd/yyyy");
- //string time = dr["TIME"].ToString();
- //if (time.EndsWith(":"))
- // date += " " + time.Substring(0, 2) + ":" + time.Substring(2, 2);
- //else
- // date += " " + time.Substring(0, 2) + ":" + time.Substring(3, 2);
- //StartDateTime = System.DateTime.Parse(date);
- StartDateTime = GetDTS(dr["DATE"].ToString(), dr["TIME"].ToString());
- RevDate = StartDateTime.ToString("MM/dd/yyyy");
- FixItems fis = new FixItems(new FileInfo(string.Format(@"{0}\{1}.fix", afpath, Entry)));
- if (fis.Count > 0)
- {
- Rev = fis[0].Rev;
- RevDate = fis[0].RevDate ?? GetDBFRevDate(afpath);
- ReviewDate = fis[0].ReviewDate;
- }
- }
- public System.DateTime GetDTS(string date, string time)
- {
- // Set the date/time stamp. If there is no 'date', set the date
- // to 1/1/2000 (this can be changed!). If there is not 'time',
- // set the time to 0:0:0 (midnight).
-
- System.DateTime dts = System.DateTime.Now;
- string month = "01";
- string day = "01";
- string year = "2000";
- string hour = "";
- string minute = "";
- try
- {
- if (date != null && date != "")
- {
- int indx1 = date.IndexOf("/");
- month = date.Substring(0, indx1);
- int indx2 = date.IndexOf("/", indx1 + 1);
- day = date.Substring(indx1 + 1, indx2 - indx1 - 1);
- year = date.Substring(indx2 + 1, 4);
- }
- if (time == null || time == "")
- {
- hour = "0";
- minute = "0";
- }
- else
- {
-
- hour = time.Substring(0, 2);
- int indxc = time.IndexOfAny(":A-".ToCharArray());
- if (indxc == time.Length - 1)
- minute = time.Substring(2, 2);
- else
- minute = time.Substring(indxc + 1, time.Length - indxc - 1);
- }
- dts = new System.DateTime(System.Convert.ToInt32(year), System.Convert.ToInt32(month), System.Convert.ToInt32(day),
- System.Convert.ToInt32(hour), System.Convert.ToInt32(minute), 0);
- }
- catch (System.Exception ex)
- {
- log.ErrorFormat("Bad Date/Time {0} {1}. Set to NOW.", date, time);
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- //frmMain.AddError(ex, "Bad Date/Time {0} {1}", date, time);
- log.ErrorFormat(ex.StackTrace);
- return dts;
- }
- return dts;
- }
-
- private string GetDBFRevDate(string afpath)
- {
- FileInfo fi = new FileInfo(afpath + @"\" + Entry + ".dbf");
- if (fi.Exists)
- return fi.LastWriteTime.ToShortDateString();
- return null;
- }
- }
-
-}
diff --git a/PROMS/DataLoader/BuildVEPROMS.Sql b/PROMS/DataLoader/BuildVEPROMS.Sql
deleted file mode 100644
index f687d469..00000000
--- a/PROMS/DataLoader/BuildVEPROMS.Sql
+++ /dev/null
@@ -1,1508 +0,0 @@
-USE [master]
-GO
-/****** Object: Database [{DBName}] Script Date: 01/06/2012 15:49:32 ******/
-IF EXISTS (SELECT name FROM sys.databases WHERE name = N'{DBName}')
-BEGIN
- PRINT 'Dropping existing database {DBName}'
- ALTER DATABASE [{DBName}] SET SINGLE_USER WITH ROLLBACK IMMEDIATE
- DROP DATABASE [{DBName}]
-END
-GO
-/****** Object: Database [{DBName}] Script Date: 01/06/2012 15:02:52 ******/
-PRINT 'Creating Database {DBName} - {DBPath}\{DBName}.mdf'
-GO
-CREATE DATABASE [{DBName}] ON PRIMARY
-( NAME = N'VEPROMS_Users', FILENAME = N'{DBPath}\{DBName}.mdf')
- LOG ON
-( NAME = N'VEPROMS_Users_log', FILENAME = N'{DBPath}\{DBName}_1.ldf')
- COLLATE SQL_Latin1_General_CP1_CI_AS
-GO
-PRINT '{DBName} Created'
-GO
-EXEC dbo.sp_dbcmptlevel @dbname=N'{DBName}', @new_cmptlevel=90
-GO
-PRINT '{sp_dbcmptlevel} Completed'
-GO
-IF (1 = FULLTEXTSERVICEPROPERTY('IsFullTextInstalled'))
-begin
-EXEC [{DBName}].[dbo].[sp_fulltext_database] @action = 'disable'
-end
-GO
-ALTER DATABASE [{DBName}] SET ANSI_NULL_DEFAULT OFF
-GO
-ALTER DATABASE [{DBName}] SET ANSI_NULLS OFF
-GO
-ALTER DATABASE [{DBName}] SET ANSI_PADDING OFF
-GO
-ALTER DATABASE [{DBName}] SET ANSI_WARNINGS OFF
-GO
-ALTER DATABASE [{DBName}] SET ARITHABORT OFF
-GO
-ALTER DATABASE [{DBName}] SET AUTO_CLOSE OFF
-GO
-ALTER DATABASE [{DBName}] SET AUTO_CREATE_STATISTICS ON
-GO
-ALTER DATABASE [{DBName}] SET AUTO_SHRINK OFF
-GO
-ALTER DATABASE [{DBName}] SET AUTO_UPDATE_STATISTICS ON
-GO
-ALTER DATABASE [{DBName}] SET CURSOR_CLOSE_ON_COMMIT OFF
-GO
-ALTER DATABASE [{DBName}] SET CURSOR_DEFAULT GLOBAL
-GO
-ALTER DATABASE [{DBName}] SET CONCAT_NULL_YIELDS_NULL OFF
-GO
-ALTER DATABASE [{DBName}] SET NUMERIC_ROUNDABORT OFF
-GO
-ALTER DATABASE [{DBName}] SET QUOTED_IDENTIFIER OFF
-GO
-ALTER DATABASE [{DBName}] SET RECURSIVE_TRIGGERS OFF
-GO
-ALTER DATABASE [{DBName}] SET DISABLE_BROKER
-GO
-ALTER DATABASE [{DBName}] SET AUTO_UPDATE_STATISTICS_ASYNC OFF
-GO
-ALTER DATABASE [{DBName}] SET DATE_CORRELATION_OPTIMIZATION OFF
-GO
-ALTER DATABASE [{DBName}] SET TRUSTWORTHY OFF
-GO
-ALTER DATABASE [{DBName}] SET ALLOW_SNAPSHOT_ISOLATION OFF
-GO
-ALTER DATABASE [{DBName}] SET PARAMETERIZATION SIMPLE
-GO
-ALTER DATABASE [{DBName}] SET READ_WRITE
-GO
-ALTER DATABASE [{DBName}] SET RECOVERY SIMPLE
-GO
-ALTER DATABASE [{DBName}] SET MULTI_USER
-GO
-ALTER DATABASE [{DBName}] SET PAGE_VERIFY CHECKSUM
-GO
-ALTER DATABASE [{DBName}] SET DB_CHAINING OFF
-GO
-USE [{DBName}]
-GO
-
-
-/****** Object: Table [dbo].[Connections] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Connections](
- [DBID] [int] IDENTITY(1,1) NOT NULL,
- [Name] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Title] [nvarchar](510) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [ConnectionString] [nvarchar](510) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [ServerType] [int] NOT NULL CONSTRAINT [DF_Connections_ServerType] DEFAULT ((1)),
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Connections_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Connections_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Connections] PRIMARY KEY CLUSTERED
-(
- [DBID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Connections] ON [Connections]
-(
- [Name] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 SQL Server' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Connections', @level2type=N'COLUMN',@level2name=N'ServerType'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Connections', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[RODbs] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [RODbs](
- [RODbID] [int] IDENTITY(1,1) NOT NULL,
- [ROName] [nvarchar](255) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [FolderPath] [nvarchar](255) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [DBConnectionString] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_RODbs_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_RODbs_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_RODbs] PRIMARY KEY CLUSTERED
-(
- [RODbID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_RODbs_FolderPath] ON [RODbs]
-(
- [FolderPath] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Hook for future - to allow the user to select multiple RO Databases assocaiated with on DocVersion' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'RODbs', @level2type=N'COLUMN',@level2name=N'ROName'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Path to the RO database' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'RODbs', @level2type=N'COLUMN',@level2name=N'FolderPath'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Connection String - Default could just be the full path and name of the database' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'RODbs', @level2type=N'COLUMN',@level2name=N'DBConnectionString'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'RODbs', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Locks] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Locks](
- [LockID] [int] IDENTITY(1,1) NOT NULL,
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Locks_UserID] DEFAULT (upper(suser_sname())),
- [LockType] [tinyint] NOT NULL CONSTRAINT [DF_Locks_LockType] DEFAULT ((0)),
- [LockItemID] [int] NOT NULL CONSTRAINT [DF_Locks_LockItemID] DEFAULT ((0)),
- [Description] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Locks_DTS] DEFAULT (getdate()),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Locks] PRIMARY KEY CLUSTERED
-(
- [LockID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Locks', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Documents] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-CREATE TABLE [Documents](
- [DocID] [int] IDENTITY(1,1) NOT NULL,
- [LibTitle] [nvarchar](1024) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DocContent] [varbinary](max) NULL,
- [DocAscii] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Documents_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Documents_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- [FileExtension] [nvarchar](10) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Documents_FileExtension] DEFAULT (N'.Doc'),
- CONSTRAINT [PK_Documents] PRIMARY KEY CLUSTERED
-(
- [DocID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Actual content of a Word Document (RTF, DOC or XML Format)' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Documents', @level2type=N'COLUMN',@level2name=N'DocContent'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Used for searching' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Documents', @level2type=N'COLUMN',@level2name=N'DocAscii'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Documents', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Groups] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Groups](
- [GID] [int] IDENTITY(1,1) NOT NULL,
- [GroupName] [nvarchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [GroupType] [int] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Groups_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Groups_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Groups] PRIMARY KEY CLUSTERED
-(
- [GID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Groups] ON [Groups]
-(
- [GroupName] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Groups', @level2type=N'COLUMN',@level2name=N'GID'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Groups', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Users] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Users](
- [UID] [int] IDENTITY(1,1) NOT NULL,
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Users_UserID] DEFAULT (upper(suser_sname())),
- [FirstName] [nvarchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [MiddleName] [nvarchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [LastName] [nvarchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Suffix] [nvarchar](10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [CourtesyTitle] [nvarchar](10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [PhoneNumber] [nvarchar](30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [CFGName] [nvarchar](8) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [UserLogin] [nvarchar](10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [UserName] [nvarchar](32) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Users_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Users_UserID1] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Users] PRIMARY KEY CLUSTERED
-(
- [UID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Users', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Formats] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Formats](
- [FormatID] [int] IDENTITY(1,1) NOT NULL,
- [ParentID] [int] NOT NULL CONSTRAINT [DF_Formats_ParentID] DEFAULT ((1)),
- [Name] [nvarchar](20) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Description] [nvarchar](250) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Data] [xml] NOT NULL,
- [GenMac] [xml] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Formats_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Formats_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Formats] PRIMARY KEY CLUSTERED
-(
- [FormatID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Formats] ON [Formats]
-(
- [ParentID] ASC,
- [Name] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_FormatsParentID] ON [Formats]
-(
- [ParentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Formats', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Sessions] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Sessions](
- [SessionID] [int] IDENTITY(1,1) NOT NULL,
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Sessions_UserID] DEFAULT (upper(suser_sname())),
- [DTSDtart] [datetime] NOT NULL CONSTRAINT [DF_Sessions_DTSDtart] DEFAULT (getdate()),
- [DTSEnd] [datetime] NULL,
- [DTSActivity] [datetime] NULL,
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Sessions] PRIMARY KEY CLUSTERED
-(
- [SessionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Sessions', @level2type=N'COLUMN',@level2name=N'DTSDtart'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Sessions', @level2type=N'COLUMN',@level2name=N'DTSEnd'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Sessions', @level2type=N'COLUMN',@level2name=N'DTSActivity'
-GO
-/****** Object: Table [dbo].[Branches] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Branches](
- [BranchID] [int] IDENTITY(1,1) NOT NULL,
- [VersionID] [int] NOT NULL CONSTRAINT [DF_Branches_VersionID] DEFAULT ((0)),
- [DateLimit] [datetime] NOT NULL CONSTRAINT [DF_Branches_DateLimit] DEFAULT (getdate()),
- [BeforeType] [tinyint] NOT NULL CONSTRAINT [DF_Branches_BeforeType] DEFAULT ((0)),
- [BeforeID] [int] NOT NULL CONSTRAINT [DF_Branches_BeforeID] DEFAULT ((0)),
- [AfterType] [tinyint] NOT NULL CONSTRAINT [DF_Branches_AfterType] DEFAULT ((0)),
- [AfterID] [int] NOT NULL CONSTRAINT [DF_Branches_AfterID] DEFAULT ((0)),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Branches] PRIMARY KEY CLUSTERED
-(
- [BranchID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Branches', @level2type=N'COLUMN',@level2name=N'DateLimit'
-GO
-/****** Object: Table [dbo].[AnnotationTypes] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [AnnotationTypes](
- [TypeID] [int] IDENTITY(1,1) NOT NULL,
- [Name] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_AnnotationTypes_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_AnnotationTypes_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_AnnotationTypes] PRIMARY KEY CLUSTERED
-(
- [TypeID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_AnnotationTypes_Name] ON [AnnotationTypes]
-(
- [Name] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'AnnotationTypes', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Owners] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Owners](
- [OwnerID] [int] IDENTITY(1,1) NOT NULL,
- [SessionID] [int] NOT NULL CONSTRAINT [DF_Owners_SessionID] DEFAULT ((0)),
- [OwnerType] [tinyint] NOT NULL CONSTRAINT [DF_Owners_OwnerType] DEFAULT ((0)),
- [OwnerItemID] [int] NOT NULL CONSTRAINT [DF_Owners_OwnerItemID] DEFAULT ((0)),
- [DTSStart] [datetime] NOT NULL CONSTRAINT [DF_Owners_DTSStart] DEFAULT (getdate()),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Owners] PRIMARY KEY CLUSTERED
-(
- [OwnerID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Owners', @level2type=N'COLUMN',@level2name=N'DTSStart'
-GO
-/****** Object: Table [dbo].[ApplicableStructures] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [ApplicableStructures](
- [StructureID] [int] NOT NULL,
- [AppItems] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_ApplicableStructures_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_ApplicableStructures_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_ApplicableStructures] PRIMARY KEY CLUSTERED
-(
- [StructureID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'A series of characters - Y means Applicable, N means Not Applicable, Space means undecided' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'ApplicableStructures', @level2type=N'COLUMN',@level2name=N'AppItems'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'ApplicableStructures', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Roles] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Roles](
- [RID] [int] IDENTITY(1,1) NOT NULL,
- [Name] [nvarchar](50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Title] [nvarchar](250) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Roles_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Roles_UsrID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Roles] PRIMARY KEY CLUSTERED
-(
- [RID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Roles] ON [Roles]
-(
- [Name] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Roles', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Associations] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Associations](
- [AssociationID] [int] IDENTITY(1,1) NOT NULL,
- [VersionID] [int] NOT NULL,
- [ROFstID] [int] NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Associations_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Associations_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Associations_1] PRIMARY KEY CLUSTERED
-(
- [AssociationID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Associations_VersionID_ROFstID] ON [Associations]
-(
- [VersionID] ASC,
- [ROFstID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Associations', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Folders] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Folders](
- [FolderID] [int] IDENTITY(1,1) NOT NULL,
- [ParentID] [int] NOT NULL CONSTRAINT [DF_Folders_ParentID] DEFAULT ((1)),
- [DBID] [int] NOT NULL CONSTRAINT [DF_DataSets_DBID] DEFAULT ((1)),
- [Name] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Title] [nvarchar](510) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [ShortName] [nvarchar](20) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [FormatID] [int] NULL,
- [ManualOrder] [float] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_DataSets_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_DataSets_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_DataSets] PRIMARY KEY CLUSTERED
-(
- [FolderID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_FoldersDBID] ON [Folders]
-(
- [DBID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_FoldersFormatID] ON [Folders]
-(
- [FormatID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_FoldersParentID] ON [Folders]
-(
- [ParentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_UniqueChildFolders] ON [Folders]
-(
- [ParentID] ASC,
- [Name] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Folders', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[DROUsages] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [DROUsages](
- [DROUsageID] [int] IDENTITY(1,1) NOT NULL,
- [DocID] [int] NOT NULL CONSTRAINT [DF_Table_1_ContentID] DEFAULT ((0)),
- [ROID] [nvarchar](16) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_DROUsages_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_DROUsages_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- [RODbID] [int] NOT NULL,
- CONSTRAINT [PK_DROUsages] PRIMARY KEY CLUSTERED
-(
- [DROUsageID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'DROUsages', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[ROImages] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-CREATE TABLE [ROImages](
- [ImageID] [int] IDENTITY(1,1) NOT NULL,
- [RODbID] [int] NOT NULL,
- [FileName] [nvarchar](255) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Content] [varbinary](max) NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_ROImages_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_ROImages_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_ROImages] PRIMARY KEY CLUSTERED
-(
- [ImageID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_ROImages_RODbID_FileName_DTS] ON [ROImages]
-(
- [RODbID] ASC,
- [FileName] ASC,
- [DTS] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'ROImages', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[ROFsts] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-CREATE TABLE [ROFsts](
- [ROFstID] [int] IDENTITY(1,1) NOT NULL,
- [RODbID] [int] NOT NULL,
- [ROLookup] [varbinary](max) NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Table_1_DTS1] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_ROFsts_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_ROFsts] PRIMARY KEY CLUSTERED
-(
- [ROFstID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_ROFsts] ON [ROFsts]
-(
- [RODbID] ASC,
- [DTS] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'ROFsts', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[RoUsages] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [RoUsages](
- [ROUsageID] [int] IDENTITY(1,1) NOT NULL,
- [ContentID] [int] NOT NULL CONSTRAINT [DF_RoUsages_StructureID] DEFAULT ((0)),
- [ROID] [nvarchar](16) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_RoUsages_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_RoUsages_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- [RODbID] [int] NOT NULL,
- CONSTRAINT [PK_RoUsages] PRIMARY KEY CLUSTERED
-(
- [ROUsageID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_RoUsagesContentID] ON [RoUsages]
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'RoUsages', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Figures] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Figures](
- [FigureID] [int] IDENTITY(1,1) NOT NULL,
- [ROFstID] [int] NOT NULL,
- [ImageID] [int] NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Figures_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Figures_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Figures_1] PRIMARY KEY CLUSTERED
-(
- [FigureID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE UNIQUE NONCLUSTERED INDEX [IX_Figures_ROFstID_ImageID] ON [Figures]
-(
- [ROFstID] ASC,
- [ImageID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Figures', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Entries] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Entries](
- [ContentID] [int] NOT NULL,
- [DocID] [int] NOT NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Entries_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Entries_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Entries] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_EntriesDocID] ON [Entries]
-(
- [DocID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Entries', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Pdfs] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-CREATE TABLE [Pdfs](
- [DocID] [int] NOT NULL,
- [DebugStatus] [int] NOT NULL,
- [TopRow] [int] NOT NULL,
- [PageLength] [int] NOT NULL,
- [LeftMargin] [int] NOT NULL,
- [PageWidth] [int] NOT NULL,
- [PageCount] [float] NOT NULL,
- [DocPdf] [varbinary](max) NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Pdfs_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Pdfs_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Pdfs] PRIMARY KEY CLUSTERED
-(
- [DocID] ASC,
- [DebugStatus] ASC,
- [TopRow] ASC,
- [PageLength] ASC,
- [LeftMargin] ASC,
- [PageWidth] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'> 0 for Debug' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Pdfs', @level2type=N'COLUMN',@level2name=N'DebugStatus'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Count of whole and partial pages' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Pdfs', @level2type=N'COLUMN',@level2name=N'PageCount'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Pdfs', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Memberships] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Memberships](
- [UGID] [int] IDENTITY(1,1) NOT NULL,
- [UID] [int] NOT NULL,
- [GID] [int] NOT NULL,
- [StartDate] [datetime] NOT NULL CONSTRAINT [DF_UserGroups_StartDate] DEFAULT (getdate()),
- [EndDate] [datetime] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Memberships_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Memberships_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_UserGroups] PRIMARY KEY CLUSTERED
-(
- [UGID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_MembershipsGID] ON [Memberships]
-(
- [GID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_MembershipsUID] ON [Memberships]
-(
- [UID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Memberships', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Assignments] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Assignments](
- [AID] [int] IDENTITY(1,1) NOT NULL,
- [GID] [int] NOT NULL,
- [RID] [int] NOT NULL,
- [FolderID] [int] NOT NULL,
- [StartDate] [datetime] NOT NULL CONSTRAINT [DF_Assignments_StartDate] DEFAULT (getdate()),
- [EndDate] [datetime] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Assignments_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Assignments_UsrID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Assignments] PRIMARY KEY CLUSTERED
-(
- [AID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_AssignmentsFolderID] ON [Assignments]
-(
- [FolderID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_AssignmentsGID] ON [Assignments]
-(
- [GID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_AssignmentsRID] ON [Assignments]
-(
- [RID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Assignments', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Parts] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Parts](
- [ContentID] [int] NOT NULL,
- [FromType] [int] NOT NULL,
- [ItemID] [int] NOT NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Parts_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Parts_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Parts] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC,
- [FromType] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_PartsItemID] ON [Parts]
-(
- [ItemID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Parts', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[DocVersions] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [DocVersions](
- [VersionID] [int] IDENTITY(1,1) NOT NULL,
- [FolderID] [int] NOT NULL,
- [VersionType] [int] NOT NULL CONSTRAINT [DF_Versions_VersionType] DEFAULT ((0)),
- [Name] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Title] [nvarchar](510) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [ItemID] [int] NULL,
- [FormatID] [int] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Versions_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Versions_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Versions] PRIMARY KEY CLUSTERED
-(
- [VersionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_DocVersionsFolderID] ON [DocVersions]
-(
- [FolderID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_DocVersionsFormatID] ON [DocVersions]
-(
- [FormatID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_DocVersionsItemID] ON [DocVersions]
-(
- [ItemID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 Working Draft, 1 Temporary, 128 Revision, 129 Approved (Greater than 127 - non editable)' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'DocVersions', @level2type=N'COLUMN',@level2name=N'VersionType'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'DocVersions', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Transitions] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Transitions](
- [TransitionID] [int] IDENTITY(1,1) NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [IsRange] [int] NOT NULL CONSTRAINT [DF_Transitions_IsRange] DEFAULT ((0)),
- [TranType] [int] NOT NULL CONSTRAINT [DF_Transitions_TranType] DEFAULT ((0)),
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Transitions_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Transitions_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_TranUsages] PRIMARY KEY CLUSTERED
-(
- [TransitionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_TransitionsFromID] ON [Transitions]
-(
- [FromID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_TransitionsRangeID] ON [Transitions]
-(
- [RangeID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_TransitionsToID] ON [Transitions]
-(
- [ToID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'StructureID' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Transitions', @level2type=N'COLUMN',@level2name=N'ToID'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 - Not a Range Transition, 1 - Range Transition, 2 - Range Transition - Extends to last Sibling' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Transitions', @level2type=N'COLUMN',@level2name=N'IsRange'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Transitions', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Annotations] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Annotations](
- [AnnotationID] [int] IDENTITY(1,1) NOT NULL,
- [ItemID] [int] NOT NULL,
- [TypeID] [int] NOT NULL,
- [RtfText] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [SearchText] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Annotations_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Annotations_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Annotations] PRIMARY KEY CLUSTERED
-(
- [AnnotationID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_AnnotationsItemID] ON [Annotations]
-(
- [ItemID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_AnnotationsTypeID] ON [Annotations]
-(
- [TypeID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Annotations', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Contents] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Contents](
- [ContentID] [int] IDENTITY(1,1) NOT NULL,
- [Number] [nvarchar](256) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Text] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [Type] [int] NULL,
- [FormatID] [int] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Contents_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Contents_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Contents] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_ContentsFormatID] ON [Contents]
-(
- [FormatID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'Increased from 30 to 256 to support RTF symbols' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Contents', @level2type=N'COLUMN',@level2name=N'Number'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 - Procedure, 10000 - Section, 20000 Step' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Contents', @level2type=N'COLUMN',@level2name=N'Type'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Contents', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Items] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Items](
- [ItemID] [int] IDENTITY(1,1) NOT NULL,
- [PreviousID] [int] NULL,
- [ContentID] [int] NOT NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Items_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Items_UsrID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Items] PRIMARY KEY CLUSTERED
-(
- [ItemID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_ItemsContentID] ON [Items]
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_ItemsPreviousID] ON [Items]
-(
- [PreviousID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Items', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-
-/****** Object: Table [dbo].[Scopes] Script Date: 01/06/2012 15:02:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Scopes](
- [ScopeID] [int] IDENTITY(1,1) NOT NULL,
- [Name] [nvarchar](100) NOT NULL,
- [Title] [nvarchar](510) NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Scopes_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Scopes_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Scopes] PRIMARY KEY CLUSTERED
-(
- [ScopeID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Scopes', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-
-/****** Object: Table [dbo].[Applicabilities] Script Date: 01/06/2012 15:02:52 ******/
---SET ANSI_NULLS ON
---GO
---SET QUOTED_IDENTIFIER ON
---GO
---CREATE TABLE [Applicabilities](
--- [ItemID] [int] NOT NULL,
--- [ScopeID] [int] NOT NULL,
--- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Applicabilities_DTS] DEFAULT (getdate()),
--- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Applicabilities_UserID] DEFAULT (upper(suser_sname())),
--- [LastChanged] [timestamp] NOT NULL,
--- CONSTRAINT [PK_Applicabilities] PRIMARY KEY CLUSTERED
---(
--- [ItemID] ASC,
--- [ScopeID] ASC
---)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
---) ON [PRIMARY]
---GO
---EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Applicabilities', @level2type=N'COLUMN',@level2name=N'DTS'
---GO
-
-/****** Object: Table [dbo].[Details] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Details](
- [DetailID] [int] IDENTITY(1,1) NOT NULL,
- [ContentID] [int] NOT NULL,
- [ItemType] [int] NOT NULL,
- [Text] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_StepTexts_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_StepTexts_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_StepTexts] PRIMARY KEY CLUSTERED
-(
- [DetailID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_DetailsContentID] ON [Details]
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Details', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[ZContents] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [ZContents](
- [ContentID] [int] NOT NULL,
- [OldStepSequence] [nvarchar](32) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_ZContents] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-/****** Object: Table [dbo].[Grids] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Grids](
- [ContentID] [int] NOT NULL,
- [Data] [xml] NOT NULL,
- [Config] [xml] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Grids_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Grids_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Grids] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Grids', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[Images] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-CREATE TABLE [Images](
- [ContentID] [int] NOT NULL,
- [ImageType] [int] NOT NULL CONSTRAINT [DF_Images_ImageType] DEFAULT ((1)),
- [FileName] [nvarchar](255) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [Data] [varbinary](max) NOT NULL,
- [Config] [xml] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Images_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Images_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Images] PRIMARY KEY CLUSTERED
-(
- [ContentID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'1 - Figure, 2 - Video, 3 - Audio' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Images', @level2type=N'COLUMN',@level2name=N'ImageType'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Images', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: Table [dbo].[ZTransitions] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [ZTransitions](
- [TransitionID] [int] NOT NULL,
- [oldto] [nvarchar](32) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_ZTransitions] PRIMARY KEY CLUSTERED
-(
- [TransitionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-/****** Object: Table [dbo].[Permissions] Script Date: 01/06/2012 15:02:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE TABLE [Permissions](
- [PID] [int] IDENTITY(1,1) NOT NULL,
- [RID] [int] NOT NULL,
- [PermLevel] [int] NOT NULL,
- [VersionType] [int] NOT NULL,
- [PermValue] [int] NOT NULL,
- [PermAD] [int] NOT NULL CONSTRAINT [DF_Permissions_PermAD] DEFAULT ((0)),
- [StartDate] [datetime] NOT NULL CONSTRAINT [DF_Permissions_StartDate] DEFAULT (getdate()),
- [EndDate] [datetime] NULL,
- [Config] [nvarchar](max) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Permissions_DTS] DEFAULT (getdate()),
- [UsrID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF_Permissions_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Permissions] PRIMARY KEY CLUSTERED
-(
- [PID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-CREATE NONCLUSTERED INDEX [IX_PermissionsRID] ON [Permissions]
-(
- [RID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 - None, 1 - Security, 2 - System, 3 - RO, 4 - Procdures, 5 - Sections, 6 - Steps, 7 - Comments' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Permissions', @level2type=N'COLUMN',@level2name=N'PermLevel'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 - None, 1 - Working Draft, 2 - Approved, (3 - All)' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Permissions', @level2type=N'COLUMN',@level2name=N'VersionType'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'1 - Read, 2 - Write, 4 - Create, 8 - Delete (15 - All)' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Permissions', @level2type=N'COLUMN',@level2name=N'PermValue'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'0 - Allow, 1 - Deny' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Permissions', @level2type=N'COLUMN',@level2name=N'PermAD'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Permissions', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-/****** Object: ForeignKey [FK_Formats_ParentID] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Formats] WITH CHECK ADD CONSTRAINT [FK_Formats_ParentID] FOREIGN KEY([ParentID])
-REFERENCES [Formats] ([FormatID])
-GO
-ALTER TABLE [Formats] CHECK CONSTRAINT [FK_Formats_ParentID]
-GO
-/****** Object: ForeignKey [FK_Associations_DocVersions] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Associations] WITH CHECK ADD CONSTRAINT [FK_Associations_DocVersions] FOREIGN KEY([VersionID])
-REFERENCES [DocVersions] ([VersionID])
-GO
-ALTER TABLE [Associations] CHECK CONSTRAINT [FK_Associations_DocVersions]
-GO
-/****** Object: ForeignKey [FK_Associations_ROFsts] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Associations] WITH CHECK ADD CONSTRAINT [FK_Associations_ROFsts] FOREIGN KEY([ROFstID])
-REFERENCES [ROFsts] ([ROFstID])
-GO
-ALTER TABLE [Associations] CHECK CONSTRAINT [FK_Associations_ROFsts]
-GO
-/****** Object: ForeignKey [FK__Folders__ParentID] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Folders] WITH CHECK ADD CONSTRAINT [FK__Folders__ParentID] FOREIGN KEY([ParentID])
-REFERENCES [Folders] ([FolderID])
-GO
-ALTER TABLE [Folders] CHECK CONSTRAINT [FK__Folders__ParentID]
-GO
-/****** Object: ForeignKey [FK_Folders_Connections] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Folders] WITH CHECK ADD CONSTRAINT [FK_Folders_Connections] FOREIGN KEY([DBID])
-REFERENCES [Connections] ([DBID])
-GO
-ALTER TABLE [Folders] CHECK CONSTRAINT [FK_Folders_Connections]
-GO
-/****** Object: ForeignKey [FK_Folders_Formats] Script Date: 01/06/2012 15:02:52 ******/
-ALTER TABLE [Folders] WITH CHECK ADD CONSTRAINT [FK_Folders_Formats] FOREIGN KEY([FormatID])
-REFERENCES [Formats] ([FormatID])
-GO
-ALTER TABLE [Folders] CHECK CONSTRAINT [FK_Folders_Formats]
-GO
-/****** Object: ForeignKey [FK_DROUsages_Documents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [DROUsages] WITH CHECK ADD CONSTRAINT [FK_DROUsages_Documents] FOREIGN KEY([DocID])
-REFERENCES [Documents] ([DocID])
-GO
-ALTER TABLE [DROUsages] CHECK CONSTRAINT [FK_DROUsages_Documents]
-GO
-/****** Object: ForeignKey [FK_DROUsages_RODbs] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [DROUsages] WITH CHECK ADD CONSTRAINT [FK_DROUsages_RODbs] FOREIGN KEY([RODbID])
-REFERENCES [RODbs] ([RODbID])
-GO
-ALTER TABLE [DROUsages] CHECK CONSTRAINT [FK_DROUsages_RODbs]
-GO
-/****** Object: ForeignKey [FK_Figures_RODbs] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [ROImages] WITH CHECK ADD CONSTRAINT [FK_Figures_RODbs] FOREIGN KEY([RODbID])
-REFERENCES [RODbs] ([RODbID])
-GO
-ALTER TABLE [ROImages] CHECK CONSTRAINT [FK_Figures_RODbs]
-GO
-/****** Object: ForeignKey [FK_ROFsts_RODbs] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [ROFsts] WITH CHECK ADD CONSTRAINT [FK_ROFsts_RODbs] FOREIGN KEY([RODbID])
-REFERENCES [RODbs] ([RODbID])
-GO
-ALTER TABLE [ROFsts] CHECK CONSTRAINT [FK_ROFsts_RODbs]
-GO
-/****** Object: ForeignKey [FK_RoUsages_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [RoUsages] WITH CHECK ADD CONSTRAINT [FK_RoUsages_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [RoUsages] CHECK CONSTRAINT [FK_RoUsages_Contents]
-GO
-/****** Object: ForeignKey [FK_ROUsages_RODbs] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [RoUsages] WITH CHECK ADD CONSTRAINT [FK_ROUsages_RODbs] FOREIGN KEY([RODbID])
-REFERENCES [RODbs] ([RODbID])
-GO
-ALTER TABLE [RoUsages] CHECK CONSTRAINT [FK_ROUsages_RODbs]
-GO
-/****** Object: ForeignKey [FK_Figures_ROFsts] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Figures] WITH CHECK ADD CONSTRAINT [FK_Figures_ROFsts] FOREIGN KEY([ROFstID])
-REFERENCES [ROFsts] ([ROFstID])
-GO
-ALTER TABLE [Figures] CHECK CONSTRAINT [FK_Figures_ROFsts]
-GO
-/****** Object: ForeignKey [FK_Figures_ROImages] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Figures] WITH CHECK ADD CONSTRAINT [FK_Figures_ROImages] FOREIGN KEY([ImageID])
-REFERENCES [ROImages] ([ImageID])
-GO
-ALTER TABLE [Figures] CHECK CONSTRAINT [FK_Figures_ROImages]
-GO
-/****** Object: ForeignKey [FK_Entries_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Entries] WITH CHECK ADD CONSTRAINT [FK_Entries_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Entries] CHECK CONSTRAINT [FK_Entries_Contents]
-GO
-/****** Object: ForeignKey [FK_Entries_Documents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Entries] WITH CHECK ADD CONSTRAINT [FK_Entries_Documents] FOREIGN KEY([DocID])
-REFERENCES [Documents] ([DocID])
-GO
-ALTER TABLE [Entries] CHECK CONSTRAINT [FK_Entries_Documents]
-GO
-/****** Object: ForeignKey [FK_Pdfs_Documents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Pdfs] WITH CHECK ADD CONSTRAINT [FK_Pdfs_Documents] FOREIGN KEY([DocID])
-REFERENCES [Documents] ([DocID])
-GO
-ALTER TABLE [Pdfs] CHECK CONSTRAINT [FK_Pdfs_Documents]
-GO
-/****** Object: ForeignKey [FK_Memberships_Groups] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Memberships] WITH CHECK ADD CONSTRAINT [FK_Memberships_Groups] FOREIGN KEY([GID])
-REFERENCES [Groups] ([GID])
-GO
-ALTER TABLE [Memberships] CHECK CONSTRAINT [FK_Memberships_Groups]
-GO
-/****** Object: ForeignKey [FK_Memberships_Users] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Memberships] WITH CHECK ADD CONSTRAINT [FK_Memberships_Users] FOREIGN KEY([UID])
-REFERENCES [Users] ([UID])
-GO
-ALTER TABLE [Memberships] CHECK CONSTRAINT [FK_Memberships_Users]
-GO
-/****** Object: ForeignKey [FK_Assignments_Folders] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Assignments] WITH CHECK ADD CONSTRAINT [FK_Assignments_Folders] FOREIGN KEY([FolderID])
-REFERENCES [Folders] ([FolderID])
-GO
-ALTER TABLE [Assignments] CHECK CONSTRAINT [FK_Assignments_Folders]
-GO
-/****** Object: ForeignKey [FK_Assignments_Groups] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Assignments] WITH CHECK ADD CONSTRAINT [FK_Assignments_Groups] FOREIGN KEY([GID])
-REFERENCES [Groups] ([GID])
-GO
-ALTER TABLE [Assignments] CHECK CONSTRAINT [FK_Assignments_Groups]
-GO
-/****** Object: ForeignKey [FK_Assignments_Roles] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Assignments] WITH CHECK ADD CONSTRAINT [FK_Assignments_Roles] FOREIGN KEY([RID])
-REFERENCES [Roles] ([RID])
-GO
-ALTER TABLE [Assignments] CHECK CONSTRAINT [FK_Assignments_Roles]
-GO
-/****** Object: ForeignKey [FK_Parts_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Parts] WITH CHECK ADD CONSTRAINT [FK_Parts_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Parts] CHECK CONSTRAINT [FK_Parts_Contents]
-GO
-/****** Object: ForeignKey [FK_Parts_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Parts] WITH CHECK ADD CONSTRAINT [FK_Parts_Items] FOREIGN KEY([ItemID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [Parts] CHECK CONSTRAINT [FK_Parts_Items]
-GO
-/****** Object: ForeignKey [FK_DocVersions_Formats] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [DocVersions] WITH CHECK ADD CONSTRAINT [FK_DocVersions_Formats] FOREIGN KEY([FormatID])
-REFERENCES [Formats] ([FormatID])
-GO
-ALTER TABLE [DocVersions] CHECK CONSTRAINT [FK_DocVersions_Formats]
-GO
-/****** Object: ForeignKey [FK_DocVersions_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [DocVersions] WITH CHECK ADD CONSTRAINT [FK_DocVersions_Items] FOREIGN KEY([ItemID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [DocVersions] CHECK CONSTRAINT [FK_DocVersions_Items]
-GO
-/****** Object: ForeignKey [FK_Versions_Folders] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [DocVersions] WITH CHECK ADD CONSTRAINT [FK_Versions_Folders] FOREIGN KEY([FolderID])
-REFERENCES [Folders] ([FolderID])
-GO
-ALTER TABLE [DocVersions] CHECK CONSTRAINT [FK_Versions_Folders]
-GO
-/****** Object: ForeignKey [FK_TransitionsFromID_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Transitions] WITH CHECK ADD CONSTRAINT [FK_TransitionsFromID_Contents] FOREIGN KEY([FromID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Transitions] CHECK CONSTRAINT [FK_TransitionsFromID_Contents]
-GO
-/****** Object: ForeignKey [FK_TransitionsRangeId_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Transitions] WITH CHECK ADD CONSTRAINT [FK_TransitionsRangeId_Items] FOREIGN KEY([RangeID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [Transitions] CHECK CONSTRAINT [FK_TransitionsRangeId_Items]
-GO
-/****** Object: ForeignKey [FK_TransitionsToId_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Transitions] WITH CHECK ADD CONSTRAINT [FK_TransitionsToId_Items] FOREIGN KEY([ToID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [Transitions] CHECK CONSTRAINT [FK_TransitionsToId_Items]
-GO
-/****** Object: ForeignKey [FK_Annotations_AnnotationTypes] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Annotations] WITH CHECK ADD CONSTRAINT [FK_Annotations_AnnotationTypes] FOREIGN KEY([TypeID])
-REFERENCES [AnnotationTypes] ([TypeID])
-GO
-ALTER TABLE [Annotations] CHECK CONSTRAINT [FK_Annotations_AnnotationTypes]
-GO
-/****** Object: ForeignKey [FK_Annotations_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Annotations] WITH CHECK ADD CONSTRAINT [FK_Annotations_Items] FOREIGN KEY([ItemID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [Annotations] CHECK CONSTRAINT [FK_Annotations_Items]
-GO
-/****** Object: ForeignKey [FK_Contents_Formats] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Contents] WITH CHECK ADD CONSTRAINT [FK_Contents_Formats] FOREIGN KEY([FormatID])
-REFERENCES [Formats] ([FormatID])
-GO
-ALTER TABLE [Contents] CHECK CONSTRAINT [FK_Contents_Formats]
-GO
-/****** Object: ForeignKey [FK_Items_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Items] WITH CHECK ADD CONSTRAINT [FK_Items_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Items] CHECK CONSTRAINT [FK_Items_Contents]
-GO
-/****** Object: ForeignKey [FK_Items_Items] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Items] WITH CHECK ADD CONSTRAINT [FK_Items_Items] FOREIGN KEY([PreviousID])
-REFERENCES [Items] ([ItemID])
-GO
-ALTER TABLE [Items] CHECK CONSTRAINT [FK_Items_Items]
-GO
-/****** Object: ForeignKey [FK_Details_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Details] WITH CHECK ADD CONSTRAINT [FK_Details_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Details] CHECK CONSTRAINT [FK_Details_Contents]
-GO
-/****** Object: ForeignKey [FK_ZContents_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [ZContents] WITH CHECK ADD CONSTRAINT [FK_ZContents_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [ZContents] CHECK CONSTRAINT [FK_ZContents_Contents]
-GO
-/****** Object: ForeignKey [FK_Grids_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Grids] WITH CHECK ADD CONSTRAINT [FK_Grids_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Grids] CHECK CONSTRAINT [FK_Grids_Contents]
-GO
-/****** Object: ForeignKey [FK_Images_Contents] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Images] WITH CHECK ADD CONSTRAINT [FK_Images_Contents] FOREIGN KEY([ContentID])
-REFERENCES [Contents] ([ContentID])
-GO
-ALTER TABLE [Images] CHECK CONSTRAINT [FK_Images_Contents]
-GO
-/****** Object: ForeignKey [FK_ZTransitions_Transitions] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [ZTransitions] WITH CHECK ADD CONSTRAINT [FK_ZTransitions_Transitions] FOREIGN KEY([TransitionID])
-REFERENCES [Transitions] ([TransitionID])
-GO
-ALTER TABLE [ZTransitions] CHECK CONSTRAINT [FK_ZTransitions_Transitions]
-GO
-/****** Object: ForeignKey [FK_Permissions_Roles] Script Date: 01/06/2012 15:02:53 ******/
-ALTER TABLE [Permissions] WITH CHECK ADD CONSTRAINT [FK_Permissions_Roles] FOREIGN KEY([RID])
-REFERENCES [Roles] ([RID])
-GO
-ALTER TABLE [Permissions] CHECK CONSTRAINT [FK_Permissions_Roles]
-GO
---ALTER TABLE [dbo].[Applicabilities] WITH CHECK ADD CONSTRAINT [FK_Applicabilities_Items] FOREIGN KEY([ItemID])
---REFERENCES [dbo].[Items] ([ItemID])
---GO
---ALTER TABLE [dbo].[Applicabilities] CHECK CONSTRAINT [FK_Applicabilities_Items]
---GO
---ALTER TABLE [dbo].[Applicabilities] WITH CHECK ADD CONSTRAINT [FK_Applicabilities_Scopes] FOREIGN KEY([ScopeID])
---REFERENCES [dbo].[Scopes] ([ScopeID])
---GO
---ALTER TABLE [dbo].[Applicabilities] CHECK CONSTRAINT [FK_Applicabilities_Scopes]
---GO
-/****** Object: View [dbo].[vDuplicates1] Script Date: 01/06/2012 15:02:55 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE view [vDuplicates1] as
-SELECT Min(ContentID) MinID,Max(ContentID) MaxID,[Number],[Text],[Type],[FormatID],[Config],count(*) HowMany
- FROM [Contents]
-where contentid not in (select contentid from parts)
-group by [Number],[Text],[Type],[FormatID],[Config]
-having count(*) > 1 and type >= 20000
-GO
-/****** Object: View [dbo].[vDuplicates2] Script Date: 01/06/2012 15:02:55 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-create view [vDuplicates2] as
-SELECT Min(ContentID) MinID,Max(ContentID) MaxID,[Number],[Text],[Type],[FormatID],[Config],count(*) HowMany
- FROM [Contents]
-where contentid in (select contentid from parts)
-group by [Number],[Text],[Type],[FormatID],[Config]
-having count(*) > 1 and type >= 20000
-GO
-/****** Object: Trigger [trigAddFolder] Script Date: 01/06/2012 15:02:56 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
--- =============================================
--- Author:
--- Create date:
--- Description:
--- =============================================
-CREATE TRIGGER [trigAddFolder]
- ON [Folders]
- AFTER INSERT
-AS
-BEGIN
-
- SET NOCOUNT ON;
- --select max(fld.ManualOrder) from folders fld join inserted ins on fld.ParentID = Ins.ParentID
- --Select ROW_NUMBER() OVER(Partition by [ParentID] Order BY FolderID) + (select max(ManualOrder) from folders where ParentID = Inserted.ParentID) as RowNumber,* from Inserted
- Update Fld set Fld.ManualOrder = Ins.RowNumber
- From Folders Fld join
- (Select ROW_NUMBER() OVER(Partition by [ParentID] Order BY FolderID)
-+ (select isnull(max(ManualOrder),0) from folders where ParentID =
-Inserted.ParentID) as RowNumber,* from Inserted)
- Ins on Ins.FolderID = Fld.FolderID
- Print 'Trigger Fired'
-END
-GO
-INSERT INTO [Connections] ([Name]) VALUES ('Bozo')
-INSERT INTO [Formats] ([Name],[Data]) VALUES ('Bozo',cast('' as xml))
-INSERT INTO [Folders] ([Name],[ShortName],[ManualOrder]) VALUES ('Bozo','Bozo',1)
-INSERT INTO [DocVersions] ([FolderID],[Name]) VALUES (1,'Bozo')
-INSERT INTO [Contents]([Number]) VALUES('Bozo')
-INSERT INTO [Items] ([ContentID]) VALUES (1)
-INSERT INTO [RODbs] ([ROName],[FolderPath],[DBConnectionString]) VALUES ('Bozo','Bozo','Bozo')
-INSERT INTO [ROFsts] ([RODbID],[ROLookup]) VALUES(1,Cast('Bozo' as varbinary))
-Insert Into [Transitions] ([FromID],[ToID],[RangeID]) VALUES (1,1,1)
-Insert Into [AnnotationTypes] ([Name]) VALUES ('Bozo')
-Insert Into [Annotations] ([ItemID],[TypeID]) VALUES (1,1)
-Insert Into [Groups] ([GroupName]) VALUES ('Bozo')
-Insert Into [Details] ([ContentID],[ItemType],[Text]) VALUES (1,1,'Bozo')
-Insert Into [Roles] ([Name],[Title]) VALUES ('Bozo','Bozo')
-Insert Into [Permissions] ([RID],[PermLevel],[VersionType],[PermValue]) VALUES (1,1,1,1)
-Insert Into [Scopes] ([Name]) VALUES ('Bozo')
---Insert Into [Applicabilities] ([ItemID],[ScopeID]) VALUES (1,1)
-Insert Into [Associations] ([VersionID],[ROFstID]) VALUES (1,1)
-INSERT INTO [Documents] ([LibTitle]) VALUES ('Bozo')
-Insert Into [DROUsages] ([DocID],[ROID],[RODbID]) VALUES (1,'Bozo',1)
-Insert Into [ROImages] ([RODbID],[FileName],[Content]) VALUES (1,'Bozo',cast ('Bozo' as varbinary))
-Insert Into [RoUsages] ([ContentID],[ROID],[RODbID]) VALUES (1,1,1)
-Insert Into [Figures] ([ROFstID],[ImageID]) VALUES (1,1)
-INSERT INTO [Users] ([UserID]) VALUES ('Bozo')
-Insert Into [Memberships] ([UID],[GID]) VALUES (1,1)
-Insert Into [Assignments] ([GID],[RID],[FolderID]) VALUES (1,1,1)
-GO
-sp_changedbowner sa
-GO
-USE MASTER
-GO
diff --git a/PROMS/DataLoader/ClassDiagram1.cd b/PROMS/DataLoader/ClassDiagram1.cd
deleted file mode 100644
index 0519ecba..00000000
--- a/PROMS/DataLoader/ClassDiagram1.cd
+++ /dev/null
@@ -1 +0,0 @@
-
\ No newline at end of file
diff --git a/PROMS/DataLoader/ConfigInfo.cs b/PROMS/DataLoader/ConfigInfo.cs
deleted file mode 100644
index 51fb8122..00000000
--- a/PROMS/DataLoader/ConfigInfo.cs
+++ /dev/null
@@ -1,145 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Xml;
-
-namespace DataLoader
-{
- class ConfigInfo
- {
- private XmlDocument xmldoc;
- public ConfigInfo(string xml)
- {
- xmldoc = new XmlDocument();
- if (xml == null)
- xmldoc.LoadXml("");
- else
- xmldoc.LoadXml(xml);
- }
-
- public ConfigInfo(string xml, string ename, string aname, string avalue)
- {
- xmldoc = new XmlDocument();
- if (xml == null)
- xmldoc.LoadXml("");
- else
- xmldoc.LoadXml(xml);
- AddItem(ename, aname.Replace(' ','_'), avalue);
- }
- public bool AddItem(string ename, string aname, string avalue)
- {
- if (aname != null && aname != "")
- {
- //if (xmldoc == null)
- //{
- // xmldoc = new XmlDocument();
- // xmldoc.AppendChild(xmldoc.CreateElement("ConfigInfo"));
- //}
- // see if ename element exists, use it to add attributes,
- // otherwise, create the element.
-
- XmlNode nxml = null;
- XmlNodeList xl = xmldoc.DocumentElement.SelectNodes(string.Format("//{0}", ename));
- switch (xl.Count)
- {
- case 0: // No nodes found
- nxml = xmldoc.DocumentElement.AppendChild(xmldoc.CreateElement(ename));
- break;
- default: // Found the node
- nxml = xl[0];
- if (nxml.GetType() != typeof(XmlElement))
- {
- frmLoader._MyLog.ErrorFormat("Invalid xml element type when migrating config data - element = {0}, name = {1} , value = {2}", ename, aname, avalue);
- return false;
- }
- break;
- }
- XmlAttribute xa = nxml.Attributes.Append(xmldoc.CreateAttribute(aname.Replace(' ', '_')));
- //added by jcb 20131216
- //aname = SanitizeXmlString(aname);
- //XmlAttribute xa = nxml.Attributes.Append(xmldoc.CreateAttribute(aname));
- //end added by jcb 20131216
- xa.Value = avalue;
- return true;
- }
- return false;
- }
-
- //added by jcb 20131216
- public string SanitizeXmlString(string xml)
- {
- if (xml == null)
- throw new ArgumentNullException("xml");
- xml = xml.Replace(' ', '_').Replace("/", "_fslash_").Replace("(", "_lparen_").Replace((char)0xA0, '_').Replace((char)0x20, '_').Replace(":", "_colon_");
- StringBuilder buffer = new StringBuilder(xml.Length);
- foreach (char c in xml)
- {
- if (IsLegalXmlChar(c))
- buffer.Append(c);
- }
- return buffer.ToString();
- }
-
- ///
- /// Whether a given character is allowed by XML 1.0.
- ///
- public bool IsLegalXmlChar(int character)
- {
- return
- (
- character == 0x9 /* == '\t' == 9 */ ||
- character == 0xA /* == '\n' == 10 */ ||
- character == 0xD /* == '\r' == 13 */ ||
- (character >= 0x20 && character <= 0xD7FF) ||
- (character >= 0xE000 && character <= 0xFFFD) ||
- (character >= 0x10000 && character <= 0x10FFFF)
- );
- }
- //end added by jcb 20131216
-
- public int ItemCount
- {
- get { return xmldoc.DocumentElement.ChildNodes.Count; }
- }
-
- public override string ToString()
- {
- if (xmldoc != null) return xmldoc.InnerXml;
- else return null;
- }
- public void AddSlaveNode(int index)
- {
- XmlElement slaves = xmldoc.SelectSingleNode("Config/Slaves") as XmlElement;
- if (slaves == null)
- {
- slaves = xmldoc.CreateElement("Slaves");
- xmldoc.DocumentElement.AppendChild(slaves);
- }
- XmlElement slave = xmldoc.CreateElement("Slave");
- XmlAttribute xa = xmldoc.CreateAttribute("index");
- xa.InnerText = index.ToString();
- slave.Attributes.Append(xa);
- slaves.AppendChild(slave);
- }
- public void AddSlaveItem(int index, string aname, string avalue)
- {
- string srch = "Config/Slaves/Slave[@index='" + index.ToString() + "']";
- XmlElement slave = xmldoc.SelectSingleNode(srch) as XmlElement;
- if (slave != null)
- {
- XmlAttribute xa = xmldoc.CreateAttribute(aname);
- xa.InnerText = avalue;
- slave.Attributes.Append(xa);
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/ConfigInfo.cs.bak b/PROMS/DataLoader/ConfigInfo.cs.bak
deleted file mode 100644
index 3685ece5..00000000
--- a/PROMS/DataLoader/ConfigInfo.cs.bak
+++ /dev/null
@@ -1,144 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Xml;
-
-namespace DataLoader
-{
- class ConfigInfo
- {
- private XmlDocument xmldoc;
- public ConfigInfo(string xml)
- {
- xmldoc = new XmlDocument();
- if (xml == null)
- xmldoc.LoadXml("");
- else
- xmldoc.LoadXml(xml);
- }
-
- public ConfigInfo(string xml, string ename, string aname, string avalue)
- {
- xmldoc = new XmlDocument();
- if (xml == null)
- xmldoc.LoadXml("");
- else
- xmldoc.LoadXml(xml);
- AddItem(ename, aname.Replace(' ','_'), avalue);
- }
- public bool AddItem(string ename, string aname, string avalue)
- {
- if (aname != null && aname != "")
- {
- //if (xmldoc == null)
- //{
- // xmldoc = new XmlDocument();
- // xmldoc.AppendChild(xmldoc.CreateElement("ConfigInfo"));
- //}
- // see if ename element exists, use it to add attributes,
- // otherwise, create the element.
-
- XmlNode nxml = null;
- XmlNodeList xl = xmldoc.DocumentElement.SelectNodes(string.Format("//{0}", ename));
- switch (xl.Count)
- {
- case 0: // No nodes found
- nxml = xmldoc.DocumentElement.AppendChild(xmldoc.CreateElement(ename));
- break;
- default: // Found the node
- nxml = xl[0];
- if (nxml.GetType() != typeof(XmlElement))
- {
- frmLoader._MyLog.ErrorFormat("Invalid xml element type when migrating config data - element = {0}, name = {1} , value = {2}", ename, aname, avalue);
- return false;
- }
- break;
- }
- //added by jcb 20131216
- aname = SanitizeXmlString(aname);
- XmlAttribute xa = nxml.Attributes.Append(xmldoc.CreateAttribute(aname));
- //end added by jcb 20131216
- xa.Value = avalue;
- return true;
- }
- return false;
- }
-
- //added by jcb 20131216
- public string SanitizeXmlString(string xml)
- {
- if (xml == null)
- throw new ArgumentNullException("xml");
- xml = xml.Replace(' ', '_').Replace("/", "_fslash_").Replace("(", "_lparen_").Replace((char)0xA0, '_').Replace((char)0x20, '_').Replace(":", "_colon_");
- StringBuilder buffer = new StringBuilder(xml.Length);
- foreach (char c in xml)
- {
- if (IsLegalXmlChar(c))
- buffer.Append(c);
- }
- return buffer.ToString();
- }
-
- ///
- /// Whether a given character is allowed by XML 1.0.
- ///
- public bool IsLegalXmlChar(int character)
- {
- return
- (
- character == 0x9 /* == '\t' == 9 */ ||
- character == 0xA /* == '\n' == 10 */ ||
- character == 0xD /* == '\r' == 13 */ ||
- (character >= 0x20 && character <= 0xD7FF) ||
- (character >= 0xE000 && character <= 0xFFFD) ||
- (character >= 0x10000 && character <= 0x10FFFF)
- );
- }
- //end added by jcb 20131216
-
- public int ItemCount
- {
- get { return xmldoc.DocumentElement.ChildNodes.Count; }
- }
-
- public override string ToString()
- {
- if (xmldoc != null) return xmldoc.InnerXml;
- else return null;
- }
- public void AddSlaveNode(int index)
- {
- XmlElement slaves = xmldoc.SelectSingleNode("Config/Slaves") as XmlElement;
- if (slaves == null)
- {
- slaves = xmldoc.CreateElement("Slaves");
- xmldoc.DocumentElement.AppendChild(slaves);
- }
- XmlElement slave = xmldoc.CreateElement("Slave");
- XmlAttribute xa = xmldoc.CreateAttribute("index");
- xa.InnerText = index.ToString();
- slave.Attributes.Append(xa);
- slaves.AppendChild(slave);
- }
- public void AddSlaveItem(int index, string aname, string avalue)
- {
- string srch = "Config/Slaves/Slave[@index='" + index.ToString() + "']";
- XmlElement slave = xmldoc.SelectSingleNode(srch) as XmlElement;
- if (slave != null)
- {
- XmlAttribute xa = xmldoc.CreateAttribute(aname);
- xa.InnerText = avalue;
- slave.Attributes.Append(xa);
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/ConversionRTBProblems.cs b/PROMS/DataLoader/ConversionRTBProblems.cs
deleted file mode 100644
index 7866460e..00000000
--- a/PROMS/DataLoader/ConversionRTBProblems.cs
+++ /dev/null
@@ -1,203 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Xml;
-using System.Xml.Serialization;
-using System.Xml.Schema;
-using System.IO;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- [XmlRoot("Proms2010Print")]
- //[Serializable()]
- public class ConversionRTBProblems
- {
- private RTBProblems _RTBProblems;
-
- public RTBProblems RTBProblems
- {
- get
- {
- if (_RTBProblems == null) _RTBProblems = new RTBProblems();
- return _RTBProblems;
- }
- set { _RTBProblems = value; }
- }
- public void Save(string fileName)
- {
- XmlSerializer.WriteFile(this, fileName);
- }
- public static ConversionRTBProblems LoadProblems(string fileName)
- {
- return XmlSerializer.ReadFile(fileName);
- }
- public void Add(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath)
- {
- _RTBProblems.Add(itemID, contentID, originalRTF, oldRTF, stepRTF, newRTF, stepPath);
- }
- //public void Add(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath, ItemInfo iteminfo)
- //{
- // _RTBProblems.Add(itemID, contentID, originalRTF, oldRTF, stepRTF, newRTF, stepPath, iteminfo);
- //}
- }
- public class RTBProblems : List
- {
- //public void Add(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath, ItemInfo iteminfo)
- public void Add(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath)
- {
- base.Add(new RTBProblem(itemID, contentID, originalRTF, oldRTF, stepRTF, newRTF, stepPath));
- //base.Add(new RTBProblem(itemID, contentID, originalRTF, oldRTF, stepRTF, newRTF, stepPath, iteminfo));
- }
- }
- public class RTBProblem
- {
- public RTBProblem()
- {
- }
- //public RTBProblem(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath, ItemInfo iteminfo)
- public RTBProblem(int itemID, int contentID, string originalRTF, string oldRTF, string stepRTF, string newRTF, string stepPath)
- {
- _ItemID = itemID;
- _ContentID = contentID;
- _OldRTF = oldRTF;
- _NewRTF = newRTF;
- _StepPath = stepPath;
- _OriginalRTF = originalRTF;
- _StepRtf = stepRTF;
- //_itemInfo = iteminfo;
- }
- private int _ItemID;
- [XmlAttribute("ItemID")]
- public int ItemID
- {
- get { return _ItemID; }
- set { _ItemID = value; }
- }
- private int _ContentID;
- [XmlAttribute("ContentID")]
- public int ContentID
- {
- get { return _ContentID; }
- set { _ContentID = value; }
- }
- private string _OriginalRTF;
- [XmlAttribute("OriginalRTF")]
- public string OriginalRTF
- {
- get { return _OriginalRTF; }
- set { _OriginalRTF = value; }
- }
- private string _OldRTF;
- [XmlAttribute("OldRTF")]
- public string OldRTF
- {
- get { return _OldRTF; }
- set { _OldRTF = value; }
- }
- private string _StepRtf;
- [XmlAttribute("StepRTF")]
- public string StepRtf
- {
- get { return _StepRtf; }
- set { _StepRtf = value; }
- }
- private string _NewRTF;
- [XmlAttribute("NewRTF")]
- public string NewRTF
- {
- get { return _NewRTF; }
- set { _NewRTF = value; }
- }
- private string _StepPath;
- [XmlAttribute("StepPath")]
- public string StepPath
- {
- get { return _StepPath; }
- set { _StepPath = value; }
- }
- private string _Comparison;
- [XmlIgnore]
- public string Comparison
- {
- get
- {
- if (_Comparison == null)
- _Comparison = GetComparison(_OldRTF, _NewRTF);
- return _Comparison;
- }
- }
- private string _StripRTF;
- [XmlIgnore]
- public string StripRTF
- {
- get
- {
- if (_StripRTF == null)
- _StripRTF = GetStrip(_StepRtf);
- return _StripRTF;
- }
- set { _StripRTF = value; }
- }
-
- //private ItemInfo _itemInfo;
- //[XmlIgnore]
- //public ItemInfo ItemInfo
- //{
- // get { return _itemInfo; }
- // set { _itemInfo = value; }
- //}
-
- private string GetStrip(string _StepRtf)
- {
- string rttval = DisplayText.StaticStripRtfCommands(_StepRtf);
- //string rttval = Volian.Controls.Library.DisplayText.StaticStripRtfCommands(_StepRtf, _itemInfo);
- //return rttval.Replace(@"\u8209?", "-");
- return rttval;
- }
- private string GetComparison(string str1, string str2)
- {
- if (str1 == str2) return str1;
- int endMatch = 0;
- int l1 = str1.Length;
- int l2 = str2.Length;
- int min = l1 > l2 ? l2 : l1;
- int startMatch = min;
- for (int i = 0; i < min; i++)
- if (str1[i] != str2[i])
- {
- startMatch = i;
- break;
- }
- min = min - startMatch;
- endMatch = min;
- for (int i = 1; i < min; i++)
- if (str1[l1 - i] != str2[l2 - i])
- {
- endMatch = i - 1;
- break;
- }
- string prefix = str1.Substring(0, startMatch);
- string part1 = str1.Substring(startMatch, l1 - (startMatch + endMatch));
- string part2 = str2.Substring(startMatch, l2 - (startMatch + endMatch));
- string suffix = str1.Substring(l1 - endMatch, endMatch);
- return prefix + "\r\n<<<" + part1 + "|||" + part2 + ">>>\r\n" + suffix;
- }
- private ItemInfo _MyItem;
- [XmlIgnore]
- public ItemInfo MyItem
- {
- get
- {
- if (_MyItem == null)
- _MyItem = ItemInfo.Get(_ItemID);
- return _MyItem;
- }
- }
- public override string ToString()
- {
- return MyItem.ToString();
- }
- }
-
-}
diff --git a/PROMS/DataLoader/CurSet.cs b/PROMS/DataLoader/CurSet.cs
deleted file mode 100644
index efb380ad..00000000
--- a/PROMS/DataLoader/CurSet.cs
+++ /dev/null
@@ -1,127 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-
-using System;
-using System.IO;
-using System.Collections;
-using System.Text;
-using System.Windows.Forms;
-using System.Xml;
-using System.Xml.Serialization;
-using VEPROMS.CSLA.Library;
-
-namespace Utils
-{
- ///
- /// Summary description for CurSet.
- ///
- public class CurSet
- {
- private int NUMCBTEXTYPE = 5; // number of changebar text types.
- public string PathName;
- private string DefaultPlantFmt;
-
- public CurSet(string pname)
- {
- PathName = pname;
- DefaultPlantFmt = null;
- }
-
- private string ReadTheString(BinaryReader bw, int maxlen)
- {
- StringBuilder retStr = new StringBuilder(maxlen+1);
- // read a series of characters until a null is found.
- char ac;
- bool done = false;
- while(done==false)
- {
- ac = bw.ReadChar();
- if (ac=='\0')
- done=true;
- else
- retStr.Append(ac);
- }
- return retStr.ToString();
- }
-
- public FolderConfig Convert(FolderConfig cfg)
- {
- BinaryReader br;
- ArrayList DefaultUserCBMsg = new ArrayList(2);
- FileStream fs;
- FileInfo fi = new FileInfo(PathName);
- try
- {
- fs = fi.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite );
- br = new BinaryReader(fs,System.Text.ASCIIEncoding.ASCII);
- }
- catch (Exception e)
- {
- DataLoader.frmLoader._MyLog.ErrorFormat("Error migrating {0} Curset.dat, error = {1}", PathName, e.Message);
- return cfg;
- }
-
- try
- {
- sbyte tmpsbyte;
- string tmpstring;
- tmpsbyte=br.ReadSByte(); // DefaultDestination not used
-
- // the next byte has three settings embedded in it, the type of change
- // bar (Print_ChangeBar), the change bar location and its text.
- tmpsbyte= br.ReadSByte();
- cfg.Print_ChangeBar = (PrintChangeBar)((int)tmpsbyte > 2 ? 3 : (int)tmpsbyte);
- if (tmpsbyte > 2)
- {
- cfg.Print_ChangeBarLoc = (PrintChangeBarLoc)((tmpsbyte - 3) / NUMCBTEXTYPE);
- int ts = (tmpsbyte - 3) % NUMCBTEXTYPE;
- cfg.Print_ChangeBarText = (PrintChangeBarText)((tmpsbyte - 3) % NUMCBTEXTYPE);
- }
- else
- {
- cfg.Print_ChangeBarLoc = PrintChangeBarLoc.WithText;
- cfg.Print_ChangeBarText = PrintChangeBarText.DateChgID;
- }
- cfg.Print_NumCopies=br.ReadSByte();
- cfg.Print_Pagination=(PrintPagination) br.ReadSByte();
- tmpstring = ReadTheString(br,4); // DefaultPrinter not used
- cfg.Format_Plant = ReadTheString(br,10);
- DefaultPlantFmt = cfg.Format_Plant;
- tmpstring = ReadTheString(br, 128); // DefaultDestFName not used
- tmpsbyte = br.ReadSByte(); // DefaultPlotterType not used
- tmpsbyte = br.ReadSByte(); // DefaultPlotterPort not used
- tmpsbyte = br.ReadSByte(); // DefaultCIEType not used.
- for (int i=0;i<8;i++) // DefPenColors[8] not used
- tmpsbyte = br.ReadSByte();
- cfg.Print_Watermark = (PrintWatermark)br.ReadSByte();
- cfg.Print_UserCBMess1 = ReadTheString(br, 10);
- cfg.Print_UserCBMess2 = ReadTheString(br, 10);
- tmpsbyte = br.ReadSByte(); // DontPrintStatusTree not used
- cfg.Print_UserFormat = ReadTheString(br, 10);
- //tmpsbyte = br.ReadSByte();
- //cfg.Print_Duplex = tmpsbyte == 0 ? true : false;
- if (cfg.Print_UserFormat.Trim() != string.Empty)
- DefaultPlantFmt += " " + cfg.Print_UserFormat;
- br.Close();
- }
- catch(Exception e)
- {
- if(br!=null) br.Close();
- DataLoader.frmLoader._MyLog.ErrorFormat("Error migrating {0} Curset.dat, error = {1}", PathName, e.Message);
- }
- fs.Close();
- return cfg;
- }
- public string GetDefFmt()
- {
- return DefaultPlantFmt;
- }
- }
-}
diff --git a/PROMS/DataLoader/DataLoader.csproj b/PROMS/DataLoader/DataLoader.csproj
deleted file mode 100644
index 920906d7..00000000
--- a/PROMS/DataLoader/DataLoader.csproj
+++ /dev/null
@@ -1,259 +0,0 @@
-
-
-
- Debug
- AnyCPU
- 8.0.50727
- 2.0
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}
- WinExe
- Properties
- DataLoader
- DataLoader
- SAK
- SAK
- SAK
- SAK
- v3.5
-
-
-
-
- 2.0
-
-
-
- true
- full
- false
- bin\Debug\
- DEBUG;TRACE
- prompt
- 4
- x86
-
-
- pdbonly
- true
- bin\Release\
- TRACE
- prompt
- 4
-
-
-
- False
-
-
- False
- ..\csla20cs-2.1.4-070223\csla20cs\csla20cs\Csla\bin\Debug\Csla.dll
-
-
- ..\..\Proms3rdPartyLibraries\Ionic\Ionic.Zip.dll
-
-
- False
- bin\Debug\log4net.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Form
-
-
- dlgExportImport.cs
-
-
-
-
-
-
-
-
- Form
-
-
- frmCntTkn.cs
-
-
- Form
-
-
- frmErrors.cs
-
-
- Form
-
-
- frmLoader.cs
-
-
- Form
-
-
- frmPG.cs
-
-
- Form
-
-
- GroupProp.cs
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- dlgExportImport.cs
- Designer
-
-
- frmCntTkn.cs
- Designer
-
-
- frmErrors.cs
- Designer
-
-
- Designer
- frmLoader.cs
-
-
- frmPG.cs
- Designer
-
-
- Designer
- GroupProp.cs
-
-
-
- ResXFileCodeGenerator
- Resources.Designer.cs
- Designer
-
-
- True
- Resources.resx
- True
-
-
-
- PreserveNewest
-
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- PreserveNewest
-
-
- SettingsSingleFileGenerator
- Settings.Designer.cs
-
-
- True
- Settings.settings
- True
-
-
-
-
- Component
-
-
- RichTextBox41.cs
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- {70F23722-19A3-4AC1-A900-55831C945786}
- LBWordLibrary
-
-
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}
- VEPROMS.CSLA.Library
-
-
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}
- Volian.Base.Library
-
-
- {8556527C-6615-487F-8AF7-22EBC3EF0268}
- Volian.Controls.Library
-
-
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}
- Volian.Utils.Library
-
-
-
-
- PreserveNewest
-
-
-
-
-
\ No newline at end of file
diff --git a/PROMS/DataLoader/DataLoader.sln b/PROMS/DataLoader/DataLoader.sln
deleted file mode 100644
index 496950ba..00000000
--- a/PROMS/DataLoader/DataLoader.sln
+++ /dev/null
@@ -1,153 +0,0 @@
-
-Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 2013
-VisualStudioVersion = 12.0.30723.0
-MinimumVisualStudioVersion = 10.0.40219.1
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "DataLoader", "DataLoader.csproj", "{8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Volian.Utils.Library", "..\Volian.Utils.Library\Volian.Utils.Library.csproj", "{62314B9C-DA84-4037-8B68-AA18C1F641F5}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "VEPROMS.CSLA.Library", "..\VEPROMS.CSLA.Library\VEPROMS.CSLA.Library.csproj", "{41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "EPocalipse.IFilter", "..\EPocalipse.IFilter\EPocalipse.IFilter.csproj", "{400462CE-40B3-498F-B95A-B1D2AE679359}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "LBWordLibrary", "..\LBWordLibrary\LBWordLibrary.csproj", "{70F23722-19A3-4AC1-A900-55831C945786}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Volian.Controls.Library", "..\Volian.Controls.Library\Volian.Controls.Library.csproj", "{8556527C-6615-487F-8AF7-22EBC3EF0268}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Volian.Base.Library", "..\Volian.Base.Library\Volian.Base.Library.csproj", "{AEEE9FD1-6892-45E2-A67E-418C06D46FF9}"
-EndProject
-Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "XYPlots", "..\XYPlots\XYPlots.csproj", "{04E168D0-9CC7-43D9-A9F1-93E481EA86A3}"
-EndProject
-Global
- GlobalSection(SourceCodeControl) = preSolution
- SccNumberOfProjects = 7
- SccProjectUniqueName0 = ..\\Volian.Utils.Library\\Volian.Utils.Library.csproj
- SccProjectName0 = \u0022$/PROMS/Volian.Utils.Library\u0022,\u0020DICAAAAA
- SccLocalPath0 = ..\\Volian.Utils.Library
- SccProvider0 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName1 = ..\\VEPROMS.CSLA.Library\\VEPROMS.CSLA.Library.csproj
- SccProjectName1 = \u0022$/PROMS/VEPROMS.CSLA.Library\u0022,\u0020TPBAAAAA
- SccLocalPath1 = ..\\VEPROMS.CSLA.Library
- SccProvider1 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName2 = DataLoader.csproj
- SccProjectName2 = \u0022$/PROMS/DataLoader\u0022,\u0020IIAAAAAA
- SccLocalPath2 = .
- SccProvider2 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName3 = ..\\Volian.Controls.Library\\Volian.Controls.Library.csproj
- SccProjectName3 = \u0022$/PROMS/Volian.Controls.Library\u0022,\u0020TVBAAAAA
- SccLocalPath3 = ..\\Volian.Controls.Library
- SccProvider3 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName4 = ..\\LBWordLibrary\\LBWordLibrary.csproj
- SccProjectName4 = \u0022$/PROMS/LBWordLibrary\u0022,\u0020QUDAAAAA
- SccLocalPath4 = ..\\LBWordLibrary
- SccProvider4 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName5 = ..\\Volian.Base.Library\\Volian.Base.Library.csproj
- SccProjectName5 = \u0022$/PROMS/Volian.Base.Library\u0022,\u0020QJEAAAAA
- SccLocalPath5 = ..\\Volian.Base.Library
- SccProvider5 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- SccProjectUniqueName6 = ..\\XYPlots\\XYPlots.csproj
- SccProjectName6 = \u0022$/PROMS/XYPlots\u0022,\u0020BRDAAAAA
- SccLocalPath6 = ..\\XYPlots
- SccProvider6 = MSSCCI:Microsoft\u0020Visual\u0020SourceSafe
- EndGlobalSection
- GlobalSection(SolutionConfigurationPlatforms) = preSolution
- Debug|Any CPU = Debug|Any CPU
- Debug|x86 = Debug|x86
- Demo|Any CPU = Demo|Any CPU
- Demo|x86 = Demo|x86
- Release|Any CPU = Release|Any CPU
- Release|x86 = Release|x86
- EndGlobalSection
- GlobalSection(ProjectConfigurationPlatforms) = postSolution
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Debug|x86.ActiveCfg = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Demo|Any CPU.ActiveCfg = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Demo|Any CPU.Build.0 = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Demo|x86.ActiveCfg = Debug|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Release|Any CPU.Build.0 = Release|Any CPU
- {8E239A2B-B38C-4CD5-BA0D-A41A88BD2AEE}.Release|x86.ActiveCfg = Release|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Debug|x86.ActiveCfg = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Demo|Any CPU.ActiveCfg = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Demo|Any CPU.Build.0 = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Demo|x86.ActiveCfg = Debug|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Release|Any CPU.Build.0 = Release|Any CPU
- {62314B9C-DA84-4037-8B68-AA18C1F641F5}.Release|x86.ActiveCfg = Release|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Debug|x86.ActiveCfg = Debug|x86
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Debug|x86.Build.0 = Debug|x86
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Demo|Any CPU.ActiveCfg = Demo|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Demo|Any CPU.Build.0 = Demo|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Demo|x86.ActiveCfg = Demo|x86
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Demo|x86.Build.0 = Demo|x86
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Release|Any CPU.Build.0 = Release|Any CPU
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Release|x86.ActiveCfg = Release|x86
- {41B2D786-1C03-4C1A-9247-DA9F0D6B06D5}.Release|x86.Build.0 = Release|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Debug|x86.ActiveCfg = Debug|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Debug|x86.Build.0 = Debug|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Demo|Any CPU.ActiveCfg = Demo|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Demo|Any CPU.Build.0 = Demo|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Demo|x86.ActiveCfg = Demo|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Demo|x86.Build.0 = Demo|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Release|Any CPU.Build.0 = Release|Any CPU
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Release|x86.ActiveCfg = Release|x86
- {400462CE-40B3-498F-B95A-B1D2AE679359}.Release|x86.Build.0 = Release|x86
- {70F23722-19A3-4AC1-A900-55831C945786}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Debug|x86.ActiveCfg = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Demo|Any CPU.ActiveCfg = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Demo|Any CPU.Build.0 = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Demo|x86.ActiveCfg = Debug|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Release|Any CPU.Build.0 = Release|Any CPU
- {70F23722-19A3-4AC1-A900-55831C945786}.Release|x86.ActiveCfg = Release|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Debug|x86.ActiveCfg = Debug|x86
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Debug|x86.Build.0 = Debug|x86
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Demo|Any CPU.ActiveCfg = Demo|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Demo|Any CPU.Build.0 = Demo|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Demo|x86.ActiveCfg = Demo|x86
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Demo|x86.Build.0 = Demo|x86
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Release|Any CPU.Build.0 = Release|Any CPU
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Release|x86.ActiveCfg = Release|x86
- {8556527C-6615-487F-8AF7-22EBC3EF0268}.Release|x86.Build.0 = Release|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Debug|x86.ActiveCfg = Debug|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Debug|x86.Build.0 = Debug|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Demo|Any CPU.ActiveCfg = Debug|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Demo|x86.ActiveCfg = Debug|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Demo|x86.Build.0 = Debug|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Release|Any CPU.Build.0 = Release|Any CPU
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Release|x86.ActiveCfg = Release|x86
- {AEEE9FD1-6892-45E2-A67E-418C06D46FF9}.Release|x86.Build.0 = Release|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Debug|Any CPU.Build.0 = Debug|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Debug|x86.ActiveCfg = Debug|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Debug|x86.Build.0 = Debug|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Demo|Any CPU.ActiveCfg = Demo|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Demo|Any CPU.Build.0 = Demo|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Demo|x86.ActiveCfg = Demo|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Demo|x86.Build.0 = Demo|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Release|Any CPU.ActiveCfg = Release|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Release|Any CPU.Build.0 = Release|Any CPU
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Release|x86.ActiveCfg = Release|x86
- {04E168D0-9CC7-43D9-A9F1-93E481EA86A3}.Release|x86.Build.0 = Release|x86
- EndGlobalSection
- GlobalSection(SolutionProperties) = preSolution
- HideSolutionNode = FALSE
- EndGlobalSection
-EndGlobal
diff --git a/PROMS/DataLoader/DataLoaderGlitches.cs b/PROMS/DataLoader/DataLoaderGlitches.cs
deleted file mode 100644
index a16b9705..00000000
--- a/PROMS/DataLoader/DataLoaderGlitches.cs
+++ /dev/null
@@ -1,213 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Xml;
-using System.Xml.Serialization;
-using System.Xml.Schema;
-using System.IO;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- [XmlRoot("DataLoaderGlitches")]
- //[Serializable()]
- public class DataLoaderGlitches
- {
- private Glitches _Glitches;
-
- public Glitches Glitches
- {
- get
- {
- if (_Glitches == null) _Glitches = new Glitches();
- return _Glitches;
- }
- set { _Glitches = value; }
- }
- public void Add(string cause, string originalText, string newText)
- {
- Glitches.Add(cause, originalText, newText);
- }
- public void Save(string fileName)
- {
- XmlSerializer.WriteFile(this, fileName);
- }
- public static DataLoaderGlitches LoadProblems(string fileName)
- {
- return XmlSerializer.ReadFile(fileName);
- }
- }
- public class Glitches : List
- {
- public void Add(string cause, string originalText, string newText)
- {
- base.Add(new Glitch(cause, originalText, newText));
- }
- }
- public class Glitch
- {
- public Glitch()
- {
- }
- public Glitch(string cause, string originalText, string newText)
- {
- _Cause = cause;
- _OriginalText = originalText;
- _NewText = newText;
- }
- private string _Cause;
- [XmlAttribute("Cause")]
- public string Cause
- {
- get { return _Cause; }
- set { _Cause = value; }
- }
- private string _OriginalText;
- [XmlAttribute("OriginalText")]
- public string OriginalText
- {
- get { return _OriginalText; }
- set { _OriginalText = value; }
- }
- private string _NewText;
- [XmlAttribute("NewText")]
- public string NewText
- {
- get { return _NewText; }
- set { _NewText = value; }
- }
- private string _Comparison;
- [XmlIgnore]
- public string Comparison
- {
- get
- {
- if (_Comparison == null)
- _Comparison = GetComparison(_OriginalText, _NewText);
- return _Comparison;
- }
- }
- private string GetComparison(string str1, string str2)
- {
- if(str1 == str2)return str1;
- int endMatch = 0;
- int l1 = str1.Length;
- int l2 = str2.Length;
- int min = l1 > l2 ? l2 : l1;
- int startMatch = min;
- for(int i = 0; i< min; i++)
- if (str1[i] != str2[i])
- {
- startMatch = i;
- break;
- }
- for (int i = 1; i < min; i++)
- if (str1[l1-i] != str2[l2-i])
- {
- endMatch = i-1;
- break;
- }
- string prefix = str1.Substring(0, startMatch);
- string part1 = str1.Substring(startMatch, l1 - (startMatch + endMatch));
- string part2 = str2.Substring(startMatch, l2 - (startMatch + endMatch));
- string suffix = str1.Substring(l1 - endMatch, endMatch);
- _Delta = "<<<" + part1 + "|||" + part2 + ">>>";
- return prefix + "\r\n<<<" + part1 + "|||" + part2 + ">>>\r\n" + suffix;
- }
- private string _Delta = null;
- public override string ToString()
- {
- if (Comparison == null) { ;} // This gets the Comparsion and sets _Delta
- return _Delta;
- }
- }
- public static class XmlSerializer where T : class
- {
- public static string StringSerialize(T t)
- {
- string strOutput = string.Empty;
- XmlSerializer xs = new XmlSerializer(typeof(T), "http://www.volian.com");
- using (MemoryStream ms = new MemoryStream())
- {
- xs.Serialize(new NonXsiTextWriter(ms, Encoding.UTF8), t);
- //xs.Serialize(ms, t);
- ms.Position = 0;
- StreamReader sr = new StreamReader(ms);
- strOutput = sr.ReadToEnd();
- ms.Close();
- }
- return strOutput;
- }
- public static T StringDeserialize(string s)
- {
- T t;
- XmlSerializer xs = new XmlSerializer(typeof(T), "http://www.volian.com");
- UTF8Encoding enc = new UTF8Encoding();
- Byte[] arrBytData = enc.GetBytes(s);
- using (MemoryStream ms = new MemoryStream(arrBytData))
- {
- t = (T)xs.Deserialize(ms);
- }
- return t;
- }
- public static void WriteFile(T t, string fileName)
- {
- string strOutput = string.Empty;
- XmlSerializer xs = new XmlSerializer(typeof(T), "http://www.volian.com");
- using (FileStream fs = new FileStream(fileName, FileMode.Create))
- {
- xs.Serialize(new NonXsiTextWriter(fs, Encoding.UTF8), t);
- fs.Close();
- }
- }
- public static T ReadFile(string fileName)
- {
- T t;
- XmlSerializer xs = new XmlSerializer(typeof(T), "http://www.volian.com");
- using (FileStream fs = new FileStream(fileName, FileMode.Open))
- {
- t = (T)xs.Deserialize(fs);
- }
- return t;
- }
- }
- public class NonXsiTextWriter : XmlTextWriter
- {
- public NonXsiTextWriter(TextWriter w) : base(w) { }
- public NonXsiTextWriter(Stream w, Encoding encoding)
- : base(w, encoding)
- {
- this.Formatting = Formatting.Indented;
- }
- public NonXsiTextWriter(string filename, Encoding encoding) : base(filename, encoding) { }
- bool _skip = false;
- public override void WriteStartAttribute(string prefix, string localName, string ns)
- {
- if ((prefix == "xmlns" && (localName == "xsd" || localName == "xsi")) || // Omits XSD and XSI declarations.
- ns == XmlSchema.InstanceNamespace) // Omits all XSI attributes.
- {
- _skip = true;
- return;
- }
- if (localName == "xlink_href")
- base.WriteStartAttribute(prefix, "xlink:href", ns);
- else
- base.WriteStartAttribute(prefix, localName, ns);
- }
- public override void WriteString(string text)
- {
- if (_skip) return;
- base.WriteString(text);
- }
- public override void WriteEndAttribute()
- {
- if (_skip)
- { // Reset the flag, so we keep writing.
- _skip = false;
- return;
- }
- base.WriteEndAttribute();
- }
- }
-
-}
diff --git a/PROMS/DataLoader/DataLoaderSettings.cs b/PROMS/DataLoader/DataLoaderSettings.cs
deleted file mode 100644
index 1a0bd2f1..00000000
--- a/PROMS/DataLoader/DataLoaderSettings.cs
+++ /dev/null
@@ -1,710 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Windows.Forms;
-using System.ComponentModel;
-using System.Drawing.Design;
-using System.Reflection;
-using System.Data;
-using System.Collections;
-using System.IO;
-using System.Runtime.Serialization.Formatters.Binary;
-using System.Data.SqlClient;
-
-namespace DataLoader
-{
- [Serializable]
- class DataLoaderSettings:ICloneable
- {
- private static List _MyDataPaths = Loader.DataPaths;
- #region Clone
- public object Clone()
- {
- MemoryStream memoryStream = new MemoryStream();
- BinaryFormatter binaryFormatter = new BinaryFormatter();
-
- binaryFormatter.Serialize(memoryStream, this);
- memoryStream.Seek(0, SeekOrigin.Begin);
-
- return binaryFormatter.Deserialize(memoryStream);
- }
- #endregion
- #region 16-Bit Executable
- private string _VEPromsPath; // Folder
- [Category("16-Bit Executable")]
- [DisplayName("VEProms Exe Folder")]
- [Description("Path to the VE-PROMS Executable Folder")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string VEPromsPath
- {
- get { return _VEPromsPath; }
- set { _VEPromsPath = value; }
- }
- private string _VESamFile; // File
- [Category("16-Bit Executable")]
- [DisplayName("VEProms Security File")]
- [Description("VE-PROMS Securty File (VESam)")]
- [UIFilenameEditor.FileDialogFilterAttribute("VEProms Security File|vesam.opt")]
- [EditorAttribute(typeof(UIFilenameEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string VESamFile
- {
- get { return _VESamFile; }
- set { _VESamFile = value; }
- }
- #endregion
- #region 16-Bit Data
- private string _ProcedureSetPath; // Folder
- [Category("16-Bit Data")]
- [DisplayName("Procedure Folder")]
- [Description("Path to the Data Set being converted")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string ProcedureSetPath
- {
- get { return _ProcedureSetPath; }
- set { _ProcedureSetPath = value; }
- }
- private bool _OnlyThisSet; // Boolean
- [Category("16-Bit Data")]
- [DisplayName("Only Process this Procedure Set")]
- [Description("Only Convert the Selected Procedure Set")]
- public bool OnlyThisSet
- {
- get { return _OnlyThisSet; }
- set { _OnlyThisSet = value; }
- }
- private bool _LoadApproved; // Boolean
- [Category("16-Bit Data")]
- [DisplayName("Load approved data for this Procedure Set")]
- [Description("Load approved PDFs (if they exist) and consistency checks for the Selected Procedure Set")]
- public bool LoadApproved
- {
- get { return _LoadApproved; }
- set { _LoadApproved = value; }
- }
- private string _ProcessOnlyInLocation; // Folder
- [Category("16-Bit Data")]
- [DisplayName("Process Only In Location")]
- [Description("Limit to folder or group of folders (otherwise all plants will be processed)")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string ProcessOnlyInLocation
- {
- get { return _ProcessOnlyInLocation; }
- set { _ProcessOnlyInLocation = value; }
- }
- #endregion
- #region Format Data
- private string _FormatFolder; // Folder
- [Category("Format Data")]
- [DisplayName("Format Folder")]
- [Description("Location of XML Format Files.")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string FormatFolder
- {
- get { return _FormatFolder; }
- set { _FormatFolder = value; }
- }
- private string _GenMacFolder; // Folder
- [Category("Format Data")]
- [DisplayName("GenMac Folder")]
- [Description("Location of XML (SVG) GenMac Macro Files.")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string GenMacFolder
- {
- get { return _GenMacFolder; }
- set { _GenMacFolder = value; }
- }
- #endregion
- #region Backup Data
- private string _BackupFileName; // String
- [Category("Backup Data")]
- [DisplayName("Backup File Name")]
- [Description("Name of Backup File in the batch files created in the Log Folder")]
- public string BackupFileName
- {
- get { return _BackupFileName; }
- set { _BackupFileName = value; }
- }
- private string _BackupFolder; // Folder
- [Category("Backup Data")]
- [DisplayName("Backup Folder")]
- [Description("Location of Backup Files created during each phase of the conversion process.")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string BackupFolder
- {
- get { return _BackupFolder; }
- set { _BackupFolder = value; }
- }
- private string _Phase1Suffix; // String
- [Category("Backup Data")]
- [DisplayName("Phase 1 Suffix")]
- [Description("Suffix to use for backup before Transitions are Fixed")]
- public string Phase1Suffix
- {
- get { return _Phase1Suffix; }
- set { _Phase1Suffix = value; }
- }
- private string _Phase2Suffix; // String
- [Category("Backup Data")]
- [DisplayName("Phase 2 Suffix")]
- [Description("Suffix to use for backup before Change Manager Script")]
- public string Phase2Suffix
- {
- get { return _Phase2Suffix; }
- set { _Phase2Suffix = value; }
- }
- private string _Phase3Suffix; // String
- [Category("Backup Data")]
- [DisplayName("Phase 3 Suffix")]
- [Description("Suffix to use for backup before Approval Script")]
- public string Phase3Suffix
- {
- get { return _Phase3Suffix; }
- set { _Phase3Suffix = value; }
- }
- private string _Phase4Suffix; // String
- [Category("Backup Data")]
- [DisplayName("Phase 4 Suffix")]
- [Description("Suffix to use for backup before Loading Approved Data")]
- public string Phase4Suffix
- {
- get { return _Phase4Suffix; }
- set { _Phase4Suffix = value; }
- }
- #endregion
- #region Process Log
- private string _LogFilePath; // Folder
- [Category("Process Log")]
- [DisplayName("Log File Folder")]
- [Description("Location of the Log Files")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string LogFilePath
- {
- get { return _LogFilePath; }
- set { _LogFilePath = value; }
- }
- #endregion
- #region Sql Database
- private string _ConnectionString; // String
- [Category("Sql Database")]
- [DisplayName("SQL Connection String")]
- [Description("Connection string for SQL")]
- public string ConnectionString
- {
- get { return _ConnectionString; }
- set { _ConnectionString = value; }
- }
- private string _DBName; // String
- [Category("Sql Database")]
- [DisplayName("Database Name")]
- [Description("Name of the Database that will be created to contain the converted data.")]
- public string DBName
- {
- get { return _DBName; }
- set { _DBName = value; }
- }
- private string _DBPath; // Folder
- [Category("Sql Database")]
- [DisplayName("Database File Folder")]
- [Description("Location of the Database files.")]
- [EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- public string DBPath
- {
- get { return _DBPath; }
- set { _DBPath = value; }
- }
- private bool _PurgeExistingData;
- [Category("Sql Database")]
- [DisplayName("Purge Existing Data")]
- [Description("Should the data in the SQL database be purged (emptied) before adding this data.")]
- public bool PurgeExistingData
- {
- get { return _PurgeExistingData; }
- set { _PurgeExistingData = value; }
- }
- #endregion
- //#region PDFs
- //private string _PDFFolder; // Folder
- //[Category("PDFs")]
- //[DisplayName("PDF Folder")]
- //[Description("Location for PDFs when printing.")]
- //[EditorAttribute(typeof(UIFolderEditor), typeof(System.Drawing.Design.UITypeEditor))]
- //public string PDFFolder
- //{
- // get { return _PDFFolder; }
- // set { _PDFFolder = value; }
- //}
- //#endregion
- #region Debugging
- private ExecutionMode _ExecutionMode;
- [TypeConverter(typeof(EnumDescConverter))]
- [DisplayName("Execution Mode")]
- [Category("Debugging")]
- [Description("Mode for Conversion")]
- public ExecutionMode ExecutionMode
- {
- get { return _ExecutionMode; }
- set { _ExecutionMode = value; }
- }
- private bool _CheckRTF;
- [DisplayName("Check RTF")]
- [Category("Debugging")]
- [Description("This makes the Fix Transtion Code work Differently. Not sure what it does.")]
- public bool CheckRTF
- {
- get { return _CheckRTF; }
- set { _CheckRTF = value; }
- }
- private int _Skip; // Skip specified procedures during load.
- [DisplayName("Skip First n Procedures")]
- [Category("Debugging")]
- [Description("Skip the specified number of procedures during conversion to get to a problem quicker.")]
- public int Skip
- {
- get { return _Skip; }
- set { _Skip = value; }
- }
- private int _HowMany=0; // Skip specified procedures during load.
- [DisplayName("How Many Procedures should be converted")]
- [Category("Debugging")]
- [Description("Only process part of the set.")]
- public int HowMany
- {
- get { return _HowMany; }
- set { _HowMany = value; }
- }
- #endregion
- #region Accessory Pages
- private AccPageConversion _ConvertTo;
- [TypeConverter(typeof(EnumDescConverter))]
- [DisplayName("Convert To")]
- [Category("Accessory Pages")]
- [Description("Format to which the Accessory Page converted")]
- public AccPageConversion ConvertTo
- {
- get { return _ConvertTo; }
- set { _ConvertTo = value; }
- }
- private bool _RedPDFs; // Boolean
- [Category("Accessory Pages")]
- [DisplayName("Print MSWord PDFs in Red")]
- [Description("Creates Word PDFs in Debug Mode so that Debug printing will not require Word to print again.")]
- public bool RedPDFs
- {
- get { return _RedPDFs; }
- set { _RedPDFs = value; }
- }
- #endregion
- #region RO Update
- private ROUpdateMode _WhatROsToConvert = 0;
- [Category("RO Update")]
- [DisplayName("What ROs To Convert")]
- [Description("Select which ROs should be converted.")]
- public ROUpdateMode WhatROsToConvert
- {
- get { return _WhatROsToConvert; }
- set { _WhatROsToConvert = value; }
- }
- private int _SelectedROFst = -1;
- [Category("RO Update")]
- [DisplayName("Selected ROFst")]
- [Description("Enter which ROFstID is the basis for the original text (-1 = None).")]
- public int SelectedROFst
- {
- get { return _SelectedROFst; }
- set { _SelectedROFst = value; }
- }
- private bool _AnnotateWhenConvertingToText;
- [Category("RO Update")]
- [DisplayName("Annotate When Converting To Text")]
- [Description("Should the step have annotation when the ro data has been converted to text.")]
- public bool AnnotateWhenConvertingToText
- {
- get { return _AnnotateWhenConvertingToText; }
- set { _AnnotateWhenConvertingToText = value; }
- }
- private bool _AnnotateWhenShowingMissingRO;
- [Category("RO Update")]
- [DisplayName("Annotate When Showing Missing RO")]
- [Description("Should the step have annotation when the ro data is missing and is being displayed as a question mark.")]
- public bool AnnotateWhenShowingMissingRO
- {
- get { return _AnnotateWhenShowingMissingRO; }
- set { _AnnotateWhenShowingMissingRO = value; }
- }
- private bool _AnnotateWhenShowingDifferentRO;
- [Category("RO Update")]
- [DisplayName("Annotate When Showing Different RO")]
- [Description("Should the step have annotation when the ro data is different.")]
- public bool AnnotateWhenShowingDifferentRO
- {
- get { return _AnnotateWhenShowingDifferentRO; }
- set { _AnnotateWhenShowingDifferentRO = value; }
- }
- #endregion
- [Browsable(false)]
- public string ValidityCheck
- {
- get
- {
- StringBuilder sb = new StringBuilder();
- string ErrorPrefix = "Settings are not valid\r\n";
- // VEPromsPath = has to be non-blank
- if ((VEPromsPath ?? "") == "" || !Directory.Exists(VEPromsPath))
- {
- sb.Append(ErrorPrefix + "VEProms Exe Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- // VESamFile = has to be non-blank
- if ((VESamFile ?? "") == "" || !File.Exists(VESamFile))
- {
- sb.Append(ErrorPrefix + "VEProms Security File must point to an existing file\r\n");
- ErrorPrefix = "";
- }
- // ProcedureSetPath = If OnlyThisSet is checked, then has to be non-blank
- if (OnlyThisSet)
- {
- if ((ProcedureSetPath ?? "") == "" || !Directory.Exists(ProcedureSetPath))
- {
- sb.Append(ErrorPrefix + "Procedure Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- else
- {
- if (!InDataPaths(ProcedureSetPath))
- {
- sb.Append(ErrorPrefix + string.Format("Procedure Folder not in DataPath from Config File '{0}' \r\n", DataLoaderSettings._MyDataPaths[0]));
- ErrorPrefix = "";
- }
- else if (!File.Exists(ProcedureSetPath + @"\set.dbf"))
- {
- sb.Append(ErrorPrefix + "Procedure Folder must point to an existing procedure data folder\r\n");
- ErrorPrefix = "";
- }
- }
- }
- else
- {
- if ((ProcedureSetPath ?? "") == "" || !Directory.Exists(ProcedureSetPath))
- {
- sb.Append(ErrorPrefix + "Procedure Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- else
- {
- if (!InDataPaths(ProcedureSetPath))
- {
- sb.Append(ErrorPrefix + string.Format("Procedure Folder not in DataPath from Config File '{0}' \r\n", DataLoaderSettings._MyDataPaths[0]));
- ErrorPrefix = "";
- }
- }
- }
- //added by jcb 20121127
- //check is ProcedureSetPath contains ProcessOnlyInLocation
- if (ProcedureSetPath != null && ProcedureSetPath.StartsWith(ProcessOnlyInLocation ?? "") == false)
- {
- sb.Append(ErrorPrefix + "Check Process Only In Location value is pointing to similar directory as Procedure Set Path\r\n");
- ErrorPrefix = "";
- }
- //end added by jcb 20121127
- // BackupFileName = Has to be non-blank
- if ((BackupFileName ?? "") == "")
- {
- sb.Append(ErrorPrefix + "Backup File Name must not be blank\r\n");
- ErrorPrefix = "";
- }
- if ((Phase1Suffix ?? "") == "")
- {
- sb.Append(ErrorPrefix + "Phase 1 Suffix must not be blank\r\n");
- ErrorPrefix = "";
- }
- if ((Phase2Suffix ?? "") == "")
- {
- sb.Append(ErrorPrefix + "Phase 2 Suffix must not be blank\r\n");
- ErrorPrefix = "";
- }
- if ((Phase3Suffix ?? "") == "")
- {
- sb.Append(ErrorPrefix + "Phase 3 Suffix must not be blank\r\n");
- ErrorPrefix = "";
- }
- // BackupFolder = Has to be non-blank
- if (OnlyThisSet && (BackupFolder ?? "") == "" || !Directory.Exists(BackupFolder))
- {
- sb.Append(ErrorPrefix + "Backup Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- // FormatFolder = Has to be non-blank
- if (OnlyThisSet && (FormatFolder ?? "") == "" || !Directory.Exists(FormatFolder))
- {
- sb.Append(ErrorPrefix + "Format Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- // GenMacFolder = Has to be non-blank
- if (OnlyThisSet && (GenMacFolder ?? "") == "" || !Directory.Exists(GenMacFolder))
- {
- sb.Append(ErrorPrefix + "GenMac Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- // LogFilePath = Has to be non-blank
- if (OnlyThisSet && (LogFilePath ?? "") == "" || !Directory.Exists(LogFilePath))
- {
- sb.Append(ErrorPrefix + "Log File Folder must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- // ConnectionString = Has to be non-blank
- if ((ConnectionString ?? "") == "")
- {
- sb.Append(ErrorPrefix + "SQL Connection String must be a valid connection string\r\n");
- ErrorPrefix = "";
- }
- else
- {
- // Validate ConnectionString
- string checkConnectionString = ValidateConnectionString("Master");
- if (checkConnectionString != "")
- {
- sb.Append(ErrorPrefix + "SQL Connection String must be a valid connection string\r\n");
- sb.Append(checkConnectionString);
- ErrorPrefix = "";
- }
- }
- // DBName = Has to be non-blank
- if ((DBName ?? "") == "")
- {
- sb.Append(ErrorPrefix + "SQL Database Name must be a valid database name\r\n");
- ErrorPrefix = "";
- }
- // DBPath = if null check to see if DBName DB has Path, if it does then set DBPath
- if ((DBPath ?? "") == "" || !Directory.Exists(DBPath))
- {
- string filePath = GetDBFileName();
- if (filePath != null)
- {
- FileInfo fi = new FileInfo(filePath);
- DBPath = fi.DirectoryName;
- }
- else
- {
- sb.Append(ErrorPrefix + "SQL Database Path must point to an existing folder\r\n");
- ErrorPrefix = "";
- }
- }
- // PDFFolder = if not set, then don't set PDFFolder in DocVersion.Config
- //if (ExecutionMode == ExecutionMode.Debug && ((PDFFolder ?? "") == "" || !Directory.Exists(PDFFolder)))
- //{
- // sb.Append(ErrorPrefix + "PDF Folder must point to an existing folder in debug mode\r\n");
- // ErrorPrefix = "";
- //}
- // Skip = Any NUmber
- // PurgeExistingData = N/A
- // OnlyThisSet = N/A
- // CheckRTF = N/A
- // ConvertTo = N/A
- // RedPDFs = N/A
- return sb.ToString();
- }
- }
- private bool InDataPaths(string ProcedureSetPath)
- {
- foreach (string dp in _MyDataPaths)
- if (ProcedureSetPath.ToUpper().StartsWith(dp.ToUpper())) return true;
- return false;
- }
- private string ValidateConnectionString(string dbName)
- {
- if(!ConnectionString.Contains("{DBName}"))
- return " Needs to have a {DBName} token for the Initial Catalog";
- string cnstr = ConnectionString.Replace("{DBName}", dbName);
- try
- {
- SqlConnection cn = new SqlConnection(cnstr);
- cn.Open();
- cn.Close();
- }
- catch (Exception ex)
- {
- StringBuilder sb = new StringBuilder();
- while (ex != null)
- {
- sb.Append(string.Format(" {0}-{1}",ex.GetType().Name,ex.Message));
- ex = ex.InnerException;
- }
- return sb.ToString();
- }
- return "";
- }
- private string GetDBFileName()
- {
- string filename = null;
- SqlConnection cn = new SqlConnection(ConnectionString.Replace("{DBName}","Master"));
- cn.Open();
- string cmd = string.Format("Select FileName from sysdatabases where Name = '{0}'",DBName);
- SqlDataAdapter da = new SqlDataAdapter(cmd,cn);
- DataSet ds = new DataSet();
- da.Fill(ds);
- if (ds.Tables.Count == 1 && ds.Tables[0].Rows.Count == 1)
- filename = ds.Tables[0].Rows[0][0].ToString();
- cn.Close();
- return filename;
- }
- }
- public enum AccPageConversion : int
- {
- [Description("Don't Convert")] DoNotConvert=0,
- [Description("MS Word")] MSWord = 1,
- [Description("Rich Text Format")] RichTextFormat = 2
- }
- public enum ExecutionMode : int
- {
- [Description("Debug")] Debug = 0,
- [Description("Production")] Production = 1,
- }
- public enum ROUpdateMode : int
- {
- [Description("None")]
- None = 0,
- [Description("Missing")]
- Missing = 1,
- [Description("All")]
- All = 2,
- }
-
- public class EnumDescConverter : System.ComponentModel.EnumConverter
- {
- protected System.Type myVal;
-
- ///
- /// Gets Enum Value's Description Attribute
- ///
- /// The value you want the description attribute for
- /// The description, if any, else it's .ToString()
- public static string GetEnumDescription(Enum value)
- {
- //Console.WriteLine("{0}", value);
- FieldInfo fi = value.GetType().GetField(value.ToString());
- DescriptionAttribute[] attributes =
- (DescriptionAttribute[])fi.GetCustomAttributes(
- typeof(DescriptionAttribute), false);
- //Console.WriteLine("{0},{1},{2}", value.ToString(), attributes.Length, (attributes.Length > 0) ? attributes[0].Description : value.ToString());
- return (attributes.Length > 0) ? attributes[0].Description : value.ToString();
- }
-
- ///
- /// Gets the description for certaing named value in an Enumeration
- ///
- /// The type of the Enumeration
- /// The name of the Enumeration value
- /// The description, if any, else the passed name
- public static string GetEnumDescription(System.Type value, string name)
- {
- FieldInfo fi = value.GetField(name);
- DescriptionAttribute[] attributes =
- (DescriptionAttribute[])fi.GetCustomAttributes(
- typeof(DescriptionAttribute), false);
- return (attributes.Length > 0) ? attributes[0].Description : name;
- }
-
- ///
- /// Gets the value of an Enum, based on it's Description Attribute or named value
- ///
- /// The Enum type
- /// The description or name of the element
- /// The value, or the passed in description, if it was not found
- public static object GetEnumValue(System.Type value, string description)
- {
- FieldInfo[] fis = value.GetFields();
- foreach (FieldInfo fi in fis)
- {
- DescriptionAttribute[] attributes =
- (DescriptionAttribute[])fi.GetCustomAttributes(
- typeof(DescriptionAttribute), false);
- if (attributes.Length > 0)
- {
- if (attributes[0].Description == description)
- {
- return fi.GetValue(fi.Name);
- }
- }
- if (fi.Name == description)
- {
- return fi.GetValue(fi.Name);
- }
- }
- return description;
- }
-
- public EnumDescConverter(System.Type type)
- : base(type.GetType())
- {
- myVal = type;
- }
-
- public override object ConvertTo(ITypeDescriptorContext context, System.Globalization.CultureInfo culture, object value, Type destinationType)
- {
- if (value is Enum && destinationType == typeof(string))
- {
- return EnumDescConverter.GetEnumDescription((Enum)value);
- }
- if (value is string && destinationType == typeof(string))
- {
- return EnumDescConverter.GetEnumDescription(myVal, (string)value);
- }
- return base.ConvertTo(context, culture, value, destinationType);
- }
-
- public override object ConvertFrom(ITypeDescriptorContext context, System.Globalization.CultureInfo culture, object value)
- {
- if (value is string)
- {
- return EnumDescConverter.GetEnumValue(myVal, (string)value);
- }
- if (value is Enum)
- {
- return EnumDescConverter.GetEnumDescription((Enum)value);
- }
- return base.ConvertFrom(context, culture, value);
- }
- public override bool GetPropertiesSupported(ITypeDescriptorContext context)
- {
- return false;
- }
-
- public override TypeConverter.StandardValuesCollection GetStandardValues(ITypeDescriptorContext context)
- {
- ArrayList values = new ArrayList();
- FieldInfo[] fis = myVal.GetFields();
- foreach (FieldInfo fi in fis)
- {
- DescriptionAttribute[] attributes = (DescriptionAttribute[])fi.GetCustomAttributes(
- typeof(DescriptionAttribute), false);
- //if (attributes.Length > 0)
- if (fi.Name != "value__")
- values.Add(fi.GetValue(fi.Name));
- }
- return new TypeConverter.StandardValuesCollection(values);
- }
- public static string GetEnumKeyDescription(Enum value)
- {
- FieldInfo fi = value.GetType().GetField(value.ToString());
- DescriptionAttribute[] attributes =
- (DescriptionAttribute[])fi.GetCustomAttributes(
- typeof(DescriptionAttribute), false);
- return (attributes.Length > 0) ? attributes[0].Description : value.ToString();
- }
-
- public static DataTable GetEnumAsDataTable(System.Type EnumType)
- {
- DataTable DTEnum = new DataTable();
- DTEnum.Columns.Add(new DataColumn("EnumID", typeof(Int32)));
- DTEnum.Columns.Add(new DataColumn("Enum", typeof(string)));
- DTEnum.Columns.Add(new DataColumn("Description", typeof(string)));
- foreach (int i in Enum.GetValues(EnumType))
- {
- System.Enum fooItem = (System.Enum)Enum.ToObject(EnumType, i);
- DTEnum.Rows.Add(new object[] { i, fooItem.ToString(), GetEnumKeyDescription(fooItem) });
- }
- return DTEnum;
- }
- }
-
-}
diff --git a/PROMS/DataLoader/DocVersions.cs b/PROMS/DataLoader/DocVersions.cs
deleted file mode 100644
index f3f86914..00000000
--- a/PROMS/DataLoader/DocVersions.cs
+++ /dev/null
@@ -1,178 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public TimeSpan MigrateDocVersion(DocVersion docver)
- {
- return MigrateDocVersion(docver, true);
- }
-
- private OutsideTransition _OutTran;
- public int MultiUnitCount = 0;
- public Dictionary Old2NewApple;
- public Dictionary New2OldApple;
-
- public TimeSpan MigrateDocVersion(DocVersion docver, bool convertProcedures)
- {
- long lTime = DateTime.Now.Ticks;
- string pth = docver.Title;
- // if the Title is empty, return because this docversion has already been migrated.
- bool appending = false;
- if (frmMain.Automatic && !frmMain.PurgeExistingData)
- {
- pth = frmMain.ProcedureSetPath;
- appending = true;
- }
- if (pth == null || pth == "" || pth == "Title") return TimeSpan.FromTicks(0);
- MultiUnitCount = docver.DocVersionConfig.Unit_Count;
- if (MultiUnitCount > 0)
- {
- Old2NewApple = new Dictionary();
- New2OldApple = new Dictionary();
- for (int i = 1; i <= MultiUnitCount; i++)
- {
- docver.DocVersionConfig.SelectedSlave = i;
- int oldindex = int.Parse(docver.DocVersionConfig.Old_Index);
- Old2NewApple.Add(oldindex, i);
- New2OldApple.Add(i, oldindex);
- }
- }
- if (!File.Exists(pth + @"\set.dbf") || !File.Exists(pth + @"\curset.dat")) return TimeSpan.FromTicks(0);
- // Open connection
- OleDbConnection cn = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + pth + ";Extended Properties=dBase III;Persist Security Info=False");
- if (convertProcedures)
- {
- // JSJ 02/10/2010 - Remove all the .INF files before proceeding to convert.
- // The INF files contain a path to a corresponding NDX file - had data with bat NDX path
- DeleteINFFiles(pth);
- _OutTran = new OutsideTransition(cn);
- frmMain.AddInfo("Before MigrateROFST{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- //if(!appending)
- MigrateROFST(pth, docver);
- GC.Collect();
- frmMain.AddInfo("After MigrateROFST{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- // Migrate library documents
- //if(!appending)
- MigrateLibDocs(cn, pth, appending);
-
- // if migrating bge, save the 'unit' number. This unit number is used in pagelist items and is
- // based on the path/directory name of the procedure set.
- if (true) // somehow check for BGE
- {
- SetDocVersionUnitConfig(pth, docver);
- }
-
-
- // Initialize Dictionaries
- dicTrans_ItemDone = new Dictionary();
- dicTrans_ItemIds = new Dictionary();
- dicTrans_MigrationErrors = new Dictionary>();
-
- // Create a 'dummy' content record. This will be used for any transitions 'to'
- // that don't exist when dbf is processed. At end, use this to see if there
- // are missing transitions.
- TransDummyCont = Content.MakeContent(null, "DUMMY CONTENT FOR TRANSITION MIGRATION", null, null, null);
- }
- // Process Procedures
- Item itm = null;
- if (convertProcedures || docver.VersionType == (int)VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft || docver.VersionType == (int)VEPROMS.CSLA.Library.VersionTypeEnum.Approved)
- {
- ResetApplesToOranges();
- itm = MigrateProcedures(cn, pth, docver, convertProcedures, docver.MyDocVersionInfo.ActiveFormat);
- }
- // Show any Missing Transtitons (i.e. Transitions which have not been processed)
- lTime = DateTime.Now.Ticks - lTime;
- if (convertProcedures)
- {
- ShowMissingTransitions(docver);
- //frmMain.Status = string.Format("{0}\r\nConversion completed in {1} seconds.", pth, TimeSpan.FromTicks(lTime).TotalSeconds);
- TimeSpan ts = TimeSpan.FromTicks(lTime);
- frmMain.Status = string.Format("{0}\r\nConversion completion time: {1:D2}:{2:D2}:{3:D2}.{4} ({5} Total Seconds)", pth, ts.Hours, ts.Minutes, ts.Seconds, ts.Milliseconds, ts.TotalSeconds);
- log.InfoFormat("Completed Migration of {0}", pth);
-
- //MessageBox.Show("Completed Migration of " + pth); //jsj commented out to let it run through
- if (rofstinfo != null) rofstinfo.GetROFSTLookup(DocVersionInfo.Get(docver.VersionID)).Close();
- dicTrans_ItemDone.Clear();
- dicTrans_ItemDone = null;
- }
- else
- frmMain.Status = string.Format("{0}\r\nDone.", pth);
- cn.Close();
- if (itm != null)
- {
- docver.MyItem = itm;
- if (convertProcedures) docver.Title = ""; // clearing this tell us this docver (path) was converted?
- if (!docver.IsSavable) ErrorRpt.ErrorReport(docver);
- //if(frmMain.MySettings.ExecutionMode == ExecutionMode.Debug)
- // docver.DocVersionConfig.Print_PDFLocation = frmMain.MySettings.PDFFolder;
- docver.Save();
- }
- return TimeSpan.FromTicks(lTime);
- }
-
- private void SetDocVersionUnitConfig(string pth, DocVersion docver)
- {
- // the following 'rules' were taken from 16bit code, in pagelist.c, to define the unit number.
-
- string unitNum = "0";
- string testPath = pth.ToUpper();
-
- // back up further if this is a tmpchg or approved directory.
- int lastPart = pth.LastIndexOf(@"\");
- if (lastPart != -1)
- {
- testPath = testPath.Substring(testPath.LastIndexOf(@"\"));
- if (testPath.Contains("TMPCHG") || testPath.Contains("APPROVED"))
- testPath = testPath.Substring(testPath.LastIndexOf(@"\", lastPart));
- }
- if (testPath.IndexOf("PROCS2") > -1 || testPath.IndexOf("2.PRC") > -1)
- unitNum = "2";
- else if (testPath.IndexOf("PROCS") > -1 || testPath.IndexOf("1.PRC") > -1)
- unitNum = "1";
- else if (testPath.IndexOf("3.PRC") > -1)
- unitNum = "3";
- else if (testPath.IndexOf("4.PRC") > -1)
- unitNum = "4";
-
- docver.DocVersionConfig.Print_UnitNumberForPageList = unitNum;
- docver.Save();
- }
- private void DeleteINFFiles(string pth)
- {
- DirectoryInfo di = new DirectoryInfo(pth);
- FileInfo [] myFiles = di.GetFiles("*.INF");
- foreach (FileInfo myFile in myFiles)
- myFile.Delete();
- }
- private VEPROMS.CSLA.Library.VersionTypeEnum DocVersionType(string s)
- {
- if (s.EndsWith("approved")) return VEPROMS.CSLA.Library.VersionTypeEnum.Approved;
- if (s.EndsWith("chgsht")) return VEPROMS.CSLA.Library.VersionTypeEnum.Revision;
- if (s.EndsWith("tmpchg")) return VEPROMS.CSLA.Library.VersionTypeEnum.Temporary;
- return VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft;
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/DocVersions.cs.bak b/PROMS/DataLoader/DocVersions.cs.bak
deleted file mode 100644
index 996562a8..00000000
--- a/PROMS/DataLoader/DocVersions.cs.bak
+++ /dev/null
@@ -1,127 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public TimeSpan MigrateDocVersion(DocVersion docver)
- {
- return MigrateDocVersion(docver, true);
- }
-
- private OutsideTransition _OutTran;
- public int MultiUnitCount = 0;
- public Dictionary Old2NewApple;
- public Dictionary New2OldApple;
-
- public TimeSpan MigrateDocVersion(DocVersion docver, bool convertProcedures)
- {
- long lTime = DateTime.Now.Ticks;
- string pth = docver.Title;
- MultiUnitCount = docver.DocVersionConfig.Unit_Count;
- if (MultiUnitCount > 0)
- {
- Old2NewApple = new Dictionary();
- New2OldApple = new Dictionary();
- for (int i = 1; i <= MultiUnitCount; i++)
- {
- docver.DocVersionConfig.SelectedSlave = i;
- int oldindex = int.Parse(docver.DocVersionConfig.Old_Index);
- Old2NewApple.Add(oldindex, i);
- New2OldApple.Add(i, oldindex);
- }
- }
- if (!File.Exists(pth + @"\set.dbf") || !File.Exists(pth + @"\curset.dat")) return new TimeSpan(); // Open connection
- OleDbConnection cn = new OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + pth + ";Extended Properties=dBase III;Persist Security Info=False");
- if (convertProcedures)
- {
- // JSJ 02/10/2010 - Remove all the .INF files before proceeding to convert.
- // The INF files contain a path to a corresponding NDX file - had data with bat NDX path
- DeleteINFFiles(pth);
- _OutTran = new OutsideTransition(cn);
- frmMain.AddInfo("Before MigrateROFST{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- MigrateROFST(pth, docver);
- GC.Collect();
- frmMain.AddInfo("After MigrateROFST{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- // Migrate library documents
- MigrateLibDocs(cn, pth);
- // Initialize Dictionaries
- dicTrans_ItemDone = new Dictionary();
- dicTrans_ItemIds = new Dictionary();
- dicTrans_MigrationErrors = new Dictionary>();
-
- // Create a 'dummy' content record. This will be used for any transitions 'to'
- // that don't exist when dbf is processed. At end, use this to see if there
- // are missing transitions.
- TransDummyCont = Content.MakeContent(null, "DUMMY CONTENT FOR TRANSITION MIGRATION", null, null, null);
- }
- // Process Procedures
- Item itm = null;
- if (convertProcedures || docver.VersionType == (int)VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft || docver.VersionType == (int)VEPROMS.CSLA.Library.VersionTypeEnum.Approved)
- itm = MigrateProcedures(cn, pth, docver, convertProcedures, docver.MyDocVersionInfo.ActiveFormat);
- // Show any Missing Transtitons (i.e. Transitions which have not been processed)
- lTime = DateTime.Now.Ticks - lTime;
- if (convertProcedures)
- {
- ShowMissingTransitions(docver);
- //frmMain.Status = string.Format("{0}\r\nConversion completed in {1} seconds.", pth, TimeSpan.FromTicks(lTime).TotalSeconds);
- TimeSpan ts = TimeSpan.FromTicks(lTime);
- frmMain.Status = string.Format("{0}\r\nConversion completion time: {1:D2}:{2:D2}:{3:D2}.{4} ({5} Total Seconds)", pth, ts.Hours, ts.Minutes, ts.Seconds, ts.Milliseconds, ts.TotalSeconds);
- log.InfoFormat("Completed Migration of {0}", pth);
-
- //MessageBox.Show("Completed Migration of " + pth); //jsj commented out to let it run through
- if (rofstinfo != null) rofstinfo.ROFSTLookup.Close();
- dicTrans_ItemDone.Clear();
- dicTrans_ItemDone = null;
- }
- else
- frmMain.Status = string.Format("{0}\r\nDone.", pth);
- cn.Close();
- if (itm != null)
- {
- docver.MyItem = itm;
- if (convertProcedures) docver.Title = ""; // clearing this tell us this docver (path) was converted?
- if (!docver.IsSavable) ErrorRpt.ErrorReport(docver);
- if(frmMain.MySettings.ExecutionMode == ExecutionMode.Debug)
- docver.DocVersionConfig.Print_PDFLocation = frmMain.MySettings.PDFFolder;
- docver.Save();
- }
- return TimeSpan.FromTicks(lTime);
- }
- private void DeleteINFFiles(string pth)
- {
- DirectoryInfo di = new DirectoryInfo(pth);
- FileInfo [] myFiles = di.GetFiles("*.INF");
- foreach (FileInfo myFile in myFiles)
- myFile.Delete();
- }
- private VEPROMS.CSLA.Library.VersionTypeEnum DocVersionType(string s)
- {
- if (s.EndsWith("approved")) return VEPROMS.CSLA.Library.VersionTypeEnum.Approved;
- if (s.EndsWith("chgsht")) return VEPROMS.CSLA.Library.VersionTypeEnum.Revision;
- if (s.EndsWith("tmpchg")) return VEPROMS.CSLA.Library.VersionTypeEnum.Temporary;
- return VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft;
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/Documents.cs b/PROMS/DataLoader/Documents.cs
deleted file mode 100644
index 0e4b366e..00000000
--- a/PROMS/DataLoader/Documents.cs
+++ /dev/null
@@ -1,368 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using System.Text.RegularExpressions;
-using Volian.MSWord;
-using VEPROMS.CSLA.Library;
-using System.Threading;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- private void SaveSectionDocument(string fname, string stpseq, string stype, ref int cid, string sectName, bool isLandscape)
- {
- int docid = SaveWordDoc(fname, stype, sectName, isLandscape);
- switch (docid)
- {
- case 0:
- // could add the following back in - but many of these may be put out in the log, and
- // don't supply any pertinent info.
- //log.InfoFormat("Timing problem for save of word document, will retry. oldstepsequence = {0}", stpseq);
- break;
- case -1:
- log.ErrorFormat("Could not complete save of word document, oldstepsequence = {0}", stpseq);
- break;
- default:
- cid = docid;
- break;
- }
- }
-
- private int SaveWordDoc(string fname, string title, string stype, bool isLandscape, ConfigInfo ci, string sectName, DateTime dtsutc)
- {
- int docid = 0;
- if (System.IO.File.Exists(fname))
- {
- FileInfo myFile = new FileInfo(fname);
- GC.Collect();
- frmMain.AddInfo("Processing {0} {1}", fname, GC.GetTotalMemory(true));
- //string tmpName = @"C:\Temp\DataLoader\" + myFile.Name.Replace(".", "_") + ".RTF";
- string tmpName = Path.GetTempFileName();
- string temppath = Path.GetTempFileName();
- if (frmMain.MySettings.ExecutionMode == ExecutionMode.Production ||
- frmMain.MySettings.ConvertTo == AccPageConversion.MSWord)
- {
- FileInfo tmpFile = new FileInfo(tmpName);
- if (tmpFile.Exists)
- tmpFile.Delete();
- myFile.CopyTo(tmpName);
- LoadAndSaveRichTextBox41(tmpName);
- WordDocument wd = new WordDocument(tmpName, stype, temppath, isLandscape);
- Thread myThread = new Thread(wd.GetAsciiFromWord);
- myThread.Start();
- myThread.Join(30000); // Wait 30 seconds to time-out
- if (myThread.ThreadState == System.Threading.ThreadState.Running)
- {
- WordDoc.KillWordApps();
- Thread.Sleep(1000);// Give the process a second to shutdown
- frmMain.AddError("Could not open file '{0}'", fname);
- docid = SaveDoc(fname, title, ci, "", dtsutc); // Save the original file
- }
- else
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Printing", "Length", string.Format("{0:0.0000}", wd.DocLen));
- docid = SaveDoc(temppath, title, ci, wd.ASCII, dtsutc);
- DeleteFile(temppath);
- DeleteFile(tmpName);
- }
- }
- else
- {
- if (frmMain.MySettings.ConvertTo == AccPageConversion.RichTextFormat)
- docid = SaveDoc(fname, title, ci, "", dtsutc); // Need to get Ascii Text from RTF
- }
- }
- else
- frmMain.AddError("Missing rtf file: {0}", fname);
- return docid;
- }
- private RichTextBox _MyRichTextBox = null;
- public RichTextBox MyRichTextBox
- {
- get
- {
- if (_MyRichTextBox == null)
- _MyRichTextBox = new RichTextBox();
- return _MyRichTextBox;
- }
- }
- private void LoadAndSaveRichTextBox(string tmpName)
- {
- string rtf = LoadFileRaw(tmpName);
- // Parse for margins because the RTB will remove them
- rtf = rtf.Replace("\x95", @"\bullet ");
- Match match = Regex.Match(rtf, @"((\\marg[^\\]+)+)", RegexOptions.Singleline);
- //rtf = rtf.Replace("\\sectd", "");
- //rtf = rtf.Replace("\\sbkpage", "");
- //rtf = rtf.Replace("\\sect", "\\page");
- rtf = Regex.Replace(rtf, @"\\ri[0-9]*(?=[ \\{])", "");
- rtf = Regex.Replace(rtf, @"\\sectd(?=[ \\{])", "");
- rtf = Regex.Replace(rtf, @"\\sbkpage(?=[ \\{])", "");
- rtf = Regex.Replace(rtf, @"\\sect(?=[ \\{])", @"\page");
- rtf = Regex.Replace(rtf, @"\\par(?=[ \\{])", @" <>\par");
- MyRichTextBox.Rtf = rtf; // Allow the RichTextBox to parse the RTF
- rtf = MyRichTextBox.Rtf; // Get the RTF back from the RichTextBox
- // Add the margins to the RTB output
- rtf = Regex.Replace(rtf, @"( |\r\n)<>\\par(?=[\r \\{])", @"\par");
- rtf = Regex.Replace(rtf, @" <>\\f. \\", @"\par\");
- rtf = Regex.Replace(rtf, @" <>", @"\par");
- rtf = Regex.Replace(rtf, @"\\ansi(?=[ \\{])", @"\ansi" + match.Value);
- //rtf = rtf.Replace(@"\ansi\", @"\ansi\" + match.Value);
- // Save the modified rtf to the temporary file
- SaveFile(rtf, tmpName);
- }
- private RichTextBox41 _MyRichTextBox41 = null;
- public RichTextBox41 MyRichTextBox41
- {
- get
- {
- if (_MyRichTextBox41 == null)
- _MyRichTextBox41 = new RichTextBox41();
- return _MyRichTextBox41;
- }
- }
- //private void LoadAndSaveRichTextBox41(string tmpName)
- //{
- // string rtf = LoadFileRaw(tmpName);
- // // Parse for margins because the RTB will remove them
- // rtf = rtf.Replace("\x95", @"\bullet ");
- // Match match = Regex.Match(rtf, @"((\\marg[^\\]+)+)", RegexOptions.Singleline);
- // rtf = Regex.Replace(rtf, @"(? 0)
- Application.DoEvents();
- }
- else
- {
- WordDoc.KillWordApps();
- Application.DoEvents();
- while (WordDoc.WordProcesses.Length > 0)
- Application.DoEvents();
- }
- }
- catch (Exception ex)
- {
- Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- }
- }
- private static void DeleteFile(string fName)
- {
- if (File.Exists(fName))
- File.Delete(fName);
- }
- private string LoadFileRaw(string fName)
- {
- try
- {
- FileInfo file = new FileInfo(fName);
- byte[] myBytes = new byte[file.Length];
- using (FileStream fs = file.OpenRead())
- {
- fs.Read(myBytes, 0, (int)file.Length);
- fs.Close();
- }
- StringBuilder sb = new StringBuilder();
- foreach (byte byt in myBytes)
- {
- int iByte = (int)byt;
- sb.Append((char)byt);
- }
- return sb.ToString();
- }
- catch (Exception ex)
- {
- Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- Application.DoEvents();
- return LoadFileRaw(fName);
- }
- }
- private void SaveFile(string str, string fName)
- {
- FileInfo file = new FileInfo(fName);
- using (StreamWriter sw = file.CreateText())
- {
- sw.Write(str);
- sw.Close();
- }
- }
- private int SaveWordDoc(string temppath, string stype, string sectName, bool isLandscape)
- {
- ConfigInfo ci = new ConfigInfo(null);
- ci.AddItem("Edit", "Initialized", "true");
- FileInfo myFile = new FileInfo(temppath);
- ci.AddItem("History", "OriginalFileName", myFile.Name);
- return SaveWordDoc(temppath, String.Empty, stype, isLandscape, ci, sectName, myFile.LastWriteTimeUtc);
- }
- private int SaveTheDoc(string temppath, string title, ConfigInfo ci, string ascii, DateTime dtsutc)
- {
- try
- {
- FileStream fs = File.Open(temppath, FileMode.Open, FileAccess.Read, FileShare.None);
- long len = fs.Length + 1;
- byte[] ByteArray = new byte[len];
- int nBytesRead = fs.Read(ByteArray, 0, (int)len);
- fs.Close();
- string t1 = (title == null || title == "") ? null : title;
- using (Document doc = Document.MakeDocument(t1, ByteArray, null, ci == null ? null : ci.ToString(), dtsutc, "Migration", ".Doc"))
- {
- FileInfo tmpFile = new FileInfo(temppath);
- string docfile = temppath.Substring(0, temppath.LastIndexOf(".")) + @".doc";
- if (File.Exists(docfile)) File.Delete(docfile);
- FileInfo doctmpFile = tmpFile.CopyTo(docfile);
- doc.DocAscii = ascii;
- doc.Save();
- File.Delete(docfile);
- return doc.DocID;
- }
- }
- // for an io exception, keep trying
- catch (IOException exio)
- {
- Console.WriteLine("IO: {0} - {1}", exio.GetType().Name, exio.Message);
- frmMain.AddError(exio, "SaveTheDoc('{0}','{1}')", temppath, title);
- Wait(2);
- return 0;
- }
- catch (Exception ex)
- {
- log.Error("Save Word Doc");
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- frmMain.AddError(ex, "SaveTheDoc('{0}','{1}')", temppath, title);
- return -1;
- }
-
- }
- private int SaveDoc(string temppath, string title, ConfigInfo ci, string ascii, DateTime dtsutc)
- {
- int done = 0;
- int ntry = 0;
- while (done == 0 && ntry < 4)
- {
- ntry++;
- done = SaveTheDoc(temppath, title, ci, ascii, dtsutc);
- }
- return done;
- }
- }
-}
diff --git a/PROMS/DataLoader/ErrorReport.cs b/PROMS/DataLoader/ErrorReport.cs
deleted file mode 100644
index 38726b04..00000000
--- a/PROMS/DataLoader/ErrorReport.cs
+++ /dev/null
@@ -1,30 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Windows.Forms;
-using VEPROMS.CSLA.Library;
-using Csla.Validation;
-
-namespace DataLoader
-{
- public static class ErrorRpt
- {
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- public static void ErrorReport(IVEHasBrokenRules mybr)
- {
- string smess = mybr.GetType().Name;
- IVEHasBrokenRules hbr = mybr.HasBrokenRules;
- if (hbr == null) smess += "\n Unknown Error";
- else
- {
- smess += "\n In object" + hbr.GetType().Name;
- foreach (BrokenRule br in hbr.BrokenRules)
- {
- smess += "\n" + br.Property + " - " + br.Description;
- }
- }
- //MessageBox.Show(smess);
- _MyLog.Error(smess);
- }
- }
-}
diff --git a/PROMS/DataLoader/FixItem.cs b/PROMS/DataLoader/FixItem.cs
deleted file mode 100644
index 0888b2da..00000000
--- a/PROMS/DataLoader/FixItem.cs
+++ /dev/null
@@ -1,81 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.IO;
-
-namespace DataLoader
-{
- public class FixItems : List
- {
- public FixItems(FileInfo myFile):base()
- {
- if (!myFile.Exists)
- return;
- FileStream fs = myFile.OpenRead();
- int len = (int) myFile.Length;
- byte [] buffer = new byte[len];
- fs.Read(buffer, 0, len);
- int offset = 0;
- while(offset < len)
- {
- int lFixItem = (int)(buffer[offset]);
- Add(new FixItem(buffer,offset));
- offset += lFixItem + 1;
- }
- }
- }
- public class FixItem
- {
- public FixItem(byte[] buffer, int offset)
- {
- int lFixItem = (int)(buffer[offset]);
- _Section = (char)(buffer[offset + 1]);
- _Step = (int)(buffer[offset + 2]);
- string str = System.Text.Encoding.GetEncoding(1251).GetString(buffer, offset + 3, lFixItem - 2);
- if (str.Contains(" "))
- {
- int index = str.IndexOf(" ");
- _Sequence = str.Substring(0, index);
- _Rev = str.Substring(index + 1);
- }
- else
- _Sequence = str;
- }
- private char _Section;
- public char Section
- {
- get { return _Section; }
- set { _Section = value; }
- }
- private int _Step;
- public int Step
- {
- get { return _Step; }
- set { _Step = value; }
- }
- private string _Sequence;
- public string Sequence
- {
- get { return _Sequence; }
- set { _Sequence = value; }
- }
- private string _Rev;
- public string Rev
- {
- get { return _Rev; }
- set { _Rev = value; }
- }
- private string _RevDate;
- public string RevDate
- {
- get { return _RevDate; }
- set { _RevDate = value; }
- }
- private string _ReviewDate;
- public string ReviewDate
- {
- get { return _ReviewDate; }
- set { _ReviewDate = value; }
- }
- }
-}
diff --git a/PROMS/DataLoader/FolderTreeNode.cs b/PROMS/DataLoader/FolderTreeNode.cs
deleted file mode 100644
index 92775a14..00000000
--- a/PROMS/DataLoader/FolderTreeNode.cs
+++ /dev/null
@@ -1,110 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Collections.Generic;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using Csla;
-using System.Windows.Forms;
-
-namespace DataLoader
-{
- public class FolderTreeNode : TreeNode
- {
- FolderTreeNode(string s) : base(s)
- {
- this.Name="ID:" + s;
- }
- FolderTreeNode(FolderInfo folderinfo)
- : base(folderinfo.Name)
- {
- _folderinfo = folderinfo;
- this.Name = "ID:" + folderinfo.FolderID.ToString();
- }
- private FolderInfo _folderinfo;
- public FolderInfo FolderInfo
- {
- get { return _folderinfo; }
- set
- {
- _folderinfo = value;
- }
- }
- private Dictionary _findTree = null;
- private Dictionary FindTree
- {
- get { return _findTree; }
- set { _findTree = value; }
- }
- public FolderTreeNode FindTreeNode(int folderID)
- {
- if (_findTree != null) return _findTree[folderID];
- return null;
- }
- public static FolderTreeNode BuildTreeList()
- {
- FolderTreeNode root = null;
- FolderInfoList fil = FolderInfoList.Get();
- Dictionary dicMissing = new Dictionary();
- Dictionary dicExists = new Dictionary();
- foreach (FolderInfo fi in fil)
- {
- FolderTreeNode ftp = null;
- if (dicExists.ContainsKey(fi.ParentID))
- {
- ftp = dicExists[fi.ParentID];
- // dicNeedToLoad.Remove(ftp);
- }
- else
- {
- if (fi.ParentID != 0)
- {
- ftp = new FolderTreeNode(fi.ParentID.ToString());
- dicMissing.Add(fi.ParentID, ftp);
- dicExists.Add(fi.ParentID, ftp);
- if (fi.FolderDocVersionCount > 0)
- {
- TreeNode tn = new TreeNode("dummy");
- tn.Tag = "dummy";
- ftp.Nodes.Add(tn);
- }
- }
- }
- FolderTreeNode ft = null;
- if (dicMissing.ContainsKey(fi.FolderID))
- {
- ft = dicMissing[fi.FolderID];
- ft.FolderInfo = fi;
- dicMissing.Remove(fi.FolderID);
- }
- else
- {
- ft = new FolderTreeNode(fi);
- if (fi.FolderDocVersionCount > 0)
- {
- TreeNode tn = new TreeNode("dummy");
- tn.Tag = "dummy";
- ft.Nodes.Add(tn);
- }
- dicExists.Add(fi.FolderID, ft);
- //dicNeedToLoad.Add(ft);
- }
- ft.Tag = fi;
- if (fi.ParentID == 0)
- root = ft;
- else
- ftp.Nodes.Add(ft);
- }
- root.FindTree = dicExists;
- return root;
- }
- }
-}
-
diff --git a/PROMS/DataLoader/Formats.cs b/PROMS/DataLoader/Formats.cs
deleted file mode 100644
index 1a0c13bf..00000000
--- a/PROMS/DataLoader/Formats.cs
+++ /dev/null
@@ -1,250 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.Xml.XPath;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- //public string _FmtAllPath;
- //public string _GenmacAllPath;
- //private FormatInfoList _AllFormats;
-
- //public FormatInfoList AllFormats
- //{
- // get
- // {
- // if (_AllFormats == null)
- // _AllFormats = FormatInfoList.Get();
- // return _AllFormats;
- // }
- //}
- //private Dictionary _LookupFormats;
- //public Dictionary LookupFormats
- //{
- // get
- // {
- // if (_LookupFormats == null)
- // {
- // _LookupFormats = new Dictionary();
- // foreach (FormatInfo myFormat in AllFormats)
- // {
- // _LookupFormats.Add(myFormat.Name, myFormat.FormatID);
- // }
- // }
- // return _LookupFormats;
- // }
- //}
- //private Format AddFormatToDB(Format parent, string format, bool issub, DateTime Dts, string Userid)
- //{
- // string fmtdata = null;
- // string genmacdata = null;
- // XmlDocument xd = null;
-
- // //string path = "c:\\development\\fmtall\\" + format + "all.xml";
- // string path = _FmtAllPath + "\\" + format + "all.xml";
- // if (File.Exists(path))
- // {
- // try
- // {
- // StreamReader srf = new StreamReader(path);
- // xd = new XmlDocument();
- // xd.Load(srf);
- // //xd.Load(path);
- // fmtdata = xd.OuterXml;
- // }
- // catch (Exception ex)
- // {
- // frmMain.AddError(ex, "AddFormatToDB('{0}','{1}')", parent.Name, path);
- // return null;
- // }
- // }
-
- // // Do we need genmac - only if non-subformat
- // if (!issub)
- // {
- // //path = "c:\\development\\genmacall\\" + format + ".svg";
- // path = _GenmacAllPath + "\\" + format + ".svg";
- // if (File.Exists(path))
- // {
- // try
- // {
- // StreamReader sr = new StreamReader(path);
- // XmlDocument xdg = new XmlDocument();
- // xdg.Load(sr);
- // //xdg.Load(path);
- // genmacdata = xdg.OuterXml;
- // }
- // catch (Exception ex)
- // {
- // frmMain.AddError(ex, "AddFormatToDB('{0}','{1}')", parent.Name, path);
- // return null;
- // }
- // }
- // }
- // // Get the name & then create the record.
- // if (Userid == null || Userid == "") Userid = "Migration";
-
- // string nmattr = "Default";
-
- // // use xpath to get name.
- // if (parent != null)
- // {
- // XmlNode nmnode = xd.SelectSingleNode("//FormatData");
- // if (nmnode is XmlElement)
- // {
- // XmlElement xm = (XmlElement)nmnode;
- // nmattr = xm.GetAttribute("Name");
- // }
- // }
- // // use the format name if base or non sub. If it's a sub, remove the "_".
- // string fname = issub ? format.Replace("_", "") : format;
- // Format rec = null;
- // try
- // {
- // if (!LookupFormats.ContainsKey(fname))
- // {
- // rec = Format.MakeFormat(parent, fname, nmattr, fmtdata, genmacdata, Dts, Userid);
- // }
- // else
- // {
- // rec = Format.Get(LookupFormats[fname]);
- // rec.Data = fmtdata;
- // rec.GenMac = genmacdata;
- // rec = rec.Save();
- // }
- // }
- // catch (Exception ex)
- // {
- // frmMain.AddError(ex, "AddFormatToDB-make format('{0}','{1}')", parent.Name, path);
- // }
- // return rec;
- //}
- //public void LoadAllFormats()
- //{
- // Format basefmt = null;
- // Format parent = null;
-
-
- // // Load base format.
- // basefmt = AddFormatToDB(null, "base", false, DateTime.Now, "Migration");
- // if (basefmt == null) return;
- // // now loop through all files... If there is an _ in the name, it's a subformat
- // // (for example, AEP_00.xml) skip it in main loop, it's handled for each format.
- // DirectoryInfo di = new DirectoryInfo(_FmtAllPath); //(@"c:\development\fmtall");
- // FileInfo[] fis = di.GetFiles("*.xml");
-
- // foreach (FileInfo fi in fis)
- // {
- // //if (fi.Name.ToUpper() == "WCN2ALL.XML"|| fi.Name.ToUpper() == "OHLPALL.XML")
- // //{
- // bool issub = (fi.Name.IndexOf("_") > 0) ? true : false;
- // if (!issub && fi.Name.ToLower() != "baseall.xml")
- // {
- // string fmtname = fi.Name.Substring(0, fi.Name.Length - 7);
- // // remove the all.xml part of the filename.
- // try
- // {
- // parent = AddFormatToDB(basefmt, fmtname, issub, DateTime.Now, "Migration");
- // if (parent != null)
- // {
- // // now see if there are any subformats associated with this, if so
- // // add them here...
- // DirectoryInfo sdi = new DirectoryInfo(_FmtAllPath); //("c:\\development\\fmtall");
- // FileInfo[] sfis = di.GetFiles(fmtname + "_*.xml");
- // foreach (FileInfo sfi in sfis)
- // {
- // string nm = sfi.Name.Substring(0, sfi.Name.Length - 7);
- // //Console.WriteLine("Processing {0}", sfi.Name);
- // frmMain.Status = string.Format("Processing Format {0}", sfi.Name);
- // try
- // {
- // AddFormatToDB(parent, nm, true, DateTime.Now, "Migration");
- // }
- // catch (Exception ex)
- // {
- // frmMain.AddError(ex, "LoadAllFormats() '{0}'", sfi.Name);
- // //Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- // }
- // }
- // }
- // }
- // catch (Exception ex)
- // {
- // frmMain.AddError(ex, "LoadAllFormats() '{0}'", fi.Name);
- // //Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- // }
- // }
- // //}
- // }
- //}
- public FormatInfo GetFormat(string format)
- {
- Format parent = null;
- Format rec = null;
-
- // get base
- Format baseparent = Format.Get(1);
-
- // if there is no format - what should be done? maybe nothing.
- if (format == null || format == "") return null;
-
- try
- {
- if (format.IndexOf(' ') > -1) // will have spaces if it's a user format
- {
- string part1 = format.Substring(0, format.IndexOf(' '));
- string part2 = null;
- try
- {
- part2 = format.Substring(format.LastIndexOf(' ') + 1, 2);
- }
- catch
- {
- }
- format = part1 + part2;
-
- // get the parent format's id (for example, AEP for AEP00).
- parent = Format.GetByParentID_Name(baseparent.FormatID, part1);
- }
- else
- parent = baseparent;
-
- // see if the format has been added, if not go get it.
- rec = Format.GetByParentID_Name(parent.FormatID, format);
- // JSJ - 02/04/10 this fixes cases where a subformat is no longer available,
- // default to the parent format
- if (rec == null)
- rec = parent;
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Error getting xml version of format {0}", ex.Message);
- frmMain.AddError(ex, "GetFormat('{0}')", format);
- }
- FormatInfo recInfo = FormatInfo.Get(rec.FormatID);
- return recInfo;
- }
-
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/Formats.cs.org b/PROMS/DataLoader/Formats.cs.org
deleted file mode 100644
index 552d14e8..00000000
--- a/PROMS/DataLoader/Formats.cs.org
+++ /dev/null
@@ -1,199 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.Xml.XPath;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
-
- private Format AddFormatToDB(Format parent, string format, bool issub, DateTime Dts, string Userid)
- {
- string fmtdata = null;
- string genmacdata = null;
- XmlDocument xd = null;
-
- string path = "c:\\development\\fmtall\\" + format + "all.xml";
- if (File.Exists(path))
- {
- try
- {
- StreamReader srf = new StreamReader(path);
- xd = new XmlDocument();
- xd.Load(srf);
- //xd.Load(path);
- fmtdata = xd.OuterXml;
- }
- catch(Exception ex)
- {
- frmMain.AddError(ex, "AddFormatToDB('{0}','{1}')", parent.Name, path);
- return null;
- }
- }
-
- // Do we need genmac - only if non-subformat
- if (!issub)
- {
- path = "c:\\development\\genmacall\\" + format + ".svg";
- if (File.Exists(path))
- {
- try
- {
- StreamReader sr = new StreamReader(path);
- XmlDocument xdg = new XmlDocument();
- xdg.Load(sr);
- //xdg.Load(path);
- genmacdata = xdg.OuterXml;
- }
- catch (Exception ex)
- {
- frmMain.AddError(ex, "AddFormatToDB('{0}','{1}')", parent.Name, path);
- return null;
- }
- }
- }
- // Get the name & then create the record.
- if (Userid == null || Userid == "") Userid = "Migration";
-
- string nmattr = "Default";
-
- // use xpath to get name.
- if (parent != null)
- {
- XmlNode nmnode = xd.SelectSingleNode("//FormatData");
- if (nmnode is XmlElement)
- {
- XmlElement xm = (XmlElement)nmnode;
- nmattr = xm.GetAttribute("Name");
- }
- }
- // use the format name if base or non sub. If it's a sub, remove the "_".
- string fname = issub ? format.Replace("_", "") : format;
- Format rec = null;
- try
- {
- rec = Format.MakeFormat(parent, fname, nmattr, fmtdata, genmacdata, Dts, Userid);
- }
- catch (Exception ex)
- {
- frmMain.AddError(ex, "AddFormatToDB-make format('{0}','{1}')", parent.Name, path);
- }
- return rec;
- }
- public void LoadAllFormats()
- {
- Format basefmt = null;
- Format parent = null;
-
- // Load base format.
- basefmt = AddFormatToDB(null, "base", false, DateTime.Now, "Migration");
- if (basefmt == null) return;
- // now loop through all files... If there is an _ in the name, it's a subformat
- // (for example, AEP_00.xml) skip it in main loop, it's handled for each format.
- DirectoryInfo di = new DirectoryInfo(@"c:\development\fmtall");
- FileInfo[] fis = di.GetFiles("*.xml");
-
- foreach (FileInfo fi in fis)
- {
- bool issub = (fi.Name.IndexOf("_") > 0) ? true : false;
- if (!issub && fi.Name.ToLower() != "baseall.xml")
- {
- string fmtname = fi.Name.Substring(0, fi.Name.Length - 7);
- // remove the all.xml part of the filename.
- try
- {
- parent = AddFormatToDB(basefmt, fmtname, issub, DateTime.Now, "Migration");
- if (parent != null)
- {
- // now see if there are any subformats associated with this, if so
- // add them here...
- DirectoryInfo sdi = new DirectoryInfo("c:\\development\\fmtall");
- FileInfo[] sfis = di.GetFiles(fmtname + "_*.xml");
- foreach (FileInfo sfi in sfis)
- {
- string nm = sfi.Name.Substring(0, sfi.Name.Length - 7);
- //Console.WriteLine("Processing {0}", sfi.Name);
- frmMain.Status = string.Format("Processing Format {0}", sfi.Name);
- try
- {
- AddFormatToDB(parent, nm, true, DateTime.Now, "Migration");
- }
- catch (Exception ex)
- {
- frmMain.AddError(ex, "LoadAllFormats() '{0}'", sfi.Name);
- //Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- }
- }
- }
- }
- catch (Exception ex)
- {
- frmMain.AddError(ex, "LoadAllFormats() '{0}'", fi.Name);
- //Console.WriteLine("{0} - {1}", ex.GetType().Name, ex.Message);
- }
- }
- }
- }
- public FormatInfo GetFormat(string format)
- {
- Format parent = null;
- Format rec = null;
-
- // get base
- Format baseparent = Format.Get(1);
-
- // if there is no format - what should be done? maybe nothing.
- if (format == null || format == "") return null;
-
- try
- {
- if (format.IndexOf(' ') > -1) // will have spaces if it's a user format
- {
- string part1 = format.Substring(0, format.IndexOf(' '));
- string part2 = format.Substring(format.LastIndexOf(' ') + 1, 2);
- format = part1 + part2;
-
- // get the parent format's id (for example, AEP for AEP00).
- parent = Format.GetByParentID_Name(baseparent.FormatID, part1);
- }
- else
- parent = baseparent;
-
- // see if the format has been added, if not go get it.
- rec = Format.GetByParentID_Name(parent.FormatID, format);
- // JSJ - 02/04/10 this fixes cases where a subformat is no longer available,
- // default to the parent format
- if (rec == null)
- rec = parent;
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Error getting xml version of format {0}", ex.Message);
- frmMain.AddError(ex, "GetFormat('{0}')", format);
- }
- FormatInfo recInfo = FormatInfo.Get(rec.FormatID);
- return recInfo;
- }
-
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/GroupProp.Designer.cs b/PROMS/DataLoader/GroupProp.Designer.cs
deleted file mode 100644
index 87548d7f..00000000
--- a/PROMS/DataLoader/GroupProp.Designer.cs
+++ /dev/null
@@ -1,110 +0,0 @@
-namespace DataLoader
-{
- partial class GroupProp
- {
- ///
- /// Required designer variable.
- ///
- private System.ComponentModel.IContainer components = null;
-
- ///
- /// Clean up any resources being used.
- ///
- /// true if managed resources should be disposed; otherwise, false.
- protected override void Dispose(bool disposing)
- {
- if (disposing && (components != null))
- {
- components.Dispose();
- }
- base.Dispose(disposing);
- }
-
- #region Windows Form Designer generated code
-
- ///
- /// Required method for Designer support - do not modify
- /// the contents of this method with the code editor.
- ///
- private void InitializeComponent()
- {
- this.splitContainer1 = new System.Windows.Forms.SplitContainer();
- this.lbGroups = new System.Windows.Forms.ListBox();
- this.pg = new System.Windows.Forms.PropertyGrid();
- this.btnSave = new System.Windows.Forms.Button();
- this.splitContainer1.Panel1.SuspendLayout();
- this.splitContainer1.Panel2.SuspendLayout();
- this.splitContainer1.SuspendLayout();
- this.SuspendLayout();
- //
- // splitContainer1
- //
- this.splitContainer1.Dock = System.Windows.Forms.DockStyle.Fill;
- this.splitContainer1.Location = new System.Drawing.Point(0, 0);
- this.splitContainer1.Name = "splitContainer1";
- //
- // splitContainer1.Panel1
- //
- this.splitContainer1.Panel1.Controls.Add(this.lbGroups);
- //
- // splitContainer1.Panel2
- //
- this.splitContainer1.Panel2.Controls.Add(this.pg);
- this.splitContainer1.Panel2.Controls.Add(this.btnSave);
- this.splitContainer1.Size = new System.Drawing.Size(629, 290);
- this.splitContainer1.SplitterDistance = 209;
- this.splitContainer1.TabIndex = 0;
- //
- // lbGroups
- //
- this.lbGroups.Dock = System.Windows.Forms.DockStyle.Fill;
- this.lbGroups.FormattingEnabled = true;
- this.lbGroups.Location = new System.Drawing.Point(0, 0);
- this.lbGroups.Name = "lbGroups";
- this.lbGroups.Size = new System.Drawing.Size(209, 290);
- this.lbGroups.TabIndex = 0;
- this.lbGroups.Click += new System.EventHandler(this.lbGroups_Click);
- //
- // pg
- //
- this.pg.Dock = System.Windows.Forms.DockStyle.Fill;
- this.pg.Location = new System.Drawing.Point(0, 23);
- this.pg.Name = "pg";
- this.pg.Size = new System.Drawing.Size(416, 267);
- this.pg.TabIndex = 0;
- //
- // btnSave
- //
- this.btnSave.Dock = System.Windows.Forms.DockStyle.Top;
- this.btnSave.Location = new System.Drawing.Point(0, 0);
- this.btnSave.Name = "btnSave";
- this.btnSave.Size = new System.Drawing.Size(416, 23);
- this.btnSave.TabIndex = 1;
- this.btnSave.Text = "Save";
- this.btnSave.UseVisualStyleBackColor = true;
- this.btnSave.Click += new System.EventHandler(this.btnSave_Click);
- //
- // GroupProp
- //
- this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);
- this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
- this.ClientSize = new System.Drawing.Size(629, 290);
- this.Controls.Add(this.splitContainer1);
- this.Name = "GroupProp";
- this.Text = "GroupProp";
- this.Load += new System.EventHandler(this.GroupProp_Load);
- this.splitContainer1.Panel1.ResumeLayout(false);
- this.splitContainer1.Panel2.ResumeLayout(false);
- this.splitContainer1.ResumeLayout(false);
- this.ResumeLayout(false);
-
- }
-
- #endregion
-
- private System.Windows.Forms.SplitContainer splitContainer1;
- private System.Windows.Forms.ListBox lbGroups;
- private System.Windows.Forms.PropertyGrid pg;
- private System.Windows.Forms.Button btnSave;
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/GroupProp.cs b/PROMS/DataLoader/GroupProp.cs
deleted file mode 100644
index 3b467dc3..00000000
--- a/PROMS/DataLoader/GroupProp.cs
+++ /dev/null
@@ -1,46 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.ComponentModel;
-using System.Data;
-using System.Drawing;
-using System.Text;
-using System.Windows.Forms;
-using Csla;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class GroupProp : Form
- {
- GroupInfoList glst;
- Group grp;
- public GroupProp()
- {
- InitializeComponent();
- }
- private void GroupProp_Load(object sender, EventArgs e)
- {
- lbGroups.Dock = DockStyle.Fill;
- glst = GroupInfoList.Get();
- lbGroups.DataSource = glst;
- lbGroups.DisplayMember = "GroupName";
- lbGroups.ValueMember = "GID";
- SetGroup();
- }
- private void lbGroups_Click(object sender, EventArgs e)
- {
- SetGroup();
- Console.WriteLine("Group ID = {0}", lbGroups.SelectedValue);
- }
- private void SetGroup()
- {
- grp = glst[lbGroups.SelectedIndex].Get();
- pg.SelectedObject = grp;
- }
- private void btnSave_Click(object sender, EventArgs e)
- {
- if (!grp.IsSavable) ErrorRpt.ErrorReport(grp);
- grp.Save();
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/GroupProp.resx b/PROMS/DataLoader/GroupProp.resx
deleted file mode 100644
index 19dc0dd8..00000000
--- a/PROMS/DataLoader/GroupProp.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/PROMS/DataLoader/LibDoc.cs b/PROMS/DataLoader/LibDoc.cs
deleted file mode 100644
index 0bfb131a..00000000
--- a/PROMS/DataLoader/LibDoc.cs
+++ /dev/null
@@ -1,137 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using Volian.MSWord;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using Org.Mentalis.Files;
-
-namespace DataLoader
-{
- public partial class Loader
- {
-
- private void MigrateLibDocs(OleDbConnection cn, string pth, bool appending)
- {
- // MessageBox.Show("Before LibDocs");
- frmMain.AddInfo("Before MigrateLibDocs{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- // Get all of the library documents - the first list has the entire list of files
- // found within the rtffiles folder, the second list contains usages from the 'tran'
- // file. During processing for procedures/sections occurs, the used library documents
- // will be migrated. After that, any remaining library documents will be added to
- // the section table without a reference from the structuretbl.
- Dictionary dicLibDocSect = new Dictionary();
- VEPROMS.CSLA.Library.DocumentInfoList docList = VEPROMS.CSLA.Library.DocumentInfoList.Get();
- frmMain.UpdateLabelsLibDocs(0, 0);
- if (Directory.Exists(pth + "\\rtffiles"))
- {
- DirectoryInfo di = new DirectoryInfo(pth + "\\RTFFILES");
- FileInfo[] fis = di.GetFiles("DOC_*.LIB");
- frmMain.UpdateLabelsSetProc(fis.Length);
- foreach (FileInfo fi in fis)
- {
- string fName = fi.Name.Substring(0, 8).ToUpper();
- frmMain.UpdateLabelsLibDocs(1, 0);
- if (appending)
- {
- foreach (VEPROMS.CSLA.Library.DocumentInfo docInfo in docList)
- {
- if(docInfo.Config.Contains(string.Format("\"{0}.LIB\"", fName)))
- dicLibDocSect[fName] = docInfo.DocID;
- }
- }
- else
- dicLibDocSect[fName] = MigrateLibDoc(fi);
- }
- }
- dicLibDocRef = new Dictionary();
- OleDbDataAdapter da_doc = new OleDbDataAdapter("select [FROMNUMBER], [FROMSEQUEN], [TONUMBER] from [tran] where [TONUMBER] LIKE 'doc_%' or [TONUMBER] like 'DOC_%'", cn);
- DataSet ds_doc = new DataSet();
- da_doc.Fill(ds_doc);
- frmMain.UpdateLabelsSetSect(ds_doc.Tables[0].Rows.Count);
- foreach (DataRow dr_doc in ds_doc.Tables[0].Rows)
- {
- frmMain.UpdateLabelsLibDocs(0, 1);
- string key = dr_doc["FROMNUMBER"].ToString().PadRight(20) + TextConvert.ConvertSeq(dr_doc["FROMSEQUEN"].ToString()).PadRight(10);
- if (!dicLibDocSect.ContainsKey(dr_doc["TONUMBER"].ToString().ToUpper()))
- log.ErrorFormat("Error setting library document references: {0}", dr_doc["TONUMBER"].ToString().ToUpper());
- else
- dicLibDocRef[key] = dicLibDocSect[dr_doc["TONUMBER"].ToString().ToUpper()];
- }
- da_doc.Dispose();
- frmMain.AddInfo("After MigrateLibDocs{0}\r\n{1}", GC.GetTotalMemory(true), VEPROMS.CSLA.Library.CSLACache.UsageAll);
- // MessageBox.Show("After LibDocs");
- }
- private int MigrateLibDoc(FileInfo fi)
- {
- ConfigInfo ci = new ConfigInfo(null);
- string title = null; // for docname, remove the '.lib', i.e. substring(0,8)
- ci.AddItem("Edit", "Initialized", "true");
- ci.AddItem("History", "OriginalFileName", fi.Name);
- string tmpRtfFileName = GetLibDocData(fi, ci, ref title);
- int Docid = SaveWordDoc(tmpRtfFileName, title, null, false, ci, string.Empty,fi.LastWriteTimeUtc);
- File.Delete(tmpRtfFileName);
- return Docid;
- }
- private string LoadFromLib(BinaryReader br)
- {
- int nchar = br.ReadInt16();
- if (nchar > 0)
- {
- string tmp = new string(br.ReadChars(nchar));
- return tmp.Substring(0, tmp.Length - 1); // remove null at end.
- }
- return null;
- }
- private string GetLibDocData(FileInfo fi, ConfigInfo ci, ref string title)
- {
- title = null;
- // get the number, title, etc from the file.
- // use the path to open the file & read the title & comment
- DateTime dts = fi.LastWriteTimeUtc;
- FileStream fs = fi.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
- BinaryReader br = new BinaryReader(fs, System.Text.ASCIIEncoding.ASCII);
- string tmpRtfFileName = Path.GetTempFileName();
- FileStream tmpfile = new FileStream(tmpRtfFileName, FileMode.Create);
- BinaryWriter bw = new BinaryWriter(tmpfile, System.Text.Encoding.ASCII);
- int cntPage = br.ReadInt16();
- if (cntPage != -1)
- { // Not End of File
- ci.AddItem("Section", "NumPages", cntPage.ToString());
- string ldtitle = LoadFromLib(br);
- if (ldtitle != null && ldtitle != "") title = ldtitle;
- ci.AddItem("LibDoc", "Comment", LoadFromLib(br));
- long l = br.BaseStream.Length - br.BaseStream.Position;
- byte[] buf = new byte[l];
- br.Read(buf, 0, (int)l);
- bw.Write(buf, 0, (int)l);
- br.Close();
- fs.Close();
- bw.Close();
- tmpfile.Close();
- WaitMS(wms); // give it some time to close the tempfile before adding section
- File.SetLastWriteTimeUtc(tmpRtfFileName, dts);
- }
- return tmpRtfFileName;
- }
- }
-
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/LibDoc.cs.bak b/PROMS/DataLoader/LibDoc.cs.bak
deleted file mode 100644
index 1b37f99d..00000000
--- a/PROMS/DataLoader/LibDoc.cs.bak
+++ /dev/null
@@ -1,122 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using Volian.MSWord;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using Org.Mentalis.Files;
-
-namespace DataLoader
-{
- public partial class Loader
- {
-
- private void MigrateLibDocs(OleDbConnection cn, string pth)
- {
- // Get all of the library documents - the first list has the entire list of files
- // found within the rtffiles folder, the second list contains usages from the 'tran'
- // file. During processing for procedures/sections occurs, the used library documents
- // will be migrated. After that, any remaining library documents will be added to
- // the section table without a reference from the structuretbl.
- Dictionary dicLibDocSect = new Dictionary();
- frmMain.UpdateLabelsLibDocs(0, 0);
- if (Directory.Exists(pth + "\\rtffiles"))
- {
- DirectoryInfo di = new DirectoryInfo(pth + "\\RTFFILES");
- FileInfo[] fis = di.GetFiles("DOC_*.LIB");
- frmMain.UpdateLabelsSetProc(fis.Length);
- foreach (FileInfo fi in fis)
- {
- frmMain.UpdateLabelsLibDocs(1, 0);
- dicLibDocSect[fi.Name.Substring(0, 8).ToUpper()] = MigrateLibDoc(fi);
- }
- }
- dicLibDocRef = new Dictionary();
- OleDbDataAdapter da_doc = new OleDbDataAdapter("select [FROMNUMBER], [FROMSEQUEN], [TONUMBER] from [tran] where [TONUMBER] LIKE 'doc_%' or [TONUMBER] like 'DOC_%'", cn);
- DataSet ds_doc = new DataSet();
- da_doc.Fill(ds_doc);
- frmMain.UpdateLabelsSetSect(ds_doc.Tables[0].Rows.Count);
- foreach (DataRow dr_doc in ds_doc.Tables[0].Rows)
- {
- frmMain.UpdateLabelsLibDocs(0, 1);
- string key = dr_doc["FROMNUMBER"].ToString().PadRight(20) + dr_doc["FROMSEQUEN"].ToString().PadRight(10);
- if (!dicLibDocSect.ContainsKey(dr_doc["TONUMBER"].ToString().ToUpper()))
- log.ErrorFormat("Error setting library document references: {0}", dr_doc["TONUMBER"].ToString().ToUpper());
- else
- dicLibDocRef[key] = dicLibDocSect[dr_doc["TONUMBER"].ToString().ToUpper()];
- }
- da_doc.Dispose();
- }
- private int MigrateLibDoc(FileInfo fi)
- {
- ConfigInfo ci = new ConfigInfo(null);
- string title = null; // for docname, remove the '.lib', i.e. substring(0,8)
- DateTime dts = DateTime.Now;
- ci.AddItem("Edit", "Initialized", "true");
- string tmpRtfFileName = GetLibDocData(fi, ci, ref title);
- int Docid = SaveWordDoc(tmpRtfFileName, title, null, ci, string.Empty);
- File.Delete(tmpRtfFileName);
- return Docid;
- }
- private string LoadFromLib(BinaryReader br)
- {
- int nchar = br.ReadInt16();
- if (nchar > 0)
- {
- string tmp = new string(br.ReadChars(nchar));
- return tmp.Substring(0, tmp.Length - 1); // remove null at end.
- }
- return null;
- }
- private string GetLibDocData(FileInfo fi, ConfigInfo ci, ref string title)
- {
- title = null;
- // get the number, title, etc from the file.
- // use the path to open the file & read the title & comment
- DateTime dts = fi.LastWriteTimeUtc;
- FileStream fs = fi.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
- BinaryReader br = new BinaryReader(fs, System.Text.ASCIIEncoding.ASCII);
- string tmpRtfFileName = Path.GetTempFileName();
- FileStream tmpfile = new FileStream(tmpRtfFileName, FileMode.Create);
- BinaryWriter bw = new BinaryWriter(tmpfile, System.Text.Encoding.ASCII);
- int cntPage = br.ReadInt16();
- if (cntPage != -1)
- { // Not End of File
- ci.AddItem("Section", "NumPages", cntPage.ToString());
- string ldtitle = LoadFromLib(br);
- if (ldtitle != null && ldtitle != "") title = ldtitle;
- ci.AddItem("LibDoc", "Comment", LoadFromLib(br));
- long l = br.BaseStream.Length - br.BaseStream.Position;
- byte[] buf = new byte[l];
- br.Read(buf, 0, (int)l);
- bw.Write(buf, 0, (int)l);
- br.Close();
- fs.Close();
- bw.Close();
- tmpfile.Close();
- WaitMS(wms); // give it some time to close the tempfile before adding section
- File.SetLastWriteTimeUtc(tmpRtfFileName, dts);
- }
- return tmpRtfFileName;
- }
- }
-
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/LoadConfig.cs b/PROMS/DataLoader/LoadConfig.cs
deleted file mode 100644
index 2b371cdd..00000000
--- a/PROMS/DataLoader/LoadConfig.cs
+++ /dev/null
@@ -1,243 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace Config
-{
- public class ConfigFile
- {
- #region Log4Net
- private static readonly log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- #endregion
- #region MigrateStrings
- // the following lists are used for storing the element and attribute names
- // for migrating of ini & cfg files. The names stored in these lists are
- // those that should be migrated. If not in this list, the data (either element
- // or attribute name) is prefaced with a 'z'. At some point in the future, those
- // names with a 'z' will be removed.
- public List listIni_EleName = new List();
- public List listIni_AttrName = new List();
- private void SetIniEleName()
- {
- // veproms.ini
- listIni_EleName.Add("graphics");
- listIni_EleName.Add("color");
- listIni_EleName.Add("print");
- listIni_EleName.Add("startup");
- listIni_EleName.Add("data integrity");
- listIni_EleName.Add("wordprocessor");
- listIni_EleName.Add("procedurelisttabstops");
-
- // proc.ini
- listIni_EleName.Add("rodefaults");
- listIni_EleName.Add("display");
- listIni_EleName.Add("backgrounddefaults");
- listIni_EleName.Add("unit");
- listIni_EleName.Add("applicability");
- listIni_EleName.Add("procedureset");
-
- // roapp.ini
- listIni_EleName.Add("roapp");
-
- // .cfg
- listIni_EleName.Add("spelldictionary");
- // listIni_EleName.Add("wordprocessor"); - already in here.
- }
-
- private void SetIniAttrName()
- {
- //veproms.ini
- listIni_AttrName.Add("defaultext");
- listIni_AttrName.Add("ro");
- listIni_AttrName.Add("editbackground");
- listIni_AttrName.Add("black");
- listIni_AttrName.Add("blue");
- listIni_AttrName.Add("green");
- listIni_AttrName.Add("cyan");
- listIni_AttrName.Add("red");
- listIni_AttrName.Add("magenta");
- listIni_AttrName.Add("brown");
- listIni_AttrName.Add("lightgray");
- listIni_AttrName.Add("darkgray");
- listIni_AttrName.Add("ligthblue");
- listIni_AttrName.Add("lightgreen");
- listIni_AttrName.Add("lightcyan");
- listIni_AttrName.Add("lightred");
- listIni_AttrName.Add("lightmagenta");
- listIni_AttrName.Add("yellow");
- listIni_AttrName.Add("white");
- listIni_AttrName.Add("underlinewidth");
- listIni_AttrName.Add("verticalOffset");
- listIni_AttrName.Add("strokewidth");
- listIni_AttrName.Add("strokewidthbold");
- listIni_AttrName.Add("messageboxtitle");
- listIni_AttrName.Add("messagefile");
- listIni_AttrName.Add("enableindexcheck");
- listIni_AttrName.Add("wordwrap");
- listIni_AttrName.Add("procedurenumbertab");
- listIni_AttrName.Add("proceduretitletab");
-
- // proc.ini
- listIni_AttrName.Add("setpoint");
- listIni_AttrName.Add("graphics");
- listIni_AttrName.Add("ropath");
- listIni_AttrName.Add("display");
- listIni_AttrName.Add("sectiontitle");
- listIni_AttrName.Add("sectionnumber");
- listIni_AttrName.Add("number");
- listIni_AttrName.Add("othernumber");
- listIni_AttrName.Add("name");
- listIni_AttrName.Add("othername");
- listIni_AttrName.Add("text");
- listIni_AttrName.Add("othertext");
- listIni_AttrName.Add("id");
- listIni_AttrName.Add("otherid");
- listIni_AttrName.Add("procedurenumber");
- listIni_AttrName.Add("masterdir");
-
-
- // roapp.ini
- listIni_AttrName.Add("extention"); // NOTE MIS-SPELLING was in 16-bit program!
-
- // .cfg
- listIni_AttrName.Add("custom");
- listIni_AttrName.Add("page");
- listIni_AttrName.Add("toolbar");
- listIni_AttrName.Add("paragraph");
- listIni_AttrName.Add("ruler");
- listIni_AttrName.Add("userphone1");
- listIni_AttrName.Add("userphone2");
- listIni_AttrName.Add("userloc1");
- listIni_AttrName.Add("userloc2");
- }
- #endregion
- #region LoadDataCode
- public ConfigFile()
- {
- }
- public void LoadUsrCfg(User user, string vepromspath)
- {
- string cfgpath = vepromspath + "\\config";
- if (!Directory.Exists(cfgpath))
- {
- log.Info("No user cfgs found in config directory - did not migrate any user cfgs");
- return;
- }
- DirectoryInfo di = new DirectoryInfo(cfgpath);
- FileInfo[] fis = di.GetFiles("*.cfg");
-
- foreach (FileInfo fi in fis)
- {
- string cfgname = fi.Name.Substring(0, fi.Name.IndexOf("."));
- if (cfgname.ToUpper() == user.UserID.ToUpper())
- {
- // Get Users table fields by reading the cfg file into a buffer & looking
- // for the UserNetworkId and UserName fields.
- StreamReader myReader = new StreamReader(fi.FullName);
- string sLine;
- string UserLogin = null;
- string UserName = null;
- int indx = -1;
- while ((sLine = myReader.ReadLine()) != null && (UserLogin == null || UserName == null))
- {
- if (sLine.Length > 0 && sLine.Substring(0, 1) != ";")
- {
- if ((indx = sLine.ToLower().IndexOf("usernetworkid")) >= 0)
- {
- indx = sLine.IndexOf("=", indx + 13);
- UserLogin = sLine.Substring(indx + 1, sLine.Length - indx - 1).Trim();
- }
- else if ((indx = sLine.ToLower().IndexOf("username")) >= 0)
- {
- indx = sLine.IndexOf("=", indx + 8);
- UserName = sLine.Substring(indx + 1, sLine.Length - indx - 1).Trim();
- }
- }
- }
- myReader.Close();
-
- // get the xml to set the config field
- XmlDocument d = IniToXml(fi.FullName);
- user.Config = d == null ? null : d.InnerXml;
- user.UserLogin = UserLogin;
- user.UserName = UserName;
- user.CFGName = cfgname;
- break;
- }
- }
- }
-
- public XmlDocument LoadSystemIni(string vepromspath)
- {
- string inipath = vepromspath + "\\veproms.ini";
- if (!File.Exists(inipath))
- {
- log.InfoFormat("Did not migrate {0} - file not found", inipath);
- return null;
- }
- XmlDocument d = IniToXml(inipath);
- // see if default image file extension was set, if not make it TIF
- XmlNode gr = d.SelectSingleNode("//Graphics");
- XmlNode ext = null;
- if (gr != null) ext = gr.SelectSingleNode("@defaultext");
- if (ext == null)
- {
- // if the graphics node doesn't exist, make it.
- if (gr == null)
- {
- gr = d.CreateElement("Graphics");
- d.DocumentElement.AppendChild(gr);
- }
- XmlAttribute xa = d.CreateAttribute("defaultext");
- xa.Value = "TIF";
- gr.Attributes.Append(xa);
- }
- return d;
- }
-
- public XmlDocument LoadRoAppIni(string ropath)
- {
- string inipath = ropath + "\\roapp.ini";
- // not an error if it does not exist - just return null.
- if (!File.Exists(inipath)) return null;
-
- XmlDocument d = IniToXml(inipath);
-
- return d;
- }
-
- public XmlDocument IniToXml(string path)
- {
- FileInfo fi = new FileInfo(path);
- if (fi.Exists)
- {
- PrivateProfile ppCfg;
- if (listIni_AttrName == null || listIni_AttrName.Count == 0) SetIniAttrName();
- if (listIni_EleName == null || listIni_EleName.Count == 0) SetIniEleName();
- ppCfg = new PrivateProfile(path, listIni_EleName, listIni_AttrName);
- return ppCfg.XML();
- }
- return null;
- }
- #endregion
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/LoadTreeDB.cs b/PROMS/DataLoader/LoadTreeDB.cs
deleted file mode 100644
index fd7f9b43..00000000
--- a/PROMS/DataLoader/LoadTreeDB.cs
+++ /dev/null
@@ -1,392 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using Org.Mentalis.Files;
-using Config;
-using Utils;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- private static List _DataPaths = null;
- public static List DataPaths
- {
- get
- {
- if (_DataPaths == null)
- {
- _DataPaths = new List();
- string sCfg = Environment.GetEnvironmentVariable("veconfig");
- IniReader cfg = new IniReader(sCfg);
- // Get DataPath
- string sDP = cfg.ReadString("menu", "DataPath");
- // Split DataPath into directories
- // Get the current list of folders so that if it already exists, just get the 'Folder', otherwise
- // make it. It was done this way because there was no way to get the Folder given a name/Title.
- foreach (string s1 in sDP.Split(";".ToCharArray()))
- {
- if (s1.Length > 0)
- {
- string[] s2 = s1.Split(",".ToCharArray());
- _DataPaths.Add( s2[0]);
- }
- }
- }
- return Loader._DataPaths;
- }
- }
- public List vlnDataPathFolders() // was vlnDataPath
- {
- List dpf = new List();
- // Get path to config file
- string sCfg = Environment.GetEnvironmentVariable("veconfig");
- IniReader cfg = new IniReader(sCfg);
- // Get DataPath
- string sDP = cfg.ReadString("menu", "DataPath");
- // Split DataPath into directories
-
- // Get the current list of folders so that if it already exists, just get the 'Folder', otherwise
- // make it. It was done this way because there was no way to get the Folder given a name/Title.
- FolderInfoList fil = FolderInfoList.Get();
-
- foreach (string s1 in sDP.Split(";".ToCharArray()))
- {
- if (s1.Length > 0)
- {
- string[] s2 = s1.Split(",".ToCharArray());
- Folder fld = GetFolderFromName(s2[1], s2[0], fil);
- if (fld == null)
- fld = Folder.MakeFolder(sysFolder, dbConn, s2[1], s2[0], FolderName(s2[0]), null, null, DateTime.Now, "Migration");
- dpf.Add(fld);
- }
- }
- return dpf;
- }
- private Folder GetFolderFromName(string name, string title, FolderInfoList fil)
- {
- Folder fld = null;
- foreach (FolderInfo fi in fil)
- {
- string fi_Title = fi.Title.TrimEnd('\\');
- //if (fi.Name.ToUpper() == name.ToUpper() && fi.Title.ToUpper() == title.ToUpper())
- if (fi.Name.ToUpper() == name.ToUpper() && fi_Title.ToUpper() == title.ToUpper())
- {
- fld = Folder.Get(fi.FolderID);
- return fld;
- }
- }
- return null;
- }
- private string FolderName(string Path)
- {
- int ind = Path.LastIndexOf("\\");
- if (ind == Path.Length-1 || ind < 0) return Path;
- return Path.Substring(ind + 1);
- }
- private DocVersion GetDocVersionFromName(Folder fld, string f)
- {
- DocVersion dv = null;
- DocVersionInfoList dvil = DocVersionInfoList.GetByFolderID(fld.FolderID);
- foreach (DocVersionInfo dvi in dvil)
- {
- if (dvi.Name.ToUpper() == f.ToUpper())
- {
- dv = DocVersion.Get(dvi.VersionID);
- return dv;
- }
- }
- return null;
- }
- private object cslaObject(vlnObject vb, Connection dbConn, Object parfld, TreeNode tn)
- {
- switch (vb.Type)
- {
- case "plant":
- case "set":
- // if folder exists... get the Folder object, otherwise create it.
- FolderInfoList fil = FolderInfoList.Get();
- Folder fld = GetFolderFromName(vb.Title, vb.Path, fil);
- if (fld==null) fld = Folder.MakeFolder((Folder)parfld, dbConn, vb.Title, vb.Path, FolderName(vb.Path), null, null, DateTime.Now, "Migration");
- tn.Tag = fld;
- return (object) fld;
- case "version":
- // see if version exists for the input folder, parfld.
- DocVersion v = GetDocVersionFromName((Folder)parfld, vb.Title);
- if (v == null)
- {
- ConfigFile cfg = new ConfigFile();
-
- XmlDocument d = cfg.IniToXml(vb.Path + "\\proc.ini");
- AddSlaveUnits(d, vb.Path);
- if (frmMain.ProcessFailed)
- return null;
- //DocVersionConfig fld_cfg = new DocVersionConfig(d == null ? "" : d.InnerXml);
- FolderConfig fld_cfg = (d==null)?null:new FolderConfig(d.InnerXml);
- // translate curset.dat into xml & add to d (somehow).
- string csfile = string.Format("{0}\\curset.dat",vb.Path);
- string defPlantFmt = null;
- if (File.Exists(csfile))
- {
- CurSet cs = new CurSet(csfile);
- try
- {
- if (fld_cfg == null) fld_cfg = new FolderConfig();
- fld_cfg = cs.Convert(fld_cfg);
- defPlantFmt = cs.GetDefFmt();
- }
- catch (Exception ex)
- {
- log.ErrorFormat("error in convert curset.dat, ex = {0}", ex.Message);
- frmMain.AddError(ex, "error in convert curset.dat");
- }
- }
- // *** RHM 20120613 - Fix
- // *** This was naming the DocVersion to the folder name
- //string titlepath = vb.Path + "\\" + "Title";
- //FileInfo fi = new FileInfo(titlepath);
- //string thetitle = vb.Title;
- //if (File.Exists(titlepath))
- //{
- // StreamReader myReader = new StreamReader(titlepath);
- // thetitle = myReader.ReadLine();
- // myReader.Close();
- //}
- Folder tmpfld = (Folder)parfld;
- FormatInfo format = null;
- if (defPlantFmt != null && defPlantFmt != "")
- {
- format = GetFormat(defPlantFmt);
- }
- else
- format = FormatInfo.Get(1);
-
- using(Format fmt = format.Get())
- v = DocVersion.MakeDocVersion(tmpfld, (int)DocVersionType(vb.Path.ToLower()), vb.Title, vb.Path.ToLower(), null, fmt, fld_cfg == null ? null : fld_cfg.ToString(), DateTime.Now, "Migration");
- }
- tn.Tag = v;
- MigrateDocVersion(v, false);
- return (object)v;
- }
- return 0;
- }
-
- private void AddSlaveUnits(XmlDocument d, string path)
- {
- string masterDir = GetMasterDir(d);
- if (masterDir == null)
- {
- //not a master slave procedure set
- return;
- }
- DirectoryInfo master = new DirectoryInfo(path);
- if (master.Name.ToUpper() != masterDir.ToUpper()) return;
- List names = GetUnitNames(d);
- if (names == null)
- {
- frmMain.ProcessFailed = true;
- MessageBox.Show("Could not find Unit names in slave proc.ini files");
- frmMain.MyError = "Could not find Unit names in slave proc.ini files";
- return;
- }
- DirectoryInfo[] slaves = master.Parent.GetDirectories(masterDir.ToUpper().Replace(".PRC",".SL*"));
- XmlDocument units = new XmlDocument();
- units.LoadXml("");
- int idx = 0;
- foreach (DirectoryInfo slave in slaves)
- {
- FileInfo[] inis = slave.GetFiles("proc.ini");
- if (inis.Length > 0)
- {
- FileInfo ini = inis[0];
- ConfigFile cfg = new ConfigFile();
- XmlDocument xSlave = cfg.IniToXml(ini.FullName);
- xSlave.LoadXml(xSlave.OuterXml.Replace(" GetUnitNames(XmlDocument d)
- {
- XmlNode zapp = GetXMLNode(d, "Unit");// d.SelectSingleNode("//Unit");
- if (zapp == null) return null;
- XmlNode zmstr = GetXMLAttribute(zapp, "Name");// zapp.Attributes.GetNamedItem("Name");
- if (zmstr == null) return null;
- string[] names = zmstr.InnerText.Split(",".ToCharArray());
- return new List(names);
- }
-
- private static string GetMasterDir(XmlDocument d)
- {
- XmlNode zapp = GetXMLNode(d, "Applicability");// d.SelectSingleNode("//Applicability");
- if (zapp == null) return null;
- XmlNode zmstr = GetXMLAttribute(zapp, "MasterDir");// zapp.Attributes.GetNamedItem("MasterDir");
- if (zmstr == null) return null;
- return zmstr.InnerText;
- }
- private string _OnlyThisFolder;
- public string OnlyThisFolder
- {
- get
- {
- if (_OnlyThisFolder == null)
- {
- if (frmMain.MySettings.OnlyThisSet || frmMain.Automatic)
- {
- DirectoryInfo dir = new DirectoryInfo(frmMain.ProcedureSetPath);
- if (frmMain.Automatic)
- _OnlyThisFolder = dir.FullName.ToUpper();
- else
- _OnlyThisFolder = dir.Parent.FullName.ToUpper();
- }
- else if ((frmMain.MySettings.ProcessOnlyInLocation ?? "") != "")
- _OnlyThisFolder = frmMain.MySettings.ProcessOnlyInLocation.ToUpper();
- else
- _OnlyThisFolder = "";
- }
- return _OnlyThisFolder;
- }
- }
- private bool IsInSelectedPlantData(Object parent)
- {
- if (OnlyThisFolder == "")
- return true;
- Folder fld = parent as Folder;
- if (fld == null)
- return true;
- if (fld.MyParent.MyParent != null)
- return true;
- if (fld.Title.ToUpper() == OnlyThisFolder)
- return true;
- return false;
- }
- private void MigrateChildren(vlnObject vb, vlnServer vs, Connection dbConn, Object parent, TreeNode tn)
- {
- if (vb.Type != "version")
- {
- vb.LoadChildren(vs.GetChildren(vb.ToString()));
- List lv = vb.Children;
- if (vb.Children.Count == 0)
- frmMain.AddError("No children found for {0}", vb.Path);
- foreach (vlnObject vbc in lv)
- {
- if (vbc.Path.ToUpper().StartsWith(OnlyThisFolder) || OnlyThisFolder.StartsWith(vbc.Path.ToUpper()))
- {
- TreeNode tnc = tn.Nodes.Add(vbc.Title);
- object idc = cslaObject(vbc, dbConn, parent, tnc);
- if (frmMain.ProcessFailed)
- return;
- frmMain.Status = "Loading " + vbc.Title;
- MigrateChildren(vbc, vs, dbConn, idc, tnc);
- frmMain.ChildrenProcessed++;
- }
- }
- }
- frmMain.Status = " ";
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/LoadTreeDB.cs.bak b/PROMS/DataLoader/LoadTreeDB.cs.bak
deleted file mode 100644
index c58ba470..00000000
--- a/PROMS/DataLoader/LoadTreeDB.cs.bak
+++ /dev/null
@@ -1,284 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using Org.Mentalis.Files;
-using Config;
-using Utils;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- private List vlnDataPathFolders() // was vlnDataPath
- {
- List dpf = new List();
- // Get path to config file
- string sCfg = Environment.GetEnvironmentVariable("veconfig");
- IniReader cfg = new IniReader(sCfg);
- // Get DataPath
- string sDP = cfg.ReadString("menu", "DataPath");
- // Split DataPath into directories
-
- // Get the current list of folders so that if it already exists, just get the 'Folder', otherwise
- // make it. It was done this way because there was no way to get the Folder given a name/Title.
- FolderInfoList fil = FolderInfoList.Get();
-
- foreach (string s1 in sDP.Split(";".ToCharArray()))
- {
- if (s1.Length > 0)
- {
- string[] s2 = s1.Split(",".ToCharArray());
- Folder fld = GetFolderFromName(s2[1], s2[0], fil);
- if (fld == null)
- fld = Folder.MakeFolder(sysFolder, dbConn, s2[1], s2[0], FolderName(s2[0]), null, null, DateTime.Now, "Migration");
- dpf.Add(fld);
- }
- }
- return dpf;
- }
- private Folder GetFolderFromName(string name, string title, FolderInfoList fil)
- {
- Folder fld = null;
- foreach (FolderInfo fi in fil)
- {
- if (fi.Name.ToUpper() == name.ToUpper() && fi.Title.ToUpper() == title.ToUpper())
- {
- fld = Folder.Get(fi.FolderID);
- return fld;
- }
- }
- return null;
- }
- private string FolderName(string Path)
- {
- int ind = Path.LastIndexOf("\\");
- if (ind == Path.Length-1 || ind < 0) return Path;
- return Path.Substring(ind + 1);
- }
- private DocVersion GetDocVersionFromName(Folder fld, string f)
- {
- DocVersion dv = null;
- DocVersionInfoList dvil = DocVersionInfoList.GetByFolderID(fld.FolderID);
- foreach (DocVersionInfo dvi in dvil)
- {
- if (dvi.Name.ToUpper() == f.ToUpper())
- {
- dv = DocVersion.Get(dvi.VersionID);
- return dv;
- }
- }
- return null;
- }
- private object cslaObject(vlnObject vb, Connection dbConn, Object parfld, TreeNode tn)
- {
- switch (vb.Type)
- {
- case "plant":
- case "set":
- // if folder exists... get the Folder object, otherwise create it.
- FolderInfoList fil = FolderInfoList.Get();
- Folder fld = GetFolderFromName(vb.Title, vb.Path, fil);
- if (fld==null) fld = Folder.MakeFolder((Folder)parfld, dbConn, vb.Title, vb.Path, FolderName(vb.Path), null, null, DateTime.Now, "Migration");
- tn.Tag = fld;
- return (object) fld;
- case "version":
- // see if version exists for the input folder, parfld.
- DocVersion v = GetDocVersionFromName((Folder)parfld, vb.Title);
- if (v == null)
- {
- ConfigFile cfg = new ConfigFile();
-
- XmlDocument d = cfg.IniToXml(vb.Path + "\\proc.ini");
- AddSlaveUnits(d, vb.Path);
- //DocVersionConfig fld_cfg = new DocVersionConfig(d == null ? "" : d.InnerXml);
- FolderConfig fld_cfg = (d==null)?null:new FolderConfig(d.InnerXml);
- // translate curset.dat into xml & add to d (somehow).
- string csfile = string.Format("{0}\\curset.dat",vb.Path);
- string defPlantFmt = null;
- if (File.Exists(csfile))
- {
- CurSet cs = new CurSet(csfile);
- try
- {
- if (fld_cfg == null) fld_cfg = new FolderConfig();
- fld_cfg = cs.Convert(fld_cfg);
- defPlantFmt = cs.GetDefFmt();
- }
- catch (Exception ex)
- {
- log.ErrorFormat("error in convert curset.dat, ex = {0}", ex.Message);
- frmMain.AddError(ex, "error in convert curset.dat");
- }
- }
- // *** RHM 20120613 - Fix
- // *** This was naming the DocVersion to the folder name
- //string titlepath = vb.Path + "\\" + "Title";
- //FileInfo fi = new FileInfo(titlepath);
- //string thetitle = vb.Title;
- //if (File.Exists(titlepath))
- //{
- // StreamReader myReader = new StreamReader(titlepath);
- // thetitle = myReader.ReadLine();
- // myReader.Close();
- //}
- Folder tmpfld = (Folder)parfld;
- FormatInfo format = null;
- if (defPlantFmt != null && defPlantFmt != "")
- {
- format = GetFormat(defPlantFmt);
- }
- else
- format = FormatInfo.Get(1);
-
- using(Format fmt = format.Get())
- v = DocVersion.MakeDocVersion(tmpfld, (int)DocVersionType(vb.Path.ToLower()), vb.Title, vb.Path.ToLower(), null, fmt, fld_cfg == null ? null : fld_cfg.ToString(), DateTime.Now, "Migration");
- }
- tn.Tag = v;
- MigrateDocVersion(v, false);
- return (object)v;
- }
- return 0;
- }
-
- private void AddSlaveUnits(XmlDocument d, string path)
- {
- string masterDir = GetMasterDir(d);
- if (masterDir == null) return;
- DirectoryInfo master = new DirectoryInfo(path);
- if (master.Name.ToUpper() != masterDir.ToUpper()) return;
- List names = GetUnitNames(d);
- DirectoryInfo[] slaves = master.Parent.GetDirectories(masterDir.ToUpper().Replace(".PRC",".SL*"));
- XmlDocument units = new XmlDocument();
- units.LoadXml("");
- int idx = 0;
- foreach (DirectoryInfo slave in slaves)
- {
- FileInfo[] inis = slave.GetFiles("proc.ini");
- if (inis.Length > 0)
- {
- FileInfo ini = inis[0];
- ConfigFile cfg = new ConfigFile();
- XmlDocument xSlave = cfg.IniToXml(ini.FullName);
- xSlave.LoadXml(xSlave.OuterXml.Replace(" GetUnitNames(XmlDocument d)
- {
- XmlNode zapp = d.SelectSingleNode("//Unit");
- if (zapp == null) return null;
- XmlNode zmstr = zapp.Attributes.GetNamedItem("Name");
- if (zmstr == null) return null;
- string[] names = zmstr.InnerText.Split(",".ToCharArray());
- return new List(names);
- }
-
- private static string GetMasterDir(XmlDocument d)
- {
- XmlNode zapp = d.SelectSingleNode("//Applicability");
- if (zapp == null) return null;
- XmlNode zmstr = zapp.Attributes.GetNamedItem("MasterDir");
- if (zmstr == null) return null;
- return zmstr.InnerText;
- }
- private string _OnlyThisFolder;
- public string OnlyThisFolder
- {
- get
- {
- if (_OnlyThisFolder == null)
- {
- if (frmMain.MySettings.OnlyThisSet)
- {
- DirectoryInfo dir = new DirectoryInfo(frmMain.MySettings.ProcedureSetPath);
- _OnlyThisFolder = dir.Parent.FullName.ToUpper();
- }
- else
- _OnlyThisFolder = "";
- }
- return _OnlyThisFolder;
- }
- }
- private bool IsInSelectedPlantData(Object parent)
- {
- if (OnlyThisFolder == "")
- return true;
- Folder fld = parent as Folder;
- if (fld == null)
- return true;
- if (fld.MyParent.MyParent != null)
- return true;
- if (fld.Title.ToUpper() == OnlyThisFolder)
- return true;
- return false;
- }
- private void MigrateChildren(vlnObject vb, vlnServer vs, Connection dbConn, Object parent, TreeNode tn)
- {
- if (vb.Type != "version")
- {
- vb.LoadChildren(vs.GetChildren(vb.ToString()));
- List lv = vb.Children;
- foreach (vlnObject vbc in lv)
- {
- if (vbc.Path.ToUpper().StartsWith(OnlyThisFolder) || OnlyThisFolder.StartsWith(vbc.Path.ToUpper()))
- {
- TreeNode tnc = tn.Nodes.Add(vbc.Title);
- object idc = cslaObject(vbc, dbConn, parent, tnc);
- frmMain.Status = "Loading " + vbc.Title;
- MigrateChildren(vbc, vs, dbConn, idc, tnc);
- }
- }
- }
- frmMain.Status = " ";
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/LoadTreeNh.cs b/PROMS/DataLoader/LoadTreeNh.cs
deleted file mode 100644
index b76e5b01..00000000
--- a/PROMS/DataLoader/LoadTreeNh.cs
+++ /dev/null
@@ -1,43 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- public bool LoadChildren(FolderInfo fld, TreeNode tn)
- {
- tn.Nodes.Clear();
- bool bLoaded = true;
- foreach (DocVersionInfo fdv in fld.FolderDocVersions)
- {
- TreeNode tnc = tn.Nodes.Add(fdv.Title);
- tnc.Tag = fdv;
- tnc.Checked = fdv.ItemID != 0;
- bLoaded &= tnc.Checked;
- }
- return bLoaded;
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/Loader.cs b/PROMS/DataLoader/Loader.cs
deleted file mode 100644
index 6b068d6b..00000000
--- a/PROMS/DataLoader/Loader.cs
+++ /dev/null
@@ -1,282 +0,0 @@
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using Volian.MSWord;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using VEPROMS.CSLA.Library;
-using Config;
-using Volian.Base.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- #region ClassProperties
- private int wms = 500;
- private static int EDDATA = 0x01;
- private static int PH = 0x02;
- private static int TOC = 0x04;
- private static int AUTOIND = 0x08;
- private static int PLACEKEEPER = 0x40;
- private static int PHONELIST = 0x10;
-
- private static int STP_MULT_CHGID = 1;
- private static int STP_LNK_SEQ = 2;
- private static int STP_OVR_TAB = 3;
-
- private string ProcFileName;
- private string ProcNumber;
- private ROFstInfo rofstinfo;
- private RODb rodb;
- private int EditSectId;
- private Dictionary dicLibDocRef;
-
- // have a few variables for storing the database id record & the system record.
- public Connection dbConn;
- public Folder sysFolder;
- public AnnotationType CommentType; // this holds the annotationtype of comment for future use
- public AnnotationType MigrationErrorType; // this holds the annotationtype of Migration Error for future use
- public AnnotationType VerificationRequiredType; // Using this to flag table to grid conversions
- public Document MissingDocument = null; // make a document if there is a missing rtf file
- // any missing will use this.
- private Content TransDummyCont;
- // the following two dictionaries are used to handle migration of the
- // transitions... dicTrans_ItemDone gets an entry for procnumber, sequence
- // number and the new item id as a step or section is created (transitions
- // can go to steps or sections). When a transition is encountered, check this
- // dictionary to see if the step or section was migrated & use the item
- // for the step or section if it was migrated. When a transition is migrated where
- // the 'to' has not been migrated yet, check if an entry exists in dicTrans_ItemIds,
- // if so, use the item listed here. If no entry exists in dicTrans_ItemIds, create
- // an item table record and use the id as part of the 'to', and add an entry to
- // dicTrans_ItemIds to flag that the record was already created. As migrating sections
- // and steps, check this dicTrans_ItemIds to see if the item record has already
- // been create, if so use it and remove it from the dicTrans_ItemIds dictionary,
- // otherwise, create a new item record.
- private Dictionary dicTrans_ItemDone;
- private Dictionary dicTrans_ItemIds;
- private Dictionary> dicTrans_MigrationErrors;
- private Dictionary dicOldStepSequence;
- private Dictionary dicNeedToLoad;
- private Dictionary dicSetfileEntries;
-
- private log4net.ILog log;
- #endregion
- private frmLoader frmMain;
- public Loader(log4net.ILog lg, frmLoader fm)
- {
- dicNeedToLoad = new Dictionary();
- log = lg;
- frmMain = fm;
- }
- public bool LoadFolders(string vepromspath)
- {
- try
- {
- //_FmtAllPath = frmMain.MySettings.FormatFolder;
- //_GenmacAllPath = frmMain.MySettings.GenMacFolder;
- vlnServer.XMLControlPath = Application.StartupPath + "\\vlncontrol.xml";
- frmMain.Status = "Make Connection";
- // make the initial database connection record, annotation types & top
- // system folder.
- dbConn = Connection.MakeConnection("Default", "Default", frmMain.MySettings.ConnectionString.Replace("{DBName}",frmMain.DBName), 1, null, DateTime.Now, "Migration");
- ConfigFile cfg = new ConfigFile();
-
- frmMain.Status = "Add AnnotationTypes";
- CommentType = AnnotationType.MakeAnnotationType("Comment", null);
- MigrationErrorType = AnnotationType.MakeAnnotationType("Migration Error", null);
-
- AnnotationType at = AnnotationType.MakeAnnotationType("Reference", null);
- at = AnnotationType.MakeAnnotationType("Action Items", null);
- //at = AnnotationType.MakeAnnotationType("Verification Required", null);
- VerificationRequiredType = AnnotationType.MakeAnnotationType("Verification Required", null);
- at = AnnotationType.MakeAnnotationType("Volian Comment", null);
-
- frmMain.Status = "Load veproms.ini";
- XmlDocument d = cfg.LoadSystemIni(vepromspath);
-
- frmMain.Status = "Load All Formats";
- //LoadAllFormats();
- //Format.UpdateFormats(_FmtAllPath, _GenmacAllPath);
-
- Format.UpdateFormats(frmMain.MySettings.FormatFolder, frmMain.MySettings.GenMacFolder);
-
- //Format baseFormat = Format.Get(1);
- //sysFolder = Folder.MakeFolder(null, dbConn, "VEPROMS", "VEPROMS", "VEPROMS", baseFormat, d.InnerXml, DateTime.Now, "Migration");
- using (Format baseFormat = Format.Get(1))
- {
- sysFolder = Folder.MakeFolder(null, dbConn, "VEPROMS", "VEPROMS", "VEPROMS", baseFormat, d.InnerXml, DateTime.Now, "Migration");
- }
-
- // This is to test the vln Libraries
- List lfldr = vlnDataPathFolders();
-
- List dp2 = new List();
- if (frmMain.createEmptyPROMS) return true;
- foreach (Folder fldr in lfldr)
- {
- TreeNode tn = frmMain.TV.Nodes.Add(fldr.Name);
- tn.Tag = fldr;
- vlnObject vb = new vlnObject(null, "datapath", fldr.Name, fldr.Title);
- dp2.Add(vb);
- vlnServer vs = new vlnServer();
- frmMain.Status = "Loading " + fldr.Name;
- MigrateChildren(vb, vs, dbConn, fldr, tn);
- if (frmMain.ProcessFailed)
- return false;
- tn.Expand();
- }
- }
- catch (Exception ex)
- {
- log.Error("Error in LoadFolders", ex);
-// log.ErrorFormat("Could not load data, error = {0}", ex.Message);
- //return false;
- throw new Exception("Error in LoadFolders", ex);
- }
- return true;
- }
- public bool LoadFoldersIntoExisting(string s)
- {
- try
- {
- frmMain.Status = "Getting Connection";
- // get the connection and annotations from the existing database.
- dbConn = Connection.GetByName("Default");
- //dbConn = Connection.MakeConnection("Default", "Default", frmMain.MySettings.ConnectionString.Replace("{DBName}",frmMain.DBName), 1, null, DateTime.Now, "Migration");
-
- frmMain.Status = "Getting AnnotationTypes";
- CommentType = AnnotationType.GetByName("Comment"); // .MakeAnnotationType("Comment", null);
- MigrationErrorType = AnnotationType.GetByName("Migration Error");
- if(MigrationErrorType == null)
- MigrationErrorType = AnnotationType.MakeAnnotationType("Migration Error", null);
- VerificationRequiredType = AnnotationType.GetByName("Verification Required");
-
- List lfldr = vlnDataPathFolders(); // get plant level list.
-
- List dp2 = new List();
- foreach (Folder fldr in lfldr)
- {
- TreeNode tn = frmMain.TV.Nodes.Add(fldr.Name);
- tn.Tag = fldr;
- vlnObject vb = new vlnObject(null, "datapath", fldr.Name, fldr.Title);
- dp2.Add(vb);
- vlnServer vs = new vlnServer();
- frmMain.Status = "Loading " + fldr.Name;
- MigrateChildren(vb, vs, dbConn, fldr, tn);
- if (frmMain.ProcessFailed)
- return false;
- tn.Expand();
- }
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Could not load data, error = {0}", ex.Message);
- //return false;
- throw new Exception("Error in LoadFolders", ex);
- }
- return true;
- }
- public void ClearData()
- {
- int ra = PurgeDataCommand.Execute();
- //Database.PurgeData();
- }
- public static string MakeDate(string src)
- {
- if (src.Trim() == "") return null;
- int[] DateOffset ={ 4, 5, 47, 6, 7, 47, 0, 1, 2, 3 }; // 47 = '/'
- StringBuilder datebuff = new StringBuilder(10);
- for (int i = 0; i < DateOffset.Length; i++)
- {
- if (DateOffset[i] < 9)
- datebuff.Append(src[DateOffset[i]]);
- else
- datebuff.Append(System.Convert.ToChar(DateOffset[i]));
- }
- return datebuff.ToString();
- }
- public DateTime GetDTS(string date, string time)
- {
- // Set the date/time stamp. If there is no 'date', set the date
- // to 1/1/2000 (this can be changed!). If there is not 'time',
- // set the time to 0:0:0 (midnight).
-
- DateTime dts = DateTime.Now;
- string month = "01";
- string day = "01";
- string year = "2000";
- string hour = "";
- string minute = "";
- try
- {
- if (date != null && date != "")
- {
- int indx1 = date.IndexOf("/");
- month = date.Substring(0, indx1);
- int indx2 = date.IndexOf("/", indx1 + 1);
- day = date.Substring(indx1 + 1, indx2 - indx1 - 1);
- year = date.Substring(indx2 + 1, 4);
- }
- if (time == null || time == "")
- {
- hour = "0";
- minute = "0";
- }
- else
- {
-
- hour = time.Substring(0, 2);
- int indxc = time.IndexOfAny(":A-".ToCharArray());
- if (indxc == time.Length - 1)
- minute = time.Substring(2, 2);
- else
- minute = time.Substring(indxc + 1, time.Length - indxc - 1);
- }
- dts = new DateTime(System.Convert.ToInt32(year), System.Convert.ToInt32(month), System.Convert.ToInt32(day),
- System.Convert.ToInt32(hour), System.Convert.ToInt32(minute), 0);
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Bad Date/Time {0} {1}. Set to NOW.", date, time);
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- frmMain.AddError(ex, "Bad Date/Time {0} {1}", date, time);
- //log.ErrorFormat(ex.StackTrace);
- return dts;
- }
- return dts;
- }
-
- public bool LoadSecurity(string VeSamPath, string VePromsPath)
- {
- Security sec = new Security(VeSamPath, VePromsPath);
- return sec.Migrate();
- }
- private static void WaitMS(int n)
- {
- DateTime dtw = DateTime.Now.AddMilliseconds(n);
- while (DateTime.Now < dtw)
- {
- Application.DoEvents();
- }
- }
- private static void Wait(int n)
- {
- DateTime dtw = DateTime.Now.AddSeconds(n);
- while (DateTime.Now < dtw)
- {
- Application.DoEvents();
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/Loader.cs.bak b/PROMS/DataLoader/Loader.cs.bak
deleted file mode 100644
index 87808268..00000000
--- a/PROMS/DataLoader/Loader.cs.bak
+++ /dev/null
@@ -1,280 +0,0 @@
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using Volian.MSWord;
-using vlnObjectLibrary;
-using vlnServerLibrary;
-using VEPROMS.CSLA.Library;
-using Config;
-using Volian.Base.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- #region ClassProperties
- private int wms = 500;
- private static int EDDATA = 0x01;
- private static int PH = 0x02;
- private static int TOC = 0x04;
- private static int AUTOIND = 0x08;
- private static int AUTOGEN = 0x40;
-
- private static int STP_MULT_CHGID = 1;
- private static int STP_LNK_SEQ = 2;
- private static int STP_OVR_TAB = 3;
-
- private string ProcFileName;
- private string ProcNumber;
- private ROFstInfo rofstinfo;
- private RODb rodb;
- private int EditSectId;
- private Dictionary dicLibDocRef;
-
- // have a few variables for storing the database id record & the system record.
- public Connection dbConn;
- public Folder sysFolder;
- public AnnotationType CommentType; // this holds the annotationtype of comment for future use
- public AnnotationType MigrationErrorType; // this holds the annotationtype of Migration Error for future use
- public AnnotationType VerificationRequiredType; // Using this to flag table to grid conversions
- public Document MissingDocument = null; // make a document if there is a missing rtf file
- // any missing will use this.
- private Content TransDummyCont;
- // the following two dictionaries are used to handle migration of the
- // transitions... dicTrans_ItemDone gets an entry for procnumber, sequence
- // number and the new item id as a step or section is created (transitions
- // can go to steps or sections). When a transition is encountered, check this
- // dictionary to see if the step or section was migrated & use the item
- // for the step or section if it was migrated. When a transition is migrated where
- // the 'to' has not been migrated yet, check if an entry exists in dicTrans_ItemIds,
- // if so, use the item listed here. If no entry exists in dicTrans_ItemIds, create
- // an item table record and use the id as part of the 'to', and add an entry to
- // dicTrans_ItemIds to flag that the record was already created. As migrating sections
- // and steps, check this dicTrans_ItemIds to see if the item record has already
- // been create, if so use it and remove it from the dicTrans_ItemIds dictionary,
- // otherwise, create a new item record.
- private Dictionary dicTrans_ItemDone;
- private Dictionary dicTrans_ItemIds;
- private Dictionary> dicTrans_MigrationErrors;
- private Dictionary dicOldStepSequence;
- private Dictionary dicNeedToLoad;
- private Dictionary dicSetfileEntries;
-
- private log4net.ILog log;
- #endregion
- private frmLoader frmMain;
- public Loader(log4net.ILog lg, frmLoader fm)
- {
- dicNeedToLoad = new Dictionary();
- log = lg;
- frmMain = fm;
- }
- public bool LoadFolders(string vepromspath)
- {
- try
- {
- //_FmtAllPath = frmMain.MySettings.FormatFolder;
- //_GenmacAllPath = frmMain.MySettings.GenMacFolder;
- frmMain.Status = "Make Connection";
- // make the initial database connection record, annotation types & top
- // system folder.
- dbConn = Connection.MakeConnection("Default", "Default", frmMain.MySettings.ConnectionString.Replace("{DBName}",frmMain.MySettings.DBName), 1, null, DateTime.Now, "Migration");
- ConfigFile cfg = new ConfigFile();
-
- frmMain.Status = "Add AnnotationTypes";
- CommentType = AnnotationType.MakeAnnotationType("Comment", null);
- MigrationErrorType = AnnotationType.MakeAnnotationType("Migration Error", null);
-
- AnnotationType at = AnnotationType.MakeAnnotationType("Reference", null);
- at = AnnotationType.MakeAnnotationType("Action Items", null);
- //at = AnnotationType.MakeAnnotationType("Verification Required", null);
- VerificationRequiredType = AnnotationType.MakeAnnotationType("Verification Required", null);
- at = AnnotationType.MakeAnnotationType("Volian Comment", null);
-
- frmMain.Status = "Load veproms.ini";
- XmlDocument d = cfg.LoadSystemIni(vepromspath);
-
- frmMain.Status = "Load All Formats";
- //LoadAllFormats();
- //Format.UpdateFormats(_FmtAllPath, _GenmacAllPath);
-
- Format.UpdateFormats(frmMain.MySettings.FormatFolder, frmMain.MySettings.GenMacFolder);
-
- //Format baseFormat = Format.Get(1);
- //sysFolder = Folder.MakeFolder(null, dbConn, "VEPROMS", "VEPROMS", "VEPROMS", baseFormat, d.InnerXml, DateTime.Now, "Migration");
- using (Format baseFormat = Format.Get(1))
- {
- sysFolder = Folder.MakeFolder(null, dbConn, "VEPROMS", "VEPROMS", "VEPROMS", baseFormat, d.InnerXml, DateTime.Now, "Migration");
- }
-
- // This is to test the vln Libraries
- List lfldr = vlnDataPathFolders();
-
- List dp2 = new List();
- if (frmMain.createEmptyPROMS) return true;
- foreach (Folder fldr in lfldr)
- {
- TreeNode tn = frmMain.TV.Nodes.Add(fldr.Name);
- tn.Tag = fldr;
- vlnObject vb = new vlnObject(null, "datapath", fldr.Name, fldr.Title);
- dp2.Add(vb);
- vlnServer vs = new vlnServer();
- frmMain.Status = "Loading " + fldr.Name;
- MigrateChildren(vb, vs, dbConn, fldr, tn);
- if (frmMain.ProcessFailed)
- return false;
- tn.Expand();
- }
- }
- catch (Exception ex)
- {
- log.Error("Error in LoadFolders", ex);
-// log.ErrorFormat("Could not load data, error = {0}", ex.Message);
- //return false;
- throw new Exception("Error in LoadFolders", ex);
- }
- return true;
- }
- public bool LoadFoldersIntoExisting(string s)
- {
- try
- {
- frmMain.Status = "Getting Connection";
- // get the connection and annotations from the existing database.
- dbConn = Connection.GetByName("Default");
- //dbConn = Connection.MakeConnection("Default", "Default", frmMain.MySettings.ConnectionString.Replace("{DBName}",frmMain.MySettings.DBName), 1, null, DateTime.Now, "Migration");
-
- frmMain.Status = "Getting AnnotationTypes";
- CommentType = AnnotationType.GetByName("Comment"); // .MakeAnnotationType("Comment", null);
- MigrationErrorType = AnnotationType.GetByName("Migration Error");
- if(MigrationErrorType == null)
- MigrationErrorType = AnnotationType.MakeAnnotationType("Migration Error", null);
- VerificationRequiredType = AnnotationType.GetByName("Verification Required");
-
- List lfldr = vlnDataPathFolders(); // get plant level list.
-
- List dp2 = new List();
- foreach (Folder fldr in lfldr)
- {
- TreeNode tn = frmMain.TV.Nodes.Add(fldr.Name);
- tn.Tag = fldr;
- vlnObject vb = new vlnObject(null, "datapath", fldr.Name, fldr.Title);
- dp2.Add(vb);
- vlnServer vs = new vlnServer();
- frmMain.Status = "Loading " + fldr.Name;
- MigrateChildren(vb, vs, dbConn, fldr, tn);
- if (frmMain.ProcessFailed)
- return false;
- tn.Expand();
- }
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Could not load data, error = {0}", ex.Message);
- //return false;
- throw new Exception("Error in LoadFolders", ex);
- }
- return true;
- }
- public void ClearData()
- {
- int ra = PurgeDataCommand.Execute();
- //Database.PurgeData();
- }
- public static string MakeDate(string src)
- {
- if (src.Trim() == "") return null;
- int[] DateOffset ={ 4, 5, 47, 6, 7, 47, 0, 1, 2, 3 }; // 47 = '/'
- StringBuilder datebuff = new StringBuilder(10);
- for (int i = 0; i < DateOffset.Length; i++)
- {
- if (DateOffset[i] < 9)
- datebuff.Append(src[DateOffset[i]]);
- else
- datebuff.Append(System.Convert.ToChar(DateOffset[i]));
- }
- return datebuff.ToString();
- }
- public DateTime GetDTS(string date, string time)
- {
- // Set the date/time stamp. If there is no 'date', set the date
- // to 1/1/2000 (this can be changed!). If there is not 'time',
- // set the time to 0:0:0 (midnight).
-
- DateTime dts = DateTime.Now;
- string month = "01";
- string day = "01";
- string year = "2000";
- string hour = "";
- string minute = "";
- try
- {
- if (date != null && date != "")
- {
- int indx1 = date.IndexOf("/");
- month = date.Substring(0, indx1);
- int indx2 = date.IndexOf("/", indx1 + 1);
- day = date.Substring(indx1 + 1, indx2 - indx1 - 1);
- year = date.Substring(indx2 + 1, 4);
- }
- if (time == null || time == "")
- {
- hour = "0";
- minute = "0";
- }
- else
- {
-
- hour = time.Substring(0, 2);
- int indxc = time.IndexOfAny(":A-".ToCharArray());
- if (indxc == time.Length - 1)
- minute = time.Substring(2, 2);
- else
- minute = time.Substring(indxc + 1, time.Length - indxc - 1);
- }
- dts = new DateTime(System.Convert.ToInt32(year), System.Convert.ToInt32(month), System.Convert.ToInt32(day),
- System.Convert.ToInt32(hour), System.Convert.ToInt32(minute), 0);
- }
- catch (Exception ex)
- {
- log.ErrorFormat("Bad Date/Time {0} {1}. Set to NOW.", date, time);
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- frmMain.AddError(ex, "Bad Date/Time {0} {1}", date, time);
- //log.ErrorFormat(ex.StackTrace);
- return dts;
- }
- return dts;
- }
-
- public bool LoadSecurity(string VeSamPath, string VePromsPath)
- {
- Security sec = new Security(VeSamPath, VePromsPath);
- return sec.Migrate();
- }
- private static void WaitMS(int n)
- {
- DateTime dtw = DateTime.Now.AddMilliseconds(n);
- while (DateTime.Now < dtw)
- {
- Application.DoEvents();
- }
- }
- private static void Wait(int n)
- {
- DateTime dtw = DateTime.Now.AddSeconds(n);
- while (DateTime.Now < dtw)
- {
- Application.DoEvents();
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/OutsideTransition.cs b/PROMS/DataLoader/OutsideTransition.cs
deleted file mode 100644
index ec7b0227..00000000
--- a/PROMS/DataLoader/OutsideTransition.cs
+++ /dev/null
@@ -1,327 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using System.Data;
-using System.Data.OleDb;
-//using System.Collections.Specialized;
-//using System.Collections.Generic;
-//using System.Xml;
-//using System.IO;
-//using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- class OutsideTransition
- {
- private OleDbConnection _DbConnect;
-
- public OleDbConnection DbConnect
- {
- get { return _DbConnect; }
- set { _DbConnect = value; }
- }
-
- private Dictionary _TranLookup;
-
- public OutsideTransition(OleDbConnection cn)
- {
- _DbConnect = cn;
- _TranLookup = new Dictionary();
- }
-
- private List _MigrationErrors;
- public ItemInfo GetItem(string key, List migrationErrors)
- {
- _MigrationErrors = migrationErrors;
- if (!_TranLookup.ContainsKey(key))
- _TranLookup.Add(key, Find(key));
- return _TranLookup[key];
- }
-
- private ItemInfo Find(string key)
- {
- string setid = key.Substring(0, 8);
- string procid = key.Substring(8, 8);
- string path = GetPath(setid);// Get set path from XTSETID
- string proc = GetProc(setid, procid);// Get procedure number from XTPROCID
- return Find(path,proc);// Return ItemInfo based upon path and procedure number
- }
-
- private ItemInfo Find(string path, string proc)
- {
- return OTLookup.Find(path, proc,_MigrationErrors);
- }
-
- private string GetProc(string setid, string procid)
- {
- string retval = null;
- string xtproccmd = "SELECT * FROM [xtprocid] WHERE [SETID]='" + setid + "' AND [PROCID]='" + procid + "'";
- using (OleDbDataAdapter da = new OleDbDataAdapter(xtproccmd, _DbConnect))
- {
- try
- {
- DataSet ds = new DataSet();
- da.Fill(ds);
- DataTable dt = ds.Tables[0];
- dt.CaseSensitive = true;
- DataRow dr = dt.Rows[0]; // there should be only one entry!
- retval = dr["Procnum"].ToString(); // this should be the procedure number!
- ds.Dispose();
- }
- catch (Exception ex)
- {
- return "";//ex.GetType().Name + " " + ex.Message;
- }
- }
- return retval;
- }
-
- private string GetPath(string setid)
- {
- try
- {
- string xtsetcmd = "SELECT * FROM [xtsetid] WHERE [SETID]='" + setid + "'";
- OleDbDataAdapter da = new OleDbDataAdapter(xtsetcmd, _DbConnect);
- DataSet ds = new DataSet();
- da.Fill(ds);
- DataTable dt = ds.Tables[0];
- dt.CaseSensitive = true;
- DataRow dr = dt.Rows[0]; // there should be only one entry!
- // if there are more than one entry use the first legitimate entry
- // for NSP we found multiple "FIRST RECORD"s in numerious XTSETID.DBF files
- if (dt.Rows.Count > 1)
- {
- int irow = 0;
- while (irow < dt.Rows.Count-1 && dt.Rows[irow]["PLANTTITLE"].ToString() == "FIRST RECORD") irow++;
- dr = dt.Rows[irow];
- }
- string retval = dr["Path"].ToString();
- da.Dispose();
- ds.Dispose();
- return retval; // dr["Path"].ToString(); // this should be the path to the proc set!
- }
- catch (Exception ex)
- {
- return "";//ex.GetType().Name + " " + ex.Message;
- }
- }
-
- private string GetTitle(string setid, string procid)
- {
- try
- {
-
- string xtproccmd = "SELECT * FROM [xtprocid] WHERE [SETID]='" + setid + "' AND [PROCID]='" + procid + "'";
- OleDbDataAdapter da = new OleDbDataAdapter(xtproccmd, _DbConnect);
- DataSet ds = new DataSet();
- da.Fill(ds);
- DataTable dt = ds.Tables[0];
- dt.CaseSensitive = true;
- DataRow dr = dt.Rows[0]; // there should be only one entry!
- string retval = dr["Proctitle"].ToString();
- da.Dispose();
- ds.Dispose();
- return retval; // dr["Proctitle"].ToString(); // this should be the procedure number!
- }
- catch (Exception ex)
- {
- return "";//ex.GetType().Name + " " + ex.Message;
- }
- }
-
- public string GetDescription(string key)
- {
- string setid = key.Substring(0, 8);
- string procid = key.Substring(8, 8);
- string path = GetPath(setid);// Get set path from XTSETID
- string proc = GetProc(setid, procid);// Get procedure number from XTPROCID
- string title = GetTitle(setid, procid);// Get procedure title from XTPROCID
- return string.Format("{0}, {1} in folder {2}",proc,title,path);
- }
- public string GetTransitionText(string key)
- {
- string setid = key.Substring(0, 8);
- string procid = key.Substring(8, 8);
- string proc = GetProc(setid, procid);// Get procedure number from XTPROCID
- string title = GetTitle(setid, procid);// Get procedure title from XTPROCID
- proc = proc.Replace("-", @"\u8209?"); // in proc number, replace dash and spaces with
- proc = proc.Replace(" ", @"\u160?"); // nonbreak unicode dash & hardspace.
- title = title.Replace("-", @"\u8209?"); // in title, just do the hardspace.
- return string.Format("{0}, {1}", proc, title);
- }
- //private string ProcessOutSideTrans(OleDbConnection cn, string thekey, string pth)
- //{
- // string xtransstring = null;
- // DataTable dt = null;
- // DataSet ds = null;
- // OleDbDataAdapter da = null;
-
- // DataTable dt2 = null;
- // DataSet ds2 = null;
- // OleDbDataAdapter da2 = null;
-
- // string tosetid = thekey.Substring(0, 8);
- // string toprocid = thekey.Substring(8, 8);
-
- // /// Get the path to the procedure set from the SETID
- // string xtsetcmd = "SELECT * FROM [xtsetid] WHERE [SETID]='" + tosetid + "'";
- // string xtproccmd = "SELECT * FROM [xtprocid] WHERE [SETID]='" + tosetid + "' AND [PROCID]='" + toprocid + "'";
-
- // da = new OleDbDataAdapter(xtsetcmd, cn);
- // da2 = new OleDbDataAdapter(xtproccmd, cn);
-
- // // get xtsetid records.
- // ds = new DataSet();
- // try
- // {
- // da.Fill(ds);
- // dt = ds.Tables[0];
- // dt.CaseSensitive = true;
- // }
- // catch (Exception ex)
- // {
- // log.Error("Error getting XTSETID");
- // log.ErrorFormat("to number = {0}", thekey);
- // log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- // //return textm;
- // }
- // DataRow dr = dt.Rows[0]; // there should be only one entry!
- // string setpth = dr["Path"].ToString(); // this should be the path to the proc set!
-
- // // get xtprocid records
- // ds2 = new DataSet();
- // try
- // {
- // da2.Fill(ds2);
- // dt2 = ds2.Tables[0];
- // dt2.CaseSensitive = true;
- // }
- // catch (Exception ex)
- // {
- // log.Error("Error getting XTPROCID");
- // log.ErrorFormat("to number = {0}", thekey);
- // log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- // //return textm;
- // }
- // DataRow dr2 = dt2.Rows[0]; // there should be only one entry!
- // string procnum = dr2["Procnum"].ToString(); // this should be the procedure number!
-
- // xtransstring = setpth + "\\" + procnum; // ex: VEHLP\PROCS\0POP05-EO00
-
- // //if (pathsAreEqual(setpth, pth))
- // //{
- // // // Outside Transiton is to this procedure set (not really outsde)
- // // // need to find the item id that references the proc number and title
- // // // - find the setpth in the doc.version
- // //}
- // //else
- // //return thekey; // is a true outside transition
-
- // return xtransstring;
- //}
- }
-
- internal static class OTLookup
- {
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- private static Dictionary _Lookup = null;
- static List _MigrationErrors;
- public static ItemInfo Find(string path, string procnum, List migrationErrors)
- {
- _MigrationErrors = migrationErrors;
- string key = string.Format(@"{0}\{1}",path,procnum);
- if (_Lookup == null)
- _Lookup = new Dictionary();
- if (!_Lookup.ContainsKey(key))
- _Lookup.Add(key, FindItem(path, procnum));
- return _Lookup[key];
- }
-
- private static DocVersionInfoList _DocVersions = null;
- private static ItemInfo FindItem(string path, string procnum)
- {
- if (_DocVersions == null)
- _DocVersions = DocVersionInfoList.Get();
- DocVersionInfo dvi = ExactMatch(path);
- if (dvi == null) dvi = PartialMatch(path);
- if (dvi != null) return FindItem(dvi, procnum);
- return null;
- }
-
- private static ItemInfo FindItem(DocVersionInfo dvi, string procnum)
- {
- foreach (ItemInfo itm in dvi.Procedures)
- if (itm.DisplayNumber == procnum)
- return itm;
- return null;
- }
-
- private static DocVersionInfo PartialMatch(string path)
- {
- string partial = GetPartial(path);
- if (partial != null)
- {
- foreach (DocVersionInfo dvi in _DocVersions)
- {
- if (dvi.MyFolder.Title.ToUpper().EndsWith(partial.ToUpper()))
- return dvi;
- }
- if (path.ToUpper().EndsWith("ABBYPROC"))
- return PartialMatch(path + ".prc");
- }
- // if we cannot find a match using two folders, simple use one
- partial = GetPartial2(path);
- if (partial != null)
- {
- DocVersionInfo match = null;
- foreach (DocVersionInfo dvi in _DocVersions)
- {
- if (dvi.MyFolder.Title.ToUpper().EndsWith(partial.ToUpper()))
- {
- if (match == null)
- match = dvi;
- else
- {
- _MyLog.WarnFormat("Duplicate external paths found for path '{0}'", path);
- _MigrationErrors.Add(string.Format("Duplicate external paths found for path '{0}'", path));
- }
-
- }
- }
- }
- return null;
- }
- private static string GetPartial(string path)
- {
- //Console.WriteLine(string.Format("GetPartial path = {0}",path));
- if (path.Contains("\\"))
- {
- string[] parts = path.Split("\\".ToCharArray());
- return "\\" + parts[parts.Length - 2] + "\\" + parts[parts.Length - 1];
- }
- else
- return null;
- }
- private static string GetPartial2(string path)
- {
- //Console.WriteLine(string.Format("GetPartial path = {0}",path));
- if (path.Contains("\\"))
- {
- string[] parts = path.Split("\\".ToCharArray());
- return "\\" + parts[parts.Length - 1];
- }
- else
- return null;
- }
- private static DocVersionInfo ExactMatch(string path)
- {
- foreach (DocVersionInfo dvi in _DocVersions)
- if (dvi.MyFolder.Title.ToUpper().EndsWith(path.ToUpper()))
- return dvi;
- if (path.ToUpper().EndsWith("ABBYPROC"))
- return ExactMatch(path + ".prc");
- return null;
- }
- }
-}
diff --git a/PROMS/DataLoader/PROMS2010.SQL b/PROMS/DataLoader/PROMS2010.SQL
deleted file mode 100644
index 9b5dac04..00000000
--- a/PROMS/DataLoader/PROMS2010.SQL
+++ /dev/null
@@ -1,18751 +0,0 @@
-if db_name() in('master','model','msdn','tempdb')
-begin
- DECLARE @ErrorMsg varchar(255)
- SET @ErrorMsg = 'Don''t add these procedures and functions to ' + db_name()
- PRINT '=========================================================================='
- PRINT ''
- PRINT @ErrorMsg
- PRINT ''
- PRINT 'You probably want to be in the VEPROMS database'
- PRINT ''
- PRINT '=========================================================================='
- RAISERROR (@ErrorMsg, 20, -1) with log
- RETURN
-end
-print 'Adding procedures and functions to ' + db_name()
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/****** Object: Table [dbo].[DeleteLog] Script Date: 03/29/2011 17:26:23 ******/
-IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[DeleteLog]') AND type in (N'U'))
-DROP TABLE [dbo].[DeleteLog]
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE TABLE [dbo].[DeleteLog](
- [DeleteID] [int] IDENTITY(1,1) NOT NULL,
- [SPID] [int] NOT NULL CONSTRAINT [DF_DeleteLog_SPID] DEFAULT (@@spid),
- [UserID] [nvarchar](100) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_DeleteLog_DTS] DEFAULT (getdate()),
- CONSTRAINT [PK_DeleteLog] PRIMARY KEY CLUSTERED
-(
- [DeleteID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-
--- Display the status of Table creation
-IF (@@Error = 0) PRINT 'Table Creation: DeleteLog Succeeded'
-ELSE PRINT 'Table Creation: DeleteLog Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vlnErrorHandler] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vlnErrorHandler]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vlnErrorHandler];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vlnErrorHandler]
- (@ExpectedCount int=-1
- ,@MessageFormat nvarchar(512)=N'Expected RowCount (%d) not met (%d)')
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @ErrorMessage NVARCHAR(4000), @ErrorNumber INT, @ErrorSeverity INT, @ErrorState INT, @ErrorProcedure NVARCHAR(126)
- , @ErrorLine INT, @RowCount INT;
- SELECT @ErrorMessage = ERROR_MESSAGE(), @ErrorSeverity = ERROR_SEVERITY(), @ErrorState = ERROR_STATE(),@ErrorNumber = ERROR_NUMBER()
- , @ErrorLine = ERROR_LINE(), @ErrorProcedure = ERROR_PROCEDURE(), @RowCount = @@RowCount;
- IF @ErrorNumber > 0
- BEGIN
- IF @ErrorProcedure = OBJECT_NAME(@@PROCID) -- If the Procedure is the current procedure just pass the error message
- RAISERROR (@ErrorMessage, @ErrorSeverity, @ErrorState)
- ELSE -- Add in the procedure name and line as well as the error number
- RAISERROR (N'%s[%d] - (%d) %s', @ErrorSeverity, @ErrorState, @ErrorProcedure, @ErrorLine, @ErrorNumber, @ErrorMessage)
- END
- ELSE IF @ExpectedCount <> -1 AND @ExpectedCount <> @RowCount
- RAISERROR (@MessageFormat, 16, 1, @ExpectedCount, @RowCount)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vlnErrorHandler Succeeded'
-ELSE PRINT 'Procedure Creation: vlnErrorHandler Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addAnnotation]
-
-(
- @ItemID int,
- @TypeID int,
- @RtfText nvarchar(MAX)=null,
- @SearchText nvarchar(MAX)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newAnnotationID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Annotations]
- (
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ItemID,
- @TypeID,
- @RtfText,
- @SearchText,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newAnnotationID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Annotations] WHERE [AnnotationID]=@newAnnotationID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: addAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addAnnotationType]
-
-(
- @Name nvarchar(100),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newTypeID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [AnnotationTypes]
- (
- [Name],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @Name,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newTypeID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [AnnotationTypes] WHERE [TypeID]=@newTypeID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: addAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addAssignment] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addAssignment]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addAssignment];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addAssignment]
-
-(
- @GID int,
- @RID int,
- @FolderID int,
- @StartDate datetime,
- @EndDate datetime=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newAID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Assignments]
- (
- [GID],
- [RID],
- [FolderID],
- [StartDate],
- [EndDate],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @GID,
- @RID,
- @FolderID,
- @StartDate,
- @EndDate,
- @DTS,
- @UsrID
- )
- SELECT @newAID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Assignments] WHERE [AID]=@newAID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addAssignment Succeeded'
-ELSE PRINT 'Procedure Creation: addAssignment Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addAssociation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addAssociation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addAssociation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addAssociation]
-
-(
- @VersionID int,
- @ROFstID int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newAssociationID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Associations]
- (
- [VersionID],
- [ROFstID],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @VersionID,
- @ROFstID,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newAssociationID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Associations] WHERE [AssociationID]=@newAssociationID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addAssociation Succeeded'
-ELSE PRINT 'Procedure Creation: addAssociation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addConnection] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addConnection]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addConnection];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addConnection]
-
-(
- @Name nvarchar(100)=null,
- @Title nvarchar(510)=null,
- @ConnectionString nvarchar(510)=null,
- @ServerType int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newDBID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Connections]
- (
- [Name],
- [Title],
- [ConnectionString],
- [ServerType],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @Name,
- @Title,
- @ConnectionString,
- @ServerType,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newDBID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Connections] WHERE [DBID]=@newDBID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addConnection Succeeded'
-ELSE PRINT 'Procedure Creation: addConnection Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addContent]
-
-(
- @Number nvarchar(256)=null,
- @Text nvarchar(MAX)=null,
- @Type int=null,
- @FormatID int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newContentID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Contents]
- (
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @Number,
- @Text,
- @Type,
- @FormatID,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newContentID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Contents] WHERE [ContentID]=@newContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addContent Succeeded'
-ELSE PRINT 'Procedure Creation: addContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addDetail] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addDetail]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addDetail];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addDetail]
-
-(
- @ContentID int,
- @ItemType int,
- @Text nvarchar(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newDetailID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Details]
- (
- [ContentID],
- [ItemType],
- [Text],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ContentID,
- @ItemType,
- @Text,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newDetailID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Details] WHERE [DetailID]=@newDetailID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addDetail Succeeded'
-ELSE PRINT 'Procedure Creation: addDetail Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addDocument] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addDocument]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addDocument];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addDocument]
-
-(
- @LibTitle nvarchar(1024)=null,
- @DocContent varbinary(MAX)=null,
- @DocAscii nvarchar(MAX)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @FileExtension nvarchar(10),
- @newDocID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Documents]
- (
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension]
- )
- VALUES
- (
- @LibTitle,
- @DocContent,
- @DocAscii,
- @Config,
- @DTS,
- @UserID,
- @FileExtension
- )
- SELECT @newDocID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Documents] WHERE [DocID]=@newDocID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addDocument Succeeded'
-ELSE PRINT 'Procedure Creation: addDocument Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addDocVersion]
-
-(
- @FolderID int,
- @VersionType int,
- @Name nvarchar(100),
- @Title nvarchar(510)=null,
- @ItemID int=null,
- @FormatID int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newVersionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [DocVersions]
- (
- [FolderID],
- [VersionType],
- [Name],
- [Title],
- [ItemID],
- [FormatID],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @FolderID,
- @VersionType,
- @Name,
- @Title,
- @ItemID,
- @FormatID,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newVersionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [DocVersions] WHERE [VersionID]=@newVersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: addDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addDROUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addDROUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addDROUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addDROUsage]
-
-(
- @DocID int,
- @ROID nvarchar(16),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @RODbID int,
- @newDROUsageID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [DROUsages]
- (
- [DocID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [RODbID]
- )
- VALUES
- (
- @DocID,
- @ROID,
- @Config,
- @DTS,
- @UserID,
- @RODbID
- )
- SELECT @newDROUsageID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [DROUsages] WHERE [DROUsageID]=@newDROUsageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addDROUsage Succeeded'
-ELSE PRINT 'Procedure Creation: addDROUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addEntry] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addEntry]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addEntry];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addEntry]
-
-(
- @ContentID int,
- @DocID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Entries]
- (
- [ContentID],
- [DocID],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ContentID,
- @DocID,
- @DTS,
- @UserID
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Entries] WHERE [ContentID]=@ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addEntry Succeeded'
-ELSE PRINT 'Procedure Creation: addEntry Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addFigure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFigure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFigure];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addFigure]
-
-(
- @ROFstID int,
- @ImageID int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newFigureID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Figures]
- (
- [ROFstID],
- [ImageID],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ROFstID,
- @ImageID,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newFigureID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Figures] WHERE [FigureID]=@newFigureID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addFigure Succeeded'
-ELSE PRINT 'Procedure Creation: addFigure Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addFiguresByROFstIDandImageIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFiguresByROFstIDandImageIDs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFiguresByROFstIDandImageIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addFiguresByROFstIDandImageIDs]
-(
- @ROFstID int,
- @ImageIDs varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Figures]
- ( [ROFstID]
- ,[ImageID]
- ,[Config]
- ,[DTS]
- ,[UserID]
- )
- select distinct FF.ROFstID, II.ID ImageID, '' Config, FF.DTS, FF.UserID from ROFsts FF
- , vefn_SplitInt(@ImageIDs,',') II
- where ROFstID=@ROFstID
-
- SELECT [FigureID]
- ,[ROFstID]
- ,[ImageID]
- ,[Config]
- ,[DTS]
- ,[UserID]
- ,[LastChanged]
- FROM [Figures]
- WHERE [ROFstID]=@ROFstID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addFiguresByROFstIDandImageIDs Succeeded'
-ELSE PRINT 'Procedure Creation: addFiguresByROFstIDandImageIDs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addFolder]
-
-(
- @ParentID int,
- @DBID int,
- @Name nvarchar(100),
- @Title nvarchar(510)=null,
- @ShortName nvarchar(20),
- @FormatID int=null,
- @ManualOrder float=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newFolderID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Folders]
- (
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @ParentID,
- @DBID,
- @Name,
- @Title,
- @ShortName,
- @FormatID,
- @ManualOrder,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newFolderID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Folders] WHERE [FolderID]=@newFolderID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addFolder Succeeded'
-ELSE PRINT 'Procedure Creation: addFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addFormat]
-
-(
- @ParentID int,
- @Name nvarchar(20),
- @Description nvarchar(250)=null,
- @Data xml,
- @GenMac xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newFormatID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Formats]
- (
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ParentID,
- @Name,
- @Description,
- @Data,
- @GenMac,
- @DTS,
- @UserID
- )
- SELECT @newFormatID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Formats] WHERE [FormatID]=@newFormatID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addFormat Succeeded'
-ELSE PRINT 'Procedure Creation: addFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addGrid] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addGrid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addGrid];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addGrid]
-
-(
- @ContentID int,
- @Data xml,
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Grids]
- (
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ContentID,
- @Data,
- @Config,
- @DTS,
- @UserID
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Grids] WHERE [ContentID]=@ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addGrid Succeeded'
-ELSE PRINT 'Procedure Creation: addGrid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addGroup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addGroup]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addGroup];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addGroup]
-
-(
- @GroupName nvarchar(50),
- @GroupType int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newGID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Groups]
- (
- [GroupName],
- [GroupType],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @GroupName,
- @GroupType,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newGID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Groups] WHERE [GID]=@newGID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addGroup Succeeded'
-ELSE PRINT 'Procedure Creation: addGroup Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addImage]
-
-(
- @ContentID int,
- @ImageType int,
- @FileName nvarchar(255),
- @Data varbinary(MAX),
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Images]
- (
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ContentID,
- @ImageType,
- @FileName,
- @Data,
- @Config,
- @DTS,
- @UserID
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Images] WHERE [ContentID]=@ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addImage Succeeded'
-ELSE PRINT 'Procedure Creation: addImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addItem]
-
-(
- @PreviousID int=null,
- @ContentID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @newItemID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Items]
- (
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @PreviousID,
- @ContentID,
- @DTS,
- @UserID
- )
- SELECT @newItemID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Items] WHERE [ItemID]=@newItemID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItem Succeeded'
-ELSE PRINT 'Procedure Creation: addItem Error on Creation'
-GO
---HERE
-/****** Object: StoredProcedure [addPart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addPart]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addPart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addPart]
-
-(
- @ContentID int,
- @FromType int,
- @ItemID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Parts]
- (
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ContentID,
- @FromType,
- @ItemID,
- @DTS,
- @UserID
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Parts] WHERE [ContentID]=@ContentID AND [FromType]=@FromType
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addPart Succeeded'
-ELSE PRINT 'Procedure Creation: addPart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updatePart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updatePart]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updatePart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updatePart]
-
-(
- @ContentID int,
- @FromType int,
- @ItemID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Parts]
- SET
- [ItemID]=@ItemID,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ContentID]=@ContentID AND [FromType]=@FromType AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Parts] WHERE [ContentID]=@ContentID AND [FromType]=@FromType)
- RAISERROR('Part record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Part has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Parts] WHERE [ContentID]=@ContentID AND [FromType]=@FromType
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updatePart Succeeded'
-ELSE PRINT 'Procedure Creation: updatePart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItem]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Items].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Items].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[Items].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Items].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Items].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Items].[ItemID]) [Transition_ToIDCount]
- FROM [Items]
- WHERE [ItemID]=@ItemID
-
- SELECT
- [Annotations].[AnnotationID],
- [Annotations].[ItemID],
- [Annotations].[TypeID],
- [Annotations].[RtfText],
- [Annotations].[SearchText],
- [Annotations].[Config],
- [Annotations].[DTS],
- [Annotations].[UserID],
- [Annotations].[LastChanged],
- [AnnotationTypes].[Name] [AnnotationType_Name],
- [AnnotationTypes].[Config] [AnnotationType_Config],
- [AnnotationTypes].[DTS] [AnnotationType_DTS],
- [AnnotationTypes].[UserID] [AnnotationType_UserID]
- FROM [Annotations]
- JOIN [AnnotationTypes] ON
- [AnnotationTypes].[TypeID]=[Annotations].[TypeID]
- WHERE
- [Annotations].[ItemID]=@ItemID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[ItemID]=@ItemID
-
-
- SELECT
- [Parts].[ContentID],
- [Parts].[FromType],
- [Parts].[ItemID],
- [Parts].[DTS],
- [Parts].[UserID],
- [Parts].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Parts]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Parts].[ContentID]
- WHERE
- [Parts].[ItemID]=@ItemID
-
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Transitions]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Transitions].[FromID]
- WHERE
- [Transitions].[RangeID]=@ItemID
-
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Transitions]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Transitions].[FromID]
- WHERE
- [Transitions].[ToID]=@ItemID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItem Succeeded'
-ELSE PRINT 'Procedure Creation: getItem Error on Creation'
-GO
-
---HERE
-
-/****** Object: StoredProcedure [addItemChild] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemChild];
-GO
-
---http://www.code-magazine.com/articleprint.aspx?quickid=0305111&page=4&printmode=true
---http://aleemkhan.wordpress.com/2006/07/21/t-sql-error-handling-pattern-for-nested-transactions-and-stored-procedures/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addItemChild]
-(
- @ItemID int=null, @Number nvarchar(30)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @FromType int=null, @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ChildID int, @ContentID int, @ParentContentID int, @LastChanged timestamp
- , @newLastChanged timestamp, @Error int, @Rowcount int, @ChildDeleted int
- SELECT @ChildID = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [PARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID
- IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tblParts]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- BEGIN
- SELECT @ChildDeleted = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [tblPARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID and pp.DeleteStatus > 0
- END
- EXECUTE AddContent @Number, @Text, @Type, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem null, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- IF @ChildID is null -- No existing child - Add Parts record
- BEGIN
- IF @ChildDeleted is not null
- BEGIN
--- INSERT INTO [PartAudits] ([ContentID],[FromType],[ItemID],[DTS],[UserID],[DeleteStatus])
--- SELECT [ContentID],[FromType],[ItemID],[DTS],[UserID],[DeleteStatus] FROM [tblParts]
--- WHERE ItemID = @ChildDeleted
- DELETE FROM [tblParts] WHERE ItemID = @ChildDeleted
- END
- EXECUTE AddPart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @newLastChanged output
- END
- ELSE -- Update existing Parts record
- BEGIN
- EXECUTE UpdatePart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @LastChanged, @newLastChanged output
- UPDATE [Items] SET [PreviousID]=@newItemID WHERE [ItemID]=@ChildID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ChildID OR TT.RangeID = @ChildID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ChildID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ChildID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ChildID OR RangeID = @ChildID
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- -- I don't expect to see any transitions that point to @ChildID. They should have changed in
- -- the update above to point to @newItemID. This is here for consistency with the other insert
- -- stored procedures
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ChildID,@newItemID) OR RangeID IN(@ChildID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- END
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemChild Succeeded'
-ELSE PRINT 'Procedure Creation: addItemChild Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addItemSiblingAfter] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemSiblingAfter]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemSiblingAfter];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addItemSiblingAfter]
-(
- @ItemID int=null, @Number nvarchar(30)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @NextID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II JOIN [CONTENTS] CC ON II.[ContentID]=CC.[ContentID]
- WHERE [ItemID]=@ItemID
- SELECT @NextID = [ItemID]
- FROM [ITEMS]
- WHERE [PreviousID]=@ItemID
- EXECUTE AddContent @Number, @Text, @NewType, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem @ItemID, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- UPDATE [ITEMS] SET [PreviousID]=@newItemID, [DTS]=@DTS, [UserID]=@UserID where [ItemID]=@NextID -- Should be UpdateItem
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@NextID,@ItemID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @NextID THEN @newItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @NextID THEN @newItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@NextID,@newItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Next Step Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@newItemID) OR RangeID IN(@newItemID))
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@NextID) OR RangeID IN(@NextID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemSiblingAfter Succeeded'
-ELSE PRINT 'Procedure Creation: addItemSiblingAfter Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addItemSiblingBefore] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemSiblingBefore]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemSiblingBefore];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addItemSiblingBefore]
-(
- @ItemID int=null, @Number nvarchar(30)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @PreviousID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @PreviousID = [PreviousID], @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II
- JOIN [CONTENTS] CC ON CC.[ContentID]=II.[CONTENTID]
- WHERE [ItemID]=@ItemID
- EXECUTE AddContent @Number, @Text, @NewType, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem @PreviousID, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- UPDATE [ITEMS] SET [PreviousID]=@newItemID where [ItemID]=@ItemID -- Should be UpdateItem
- UPDATE [PARTS] SET [ItemID]=@newItemID where [ItemID]=@ItemID -- Should be UpdatePart
- IF @PreviousID is null -- The step is replacing the first step
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ItemID OR TT.RangeID = @ItemID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ItemID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ItemID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ItemID OR RangeID = @ItemID
- END
- ELSE -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@ItemID,@PreviousID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @ItemID THEN @newItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @ItemID THEN @newItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ItemID,@newItemID) OR RangeID IN(@ItemID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Sibling Added Before ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemSiblingBefore Succeeded'
-ELSE PRINT 'Procedure Creation: addItemSiblingBefore Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addMembership] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addMembership]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addMembership];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addMembership]
-
-(
- @UID int,
- @GID int,
- @StartDate datetime,
- @EndDate datetime=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newUGID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Memberships]
- (
- [UID],
- [GID],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @UID,
- @GID,
- @StartDate,
- @EndDate,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newUGID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Memberships] WHERE [UGID]=@newUGID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addMembership Succeeded'
-ELSE PRINT 'Procedure Creation: addMembership Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addPdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addPdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addPdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addPdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int,
- @PageCount float,
- @DocPdf varbinary(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Pdfs]
- (
- [DocID],
- [DebugStatus],
- [TopRow],
- [PageLength],
- [LeftMargin],
- [PageWidth],
- [PageCount],
- [DocPdf],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @DocID,
- @DebugStatus,
- @TopRow,
- @PageLength,
- @LeftMargin,
- @PageWidth,
- @PageCount,
- @DocPdf,
- @DTS,
- @UserID
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addPdf Succeeded'
-ELSE PRINT 'Procedure Creation: addPdf Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addPermission] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addPermission]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addPermission];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addPermission]
-
-(
- @RID int,
- @PermLevel int,
- @VersionType int,
- @PermValue int,
- @PermAD int,
- @StartDate datetime,
- @EndDate datetime=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newPID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Permissions]
- (
- [RID],
- [PermLevel],
- [VersionType],
- [PermValue],
- [PermAD],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @RID,
- @PermLevel,
- @VersionType,
- @PermValue,
- @PermAD,
- @StartDate,
- @EndDate,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newPID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Permissions] WHERE [PID]=@newPID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addPermission Succeeded'
-ELSE PRINT 'Procedure Creation: addPermission Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addRODb]
-
-(
- @ROName nvarchar(255),
- @FolderPath nvarchar(255),
- @DBConnectionString nvarchar(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newRODbID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [RODbs]
- (
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ROName,
- @FolderPath,
- @DBConnectionString,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newRODbID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [RODbs] WHERE [RODbID]=@newRODbID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addRODb Succeeded'
-ELSE PRINT 'Procedure Creation: addRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addROFst]
-
-(
- @RODbID int,
- @ROLookup varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newROFstID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [ROFsts]
- (
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RODbID,
- @ROLookup,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newROFstID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [ROFsts] WHERE [ROFstID]=@newROFstID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addROFst Succeeded'
-ELSE PRINT 'Procedure Creation: addROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addROImage]
-
-(
- @RODbID int,
- @FileName nvarchar(255),
- @Content varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newImageID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [ROImages]
- (
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RODbID,
- @FileName,
- @Content,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newImageID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [ROImages] WHERE [ImageID]=@newImageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addROImage Succeeded'
-ELSE PRINT 'Procedure Creation: addROImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addRole] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addRole]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addRole];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addRole]
-
-(
- @Name nvarchar(50),
- @Title nvarchar(250),
- @DTS datetime,
- @UsrID nvarchar(100),
- @newRID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Roles]
- (
- [Name],
- [Title],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @Name,
- @Title,
- @DTS,
- @UsrID
- )
- SELECT @newRID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Roles] WHERE [RID]=@newRID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addRole Succeeded'
-ELSE PRINT 'Procedure Creation: addRole Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addRoUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addRoUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addRoUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addRoUsage]
-
-(
- @ContentID int,
- @ROID nvarchar(16),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @RODbID int,
- @newROUsageID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [RoUsages]
- (
- [ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [RODbID]
- )
- VALUES
- (
- @ContentID,
- @ROID,
- @Config,
- @DTS,
- @UserID,
- @RODbID
- )
- SELECT @newROUsageID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [RoUsages] WHERE [ROUsageID]=@newROUsageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addRoUsage Succeeded'
-ELSE PRINT 'Procedure Creation: addRoUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addTransition]
-
-(
- @FromID int,
- @ToID int,
- @RangeID int,
- @IsRange int,
- @TranType int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newTransitionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Transitions]
- (
- [FromID],
- [ToID],
- [RangeID],
- [IsRange],
- [TranType],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @FromID,
- @ToID,
- @RangeID,
- @IsRange,
- @TranType,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newTransitionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Transitions] WHERE [TransitionID]=@newTransitionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addTransition Succeeded'
-ELSE PRINT 'Procedure Creation: addTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addUser] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addUser]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addUser];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addUser]
-
-(
- @UserID nvarchar(100),
- @FirstName nvarchar(50)=null,
- @MiddleName nvarchar(50)=null,
- @LastName nvarchar(50)=null,
- @Suffix nvarchar(10)=null,
- @CourtesyTitle nvarchar(10)=null,
- @PhoneNumber nvarchar(30)=null,
- @CFGName nvarchar(8)=null,
- @UserLogin nvarchar(10)=null,
- @UserName nvarchar(32)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @newUID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Users]
- (
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID]
- )
- VALUES
- (
- @UserID,
- @FirstName,
- @MiddleName,
- @LastName,
- @Suffix,
- @CourtesyTitle,
- @PhoneNumber,
- @CFGName,
- @UserLogin,
- @UserName,
- @Config,
- @DTS,
- @UsrID
- )
- SELECT @newUID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Users] WHERE [UID]=@newUID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addUser Succeeded'
-ELSE PRINT 'Procedure Creation: addUser Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addZContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addZContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addZContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addZContent]
-
-(
- @ContentID int,
- @OldStepSequence nvarchar(32),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [ZContents]
- (
- [ContentID],
- [OldStepSequence]
- )
- VALUES
- (
- @ContentID,
- @OldStepSequence
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ZContents] WHERE [ContentID]=@ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addZContent Succeeded'
-ELSE PRINT 'Procedure Creation: addZContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addZTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addZTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addZTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addZTransition]
-
-(
- @TransitionID int,
- @Oldto nvarchar(32),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [ZTransitions]
- (
- [TransitionID],
- [oldto]
- )
- VALUES
- (
- @TransitionID,
- @Oldto
- )
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ZTransitions] WHERE [TransitionID]=@TransitionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addZTransition Succeeded'
-ELSE PRINT 'Procedure Creation: addZTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [CopyItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[CopyItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [CopyItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[CopyItemAndChildren]
-(
- @StartItemID INT,
- @DestFormatID INT,
- @UserID NVARCHAR(100),
- @NewStartItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
-
---+-----------------------------------------------------------------+
---¦ BEGIN TRANSACTION to make these changes temporary ¦
---+-----------------------------------------------------------------+
- BEGIN TRANSACTION
-
-DECLARE @Children AS TABLE
-(
- ItemID INT PRIMARY KEY,
- NewItemID INT,
- ContentID INT,
- NewContentID INT,
- FormatID INT,
- NewFormatID INT
-)
-DECLARE @NewDocuments AS TABLE
-(
- DocID INT PRIMARY KEY,
- NewDocID INT
-)
--- Locals
-DECLARE @DTS DATETIME -- DTS of all New Items
-SET @DTS = GETDATE() -- Get the current Date and Time
--- Get a list of all of the Items to be copied based upon StartItemID and EndItemID
--- If the StartItemID = EndItemID then it is a single item and it's children
-INSERT INTO @Children SELECT ItemID,ItemID,ContentID,ContentID,FormatID,FormatID FROM vefn_ChildItemsRange(@StartItemID,@StartItemID,null)
--- <<< Copy Contents >>>
--- Create new content rows to match the existing rows. Set the type to the Current ContentID temporarily
--- so that the new content rows can be associated with the existing content rows.
-INSERT INTO Contents
- ([Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID])
- select [Number],[Text],[ContentID],[FormatID],[Config],@DTS,@UserID
- from Contents where ContentID in(Select ContentID from @Children)
--- Update the @Children with the NewConentIDs
-UPDATE NN set NN.NewContentID = CC.ContentID
-From Contents CC
-Join @Children NN on NN.ContentID = CC.Type AND CC.DTS = @DTS and CC.UserID = @UserID
--- Reset the Type column in the Contents table with the Type column from the original Records.
-UPDATE CC set CC.Type = CC2.Type
-From Contents CC
-Join @Children NN on NN.NewContentID = CC.ContentID
-Join Contents CC2 on NN.ContentID = CC2.ContentID
--- Contents are done
- -- SELECT * From Contents where DTS = @DTS and UserID = @UserID
--- <<< Copy Grids >>>
-INSERT INTO [Grids]([ContentID],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[Data],[Config],@DTS,@UserID
- FROM [Grids] GG Join @Children NN on GG.ContentID = NN.ContentID
--- <<< Copy Images >>>
-INSERT INTO [Images]([ContentID],[ImageType],[FileName],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[ImageType],[FileName],[Data],[Config],@DTS,@UserID
- FROM [Images] II Join @Children NN on II.ContentID = NN.ContentID
--- Create new item rows based upon the current item rows and the @Children table, with the NewContentIDs
-INSERT INTO [Items] ([PreviousID],[ContentID],[DTS],[UserID])
- SELECT II.[PreviousID], -- Leave the PreviousID as is for now
- NN.NewContentID, @DTS, @UserID
- from @Children NN
- join Items II on II.ContentID = NN.ContentID
--- Update the @Children with the NewItemIDs
-UPDATE NN set NN.NewItemID = II.ItemID
-From Items II
-Join @Children NN on NN.NewContentID = II.ContentID AND II.DTS = @DTS and II.UserID = @UserID
-DECLARE @NewItemID int
-SELECT @NewItemID = NewItemID
- FROM @Children
- WHERE ItemID = @StartItemID
-UPDATE NN SET NN.[NewFormatID] = CC.[FormatID]
- FROM @Children NN
- Join vefn_ChildItemsRange(@NewItemID,@NewItemID,@DestFormatID) CC
- ON NN.NewItemID = CC.ItemID
--- The @Children table is now complete
- --SELECT * From @Children
--- Update the PreviousID in the new Item rows, to the new ItemIDs based upon the old ItemIDs
-Update II Set II.[PreviousID] = NN.NewItemID
-from Items II
-Join @Children NN on NN.ItemID = II.PreviousID AND II.DTS = @DTS and II.UserID = @UserID
--- Get the new ItemIDs based upon the old ItemIDs
-SELECT @NewStartItemID = NewItemID from @Children where ItemID = @StartItemID
---SELECT @NewEndItemID = NewItemID from @Children where ItemID = @EndItemID
--- Set the PreviousID for the starting Item to null temporarily.
--- This will be adjusted based upon where the step is inserted.
-Update Items Set PreviousID = null where ItemID = @NewStartItemID
--- Items are done
- --SELECT * From Items where DTS = @DTS and UserID = @UserID
--- <<< Copy Parts >>>
-INSERT INTO [Parts] ([ContentID],[FromType],[ItemID],[DTS],[UserID])
-Select NNF.NewContentID,[FromType],NNT.NewItemID, @DTS, @UserID from Parts PP
-JOIN @Children NNF on PP.ContentID = NNF.ContentID
-JOIN @Children NNT on PP.ItemID = NNT.ItemID
--- Parts are done
- -- SELECT * From Parts where DTS = @DTS and UserID = @UserID
--- <<< Copy Annotations >>>
-INSERT INTO [Annotations] ([ItemID],[TypeID],[RtfText],[SearchText],[Config],[DTS],[UserID])
- Select NewItemID, TypeID, RtfText, SearchText, Config, @DTS, @UserID
- from Annotations AA Join @Children NN on AA.ItemID = NN.ItemID
--- Annotations are done
- -- SELECT * From Annotations where DTS = @DTS and UserID = @UserID
--- <<< Copy Documents and Entries>>>
--- logic to create Entries for Library Documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],EE.[DocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') <> ''
--- Logic to create new documents for any documents used that do not have libtitles
-INSERT INTO [Documents] ([LibTitle],[DocContent],[DocAscii],[Config],[DTS],[UserID],[FileExtension])
- OUTPUT CAST(INSERTED.[LibTitle] as INT),INSERTED.[DocID] INTO @NewDocuments
- SELECT str(DD.[DocID]),[DocContent],[DocAscii],[Config],@DTS,@UserID,[FileExtension]
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') = ''
-UPDATE DD SET LibTitle = ''
- FROM Documents DD JOIN @NewDocuments ND on DD.[DocID] = ND.[NewDocID]
- where DTS = @DTS and UserID = @UserID
--- Documents are Done
- -- SELECT * From Documents where DTS = @DTS and UserID = @UserID
--- Logic to create entries for these newly created documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],ND.[NewDocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN @NewDocuments ND on EE.[DocID] = ND.[DocID]
--- Logic to Create DROUsages for these newly created documents
-INSERT INTO [DROUsages] ([DocID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT ND.[NewDocID],[ROID],[Config],@DTS,@UserID,[RODbID]
- FROM [DROUsages] RR
- JOIN @NewDocuments ND on RR.[DocID] = ND.[DocID]
-
--- Entries are done
- -- SELECT * From Entries EE JOIN Documents DD on ee.DocID = DD.DocID where EE.DTS = @DTS and EE.UserID = @UserID
--- <<< Copy RoUsages >>>
-INSERT INTO [RoUsages] ([ContentID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT NN.[NewContentID],CAST([ROUsageID] as nvarchar(16)),[Config],@DTS,@UserID,[RODbID]
- FROM [RoUsages] RR Join @Children NN on RR.ContentID = NN.ContentID
--- Update content records for newly copied records to use correct RO usage ids in the RO tags
-DECLARE @RowsAffected int
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixROText(C1.Text, CAST([ROID] as int), [ROUsageID]) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
--- Update grid records for newly copied records to use correct RO usage ids in the RO tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE GG SET [Data] = G2.NewData
- FROM GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixROData(G1.Data, CAST([ROID] as int), [ROUsageID]) NewData
- FROM GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([Data] as varchar(max)) <> cast(G2.NewData as varchar(max))
- SET @RowsAffected = @@RowCount
-END
-UPDATE RON SET [ROID] = ROO.[ROID]
- FROM RoUsages RON
- JOIN @Children NN on RON.ContentID = NN.NewContentID
- JOIN RoUsages ROO on CAST(RON.ROID as int) = ROO.RoUsageID
-
--- RoUsages are done
- -- SELECT * From RoUsages where DTS = @DTS and UserID = @UserID
-
--- <<< Copy Transtions >>>
--- Note that the inserted record has the 'TranType' field set to old transitionid. This is done
--- so that the next step can replace the old transitionid with the new transitionid in the
--- content record's transition tokens. The TranType gets reset after the content records are
--- updated.
--- Also note that the 'toid/rangeid' may need converted to newly copied ids or may not. If it's
--- not a range, then it always is converted to new, if there is a new. If it's a range, both
--- the toid & the rangeid must be new in order for the conversion to be correct. You cannot
--- have part of the range pointing to the new and part of the range pointing to the original
--- locations.
-
-INSERT INTO .[dbo].[Transitions] ([FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID])
- SELECT NNF.[NewContentID],
- -- if both toid & range are null, use the original toid & rangeid
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [ToID] ELSE NNT.[NewItemID] END,
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [RangeID] ELSE NNR.[NewItemID] END,
- [IsRange],[TransitionID],[Config],@DTS,@UserID
- FROM .[dbo].[Transitions] TT
- JOIN @Children NNF on TT.[FromID] = NNF.[ContentID]
- LEFT JOIN @Children NNT on TT.[ToID] = NNT.[ItemID]
- LEFT JOIN @Children NNR on TT.[RangeID] = NNR.[ItemID]
--- -- Update content records for newly copied records to use correct TransitionIDs in the Transition tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixTransitionTextForCopy(C1.Text, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
--- -- Update grid records for newly copied records to use correct TransitionIDs in the Transition tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE GG SET [DATA] = G2.NewData
- FROM GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixTransitionDataForCopy(G1.Data, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewData
- FROM GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([DATA] as varchar(max)) <> CAST(G2.NewData as varchar(max))
- SET @RowsAffected = @@RowCount
-END
--- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition whose transition format changes
-INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT NN.NewItemID, @typeID,'Verify Transition Format',@UserID
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
- WHERE .dbo.vefn_CompareTranFormat(NN.FormatID, NN.NewFormatID, TRO.TranType) <> 0
-UPDATE TR SET TR.[TranType] = .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
--- Transitions are done
- -- SELECT * From Transitions where DTS = @DTS and UserID = @UserID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: CopyItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: CopyItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAllPdfs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAllPdfs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAllPdfs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAllPdfs]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Pdfs]
- WHERE [DocID] = @DocID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAllPdfs Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAllPdfs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAnnotation]
-
-(
- @AnnotationID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Annotations]
- WHERE [AnnotationID] = @AnnotationID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAnnotationType]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Annotations]
- WHERE [TypeID]=@TypeID
- DELETE [AnnotationTypes]
- WHERE [TypeID] = @TypeID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAssignment] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAssignment]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAssignment];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAssignment]
-
-(
- @AID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Assignments]
- WHERE [AID] = @AID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAssignment Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAssignment Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAssociation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAssociation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAssociation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAssociation]
-
-(
- @AssociationID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Associations]
- WHERE [AssociationID] = @AssociationID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAssociation Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAssociation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteConnection] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteConnection]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteConnection];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteConnection]
-
-(
- @DBID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Folders]
- WHERE [DBID]=@DBID
- DELETE [Connections]
- WHERE [DBID] = @DBID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteConnection Succeeded'
-ELSE PRINT 'Procedure Creation: deleteConnection Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Details]
- WHERE [ContentID]=@ContentID
- DELETE [Entries]
- WHERE [ContentID]=@ContentID
- DELETE [Grids]
- WHERE [ContentID]=@ContentID
- DELETE [Images]
- WHERE [ContentID]=@ContentID
- DELETE [Items]
- WHERE [ContentID]=@ContentID
- DELETE [Parts]
- WHERE [ContentID]=@ContentID
- DELETE [RoUsages]
- WHERE [ContentID]=@ContentID
- DELETE [Transitions]
- WHERE [FromID]=@ContentID
- DELETE [ZContents]
- WHERE [ContentID]=@ContentID
- DELETE [Contents]
- WHERE [ContentID] = @ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteContent Succeeded'
-ELSE PRINT 'Procedure Creation: deleteContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteDetail] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteDetail]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteDetail];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteDetail]
-
-(
- @DetailID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Details]
- WHERE [DetailID] = @DetailID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteDetail Succeeded'
-ELSE PRINT 'Procedure Creation: deleteDetail Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteDocument] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteDocument]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteDocument];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteDocument]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [DROUsages]
- WHERE [DocID]=@DocID
- DELETE [Entries]
- WHERE [DocID]=@DocID
- DELETE [Pdfs]
- WHERE [DocID]=@DocID
- DELETE [Documents]
- WHERE [DocID] = @DocID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteDocument Succeeded'
-ELSE PRINT 'Procedure Creation: deleteDocument Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteDocVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Associations]
- WHERE [VersionID]=@VersionID
- DELETE [DocVersions]
- WHERE [VersionID] = @VersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: deleteDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteDROUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteDROUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteDROUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteDROUsage]
-
-(
- @DROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [DROUsages]
- WHERE [DROUsageID] = @DROUsageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteDROUsage Succeeded'
-ELSE PRINT 'Procedure Creation: deleteDROUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteEntry] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteEntry]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteEntry];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteEntry]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Entries]
- WHERE [ContentID] = @ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteEntry Succeeded'
-ELSE PRINT 'Procedure Creation: deleteEntry Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteFigure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteFigure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteFigure];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteFigure]
-
-(
- @FigureID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Figures]
- WHERE [FigureID] = @FigureID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteFigure Succeeded'
-ELSE PRINT 'Procedure Creation: deleteFigure Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteFolder]
-
-(
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Assignments]
- WHERE [FolderID]=@FolderID
- DELETE [DocVersions]
- WHERE [FolderID]=@FolderID
- DELETE [Folders]
- WHERE [FolderID] = @FolderID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteFolder Succeeded'
-ELSE PRINT 'Procedure Creation: deleteFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Contents]
- WHERE [FormatID]=@FormatID
- DELETE [DocVersions]
- WHERE [FormatID]=@FormatID
- DELETE [Folders]
- WHERE [FormatID]=@FormatID
- DELETE [Formats]
- WHERE [FormatID] = @FormatID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteFormat Succeeded'
-ELSE PRINT 'Procedure Creation: deleteFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteGrid] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteGrid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteGrid];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteGrid]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Grids]
- WHERE [ContentID] = @ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteGrid Succeeded'
-ELSE PRINT 'Procedure Creation: deleteGrid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteGroup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteGroup]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteGroup];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteGroup]
-
-(
- @GID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Assignments]
- WHERE [GID]=@GID
- DELETE [Memberships]
- WHERE [GID]=@GID
- DELETE [Groups]
- WHERE [GID] = @GID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteGroup Succeeded'
-ELSE PRINT 'Procedure Creation: deleteGroup Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteImage]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Images]
- WHERE [ContentID] = @ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteImage Succeeded'
-ELSE PRINT 'Procedure Creation: deleteImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteItem]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Annotations]
- WHERE [ItemID]=@ItemID
- DELETE [DocVersions]
- WHERE [ItemID]=@ItemID
- DELETE [Parts]
- WHERE [ItemID]=@ItemID
- DELETE [Transitions]
- WHERE [RangeID]=@ItemID
- DELETE [Transitions]
- WHERE [ToID]=@ItemID
- DELETE [Items]
- WHERE [ItemID] = @ItemID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteItem Succeeded'
-ELSE PRINT 'Procedure Creation: deleteItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [DeleteItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DeleteItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [DeleteItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[DeleteItemAndChildren]
-(
- @ItemID int,
- @UserID AS VARCHAR(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @DeleteID int
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID)
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- IF @ExternalCount > 0 AND @NextItemID is null
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- --deletelog
- INSERT INTO DeleteLog (UserID) values (@UserID)
- Select @DeleteID = SCOPE_IDENTITY()
- --end deletelog
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- UPDATE PreviousID in Items WHERE ItemID = @NextItemID
- UPDATE Items SET PreviousID = @PreviousItemID WHERE ItemID=@NextItemID
- -- UPDATE DocVersion
- UPDATE DocVersions SET ItemID=@NextItemID where ItemID = @ItemID
- -- UPDATE Parts
- IF @NextItemID is not NULL -- Remove Part Record
- BEGIN
- UPDATE PARTS SET ItemID = @NextItemID where ItemID=@ItemID
- END
- ELSE
- BEGIN
- DELETE FROM Parts WHERE ItemID=@ItemID
- END
- -- Get external transitions that point to the specified Item
- -- These will need to be adjusted to point to the next Item.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID);
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that point to different step
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NextItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NextItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
- --purge deletelog
- DELETE from DeleteLog where DeleteID = @DeleteID
- --end purge deletelog
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: DeleteItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: DeleteItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [DeleteItemAndChildrenTest] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DeleteItemAndChildrenTest]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [DeleteItemAndChildrenTest];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[DeleteItemAndChildrenTest]
-(
- @ItemID int,
- @UserID AS VARCHAR(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID)
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- IF @ExternalCount > 0 AND @NextItemID is null
- BEGIN
- PRINT '--->Cannot delete step ' + @Path + '.' + char(13) + '<===> It has External Transitions and has no next step'
- SELECT dbo.ve_GetShortPath(FromItemID) FromPath,
- dbo.ve_GetShortPath(ToID) ToPath FROM vefn_FindExternalTransitions(@ItemID)
- WHERE NOT EXISTS (SELECT * FROM Items WHERE PreviousID = @ItemID)
- RETURN
- END
-
- IF @ExternalChildCount > 0
- BEGIN
- PRINT '---> Cannot delete step ' + @Path + '.' + char(13) + '<===> It has External Transitions to it''s children'
- SELECT dbo.ve_GetShortPath(FromItemID) FromPath,
- dbo.ve_GetShortPath(ToID) ToPath FROM vefn_FindExternalChildTransitions(@ItemID)
- RETURN
- END
-
- PRINT '@Path = ''' + @Path + ''''
- PRINT '@ItemID = ' + cast(@ItemID as varchar(10))
- PRINT '@ContentID = ' + isnull(cast(@ContentID as varchar(10)),'{NULL}')
- PRINT '@NextItemID = ' + isnull(cast(@NextItemID as varchar(10)),'{NULL}')
- PRINT '@PreviousItemID = ' + isnull(cast(@PreviousItemID as varchar(10)),'{NULL}')
- PRINT '@ExternalCount = ' + isnull(cast(@ExternalCount as varchar(10)),'{NULL}')
- PRINT '@ExternalChildCount = ' + isnull(cast(@ExternalChildCount as varchar(10)),'{NULL}')
-
- PRINT '---' + char(13) +'Preparing to delete step ' + @Path+ char(13) + '---'
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- PRINT 'Children'
- SELECT ItemID, [dbo].[ve_GetShortPath](ItemID) ItemPath, ContentID,[dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath FROM @Children
-
- -- UPDATE PreviousID in Items WHERE ItemID = @NextItemID
- PRINT 'UPDATE Items Next'
- SELECT ItemID, [dbo].[ve_GetShortPath](@NextItemID) PathOfNextItem,[dbo].[ve_GetShortPath](PreviousID) PathOfDeletedItem, [dbo].[ve_GetShortPath](@PreviousItemID) NewPreviousPath
- FROM Items WHERE ItemID=@NextItemID
- -- UPDATE DocVersion
- PRINT 'UPDATE DocVersions ItemID'
- SELECT [dbo].[ve_GetShortPath](ItemID) MyPath, [dbo].[ve_GetShortPath](@NextItemID) NewPath
- FROM DocVersions WHERE ItemID=@ItemID
- SELECT VersionID, [dbo].[ve_GetShortPath](@NextItemID) NewPath
- FROM DocVersions WHERE ItemID=@ItemID
- -- UPDATE Parts
- IF @NextItemID is not NULL -- Remove Part Record
- BEGIN
- PRINT 'UPDATE Parts'
- SELECT ItemID,@NextItemID,[dbo].[ve_GetShortPath](ItemID) ItemPath, [dbo].[ve_GetShortPath](@NextItemID) NewItemPath
- FROM Parts WHERE ItemID=@ItemID
- END
- ELSE
- BEGIN
- PRINT 'DELETE Parts'
- SELECT ContentID,FromType,[dbo].[ve_GetShortPath](ItemID) ItemPath FROM Parts WHERE ItemID=@ItemID
- END
- -- Get external transitions that point to the specified Item
- -- These will need to be adjusted to point to the next Item.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID);
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- PRINT 'ADD Verification Required'
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Get list of External Transitions
-
- PRINT 'UPDATE Transitions - ADD Annotations'
- SELECT [dbo].[ve_GetShortPathFromContentID](FromID)FromPath
- ,[dbo].[ve_GetShortPath](ToID) ToPath
- ,case when ToID = @ItemID then [dbo].[ve_GetShortPath](@NextItemID) else [dbo].[ve_GetShortPath](ToID) END NewToPath
- ,[dbo].[ve_GetShortPath](RangeID) RangePath
- ,case when RangeID = @ItemID then [dbo].[ve_GetShortPath](@NextItemID) else [dbo].[ve_GetShortPath](RangeID) END NewRangePath
- FROM Transitions
- WHERE TransitionID IN(Select TransitionID from @ExternalTrans)
- -- Delete Annotations for @ItemID and children
- PRINT 'DELETE Annotations'
- SELECT AnnotationID, [dbo].[ve_GetShortPath](ItemID) ItemPath from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- PRINT 'DELETE Details'
- SELECT [dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from Details where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- PRINT 'DELETE Entries'
- SELECT ContentID, [dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- PRINT 'DELETE ROUsages'
- SELECT ROUsageID, [dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete Transitions associated with @ContentID and children
- PRINT 'DELETE Transitions'
- SELECT TransitionID, [dbo].[ve_GetShortPathFromContentID](FromID)FromPath ,[dbo].[ve_GetShortPath](ToID) ToPath
- ,[dbo].[ve_GetShortPath](RangeID) RangePath FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- PRINT 'DELETE Parts'
- SELECT ContentID, FromType,[dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- PRINT 'DELETE XContents'
- SELECT ContentID,[dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- PRINT 'DISCONNECT Items from each other'
- SELECT ItemID, [dbo].[ve_GetShortPath](ItemID) ItemPath, [dbo].[ve_GetShortPath](PreviousID) PreviousPath from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- PRINT 'DELETE Items'
- SELECT ItemID, [dbo].[ve_GetShortPath](ItemID) ItemPath from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- PRINT 'DELETE Contents'
- SELECT ContentID, [dbo].[ve_GetShortPathFromContentID](ContentID) ContentPath from Contents where ContentID in(Select ContentID from @Children)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: DeleteItemAndChildrenTest Succeeded'
-ELSE PRINT 'Procedure Creation: DeleteItemAndChildrenTest Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteMembership] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteMembership]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteMembership];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteMembership]
-
-(
- @UGID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Memberships]
- WHERE [UGID] = @UGID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteMembership Succeeded'
-ELSE PRINT 'Procedure Creation: deleteMembership Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deletePart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deletePart]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deletePart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deletePart]
-
-(
- @ContentID int,
- @FromType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Parts]
- WHERE [ContentID] = @ContentID AND [FromType] = @FromType
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deletePart Succeeded'
-ELSE PRINT 'Procedure Creation: deletePart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deletePdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deletePdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deletePdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deletePdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Pdfs]
- WHERE [DocID] = @DocID AND [DebugStatus] = @DebugStatus AND [TopRow] = @TopRow AND [PageLength] = @PageLength AND [LeftMargin] = @LeftMargin AND [PageWidth] = @PageWidth
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deletePdf Succeeded'
-ELSE PRINT 'Procedure Creation: deletePdf Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deletePermission] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deletePermission]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deletePermission];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deletePermission]
-
-(
- @PID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Permissions]
- WHERE [PID] = @PID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deletePermission Succeeded'
-ELSE PRINT 'Procedure Creation: deletePermission Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteRODb]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [DROUsages]
- WHERE [RODbID]=@RODbID
- DELETE [ROFsts]
- WHERE [RODbID]=@RODbID
- DELETE [ROImages]
- WHERE [RODbID]=@RODbID
- DELETE [RoUsages]
- WHERE [RODbID]=@RODbID
- DELETE [RODbs]
- WHERE [RODbID] = @RODbID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteRODb Succeeded'
-ELSE PRINT 'Procedure Creation: deleteRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteROFst]
-
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Associations]
- WHERE [ROFstID]=@ROFstID
- DELETE [Figures]
- WHERE [ROFstID]=@ROFstID
- DELETE [ROFsts]
- WHERE [ROFstID] = @ROFstID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteROFst Succeeded'
-ELSE PRINT 'Procedure Creation: deleteROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteROImage]
-
-(
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Figures]
- WHERE [ImageID]=@ImageID
- DELETE [ROImages]
- WHERE [ImageID] = @ImageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteROImage Succeeded'
-ELSE PRINT 'Procedure Creation: deleteROImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteRole] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteRole]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteRole];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteRole]
-
-(
- @RID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Assignments]
- WHERE [RID]=@RID
- DELETE [Permissions]
- WHERE [RID]=@RID
- DELETE [Roles]
- WHERE [RID] = @RID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteRole Succeeded'
-ELSE PRINT 'Procedure Creation: deleteRole Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteRoUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteRoUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteRoUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteRoUsage]
-
-(
- @ROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [RoUsages]
- WHERE [ROUsageID] = @ROUsageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteRoUsage Succeeded'
-ELSE PRINT 'Procedure Creation: deleteRoUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [ZTransitions]
- WHERE [TransitionID]=@TransitionID
- DELETE [Transitions]
- WHERE [TransitionID] = @TransitionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteTransition Succeeded'
-ELSE PRINT 'Procedure Creation: deleteTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteUser] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteUser]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteUser];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteUser]
-
-(
- @UID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Memberships]
- WHERE [UID]=@UID
- DELETE [Users]
- WHERE [UID] = @UID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteUser Succeeded'
-ELSE PRINT 'Procedure Creation: deleteUser Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteZContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteZContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteZContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteZContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [ZContents]
- WHERE [ContentID] = @ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteZContent Succeeded'
-ELSE PRINT 'Procedure Creation: deleteZContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteZTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteZTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteZTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteZTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [ZTransitions]
- WHERE [TransitionID] = @TransitionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteZTransition Succeeded'
-ELSE PRINT 'Procedure Creation: deleteZTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsAnnotation]
-
-(
- @AnnotationID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Annotations] WHERE [AnnotationID]=@AnnotationID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: existsAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsAnnotationType]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [AnnotationTypes] WHERE [TypeID]=@TypeID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: existsAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsAssignment] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsAssignment]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsAssignment];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsAssignment]
-
-(
- @AID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Assignments] WHERE [AID]=@AID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsAssignment Succeeded'
-ELSE PRINT 'Procedure Creation: existsAssignment Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsAssociation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsAssociation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsAssociation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsAssociation]
-
-(
- @AssociationID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Associations] WHERE [AssociationID]=@AssociationID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsAssociation Succeeded'
-ELSE PRINT 'Procedure Creation: existsAssociation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsConnection] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsConnection]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsConnection];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsConnection]
-
-(
- @DBID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Connections] WHERE [DBID]=@DBID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsConnection Succeeded'
-ELSE PRINT 'Procedure Creation: existsConnection Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Contents] WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsContent Succeeded'
-ELSE PRINT 'Procedure Creation: existsContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsDetail] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsDetail]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsDetail];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsDetail]
-
-(
- @DetailID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Details] WHERE [DetailID]=@DetailID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsDetail Succeeded'
-ELSE PRINT 'Procedure Creation: existsDetail Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsDocument] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsDocument]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsDocument];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsDocument]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Documents] WHERE [DocID]=@DocID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsDocument Succeeded'
-ELSE PRINT 'Procedure Creation: existsDocument Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsDocVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [DocVersions] WHERE [VersionID]=@VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: existsDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsDROUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsDROUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsDROUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsDROUsage]
-
-(
- @DROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [DROUsages] WHERE [DROUsageID]=@DROUsageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsDROUsage Succeeded'
-ELSE PRINT 'Procedure Creation: existsDROUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsEntry] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsEntry]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsEntry];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsEntry]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Entries] WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsEntry Succeeded'
-ELSE PRINT 'Procedure Creation: existsEntry Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsFigure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsFigure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsFigure];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsFigure]
-
-(
- @FigureID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Figures] WHERE [FigureID]=@FigureID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsFigure Succeeded'
-ELSE PRINT 'Procedure Creation: existsFigure Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsFolder]
-
-(
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Folders] WHERE [FolderID]=@FolderID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsFolder Succeeded'
-ELSE PRINT 'Procedure Creation: existsFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Formats] WHERE [FormatID]=@FormatID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsFormat Succeeded'
-ELSE PRINT 'Procedure Creation: existsFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsGrid] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsGrid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsGrid];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsGrid]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Grids] WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsGrid Succeeded'
-ELSE PRINT 'Procedure Creation: existsGrid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsGroup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsGroup]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsGroup];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsGroup]
-
-(
- @GID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Groups] WHERE [GID]=@GID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsGroup Succeeded'
-ELSE PRINT 'Procedure Creation: existsGroup Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsImage]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Images] WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsImage Succeeded'
-ELSE PRINT 'Procedure Creation: existsImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsItem]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Items] WHERE [ItemID]=@ItemID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsItem Succeeded'
-ELSE PRINT 'Procedure Creation: existsItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsMembership] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsMembership]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsMembership];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsMembership]
-
-(
- @UGID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Memberships] WHERE [UGID]=@UGID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsMembership Succeeded'
-ELSE PRINT 'Procedure Creation: existsMembership Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsPart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsPart]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsPart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsPart]
-
-(
- @ContentID int,
- @FromType int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Parts] WHERE [ContentID]=@ContentID AND [FromType]=@FromType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsPart Succeeded'
-ELSE PRINT 'Procedure Creation: existsPart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsPdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsPdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsPdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsPdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsPdf Succeeded'
-ELSE PRINT 'Procedure Creation: existsPdf Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsPermission] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsPermission]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsPermission];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsPermission]
-
-(
- @PID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Permissions] WHERE [PID]=@PID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsPermission Succeeded'
-ELSE PRINT 'Procedure Creation: existsPermission Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsRODb]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [RODbs] WHERE [RODbID]=@RODbID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsRODb Succeeded'
-ELSE PRINT 'Procedure Creation: existsRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsROFst]
-
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [ROFsts] WHERE [ROFstID]=@ROFstID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsROFst Succeeded'
-ELSE PRINT 'Procedure Creation: existsROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsROImage]
-
-(
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [ROImages] WHERE [ImageID]=@ImageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsROImage Succeeded'
-ELSE PRINT 'Procedure Creation: existsROImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsRole] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsRole]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsRole];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsRole]
-
-(
- @RID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Roles] WHERE [RID]=@RID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsRole Succeeded'
-ELSE PRINT 'Procedure Creation: existsRole Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsRoUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsRoUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsRoUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsRoUsage]
-
-(
- @ROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [RoUsages] WHERE [ROUsageID]=@ROUsageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsRoUsage Succeeded'
-ELSE PRINT 'Procedure Creation: existsRoUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Transitions] WHERE [TransitionID]=@TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsTransition Succeeded'
-ELSE PRINT 'Procedure Creation: existsTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsUser] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsUser]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsUser];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsUser]
-
-(
- @UID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Users] WHERE [UID]=@UID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsUser Succeeded'
-ELSE PRINT 'Procedure Creation: existsUser Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsZContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsZContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsZContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsZContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [ZContents] WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsZContent Succeeded'
-ELSE PRINT 'Procedure Creation: existsZContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsZTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsZTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsZTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsZTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [ZTransitions] WHERE [TransitionID]=@TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsZTransition Succeeded'
-ELSE PRINT 'Procedure Creation: existsZTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [FindText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[FindText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [FindText];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[FindText](@LookFor varchar(255))
-RETURNS @Results TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-BEGIN
- insert into @Results
- select itemid,ii.contentid
- from items ii
- join contents cc on ii.contentid = cc.contentid
- where text like @LookFor
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: FindText Succeeded'
-ELSE PRINT 'TableFunction Creation: FindText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAffectedDRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedDRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedDRoUsages];
-GO
-
-/*
-getAffectedDROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedDRoUsages]
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID
- FROM DROUsages DR
- JOIN Entries EE on EE.DocID = DR.DocID
- where RODbID = @RODbID AND ROID = @ROID)
- END
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DRoUsages].[RODbID]=@RODbID AND [DRoUsages].[ROID]=@ROID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedDRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedDRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAffectedRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedRoUsages];
-GO
-
-/*
-getAffectedROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedRoUsages]
-
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID FROM ROUSAGES
- where RODbID = @RODbID AND ROID = @ROID)
- END
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID AND [RoUsages].[ROID]=@ROID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAffectedTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedTransitions];
-GO
-
-/*
-exec getAffectedTransitions 2102
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedTransitions]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- [FromID],
- [ToID],
- [RangeID],
- [IsRange],
- [TranType],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- FROM [Transitions] TT join vefn_FindAffectedTransitions(@ItemID) TTZ on TTZ.TransitionID = TT.TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotation]
-
-(
- @AnnotationID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Annotations]
- WHERE [AnnotationID]=@AnnotationID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotations] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotations]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotations];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotations]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Annotations]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotations Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotations Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationsByItemID]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Annotations].[AnnotationID],
- [Annotations].[ItemID],
- [Annotations].[TypeID],
- [Annotations].[RtfText],
- [Annotations].[SearchText],
- [Annotations].[Config],
- [Annotations].[DTS],
- [Annotations].[UserID],
- [Annotations].[LastChanged],
- [AnnotationTypes].[Name] [AnnotationType_Name],
- [AnnotationTypes].[Config] [AnnotationType_Config],
- [AnnotationTypes].[DTS] [AnnotationType_DTS],
- [AnnotationTypes].[UserID] [AnnotationType_UserID]
- FROM [Annotations]
- JOIN [AnnotationTypes] ON
- [AnnotationTypes].[TypeID]=[Annotations].[TypeID]
- WHERE
- [Annotations].[ItemID]=@ItemID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationsByTypeID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationsByTypeID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationsByTypeID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationsByTypeID]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Annotations].[AnnotationID],
- [Annotations].[ItemID],
- [Annotations].[TypeID],
- [Annotations].[RtfText],
- [Annotations].[SearchText],
- [Annotations].[Config],
- [Annotations].[DTS],
- [Annotations].[UserID],
- [Annotations].[LastChanged],
- [Items].[PreviousID] [Item_PreviousID],
- [Items].[ContentID] [Item_ContentID],
- [Items].[DTS] [Item_DTS],
- [Items].[UserID] [Item_UserID]
- FROM [Annotations]
- JOIN [Items] ON
- [Items].[ItemID]=[Annotations].[ItemID]
- WHERE
- [Annotations].[TypeID]=@TypeID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationsByTypeID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationsByTypeID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationType]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TypeID],
- [Name],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[TypeID]=[AnnotationTypes].[TypeID]) [AnnotationCount]
- FROM [AnnotationTypes]
- WHERE [TypeID]=@TypeID
-
- SELECT
- [Annotations].[AnnotationID],
- [Annotations].[ItemID],
- [Annotations].[TypeID],
- [Annotations].[RtfText],
- [Annotations].[SearchText],
- [Annotations].[Config],
- [Annotations].[DTS],
- [Annotations].[UserID],
- [Annotations].[LastChanged],
- [Items].[PreviousID] [Item_PreviousID],
- [Items].[ContentID] [Item_ContentID],
- [Items].[DTS] [Item_DTS],
- [Items].[UserID] [Item_UserID]
- FROM [Annotations]
- JOIN [Items] ON
- [Items].[ItemID]=[Annotations].[ItemID]
- WHERE
- [Annotations].[TypeID]=@TypeID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationTypeByName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationTypeByName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationTypeByName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationTypeByName]
-(
- @Name nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TypeID],
- [Name],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[TypeID]=[AnnotationTypes].[TypeID]) [AnnotationCount]
- FROM [AnnotationTypes]
- WHERE [Name]=@Name
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationTypeByName Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationTypeByName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationTypes] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationTypes]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationTypes];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationTypes]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TypeID],
- [Name],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[TypeID]=[AnnotationTypes].[TypeID]) [AnnotationCount]
- FROM [AnnotationTypes]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationTypes Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationTypes Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssignment] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssignment]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssignment];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssignment]
-
-(
- @AID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AID],
- [GID],
- [RID],
- [FolderID],
- [StartDate],
- [EndDate],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Assignments]
- WHERE [AID]=@AID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssignment Succeeded'
-ELSE PRINT 'Procedure Creation: getAssignment Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssignments] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssignments]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssignments];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssignments]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AID],
- [GID],
- [RID],
- [FolderID],
- [StartDate],
- [EndDate],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Assignments]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssignments Succeeded'
-ELSE PRINT 'Procedure Creation: getAssignments Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssignmentsByFolderID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssignmentsByFolderID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssignmentsByFolderID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssignmentsByFolderID]
-
-(
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID],
- [Roles].[Name] [Role_Name],
- [Roles].[Title] [Role_Title],
- [Roles].[DTS] [Role_DTS],
- [Roles].[UsrID] [Role_UsrID]
- FROM [Assignments]
- JOIN [Groups] ON
- [Groups].[GID]=[Assignments].[GID]
- JOIN [Roles] ON
- [Roles].[RID]=[Assignments].[RID]
- WHERE
- [Assignments].[FolderID]=@FolderID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssignmentsByFolderID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssignmentsByFolderID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssignmentsByGID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssignmentsByGID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssignmentsByGID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssignmentsByGID]
-
-(
- @GID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- [Roles].[Name] [Role_Name],
- [Roles].[Title] [Role_Title],
- [Roles].[DTS] [Role_DTS],
- [Roles].[UsrID] [Role_UsrID]
- FROM [Assignments]
- JOIN [Folders] ON
- [Folders].[FolderID]=[Assignments].[FolderID]
- JOIN [Roles] ON
- [Roles].[RID]=[Assignments].[RID]
- WHERE
- [Assignments].[GID]=@GID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssignmentsByGID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssignmentsByGID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssignmentsByRID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssignmentsByRID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssignmentsByRID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssignmentsByRID]
-
-(
- @RID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Assignments]
- JOIN [Folders] ON
- [Folders].[FolderID]=[Assignments].[FolderID]
- JOIN [Groups] ON
- [Groups].[GID]=[Assignments].[GID]
- WHERE
- [Assignments].[RID]=@RID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssignmentsByRID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssignmentsByRID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssociation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssociation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociation]
-
-(
- @AssociationID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AssociationID],
- [VersionID],
- [ROFstID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Associations]
- WHERE [AssociationID]=@AssociationID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssociation Succeeded'
-ELSE PRINT 'Procedure Creation: getAssociation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssociationByVersionID_ROFstID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociationByVersionID_ROFstID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssociationByVersionID_ROFstID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociationByVersionID_ROFstID]
-(
- @VersionID int,
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AssociationID],
- [VersionID],
- [ROFstID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Associations]
- WHERE [VersionID]=@VersionID AND [ROFstID]=@ROFstID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssociationByVersionID_ROFstID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssociationByVersionID_ROFstID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssociations] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociations]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssociations];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociations]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AssociationID],
- [VersionID],
- [ROFstID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Associations]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssociations Succeeded'
-ELSE PRINT 'Procedure Creation: getAssociations Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssociationsByROFstID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociationsByROFstID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssociationsByROFstID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociationsByROFstID]
-
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [DocVersions].[FolderID] [DocVersion_FolderID],
- [DocVersions].[VersionType] [DocVersion_VersionType],
- [DocVersions].[Name] [DocVersion_Name],
- [DocVersions].[Title] [DocVersion_Title],
- [DocVersions].[ItemID] [DocVersion_ItemID],
- [DocVersions].[FormatID] [DocVersion_FormatID],
- [DocVersions].[Config] [DocVersion_Config],
- [DocVersions].[DTS] [DocVersion_DTS],
- [DocVersions].[UserID] [DocVersion_UserID]
- FROM [Associations]
- JOIN [DocVersions] ON
- [DocVersions].[VersionID]=[Associations].[VersionID]
- WHERE
- [Associations].[ROFstID]=@ROFstID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssociationsByROFstID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssociationsByROFstID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAssociationsByVersionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociationsByVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAssociationsByVersionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociationsByVersionID]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- [ROFsts].[ROLookup] [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Associations]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Associations].[ROFstID]
- WHERE
- [Associations].[VersionID]=@VersionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAssociationsByVersionID Succeeded'
-ELSE PRINT 'Procedure Creation: getAssociationsByVersionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getChildFolders] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChildFolders]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChildFolders];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChildFolders]
-
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders] WHERE [ParentID]=@ParentID AND [FolderID]<>@ParentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChildFolders Succeeded'
-ELSE PRINT 'Procedure Creation: getChildFolders Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getChildFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChildFormats]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChildFormats];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChildFormats]
-
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats] WHERE [ParentID]=@ParentID AND [FormatID]<>@ParentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChildFormats Succeeded'
-ELSE PRINT 'Procedure Creation: getChildFormats Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getConnection] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getConnection]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getConnection];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getConnection]
-
-(
- @DBID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DBID],
- [Name],
- [Title],
- [ConnectionString],
- [ServerType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[DBID]=[Connections].[DBID]) [FolderCount]
- FROM [Connections]
- WHERE [DBID]=@DBID
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged]
- FROM [Folders]
- WHERE
- [Folders].[DBID]=@DBID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getConnection Succeeded'
-ELSE PRINT 'Procedure Creation: getConnection Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getConnectionByName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getConnectionByName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getConnectionByName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getConnectionByName]
-(
- @Name nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DBID],
- [Name],
- [Title],
- [ConnectionString],
- [ServerType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[DBID]=[Connections].[DBID]) [FolderCount]
- FROM [Connections]
- WHERE [Name]=@Name
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getConnectionByName Succeeded'
-ELSE PRINT 'Procedure Creation: getConnectionByName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getConnections] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getConnections]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getConnections];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getConnections]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DBID],
- [Name],
- [Title],
- [ConnectionString],
- [ServerType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[DBID]=[Connections].[DBID]) [FolderCount]
- FROM [Connections]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getConnections Succeeded'
-ELSE PRINT 'Procedure Creation: getConnections Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents]
- WHERE [ContentID]=@ContentID
-
- SELECT
- [Details].[DetailID],
- [Details].[ContentID],
- [Details].[ItemType],
- [Details].[Text],
- [Details].[Config],
- [Details].[DTS],
- [Details].[UserID],
- [Details].[LastChanged]
- FROM [Details]
- WHERE
- [Details].[ContentID]=@ContentID
-
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [Entries]
- JOIN [Documents] ON
- [Documents].[DocID]=[Entries].[DocID]
- WHERE
- [Entries].[ContentID]=@ContentID
-
-
- SELECT
- [Grids].[ContentID],
- [Grids].[Data],
- [Grids].[Config],
- [Grids].[DTS],
- [Grids].[UserID],
- [Grids].[LastChanged]
- FROM [Grids]
- WHERE
- [Grids].[ContentID]=@ContentID
-
-
- SELECT
- [Images].[ContentID],
- [Images].[ImageType],
- [Images].[FileName],
- [Images].[Data],
- [Images].[Config],
- [Images].[DTS],
- [Images].[UserID],
- [Images].[LastChanged]
- FROM [Images]
- WHERE
- [Images].[ContentID]=@ContentID
-
-
- SELECT
- [Items].[ItemID],
- [Items].[PreviousID],
- [Items].[ContentID],
- [Items].[DTS],
- [Items].[UserID],
- [Items].[LastChanged]
- FROM [Items]
- WHERE
- [Items].[ContentID]=@ContentID
-
-
- SELECT
- [Parts].[ContentID],
- [Parts].[FromType],
- [Parts].[ItemID],
- [Parts].[DTS],
- [Parts].[UserID],
- [Parts].[LastChanged],
- [Items].[PreviousID] [Item_PreviousID],
- [Items].[ContentID] [Item_ContentID],
- [Items].[DTS] [Item_DTS],
- [Items].[UserID] [Item_UserID]
- FROM [Parts]
- JOIN [Items] ON
- [Items].[ItemID]=[Parts].[ItemID]
- WHERE
- [Parts].[ContentID]=@ContentID
-
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [RoUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[RoUsages].[RODbID]
- WHERE
- [RoUsages].[ContentID]=@ContentID
-
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Items_RangeID].[PreviousID] [Item_RangeID_PreviousID],
- [Items_RangeID].[ContentID] [Item_RangeID_ContentID],
- [Items_RangeID].[DTS] [Item_RangeID_DTS],
- [Items_RangeID].[UserID] [Item_RangeID_UserID],
- [Items_ToID].[PreviousID] [Item_ToID_PreviousID],
- [Items_ToID].[ContentID] [Item_ToID_ContentID],
- [Items_ToID].[DTS] [Item_ToID_DTS],
- [Items_ToID].[UserID] [Item_ToID_UserID]
- FROM [Transitions]
- JOIN [Items] [Items_RangeID] ON
- [Items_RangeID].[ItemID]=[Transitions].[RangeID]
- JOIN [Items] [Items_ToID] ON
- [Items_ToID].[ItemID]=[Transitions].[ToID]
- WHERE
- [Transitions].[FromID]=@ContentID
-
-
- SELECT
- [ZContents].[ContentID],
- [ZContents].[OldStepSequence],
- [ZContents].[LastChanged]
- FROM [ZContents]
- WHERE
- [ZContents].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContent Succeeded'
-ELSE PRINT 'Procedure Creation: getContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContents] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContents]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContents];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContents]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContents Succeeded'
-ELSE PRINT 'Procedure Creation: getContents Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentsByFormatID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentsByFormatID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentsByFormatID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentsByFormatID]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Contents].[ContentID],
- [Contents].[Number],
- [Contents].[Text],
- [Contents].[Type],
- [Contents].[FormatID],
- [Contents].[Config],
- [Contents].[DTS],
- [Contents].[UserID],
- [Contents].[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents]
- WHERE
- [Contents].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentsByFormatID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentsByFormatID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDetail] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDetail]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDetail];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDetail]
-
-(
- @DetailID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DetailID],
- [ContentID],
- [ItemType],
- [Text],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Details]
- WHERE [DetailID]=@DetailID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDetail Succeeded'
-ELSE PRINT 'Procedure Creation: getDetail Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDetails] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDetails]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDetails];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDetails]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DetailID],
- [ContentID],
- [ItemType],
- [Text],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Details]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDetails Succeeded'
-ELSE PRINT 'Procedure Creation: getDetails Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDetailsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDetailsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDetailsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDetailsByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Details].[DetailID],
- [Details].[ContentID],
- [Details].[ItemType],
- [Details].[Text],
- [Details].[Config],
- [Details].[DTS],
- [Details].[UserID],
- [Details].[LastChanged]
- FROM [Details]
- WHERE
- [Details].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDetailsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getDetailsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocument] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocument]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocument];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocument]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [FileExtension],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[Documents].[DocID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[Documents].[DocID]) [EntryCount],
- (SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[Documents].[DocID]) [PdfCount]
- FROM [Documents]
- WHERE [DocID]=@DocID
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [DROUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[DROUsages].[RODbID]
- WHERE
- [DROUsages].[DocID]=@DocID
-
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Entries]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Entries].[ContentID]
- WHERE
- [Entries].[DocID]=@DocID
-
-
- SELECT
- [Pdfs].[DocID],
- [Pdfs].[DebugStatus],
- [Pdfs].[TopRow],
- [Pdfs].[PageLength],
- [Pdfs].[LeftMargin],
- [Pdfs].[PageWidth],
- [Pdfs].[PageCount],
- [Pdfs].[DocPdf],
- [Pdfs].[DTS],
- [Pdfs].[UserID],
- [Pdfs].[LastChanged]
- FROM [Pdfs]
- WHERE
- [Pdfs].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocument Succeeded'
-ELSE PRINT 'Procedure Creation: getDocument Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAuditsByDocID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAuditsByDocID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAuditsByDocID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAuditsByDocID]
-(
- @DocID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- WHERE DocID = @DocID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAuditsByDocID Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAuditsByDocID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocuments] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocuments]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocuments];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocuments]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [FileExtension],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[Documents].[DocID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[Documents].[DocID]) [EntryCount],
- (SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[Documents].[DocID]) [PdfCount]
- FROM [Documents]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocuments Succeeded'
-ELSE PRINT 'Procedure Creation: getDocuments Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [FolderID],
- [VersionType],
- [Name],
- [Title],
- [ItemID],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- WHERE [VersionID]=@VersionID
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- [ROFsts].[ROLookup] [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Associations]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Associations].[ROFstID]
- WHERE
- [Associations].[VersionID]=@VersionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocVersions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [FolderID],
- [VersionType],
- [Name],
- [Title],
- [ItemID],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getDocVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocVersionsByFolderID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocVersionsByFolderID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocVersionsByFolderID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocVersionsByFolderID]
-
-(
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- WHERE
- [DocVersions].[FolderID]=@FolderID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocVersionsByFolderID Succeeded'
-ELSE PRINT 'Procedure Creation: getDocVersionsByFolderID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocVersionsByFormatID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocVersionsByFormatID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocVersionsByFormatID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocVersionsByFormatID]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocVersionsByFormatID Succeeded'
-ELSE PRINT 'Procedure Creation: getDocVersionsByFormatID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocVersionsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocVersionsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocVersionsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocVersionsByItemID]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[ItemID]=@ItemID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocVersionsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getDocVersionsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDROUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDROUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDROUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDROUsage]
-
-(
- @DROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsageID],
- [DocID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [DROUsages]
- WHERE [DROUsageID]=@DROUsageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDROUsage Succeeded'
-ELSE PRINT 'Procedure Creation: getDROUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDROUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDROUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDROUsages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDROUsages]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsageID],
- [DocID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [DROUsages]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDROUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getDROUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDROUsagesByDocID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDROUsagesByDocID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDROUsagesByDocID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDROUsagesByDocID]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [DROUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[DROUsages].[RODbID]
- WHERE
- [DROUsages].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDROUsagesByDocID Succeeded'
-ELSE PRINT 'Procedure Creation: getDROUsagesByDocID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDROUsagesByRODbID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDROUsagesByRODbID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDROUsagesByRODbID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDROUsagesByRODbID]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DROUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DROUsages].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDROUsagesByRODbID Succeeded'
-ELSE PRINT 'Procedure Creation: getDROUsagesByRODbID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDRoUsagesByROIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDRoUsagesByROIDs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDRoUsagesByROIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDRoUsagesByROIDs]
-(
- @ROIDs nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [DRoUsages].RODBID = SS.[RODBID] and [DRoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDRoUsagesByROIDs Succeeded'
-ELSE PRINT 'Procedure Creation: getDRoUsagesByROIDs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntries] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntries]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntries];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntries]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Entries]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntries Succeeded'
-ELSE PRINT 'Procedure Creation: getEntries Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntriesByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntriesByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntriesByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntriesByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [Entries]
- JOIN [Documents] ON
- [Documents].[DocID]=[Entries].[DocID]
- WHERE
- [Entries].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntriesByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getEntriesByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntriesByDocID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntriesByDocID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntriesByDocID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntriesByDocID]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Entries]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Entries].[ContentID]
- WHERE
- [Entries].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntriesByDocID Succeeded'
-ELSE PRINT 'Procedure Creation: getEntriesByDocID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntry] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntry]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntry];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntry]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Entries]
- WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntry Succeeded'
-ELSE PRINT 'Procedure Creation: getEntry Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getExternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getExternalTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getExternalTransitions];
-GO
-
-/*
-exec getExternalTransitions 4984
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getExternalTransitions]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- from transitions tt
- join items ii on tt.FromID = ii.ContentID
- where TT.ToID = @ItemID AND TT.FromID not in(select ContentID from vefn_childItems(@ItemID))
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getExternalTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: getExternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getExternalTransitionsToChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getExternalTransitionsToChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getExternalTransitionsToChildren];
-GO
-
-/*
-exec getExternalTransitionsToChildren 9392
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getExternalTransitionsToChildren]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- FROM vefn_childItems(@ItemID) II
- JOIN Transitions TT on TT.ToID = II.ItemID AND TT.ToID <> @ItemID
- where TT.FromID not in(select ContentID from vefn_childItems(@ItemID))
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getExternalTransitionsToChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getExternalTransitionsToChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFigure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFigure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFigure];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFigure]
-
-(
- @FigureID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FigureID],
- [ROFstID],
- [ImageID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Figures]
- WHERE [FigureID]=@FigureID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFigure Succeeded'
-ELSE PRINT 'Procedure Creation: getFigure Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFigureByROFstID_ImageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFigureByROFstID_ImageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFigureByROFstID_ImageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFigureByROFstID_ImageID]
-(
- @ROFstID int,
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FigureID],
- [ROFstID],
- [ImageID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Figures]
- WHERE [ROFstID]=@ROFstID AND [ImageID]=@ImageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFigureByROFstID_ImageID Succeeded'
-ELSE PRINT 'Procedure Creation: getFigureByROFstID_ImageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFigures] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFigures]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFigures];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFigures]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FigureID],
- [ROFstID],
- [ImageID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Figures]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFigures Succeeded'
-ELSE PRINT 'Procedure Creation: getFigures Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFiguresByImageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFiguresByImageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFiguresByImageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFiguresByImageID]
-
-(
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- [ROFsts].[ROLookup] [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Figures]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Figures].[ROFstID]
- WHERE
- [Figures].[ImageID]=@ImageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFiguresByImageID Succeeded'
-ELSE PRINT 'Procedure Creation: getFiguresByImageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFiguresByROFstID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFiguresByROFstID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFiguresByROFstID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFiguresByROFstID]
-
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROImages].[RODbID] [ROImage_RODbID],
- [ROImages].[FileName] [ROImage_FileName],
- [ROImages].[Content] [ROImage_Content],
- [ROImages].[Config] [ROImage_Config],
- [ROImages].[DTS] [ROImage_DTS],
- [ROImages].[UserID] [ROImage_UserID]
- FROM [Figures]
- JOIN [ROImages] ON
- [ROImages].[ImageID]=[Figures].[ImageID]
- WHERE
- [Figures].[ROFstID]=@ROFstID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFiguresByROFstID Succeeded'
-ELSE PRINT 'Procedure Creation: getFiguresByROFstID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFolder]
-
-(
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- WHERE [FolderID]=@FolderID
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID],
- [Roles].[Name] [Role_Name],
- [Roles].[Title] [Role_Title],
- [Roles].[DTS] [Role_DTS],
- [Roles].[UsrID] [Role_UsrID]
- FROM [Assignments]
- JOIN [Groups] ON
- [Groups].[GID]=[Assignments].[GID]
- JOIN [Roles] ON
- [Roles].[RID]=[Assignments].[RID]
- WHERE
- [Assignments].[FolderID]=@FolderID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged]
- FROM [DocVersions]
- WHERE
- [DocVersions].[FolderID]=@FolderID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFolder Succeeded'
-ELSE PRINT 'Procedure Creation: getFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFolderByParentID_Name] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFolderByParentID_Name]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFolderByParentID_Name];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFolderByParentID_Name]
-(
- @ParentID int,
- @Name nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- WHERE [ParentID]=@ParentID AND [Name]=@Name
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFolderByParentID_Name Succeeded'
-ELSE PRINT 'Procedure Creation: getFolderByParentID_Name Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFolders] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFolders]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFolders];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFolders]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFolders Succeeded'
-ELSE PRINT 'Procedure Creation: getFolders Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFoldersByDBID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFoldersByDBID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFoldersByDBID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFoldersByDBID]
-
-(
- @DBID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- WHERE
- [Folders].[DBID]=@DBID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFoldersByDBID Succeeded'
-ELSE PRINT 'Procedure Creation: getFoldersByDBID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFoldersByFormatID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFoldersByFormatID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFoldersByFormatID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFoldersByFormatID]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- [Connections].[Name] [Connection_Name],
- [Connections].[Title] [Connection_Title],
- [Connections].[ConnectionString] [Connection_ConnectionString],
- [Connections].[ServerType] [Connection_ServerType],
- [Connections].[Config] [Connection_Config],
- [Connections].[DTS] [Connection_DTS],
- [Connections].[UsrID] [Connection_UsrID],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- JOIN [Connections] ON
- [Connections].[DBID]=[Folders].[DBID]
- WHERE
- [Folders].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFoldersByFormatID Succeeded'
-ELSE PRINT 'Procedure Creation: getFoldersByFormatID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- SELECT
- [Contents].[ContentID],
- [Contents].[Number],
- [Contents].[Text],
- [Contents].[Type],
- [Contents].[FormatID],
- [Contents].[Config],
- [Contents].[DTS],
- [Contents].[UserID],
- [Contents].[LastChanged]
- FROM [Contents]
- WHERE
- [Contents].[FormatID]=@FormatID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[FormatID]=@FormatID
-
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- [Connections].[Name] [Connection_Name],
- [Connections].[Title] [Connection_Title],
- [Connections].[ConnectionString] [Connection_ConnectionString],
- [Connections].[ServerType] [Connection_ServerType],
- [Connections].[Config] [Connection_Config],
- [Connections].[DTS] [Connection_DTS],
- [Connections].[UsrID] [Connection_UsrID]
- FROM [Folders]
- JOIN [Connections] ON
- [Connections].[DBID]=[Folders].[DBID]
- WHERE
- [Folders].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getJustFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getJustFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getJustFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatByName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatByName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFormatByName]
-
-(
- @Name varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
- DECLARE @FormatID INT
- Set @FormatID = (select FormatID from Formats where Name = @Name)
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- SELECT
- [Contents].[ContentID],
- [Contents].[Number],
- [Contents].[Text],
- [Contents].[Type],
- [Contents].[FormatID],
- [Contents].[Config],
- [Contents].[DTS],
- [Contents].[UserID],
- [Contents].[LastChanged]
- FROM [Contents]
- WHERE
- [Contents].[FormatID]=@FormatID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[FormatID]=@FormatID
-
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- [Connections].[Name] [Connection_Name],
- [Connections].[Title] [Connection_Title],
- [Connections].[ConnectionString] [Connection_ConnectionString],
- [Connections].[ServerType] [Connection_ServerType],
- [Connections].[Config] [Connection_Config],
- [Connections].[DTS] [Connection_DTS],
- [Connections].[UsrID] [Connection_UsrID]
- FROM [Folders]
- JOIN [Connections] ON
- [Connections].[DBID]=[Folders].[DBID]
- WHERE
- [Folders].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFormatByParentID_Name] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatByParentID_Name]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatByParentID_Name];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFormatByParentID_Name]
-(
- @ParentID int,
- @Name nvarchar(20)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [ParentID]=@ParentID AND [Name]=@Name
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFormatByParentID_Name Succeeded'
-ELSE PRINT 'Procedure Creation: getFormatByParentID_Name Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormats]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormats];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFormats]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFormats Succeeded'
-ELSE PRINT 'Procedure Creation: getFormats Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGrid] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGrid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGrid];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGrid]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Grids]
- WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGrid Succeeded'
-ELSE PRINT 'Procedure Creation: getGrid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [GridAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [GridAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [GridAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGrids] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGrids]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGrids];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGrids]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Grids]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGrids Succeeded'
-ELSE PRINT 'Procedure Creation: getGrids Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridsByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Grids].[ContentID],
- [Grids].[Data],
- [Grids].[Config],
- [Grids].[DTS],
- [Grids].[UserID],
- [Grids].[LastChanged]
- FROM [Grids]
- WHERE
- [Grids].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getGridsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGroup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGroup]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGroup];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGroup]
-
-(
- @GID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [GID],
- [GroupName],
- [GroupType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[GID]=[Groups].[GID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[GID]=[Groups].[GID]) [MembershipCount]
- FROM [Groups]
- WHERE [GID]=@GID
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- [Roles].[Name] [Role_Name],
- [Roles].[Title] [Role_Title],
- [Roles].[DTS] [Role_DTS],
- [Roles].[UsrID] [Role_UsrID]
- FROM [Assignments]
- JOIN [Folders] ON
- [Folders].[FolderID]=[Assignments].[FolderID]
- JOIN [Roles] ON
- [Roles].[RID]=[Assignments].[RID]
- WHERE
- [Assignments].[GID]=@GID
-
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Users].[UserID] [User_UserID],
- [Users].[FirstName] [User_FirstName],
- [Users].[MiddleName] [User_MiddleName],
- [Users].[LastName] [User_LastName],
- [Users].[Suffix] [User_Suffix],
- [Users].[CourtesyTitle] [User_CourtesyTitle],
- [Users].[PhoneNumber] [User_PhoneNumber],
- [Users].[CFGName] [User_CFGName],
- [Users].[UserLogin] [User_UserLogin],
- [Users].[UserName] [User_UserName],
- [Users].[Config] [User_Config],
- [Users].[DTS] [User_DTS],
- [Users].[UsrID] [User_UsrID]
- FROM [Memberships]
- JOIN [Users] ON
- [Users].[UID]=[Memberships].[UID]
- WHERE
- [Memberships].[GID]=@GID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGroup Succeeded'
-ELSE PRINT 'Procedure Creation: getGroup Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGroupByGroupName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGroupByGroupName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGroupByGroupName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGroupByGroupName]
-(
- @GroupName nvarchar(50)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [GID],
- [GroupName],
- [GroupType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[GID]=[Groups].[GID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[GID]=[Groups].[GID]) [MembershipCount]
- FROM [Groups]
- WHERE [GroupName]=@GroupName
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGroupByGroupName Succeeded'
-ELSE PRINT 'Procedure Creation: getGroupByGroupName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGroups] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGroups]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGroups];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGroups]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [GID],
- [GroupName],
- [GroupType],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[GID]=[Groups].[GID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[GID]=[Groups].[GID]) [MembershipCount]
- FROM [Groups]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGroups Succeeded'
-ELSE PRINT 'Procedure Creation: getGroups Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImage]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Images]
- WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImage Succeeded'
-ELSE PRINT 'Procedure Creation: getImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImages]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Images]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImages Succeeded'
-ELSE PRINT 'Procedure Creation: getImages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImagesByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImagesByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImagesByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImagesByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Images].[ContentID],
- [Images].[ImageType],
- [Images].[FileName],
- [Images].[Data],
- [Images].[Config],
- [Images].[DTS],
- [Images].[UserID],
- [Images].[LastChanged]
- FROM [Images]
- WHERE
- [Images].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImagesByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getImagesByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAndChildren];
-GO
-
--- getItemAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ItemAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ItemAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemNextAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemNextAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemNextAndChildren];
-GO
-
--- getItemNextAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemNextAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemNextAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemNextAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItems]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Items].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Items].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[Items].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Items].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Items].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Items].[ItemID]) [Transition_ToIDCount]
- FROM [Items]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItems Succeeded'
-ELSE PRINT 'Procedure Creation: getItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemsByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Items].[ItemID],
- [Items].[PreviousID],
- [Items].[ContentID],
- [Items].[DTS],
- [Items].[UserID],
- [Items].[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Items].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Items].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[Items].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Items].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Items].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Items].[ItemID]) [Transition_ToIDCount]
- FROM [Items]
- WHERE
- [Items].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getItemsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemsByPartType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemsByPartType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemsByPartType];
-GO
-
-/* samples:
- getItemsByPartType 7 // tables
- getItemsByPartType 1 // procedure
- getItemsByPartType 2 // section
- getItemsByPartType 3 // Cautions
- getItemsByPartType 4 // Notes
- getItemsByPartType 5 // RNOs
- getItemsByPartType 6 // Steps
- */
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemsByPartType](@FromType int)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- ii.[ItemID],
- [PreviousID],
- ii.[ContentID],
- ii.[DTS],
- ii.[UserID],
- ii.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount]
- FROM [Items] ii
- JOIN [Parts] pp on pp.ItemID = ii.ItemID
- WHERE pp.Fromtype = @FromType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemsByPartType Succeeded'
-ELSE PRINT 'Procedure Creation: getItemsByPartType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemsByPartTypeAndContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemsByPartTypeAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemsByPartTypeAndContent];
-GO
-
-/* samples:
- getItemsByPartTypeAndContent 7 // tables
- getItemsByPartTypeAndContent 1 // procedure
- getItemsByPartTypeAndContent 2 // section
- getItemsByPartTypeAndContent 3 // Cautions
- getItemsByPartTypeAndContent 4 // Notes
- getItemsByPartTypeAndContent 5 // RNOs
- getItemsByPartTypeAndContent 6 // Steps
- */
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemsByPartTypeAndContent](@FromType int)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- ii.[ItemID],
- [PreviousID],
- ii.[ContentID],
- ii.[DTS],
- ii.[UserID],
- ii.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- FROM [Items] ii
- JOIN [Parts] pp on pp.ItemID = ii.ItemID
- JOIN [Contents] C on C.ContentID = ii.ContentID
- WHERE pp.Fromtype = @FromType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemsByPartTypeAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: getItemsByPartTypeAndContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getJustRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getJustRODb]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RODbID],
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- (SELECT COUNT(*) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [RODbs]
- WHERE [RODbID]=@RODbID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustRODb Succeeded'
-ELSE PRINT 'Procedure Creation: getJustRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getJustROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getJustROFst]
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROFstID],
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [ROFstID]=@ROFstID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustROFst Succeeded'
-ELSE PRINT 'Procedure Creation: getJustROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getLibraryDocuments] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getLibraryDocuments]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getLibraryDocuments];
-GO
-
---getLibraryDocuments
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getLibraryDocuments]
-
-WITH EXECUTE AS OWNER
-AS
-SELECT
-[DocID],
-[LibTitle],
-[DocContent],
-[DocAscii],
-[FileExtension],
-[Config],
-[DTS],
-[UserID],
-[LastChanged],
-(SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[Documents].[DocID]) [DROUsageCount],
-(SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[Documents].[DocID]) [EntryCount],
-(SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[Documents].[DocID]) [PdfCount]
-FROM [Documents] where [LibTitle] <> '' order by [LibTitle]
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getLibraryDocuments Succeeded'
-ELSE PRINT 'Procedure Creation: getLibraryDocuments Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getMembership] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getMembership]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getMembership];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getMembership]
-
-(
- @UGID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UGID],
- [UID],
- [GID],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Memberships]
- WHERE [UGID]=@UGID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getMembership Succeeded'
-ELSE PRINT 'Procedure Creation: getMembership Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getMemberships] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getMemberships]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getMemberships];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getMemberships]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UGID],
- [UID],
- [GID],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Memberships]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getMemberships Succeeded'
-ELSE PRINT 'Procedure Creation: getMemberships Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getMembershipsByGID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getMembershipsByGID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getMembershipsByGID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getMembershipsByGID]
-
-(
- @GID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Users].[UserID] [User_UserID],
- [Users].[FirstName] [User_FirstName],
- [Users].[MiddleName] [User_MiddleName],
- [Users].[LastName] [User_LastName],
- [Users].[Suffix] [User_Suffix],
- [Users].[CourtesyTitle] [User_CourtesyTitle],
- [Users].[PhoneNumber] [User_PhoneNumber],
- [Users].[CFGName] [User_CFGName],
- [Users].[UserLogin] [User_UserLogin],
- [Users].[UserName] [User_UserName],
- [Users].[Config] [User_Config],
- [Users].[DTS] [User_DTS],
- [Users].[UsrID] [User_UsrID]
- FROM [Memberships]
- JOIN [Users] ON
- [Users].[UID]=[Memberships].[UID]
- WHERE
- [Memberships].[GID]=@GID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getMembershipsByGID Succeeded'
-ELSE PRINT 'Procedure Creation: getMembershipsByGID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getMembershipsByUID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getMembershipsByUID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getMembershipsByUID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getMembershipsByUID]
-
-(
- @UID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Memberships]
- JOIN [Groups] ON
- [Groups].[GID]=[Memberships].[GID]
- WHERE
- [Memberships].[UID]=@UID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getMembershipsByUID Succeeded'
-ELSE PRINT 'Procedure Creation: getMembershipsByUID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getNextItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getNextItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getNextItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getNextItems]
-
-(
- @PreviousID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Items].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Items].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[Items].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Items].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Items].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Items].[ItemID]) [Transition_ToIDCount]
- FROM [Items] WHERE [PreviousID]=@PreviousID AND [ItemID]<>@PreviousID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getNextItems Succeeded'
-ELSE PRINT 'Procedure Creation: getNextItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getParentFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getParentFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getParentFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getParentFolder]
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- WHERE
- [FolderID]=@ParentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getParentFolder Succeeded'
-ELSE PRINT 'Procedure Creation: getParentFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getParentFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getParentFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getParentFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getParentFormat]
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE
- [FormatID]=@ParentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getParentFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getParentFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPart]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPart]
-
-(
- @ContentID int,
- @FromType int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Parts]
- WHERE [ContentID]=@ContentID AND [FromType]=@FromType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPart Succeeded'
-ELSE PRINT 'Procedure Creation: getPart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getParts] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getParts]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getParts];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getParts]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Parts]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getParts Succeeded'
-ELSE PRINT 'Procedure Creation: getParts Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartsByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Parts].[ContentID],
- [Parts].[FromType],
- [Parts].[ItemID],
- [Parts].[DTS],
- [Parts].[UserID],
- [Parts].[LastChanged],
- [Items].[PreviousID] [Item_PreviousID],
- [Items].[ContentID] [Item_ContentID],
- [Items].[DTS] [Item_DTS],
- [Items].[UserID] [Item_UserID]
- FROM [Parts]
- JOIN [Items] ON
- [Items].[ItemID]=[Parts].[ItemID]
- WHERE
- [Parts].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getPartsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartsByItemID]
-
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Parts].[ContentID],
- [Parts].[FromType],
- [Parts].[ItemID],
- [Parts].[DTS],
- [Parts].[UserID],
- [Parts].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Parts]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Parts].[ContentID]
- WHERE
- [Parts].[ItemID]=@ItemID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getPartsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPastedAffectedTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPastedAffectedTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPastedAffectedTransitions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPastedAffectedTransitions]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-
-SELECT
- TT.[TransitionID],
- [FromID],
- [ToID],
- [RangeID],
- [IsRange],
- [TranType],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
-FROM [Transitions] TT join vefn_ChildItems(@ItemID) CC on CC.ContentID = TT.FromID
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPastedAffectedTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: getPastedAffectedTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DocID],
- [DebugStatus],
- [TopRow],
- [PageLength],
- [LeftMargin],
- [PageWidth],
- [PageCount],
- [DocPdf],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Pdfs]
- WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPdf Succeeded'
-ELSE PRINT 'Procedure Creation: getPdf Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPdfs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPdfs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPdfs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPdfs]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DocID],
- [DebugStatus],
- [TopRow],
- [PageLength],
- [LeftMargin],
- [PageWidth],
- [PageCount],
- [DocPdf],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Pdfs]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPdfs Succeeded'
-ELSE PRINT 'Procedure Creation: getPdfs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPdfsByDocID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPdfsByDocID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPdfsByDocID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPdfsByDocID]
-
-(
- @DocID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Pdfs].[DocID],
- [Pdfs].[DebugStatus],
- [Pdfs].[TopRow],
- [Pdfs].[PageLength],
- [Pdfs].[LeftMargin],
- [Pdfs].[PageWidth],
- [Pdfs].[PageCount],
- [Pdfs].[DocPdf],
- [Pdfs].[DTS],
- [Pdfs].[UserID],
- [Pdfs].[LastChanged]
- FROM [Pdfs]
- WHERE
- [Pdfs].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPdfsByDocID Succeeded'
-ELSE PRINT 'Procedure Creation: getPdfsByDocID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPermission] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPermission]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPermission];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPermission]
-
-(
- @PID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [PID],
- [RID],
- [PermLevel],
- [VersionType],
- [PermValue],
- [PermAD],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Permissions]
- WHERE [PID]=@PID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPermission Succeeded'
-ELSE PRINT 'Procedure Creation: getPermission Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPermissions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPermissions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPermissions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPermissions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [PID],
- [RID],
- [PermLevel],
- [VersionType],
- [PermValue],
- [PermAD],
- [StartDate],
- [EndDate],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged]
- FROM [Permissions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPermissions Succeeded'
-ELSE PRINT 'Procedure Creation: getPermissions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPermissionsByRID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPermissionsByRID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPermissionsByRID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPermissionsByRID]
-
-(
- @RID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Permissions].[PID],
- [Permissions].[RID],
- [Permissions].[PermLevel],
- [Permissions].[VersionType],
- [Permissions].[PermValue],
- [Permissions].[PermAD],
- [Permissions].[StartDate],
- [Permissions].[EndDate],
- [Permissions].[Config],
- [Permissions].[DTS],
- [Permissions].[UsrID],
- [Permissions].[LastChanged]
- FROM [Permissions]
- WHERE
- [Permissions].[RID]=@RID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPermissionsByRID Succeeded'
-ELSE PRINT 'Procedure Creation: getPermissionsByRID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPreviousItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPreviousItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPreviousItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPreviousItem]
-(
- @PreviousID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Items].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Items].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[Items].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Items].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Items].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Items].[ItemID]) [Transition_ToIDCount]
- FROM [Items]
- WHERE
- [ItemID]=@PreviousID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPreviousItem Succeeded'
-ELSE PRINT 'Procedure Creation: getPreviousItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRODb]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RODbID],
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- (SELECT COUNT(*) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [RODbs]
- WHERE [RODbID]=@RODbID
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DROUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DROUsages].[RODbID]=@RODbID
-
-
- SELECT
- [ROFsts].[ROFstID],
- [ROFsts].[RODbID],
- [ROFsts].[ROLookup],
- [ROFsts].[Config],
- [ROFsts].[DTS],
- [ROFsts].[UserID],
- [ROFsts].[LastChanged]
- FROM [ROFsts]
- WHERE
- [ROFsts].[RODbID]=@RODbID
-
-
- SELECT
- [ROImages].[ImageID],
- [ROImages].[RODbID],
- [ROImages].[FileName],
- [ROImages].[Content],
- [ROImages].[Config],
- [ROImages].[DTS],
- [ROImages].[UserID],
- [ROImages].[LastChanged]
- FROM [ROImages]
- WHERE
- [ROImages].[RODbID]=@RODbID
-
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRODb Succeeded'
-ELSE PRINT 'Procedure Creation: getRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRODbByFolderPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRODbByFolderPath]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRODbByFolderPath];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRODbByFolderPath]
-(
- @FolderPath nvarchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RODbID],
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- (SELECT COUNT(*) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [RODbs]
- WHERE [FolderPath]=@FolderPath
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRODbByFolderPath Succeeded'
-ELSE PRINT 'Procedure Creation: getRODbByFolderPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRODbs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRODbs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRODbs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRODbs]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RODbID],
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- (SELECT COUNT(*) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [RODbs]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRODbs Succeeded'
-ELSE PRINT 'Procedure Creation: getRODbs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROFst]
-
-(
- @ROFstID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROFstID],
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [ROFstID]=@ROFstID
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [DocVersions].[FolderID] [DocVersion_FolderID],
- [DocVersions].[VersionType] [DocVersion_VersionType],
- [DocVersions].[Name] [DocVersion_Name],
- [DocVersions].[Title] [DocVersion_Title],
- [DocVersions].[ItemID] [DocVersion_ItemID],
- [DocVersions].[FormatID] [DocVersion_FormatID],
- [DocVersions].[Config] [DocVersion_Config],
- [DocVersions].[DTS] [DocVersion_DTS],
- [DocVersions].[UserID] [DocVersion_UserID]
- FROM [Associations]
- JOIN [DocVersions] ON
- [DocVersions].[VersionID]=[Associations].[VersionID]
- WHERE
- [Associations].[ROFstID]=@ROFstID
-
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROImages].[RODbID] [ROImage_RODbID],
- [ROImages].[FileName] [ROImage_FileName],
- [ROImages].[Content] [ROImage_Content],
- [ROImages].[Config] [ROImage_Config],
- [ROImages].[DTS] [ROImage_DTS],
- [ROImages].[UserID] [ROImage_UserID]
- FROM [Figures]
- JOIN [ROImages] ON
- [ROImages].[ImageID]=[Figures].[ImageID]
- WHERE
- [Figures].[ROFstID]=@ROFstID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROFst Succeeded'
-ELSE PRINT 'Procedure Creation: getROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROFstByRODbID_DTS] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROFstByRODbID_DTS]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROFstByRODbID_DTS];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROFstByRODbID_DTS]
-(
- @RODbID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROFstID],
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [RODbID]=@RODbID AND [DTS]=@DTS
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROFstByRODbID_DTS Succeeded'
-ELSE PRINT 'Procedure Creation: getROFstByRODbID_DTS Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoFstBySize] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoFstBySize]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoFstBySize];
-GO
-
-/*
-getRoFstBySize 1,74928
- */
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getRoFstBySize]
-(
- @RODbID int,
- @Len int
-)
-WITH EXECUTE AS OWNER
-AS
-select
- [ROFstID],
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
-from [ROFsts]
-where len(rolookup) = @len and [RODbID] = @RODbID
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoFstBySize Succeeded'
-ELSE PRINT 'Procedure Creation: getRoFstBySize Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROFsts] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROFsts]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROFsts];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROFsts]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROFstID],
- [RODbID],
- [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROFsts Succeeded'
-ELSE PRINT 'Procedure Creation: getROFsts Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROFstsByRODbID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROFstsByRODbID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROFstsByRODbID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROFstsByRODbID]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ROFsts].[ROFstID],
- [ROFsts].[RODbID],
- [ROFsts].[ROLookup],
- [ROFsts].[Config],
- [ROFsts].[DTS],
- [ROFsts].[UserID],
- [ROFsts].[LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE
- [ROFsts].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROFstsByRODbID Succeeded'
-ELSE PRINT 'Procedure Creation: getROFstsByRODbID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImage]
-
-(
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE [ImageID]=@ImageID
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- [ROFsts].[ROLookup] [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Figures]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Figures].[ROFstID]
- WHERE
- [Figures].[ImageID]=@ImageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImage Succeeded'
-ELSE PRINT 'Procedure Creation: getROImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImageByRODbID_FileName_DTS] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImageByRODbID_FileName_DTS]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImageByRODbID_FileName_DTS];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImageByRODbID_FileName_DTS]
-(
- @RODbID int,
- @FileName nvarchar(255),
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE [RODbID]=@RODbID AND [FileName]=@FileName AND [DTS]=@DTS
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImageByRODbID_FileName_DTS Succeeded'
-ELSE PRINT 'Procedure Creation: getROImageByRODbID_FileName_DTS Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImageByROFstID_FileName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImageByROFstID_FileName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImageByROFstID_FileName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImageByROFstID_FileName]
-
-(
- @ROFstID int,
- @FileName nvarchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- --JOIN [Figures] ON
- -- [Figures].[ImageID]=[ROImages].[ImageID]
- WHERE
- [ImageID] in (select ImageID from Figures where ROFstID=@ROFstID) AND
- [ROImages].[FileName]=@FileName
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImageByROFstID_FileName Succeeded'
-ELSE PRINT 'Procedure Creation: getROImageByROFstID_FileName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImages]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImages Succeeded'
-ELSE PRINT 'Procedure Creation: getROImages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImagesByRODbID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImagesByRODbID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImagesByRODbID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImagesByRODbID]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ROImages].[ImageID],
- [ROImages].[RODbID],
- [ROImages].[FileName],
- [ROImages].[Content],
- [ROImages].[Config],
- [ROImages].[DTS],
- [ROImages].[UserID],
- [ROImages].[LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE
- [ROImages].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImagesByRODbID Succeeded'
-ELSE PRINT 'Procedure Creation: getROImagesByRODbID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImagesByRODbIDNoData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImagesByRODbIDNoData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImagesByRODbIDNoData];
-GO
-
-/*
-This is used to quickly retrieve ROImages without their data for the ROFst Update process
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create PROCEDURE [dbo].[getROImagesByRODbIDNoData]
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ROImages].[ImageID],
- [ROImages].[RODbID],
- [ROImages].[FileName],
- null [Content],
- [ROImages].[Config],
- [ROImages].[DTS],
- [ROImages].[UserID],
- [ROImages].[LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE
- [ROImages].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImagesByRODbIDNoData Succeeded'
-ELSE PRINT 'Procedure Creation: getROImagesByRODbIDNoData Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRole] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRole]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRole];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRole]
-
-(
- @RID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RID],
- [Name],
- [Title],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[RID]=[Roles].[RID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Permissions] WHERE [Permissions].[RID]=[Roles].[RID]) [PermissionCount]
- FROM [Roles]
- WHERE [RID]=@RID
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Assignments]
- JOIN [Folders] ON
- [Folders].[FolderID]=[Assignments].[FolderID]
- JOIN [Groups] ON
- [Groups].[GID]=[Assignments].[GID]
- WHERE
- [Assignments].[RID]=@RID
-
-
- SELECT
- [Permissions].[PID],
- [Permissions].[RID],
- [Permissions].[PermLevel],
- [Permissions].[VersionType],
- [Permissions].[PermValue],
- [Permissions].[PermAD],
- [Permissions].[StartDate],
- [Permissions].[EndDate],
- [Permissions].[Config],
- [Permissions].[DTS],
- [Permissions].[UsrID],
- [Permissions].[LastChanged]
- FROM [Permissions]
- WHERE
- [Permissions].[RID]=@RID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRole Succeeded'
-ELSE PRINT 'Procedure Creation: getRole Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoleByName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoleByName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoleByName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoleByName]
-(
- @Name nvarchar(50)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RID],
- [Name],
- [Title],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[RID]=[Roles].[RID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Permissions] WHERE [Permissions].[RID]=[Roles].[RID]) [PermissionCount]
- FROM [Roles]
- WHERE [Name]=@Name
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoleByName Succeeded'
-ELSE PRINT 'Procedure Creation: getRoleByName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoles] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoles]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoles];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoles]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RID],
- [Name],
- [Title],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[RID]=[Roles].[RID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [Permissions] WHERE [Permissions].[RID]=[Roles].[RID]) [PermissionCount]
- FROM [Roles]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoles Succeeded'
-ELSE PRINT 'Procedure Creation: getRoles Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsage]
-
-(
- @ROUsageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROUsageID],
- [ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [RoUsages]
- WHERE [ROUsageID]=@ROUsageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsage Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsages]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROUsageID],
- [ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [RoUsages]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsagesByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsagesByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [RoUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[RoUsages].[RODbID]
- WHERE
- [RoUsages].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsagesByRODbID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesByRODbID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesByRODbID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsagesByRODbID]
-
-(
- @RODbID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesByRODbID Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesByRODbID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsagesByROIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesByROIDs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesByROIDs];
-GO
-
-/*
-findRoUsagesByROIDs 1,'1:000100000406,000200000229,00020000022A,00020000022B,0002000005F7,0002000005F9,0002000005FA,0002000005FB,000200000623,000200000626,000200000155,00020000018C,00020000018D,00020000022F,000200000230,00020000019E,000200000677,000200000678,000200000684,000D000000CA0042,000D000000CA0043,000D0000064A0042,000D000006600042,000D000006600043,000D000006670042,000D000006670043,000D000006680042,000D000006680043,000D0000067D0041,000D0000067D0042,000D0000067D0043,000D000006850042,000D000006850043,000D000009140042,000D000009140043,000D00000A320042,000D00000A360042,000D00000A500042,000D00000A500043,000D00000A630042,000D00000A630043,0010000022400041,0010000022400042,0010000022400043,001000002AE60042,001000002AE60043,001000003D8B0042,001000003D8B0043,001000003D8C0042,001000003D8C0043,0010000058AB0042,0010000058AB0043,0010000086550042,0010000086550043,001000009B550041,001000009B550042,001000009C1C0041,001000009C1C0042,001000009C1D0041,001000009C1D0042,001000009C1E0041,001000009C1E0042,001000009C1F0041,001000009C1F0042,001000009C200041,001000009C200042,001000009C210041,001000009C210042,001000009C220041,001000009C220042,001000009C230041,001000009C230042,001000009C240041,001000009C240042,001000009C250041,001000009C250042,001000009C260041,001000009C260042,00100000546E0042,00100000546E0043,001000009B900041,001000009B900042,001000009B910041,001000009B910042,001000009B920041,001000009B920042,001000009B930041,001000009B930042,001000009B940041,001000009B940042,001000009B950041,001000009B950042,001000009B960041,001000009B960042,001000009B970041,001000009B970042,001000009B980041,001000009B980042,001000009B990041,001000009B990042,001000009C270041,001000009C270042,001000009C280041,001000009C280042,001000009C290041,001000009C290042,001000009C2A0041,001000009C2A0042,001000009C2B0041,001000009C2B0042,001000009C2C0041,001000009C2C0042,00110000027E0042,00110000027E0043,00150000216A,001500002367,00150000236C,0015000029B7,001500000392,00150000039E,0015000021C7,0015000021E6,001500002261,001500002265,001500002266,001500002297,001500002754,001500002756,0015000004F4,001500002766,001500002546,001500002643,001500002645,001500002646,00150000266A,00150000266B,00150000266C,00150000266D,00150000266E,00150000266F,001500002670,001500002671,0015000026AA,001500000720'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsagesByROIDs]
-(
- @ROIDs nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [RoUsages].RODBID = SS.[RODBID] and [RoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesByROIDs Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesByROIDs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTopFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTopFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTopFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTopFolder]
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FolderID],
- [ParentID],
- [DBID],
- [Name],
- [Title],
- [ShortName],
- [FormatID],
- [ManualOrder],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Assignments] WHERE [Assignments].[FolderID]=[Folders].[FolderID]) [AssignmentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FolderID]=[Folders].[FolderID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] [Children] WHERE [Children].[ParentID]=[Folders].[FolderID]) [ChildCount]
- FROM [Folders]
- WHERE [FolderID]=[ParentID]
-
- SELECT
- [Assignments].[AID],
- [Assignments].[GID],
- [Assignments].[RID],
- [Assignments].[FolderID],
- [Assignments].[StartDate],
- [Assignments].[EndDate],
- [Assignments].[DTS],
- [Assignments].[UsrID],
- [Assignments].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID],
- [Roles].[Name] [Role_Name],
- [Roles].[Title] [Role_Title],
- [Roles].[DTS] [Role_DTS],
- [Roles].[UsrID] [Role_UsrID]
- FROM [Assignments]
- JOIN [Groups] ON
- [Groups].[GID]=[Assignments].[GID]
- JOIN [Roles] ON
- [Roles].[RID]=[Assignments].[RID]
- WHERE
- [Assignments].[FolderID]=(Select [FolderID] from [Folders] where [FolderID]=[ParentID])
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged]
- FROM [DocVersions]
- WHERE
- [DocVersions].[FolderID]=(Select [FolderID] from [Folders] where [FolderID]=[ParentID])
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTopFolder Succeeded'
-ELSE PRINT 'Procedure Creation: getTopFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TransitionID],
- [FromID],
- [ToID],
- [RangeID],
- [IsRange],
- [TranType],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[Transitions].[TransitionID]) [ZTransitionCount]
- FROM [Transitions]
- WHERE [TransitionID]=@TransitionID
-
- SELECT
- [ZTransitions].[TransitionID],
- [ZTransitions].[oldto],
- [ZTransitions].[LastChanged]
- FROM [ZTransitions]
- WHERE
- [ZTransitions].[TransitionID]=@TransitionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransition Succeeded'
-ELSE PRINT 'Procedure Creation: getTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TransitionID],
- [FromID],
- [ToID],
- [RangeID],
- [IsRange],
- [TranType],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[Transitions].[TransitionID]) [ZTransitionCount]
- FROM [Transitions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsByFromID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsByFromID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsByFromID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsByFromID]
-
-(
- @FromID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Items_RangeID].[PreviousID] [Item_RangeID_PreviousID],
- [Items_RangeID].[ContentID] [Item_RangeID_ContentID],
- [Items_RangeID].[DTS] [Item_RangeID_DTS],
- [Items_RangeID].[UserID] [Item_RangeID_UserID],
- [Items_ToID].[PreviousID] [Item_ToID_PreviousID],
- [Items_ToID].[ContentID] [Item_ToID_ContentID],
- [Items_ToID].[DTS] [Item_ToID_DTS],
- [Items_ToID].[UserID] [Item_ToID_UserID],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[Transitions].[TransitionID]) [ZTransitionCount]
- FROM [Transitions]
- JOIN [Items] [Items_RangeID] ON
- [Items_RangeID].[ItemID]=[Transitions].[RangeID]
- JOIN [Items] [Items_ToID] ON
- [Items_ToID].[ItemID]=[Transitions].[ToID]
- WHERE
- [Transitions].[FromID]=@FromID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsByFromID Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsByFromID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsByRangeID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsByRangeID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsByRangeID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsByRangeID]
-
-(
- @RangeID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[Transitions].[TransitionID]) [ZTransitionCount]
- FROM [Transitions]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Transitions].[FromID]
- WHERE
- [Transitions].[RangeID]=@RangeID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsByRangeID Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsByRangeID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsByToID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsByToID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsByToID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsByToID]
-
-(
- @ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[Transitions].[TransitionID]) [ZTransitionCount]
- FROM [Transitions]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Transitions].[FromID]
- WHERE
- [Transitions].[ToID]=@ToID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsByToID Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsByToID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getUser] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getUser]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getUser];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getUser]
-
-(
- @UID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UID],
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[UID]=[Users].[UID]) [MembershipCount]
- FROM [Users]
- WHERE [UID]=@UID
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Memberships]
- JOIN [Groups] ON
- [Groups].[GID]=[Memberships].[GID]
- WHERE
- [Memberships].[UID]=@UID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getUser Succeeded'
-ELSE PRINT 'Procedure Creation: getUser Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getUsers] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getUsers]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getUsers];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getUsers]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UID],
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[UID]=[Users].[UID]) [MembershipCount]
- FROM [Users]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getUsers Succeeded'
-ELSE PRINT 'Procedure Creation: getUsers Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [OldStepSequence],
- [LastChanged]
- FROM [ZContents]
- WHERE [ContentID]=@ContentID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZContent Succeeded'
-ELSE PRINT 'Procedure Creation: getZContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZContents] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZContents]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZContents];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZContents]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [OldStepSequence],
- [LastChanged]
- FROM [ZContents]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZContents Succeeded'
-ELSE PRINT 'Procedure Creation: getZContents Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZContentsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZContentsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZContentsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZContentsByContentID]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ZContents].[ContentID],
- [ZContents].[OldStepSequence],
- [ZContents].[LastChanged]
- FROM [ZContents]
- WHERE
- [ZContents].[ContentID]=@ContentID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZContentsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getZContentsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZTransition]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TransitionID],
- [oldto],
- [LastChanged]
- FROM [ZTransitions]
- WHERE [TransitionID]=@TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZTransition Succeeded'
-ELSE PRINT 'Procedure Creation: getZTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZTransitions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZTransitions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [TransitionID],
- [oldto],
- [LastChanged]
- FROM [ZTransitions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: getZTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getZTransitionsByTransitionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getZTransitionsByTransitionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getZTransitionsByTransitionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getZTransitionsByTransitionID]
-
-(
- @TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [ZTransitions].[TransitionID],
- [ZTransitions].[oldto],
- [ZTransitions].[LastChanged]
- FROM [ZTransitions]
- WHERE
- [ZTransitions].[TransitionID]=@TransitionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getZTransitionsByTransitionID Succeeded'
-ELSE PRINT 'Procedure Creation: getZTransitionsByTransitionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [PasteItemReplace] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemReplace]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemReplace];
-GO
-
--- ItemID is item to replace
--- StartItemID is item to copy
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemReplace]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
-
- -- First check if the replaced item can be deleted, i.e. it doesn't have transitions
- -- pointing to it or children.
-
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- --SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID)
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- --IF @ExternalCount > 0 AND @NextItemID is null
- --BEGIN
- -- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- -- RETURN
- --END
-
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- -- Copy the item, 'NewItemID' represents the new item(s)
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
-
- -- Adjust the next/previous to point to the new item
-
- DECLARE @PreviousID int
- SELECT @PreviousID = [PreviousID]
- FROM [ITEMS] II
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [PreviousID]=@ItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
-
- -- UPDATE DocVersion if this was a procedure
- UPDATE DocVersions SET ItemID=@NewItemID where ItemID = @ItemID
-
- -- If there were 'external transitions' that pointed to the original
- -- top replaced step, adjust them to point to the new top.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID)
- IF (SELECT COUNT(*) from @ExternalTrans) > 0
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NewItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NewItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
-
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that pointed to top step
- -- and need to point to
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Replaced Step Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
-
- END
- -- Remove the old one
-
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemReplace Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemReplace Error on Creation'
-GO
-
-/****** Object: StoredProcedure [PasteItemSiblingAfter] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingAfter]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemSiblingAfter];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingAfter]
-(
- @ItemID int=null, @StartItemID int=null, -- ItemID is destination, StartItemID is top of copy
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- First make a copy of the input StartItemID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- Adjust previous field
- DECLARE @NextID int
- SELECT @NextID = [ItemID]
- FROM [ITEMS]
- WHERE [PreviousID]=@ItemID
- IF @NextID is not null -- step after the copy point. Adjust it's previous to point to the new step
- BEGIN
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID, [DTS]=@DTS, [UserID]=@UserID where [ItemID]=@NextID
- END
- UPDATE [ITEMS] SET [PreviousID]=@ItemID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
-
-
- -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@NextID,@ItemID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @NextID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @NextID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@NextID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Next Step Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@newItemID) OR RangeID IN(@newItemID))
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@NextID) OR RangeID IN(@NextID))
- -- Transition Text gets updated in ItemInsertExt.cs
-
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingAfter Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingAfter Error on Creation'
-GO
-
-/****** Object: StoredProcedure [PasteItemSiblingBefore] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingBefore]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemSiblingBefore];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingBefore]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- First make a copy of the input CopyStartID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- First adjust previous fields, may also have to do parts, if before first one in list.
- DECLARE @PreviousID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @PreviousID = [PreviousID], @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II
- JOIN [CONTENTS] CC ON CC.[ContentID]=II.[CONTENTID]
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [DOCVERSIONS] SET [ItemID] = @NewItemID where [ItemID]=@ItemID
-
- IF @PreviousID is null -- The step is replacing the first step
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ItemID OR TT.RangeID = @ItemID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ItemID THEN @NewItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ItemID THEN @NewItemID ELSE RangeID END
- WHERE ToID = @ItemID OR RangeID = @ItemID
- END
- ELSE -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@ItemID,@PreviousID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @ItemID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @ItemID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ItemID,@NewItemID) OR RangeID IN(@ItemID,@NewItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingBefore Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingBefore Error on Creation'
-GO
-
-/****** Object: StoredProcedure [purgeData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[purgeData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [purgeData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[purgeData]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- delete from [Annotations]
- dbcc checkident([Annotations],reseed,0)
- delete from [AnnotationTypes]
- dbcc checkident([AnnotationTypes],reseed,0)
- delete from [Assignments]
- dbcc checkident([Assignments],reseed,0)
- delete from [Associations]
- dbcc checkident([Associations],reseed,0)
- delete from [Details]
- dbcc checkident([Details],reseed,0)
- delete from [DocVersions]
- dbcc checkident([DocVersions],reseed,0)
- delete from [DROUsages]
- dbcc checkident([DROUsages],reseed,0)
- delete from [Entries]
- delete from [Figures]
- dbcc checkident([Figures],reseed,0)
- delete from [Folders]
- dbcc checkident([Folders],reseed,0)
- delete from [Grids]
- delete from [Images]
- delete from [Memberships]
- dbcc checkident([Memberships],reseed,0)
- delete from [Parts]
- delete from [Pdfs]
- delete from [Permissions]
- dbcc checkident([Permissions],reseed,0)
- delete from [ROFsts]
- dbcc checkident([ROFsts],reseed,0)
- delete from [ROImages]
- dbcc checkident([ROImages],reseed,0)
- delete from [Roles]
- dbcc checkident([Roles],reseed,0)
- delete from [RoUsages]
- dbcc checkident([RoUsages],reseed,0)
- delete from [Users]
- dbcc checkident([Users],reseed,0)
- delete from [ZContents]
- delete from [ZTransitions]
- delete from [Connections]
- dbcc checkident([Connections],reseed,0)
- delete from [Documents]
- dbcc checkident([Documents],reseed,0)
- delete from [Groups]
- dbcc checkident([Groups],reseed,0)
- delete from [RODbs]
- dbcc checkident([RODbs],reseed,0)
- delete from [Transitions]
- dbcc checkident([Transitions],reseed,0)
- delete from [Items]
- dbcc checkident([Items],reseed,0)
- delete from [Contents]
- dbcc checkident([Contents],reseed,0)
- delete from [Formats]
- dbcc checkident([Formats],reseed,0)
- delete from [Scopes]
- dbcc checkident([Scopes],reseed,0)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: purgeData Succeeded'
-ELSE PRINT 'Procedure Creation: purgeData Error on Creation'
-GO
-
-/****** Object: StoredProcedure [Standardize] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Standardize]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [Standardize];
-GO
-
-/*
-Standardize '%engineering evaluation%'
-Standardize '%preferred running order%'
-Standardize '%provide normal spray%'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[Standardize]
-(
- @LookFor varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ContentID INT
- SET @Contentid = (select min(ContentID) FROM FindText(@LookFor))
- UPDATE Items SET ContentID = @ContentID WHERE ItemID in(SELECT ItemID FROM FindText(@LookFor))
-IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: Standardize Succeeded'
-ELSE PRINT 'Procedure Creation: Standardize Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateAnnotation]
-
-(
- @AnnotationID int,
- @ItemID int,
- @TypeID int,
- @RtfText nvarchar(MAX)=null,
- @SearchText nvarchar(MAX)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Annotations]
- SET
- [ItemID]=@ItemID,
- [TypeID]=@TypeID,
- [RtfText]=@RtfText,
- [SearchText]=@SearchText,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [AnnotationID]=@AnnotationID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Annotations] WHERE [AnnotationID]=@AnnotationID)
- RAISERROR('Annotation record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Annotation has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Annotations] WHERE [AnnotationID]=@AnnotationID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: updateAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateAnnotationType]
-
-(
- @TypeID int,
- @Name nvarchar(100),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [AnnotationTypes]
- SET
- [Name]=@Name,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [TypeID]=@TypeID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [AnnotationTypes] WHERE [TypeID]=@TypeID)
- RAISERROR('AnnotationType record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('AnnotationType has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [AnnotationTypes] WHERE [TypeID]=@TypeID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: updateAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateAssignment] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateAssignment]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateAssignment];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateAssignment]
-
-(
- @AID int,
- @GID int,
- @RID int,
- @FolderID int,
- @StartDate datetime,
- @EndDate datetime=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Assignments]
- SET
- [GID]=@GID,
- [RID]=@RID,
- [FolderID]=@FolderID,
- [StartDate]=@StartDate,
- [EndDate]=@EndDate,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [AID]=@AID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Assignments] WHERE [AID]=@AID)
- RAISERROR('Assignment record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Assignment has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Assignments] WHERE [AID]=@AID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateAssignment Succeeded'
-ELSE PRINT 'Procedure Creation: updateAssignment Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateAssociation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateAssociation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateAssociation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateAssociation]
-
-(
- @AssociationID int,
- @VersionID int,
- @ROFstID int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Associations]
- SET
- [VersionID]=@VersionID,
- [ROFstID]=@ROFstID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [AssociationID]=@AssociationID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Associations] WHERE [AssociationID]=@AssociationID)
- RAISERROR('Association record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Association has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Associations] WHERE [AssociationID]=@AssociationID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateAssociation Succeeded'
-ELSE PRINT 'Procedure Creation: updateAssociation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateConnection] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateConnection]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateConnection];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateConnection]
-
-(
- @DBID int,
- @Name nvarchar(100)=null,
- @Title nvarchar(510)=null,
- @ConnectionString nvarchar(510)=null,
- @ServerType int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Connections]
- SET
- [Name]=@Name,
- [Title]=@Title,
- [ConnectionString]=@ConnectionString,
- [ServerType]=@ServerType,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [DBID]=@DBID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Connections] WHERE [DBID]=@DBID)
- RAISERROR('Connection record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Connection has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Connections] WHERE [DBID]=@DBID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateConnection Succeeded'
-ELSE PRINT 'Procedure Creation: updateConnection Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateContent]
-
-(
- @ContentID int,
- @Number nvarchar(256)=null,
- @Text nvarchar(MAX)=null,
- @Type int=null,
- @FormatID int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Contents]
- SET
- [Number]=@Number,
- [Text]=@Text,
- [Type]=@Type,
- [FormatID]=@FormatID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ContentID]=@ContentID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Contents] WHERE [ContentID]=@ContentID)
- RAISERROR('Content record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Content has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Contents] WHERE [ContentID]=@ContentID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateContent Succeeded'
-ELSE PRINT 'Procedure Creation: updateContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateDetail] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateDetail]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateDetail];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateDetail]
-
-(
- @DetailID int,
- @ContentID int,
- @ItemType int,
- @Text nvarchar(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Details]
- SET
- [ContentID]=@ContentID,
- [ItemType]=@ItemType,
- [Text]=@Text,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [DetailID]=@DetailID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Details] WHERE [DetailID]=@DetailID)
- RAISERROR('Detail record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Detail has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Details] WHERE [DetailID]=@DetailID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateDetail Succeeded'
-ELSE PRINT 'Procedure Creation: updateDetail Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateDocument] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateDocument]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateDocument];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateDocument]
-
-(
- @DocID int,
- @LibTitle nvarchar(1024)=null,
- @DocContent varbinary(MAX)=null,
- @DocAscii nvarchar(MAX)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @FileExtension nvarchar(10),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Documents]
- SET
- [LibTitle]=@LibTitle,
- [DocContent]=@DocContent,
- [DocAscii]=@DocAscii,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID,
- [FileExtension]=@FileExtension
- WHERE [DocID]=@DocID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Documents] WHERE [DocID]=@DocID)
- RAISERROR('Document record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Document has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Documents] WHERE [DocID]=@DocID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateDocument Succeeded'
-ELSE PRINT 'Procedure Creation: updateDocument Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateDocVersion]
-
-(
- @VersionID int,
- @FolderID int,
- @VersionType int,
- @Name nvarchar(100),
- @Title nvarchar(510)=null,
- @ItemID int=null,
- @FormatID int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [DocVersions]
- SET
- [FolderID]=@FolderID,
- [VersionType]=@VersionType,
- [Name]=@Name,
- [Title]=@Title,
- [ItemID]=@ItemID,
- [FormatID]=@FormatID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [VersionID]=@VersionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [DocVersions] WHERE [VersionID]=@VersionID)
- RAISERROR('DocVersion record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('DocVersion has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [DocVersions] WHERE [VersionID]=@VersionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: updateDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateDROUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateDROUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateDROUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateDROUsage]
-
-(
- @DROUsageID int,
- @DocID int,
- @ROID nvarchar(16),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @RODbID int,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [DROUsages]
- SET
- [DocID]=@DocID,
- [ROID]=@ROID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID,
- [RODbID]=@RODbID
- WHERE [DROUsageID]=@DROUsageID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [DROUsages] WHERE [DROUsageID]=@DROUsageID)
- RAISERROR('DROUsage record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('DROUsage has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [DROUsages] WHERE [DROUsageID]=@DROUsageID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateDROUsage Succeeded'
-ELSE PRINT 'Procedure Creation: updateDROUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateEntry] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateEntry]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateEntry];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateEntry]
-
-(
- @ContentID int,
- @DocID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Entries]
- SET
- [DocID]=@DocID,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ContentID]=@ContentID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Entries] WHERE [ContentID]=@ContentID)
- RAISERROR('Entry record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Entry has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Entries] WHERE [ContentID]=@ContentID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateEntry Succeeded'
-ELSE PRINT 'Procedure Creation: updateEntry Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateFigure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateFigure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateFigure];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateFigure]
-
-(
- @FigureID int,
- @ROFstID int,
- @ImageID int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Figures]
- SET
- [ROFstID]=@ROFstID,
- [ImageID]=@ImageID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [FigureID]=@FigureID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Figures] WHERE [FigureID]=@FigureID)
- RAISERROR('Figure record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Figure has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Figures] WHERE [FigureID]=@FigureID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateFigure Succeeded'
-ELSE PRINT 'Procedure Creation: updateFigure Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateFolder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateFolder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateFolder]
-
-(
- @FolderID int,
- @ParentID int,
- @DBID int,
- @Name nvarchar(100),
- @Title nvarchar(510)=null,
- @ShortName nvarchar(20),
- @FormatID int=null,
- @ManualOrder float=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Folders]
- SET
- [ParentID]=@ParentID,
- [DBID]=@DBID,
- [Name]=@Name,
- [Title]=@Title,
- [ShortName]=@ShortName,
- [FormatID]=@FormatID,
- [ManualOrder]=@ManualOrder,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [FolderID]=@FolderID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Folders] WHERE [FolderID]=@FolderID)
- RAISERROR('Folder record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Folder has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Folders] WHERE [FolderID]=@FolderID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateFolder Succeeded'
-ELSE PRINT 'Procedure Creation: updateFolder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateFormat]
-
-(
- @FormatID int,
- @ParentID int,
- @Name nvarchar(20),
- @Description nvarchar(250)=null,
- @Data xml,
- @GenMac xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Formats]
- SET
- [ParentID]=@ParentID,
- [Name]=@Name,
- [Description]=@Description,
- [Data]=@Data,
- [GenMac]=@GenMac,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [FormatID]=@FormatID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Formats] WHERE [FormatID]=@FormatID)
- RAISERROR('Format record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Format has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Formats] WHERE [FormatID]=@FormatID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateFormat Succeeded'
-ELSE PRINT 'Procedure Creation: updateFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateGrid] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateGrid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateGrid];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateGrid]
-
-(
- @ContentID int,
- @Data xml,
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Grids]
- SET
- [Data]=@Data,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ContentID]=@ContentID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Grids] WHERE [ContentID]=@ContentID)
- RAISERROR('Grid record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Grid has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Grids] WHERE [ContentID]=@ContentID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateGrid Succeeded'
-ELSE PRINT 'Procedure Creation: updateGrid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateGroup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateGroup]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateGroup];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateGroup]
-
-(
- @GID int,
- @GroupName nvarchar(50),
- @GroupType int=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Groups]
- SET
- [GroupName]=@GroupName,
- [GroupType]=@GroupType,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [GID]=@GID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Groups] WHERE [GID]=@GID)
- RAISERROR('Group record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Group has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Groups] WHERE [GID]=@GID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateGroup Succeeded'
-ELSE PRINT 'Procedure Creation: updateGroup Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateImage]
-
-(
- @ContentID int,
- @ImageType int,
- @FileName nvarchar(255),
- @Data varbinary(MAX),
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Images]
- SET
- [ImageType]=@ImageType,
- [FileName]=@FileName,
- [Data]=@Data,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ContentID]=@ContentID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Images] WHERE [ContentID]=@ContentID)
- RAISERROR('Image record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Image has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Images] WHERE [ContentID]=@ContentID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateImage Succeeded'
-ELSE PRINT 'Procedure Creation: updateImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateItem]
-
-(
- @ItemID int,
- @PreviousID int=null,
- @ContentID int,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Items]
- SET
- [PreviousID]=@PreviousID,
- [ContentID]=@ContentID,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ItemID]=@ItemID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Items] WHERE [ItemID]=@ItemID)
- RAISERROR('Item record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Item has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Items] WHERE [ItemID]=@ItemID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateItem Succeeded'
-ELSE PRINT 'Procedure Creation: updateItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateMembership] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateMembership]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateMembership];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateMembership]
-
-(
- @UGID int,
- @UID int,
- @GID int,
- @StartDate datetime,
- @EndDate datetime=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Memberships]
- SET
- [UID]=@UID,
- [GID]=@GID,
- [StartDate]=@StartDate,
- [EndDate]=@EndDate,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [UGID]=@UGID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Memberships] WHERE [UGID]=@UGID)
- RAISERROR('Membership record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Membership has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Memberships] WHERE [UGID]=@UGID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateMembership Succeeded'
-ELSE PRINT 'Procedure Creation: updateMembership Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updatePdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updatePdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updatePdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updatePdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int,
- @PageCount float,
- @DocPdf varbinary(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Pdfs]
- SET
- [PageCount]=@PageCount,
- [DocPdf]=@DocPdf,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth)
- RAISERROR('Pdf record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Pdf has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updatePdf Succeeded'
-ELSE PRINT 'Procedure Creation: updatePdf Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updatePermission] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updatePermission]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updatePermission];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updatePermission]
-
-(
- @PID int,
- @RID int,
- @PermLevel int,
- @VersionType int,
- @PermValue int,
- @PermAD int,
- @StartDate datetime,
- @EndDate datetime=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Permissions]
- SET
- [RID]=@RID,
- [PermLevel]=@PermLevel,
- [VersionType]=@VersionType,
- [PermValue]=@PermValue,
- [PermAD]=@PermAD,
- [StartDate]=@StartDate,
- [EndDate]=@EndDate,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [PID]=@PID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Permissions] WHERE [PID]=@PID)
- RAISERROR('Permission record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Permission has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Permissions] WHERE [PID]=@PID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updatePermission Succeeded'
-ELSE PRINT 'Procedure Creation: updatePermission Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateRODb] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateRODb]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateRODb];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateRODb]
-
-(
- @RODbID int,
- @ROName nvarchar(255),
- @FolderPath nvarchar(255),
- @DBConnectionString nvarchar(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [RODbs]
- SET
- [ROName]=@ROName,
- [FolderPath]=@FolderPath,
- [DBConnectionString]=@DBConnectionString,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [RODbID]=@RODbID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [RODbs] WHERE [RODbID]=@RODbID)
- RAISERROR('RODb record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('RODb has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [RODbs] WHERE [RODbID]=@RODbID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateRODb Succeeded'
-ELSE PRINT 'Procedure Creation: updateRODb Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateROFst] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateROFst]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateROFst];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateROFst]
-
-(
- @ROFstID int,
- @RODbID int,
- @ROLookup varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [ROFsts]
- SET
- [RODbID]=@RODbID,
- [ROLookup]=@ROLookup,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ROFstID]=@ROFstID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [ROFsts] WHERE [ROFstID]=@ROFstID)
- RAISERROR('ROFst record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('ROFst has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ROFsts] WHERE [ROFstID]=@ROFstID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateROFst Succeeded'
-ELSE PRINT 'Procedure Creation: updateROFst Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateROImage]
-
-(
- @ImageID int,
- @RODbID int,
- @FileName nvarchar(255),
- @Content varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [ROImages]
- SET
- [RODbID]=@RODbID,
- [FileName]=@FileName,
- [Content]=@Content,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ImageID]=@ImageID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [ROImages] WHERE [ImageID]=@ImageID)
- RAISERROR('ROImage record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('ROImage has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ROImages] WHERE [ImageID]=@ImageID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateROImage Succeeded'
-ELSE PRINT 'Procedure Creation: updateROImage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateRole] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateRole]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateRole];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateRole]
-
-(
- @RID int,
- @Name nvarchar(50),
- @Title nvarchar(250),
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Roles]
- SET
- [Name]=@Name,
- [Title]=@Title,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [RID]=@RID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Roles] WHERE [RID]=@RID)
- RAISERROR('Role record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Role has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Roles] WHERE [RID]=@RID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateRole Succeeded'
-ELSE PRINT 'Procedure Creation: updateRole Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateRoUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateRoUsage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateRoUsage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateRoUsage]
-
-(
- @ROUsageID int,
- @ContentID int,
- @ROID nvarchar(16),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @RODbID int,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [RoUsages]
- SET
- [ContentID]=@ContentID,
- [ROID]=@ROID,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID,
- [RODbID]=@RODbID
- WHERE [ROUsageID]=@ROUsageID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [RoUsages] WHERE [ROUsageID]=@ROUsageID)
- RAISERROR('RoUsage record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('RoUsage has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [RoUsages] WHERE [ROUsageID]=@ROUsageID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateRoUsage Succeeded'
-ELSE PRINT 'Procedure Creation: updateRoUsage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateTransition]
-
-(
- @TransitionID int,
- @FromID int,
- @ToID int,
- @RangeID int,
- @IsRange int,
- @TranType int,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Transitions]
- SET
- [FromID]=@FromID,
- [ToID]=@ToID,
- [RangeID]=@RangeID,
- [IsRange]=@IsRange,
- [TranType]=@TranType,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [TransitionID]=@TransitionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Transitions] WHERE [TransitionID]=@TransitionID)
- RAISERROR('Transition record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Transition has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Transitions] WHERE [TransitionID]=@TransitionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateTransition Succeeded'
-ELSE PRINT 'Procedure Creation: updateTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateUser] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateUser]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateUser];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateUser]
-
-(
- @UID int,
- @UserID nvarchar(100),
- @FirstName nvarchar(50)=null,
- @MiddleName nvarchar(50)=null,
- @LastName nvarchar(50)=null,
- @Suffix nvarchar(10)=null,
- @CourtesyTitle nvarchar(10)=null,
- @PhoneNumber nvarchar(30)=null,
- @CFGName nvarchar(8)=null,
- @UserLogin nvarchar(10)=null,
- @UserName nvarchar(32)=null,
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UsrID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Users]
- SET
- [UserID]=@UserID,
- [FirstName]=@FirstName,
- [MiddleName]=@MiddleName,
- [LastName]=@LastName,
- [Suffix]=@Suffix,
- [CourtesyTitle]=@CourtesyTitle,
- [PhoneNumber]=@PhoneNumber,
- [CFGName]=@CFGName,
- [UserLogin]=@UserLogin,
- [UserName]=@UserName,
- [Config]=@Config,
- [DTS]=@DTS,
- [UsrID]=@UsrID
- WHERE [UID]=@UID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Users] WHERE [UID]=@UID)
- RAISERROR('User record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('User has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Users] WHERE [UID]=@UID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateUser Succeeded'
-ELSE PRINT 'Procedure Creation: updateUser Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateZContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateZContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateZContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateZContent]
-
-(
- @ContentID int,
- @OldStepSequence nvarchar(32),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [ZContents]
- SET
- [OldStepSequence]=@OldStepSequence
- WHERE [ContentID]=@ContentID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [ZContents] WHERE [ContentID]=@ContentID)
- RAISERROR('ZContent record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('ZContent has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ZContents] WHERE [ContentID]=@ContentID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateZContent Succeeded'
-ELSE PRINT 'Procedure Creation: updateZContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateZTransition] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateZTransition]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateZTransition];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateZTransition]
-
-(
- @TransitionID int,
- @Oldto nvarchar(32),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [ZTransitions]
- SET
- [oldto]=@Oldto
- WHERE [TransitionID]=@TransitionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [ZTransitions] WHERE [TransitionID]=@TransitionID)
- RAISERROR('ZTransition record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('ZTransition has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ZTransitions] WHERE [TransitionID]=@TransitionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateZTransition Succeeded'
-ELSE PRINT 'Procedure Creation: updateZTransition Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetChildCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetChildCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetChildCount];
-GO
-
-/*
--- Select Procedures with Children
-select ItemID, dbo.ve_GetChildCount(ItemID) ChildCount from [Items] II
-Join [Contents] CC on II.ContentID = CC.ContentID and CC.Type = 0 and CC.ContentID in (Select ContentID from Parts)
-order dbo.ve_GetChildCount(ItemID) desc
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetChildCount] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-return @Count END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetChildCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetChildCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetFolderPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetFolderPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetFolderPath];
-GO
-
-/*
-
-Select VersionID,Name,dbo.ve_GetFolderPath(VersionID) from DocVersions order by VersionID
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetFolderPath] (@VersionID int) RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Path varchar(MAX);
-with Folderz(Level, FolderID, Path) as (
- Select 1 Level, FolderID,CAST(Name as varchar(MAX))
- from DocVersions I
- where VersionID = @VersionID
- Union All
---
- Select FS.ParentID - (Select ParentID from Folders where FolderID = FS.ParentID), ParentID, CAST(Name + char(7) + Path as varchar(MAX))
- from Folders FS
- join Folderz FZ on FS.FolderID = FZ.FolderID
- where FS.FolderID <> FS.ParentID
-)
-select @Path = path From Folderz where Level = 0
-return @Path
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetFolderPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetFolderPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetNextTranCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetNextTranCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetNextTranCount];
-GO
-
-/*
-select dbo.ve_GetNextTranCount(251) NextTrans
-select *, dbo.ve_GetNextTranCount(ItemID) NextTrans from vefn_AllHighLevelSteps()
-Order By dbo.ve_GetNextTranCount(ItemID) DESC
-
- Select count(*) from Transitions TT
- join contents CC on TT.FromID = CC.ContentID
- where FromID in (Select ContentID from vefn_ChildItems(247))
- AND (ToID = 251 or RangeID = 251)
-
-declare @ItemID int;
-set @ItemID=251
-
- declare @Count int;
- declare @PreviousID as int
- select @PreviousID = PreviousID from items where ItemID = @ItemID
- Print @PreviousID
- if @PreviousID is not null
- BEGIN
- Select @Count = count(*) from vefn_ChildItems(247)
- --Select @Count = count(*) from Transitions TT
- --join contents CC on TT.FromID = CC.ContentID
- --where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
- --AND (ToID = @ItemID or RangeID = @ItemID)
- END
- --ELSE
- --set @Count=0
- Print 'I''m here'
- Print @Count
-
- Select * from vefn_ChildItems(247)
-
-*/
-
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetNextTranCount] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @Count int;
- declare @PreviousID as int
- select @PreviousID = PreviousID from items where ItemID = @ItemID
- if @PreviousID is not null
- BEGIN
- Select @Count = count(*) from Transitions TT
- join contents CC on TT.FromID = CC.ContentID
- where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
- AND (ToID = @ItemID or RangeID = @ItemID)
- END
- ELSE
- set @Count=0
- return @Count
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetNextTranCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetNextTranCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetParts] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetParts]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetParts];
-GO
-
---select .dbo.ve_GetParts(756,6)
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetParts] (@ContentID int,@FromType int)
-RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @retval varchar(max)
-begin
-with ContentZ(AllContents,PreviousID,HasChildren) as (
- Select cast(II.ContentID as varchar(max)) AllContents,II.ItemID PreviousID, case when Exists(select ItemID from Items where PreviousID = II.ItemID) then 1 else 0 end HasChildren
- from Items II join Parts PP on II.ItemID=PP.ItemID
- where PP.ContentID=@ContentID and PP.FromType = @FromType
- Union All
---
- Select ZZ.AllContents + '.' + cast(II.ContentID as varchar(max)) AllContents,II.ItemID PreviousID, case when Exists(select ItemID from Items where PreviousID = II.ItemID) then 1 else 0 end HasChildren
- from Items II
- Join ContentZ ZZ on II.PreviousID = ZZ.PreviousID
-)
-Select @retval = AllContents from ContentZ where HasChildren=0
-OPTION (MAXRECURSION 1000)
-end
-return @retval
-end
-/*
-ALTER FUNCTION [dbo].[ve_GetPath] (@StructID int)
-RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Struct(FromType,FromID,Item,PPath,Path) as (
- Select FromType,FromID,0 Item,Cast('' as varchar(max)) PPath ,
- Cast(case FromType
- when 1 then 'PRC.000' when 2 then '.SEC.000'
- when 3 then '.CAU.000' when 4 then '.NOT.000'
- when 5 then '.RNO' when 7 then '.TAB'
- else '.000' end as varchar(max)) Path
- from Structures
- where StructureID=@StructID
- Union All
--- Child
- Select A.FromType,A.FromID,0 as Item,Path,
- Cast(case A.FromType
- when 1 then 'PRC.000' when 2 then '.SEC.000'
- when 3 then '.CAU.000' when 4 then '.NOT.000'
- when 5 then '.RNO' when 7 then '.TAB'
- else '.000' end + Path as varchar(max)) Path
- from Structures A
- Join Struct C on C.FromID=A.StructureID
- where C.FromType <> 0
- Union All
--- Sibling
- Select A.FromType,A.FromID,Item + 1 Item,PPath,
- case A.FromType
- when 1 then 'PRC.' when 2 then '.SEC.'
- when 3 then '.CAU.' when 4 then '.NOT.'
- when 5 then '.RNO.' when 7 then '.TAB.'
- else '.' end + right('000' + cast(Item + 1 as varchar(3)),3) + PPath Path
- from Structures A
- Join Struct C on C.FromID=A.StructureID
- where C.FromType = 0
-)
---select * from Struct OPTION (MAXRECURSION 1000)
-Select @Path = Path from Struct where FromID=0 OPTION (MAXRECURSION 1000)
---print @path
-return @Path
-END;
-*/
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetParts Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetParts Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetPath];
-GO
-
-/*
-select ItemID, CC.Type, dbo.ve_GetPath(ItemID)
-from Items II join Contents CC on II.ContentID = CC.ContentID
-where ItemID in(111,265,266,267)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetPath] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Itemz(ItemCount,ItemID,PreviousID,FromType,CType,Number,Text,PPath, Path) as (
- Select 1,ItemID,PreviousID,0,C.Type/10000,C.Number,C.Text,
- Cast(Case when C.Type < 20000 then '`' + C.Number +'`' + C.Text else '' end as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then '`' + C.Number +'`' + C.Text else '1' end as nvarchar(max)) Path
- from Items I
- join Contents C on I.ContentID = C.ContentID
- where ItemID=@ItemID
- Union All
--- siblings
- Select ItemCount+1,I.PreviousID,II.PreviousID,0,C.Type/10000,Z.Number,Z.Text,PPath,cast(ItemCount + 1 as nvarchar(3)) + PPath
- from Items I
- join Contents C on I.ContentID = C.ContentID
- Join Items II on II.ItemID = I.PreviousID
- Join Itemz Z on I.ItemID=Z.ItemID
- where I.PreviousID != 0
- Union All
--- children
- select 1,I.ItemID,I.PreviousID,P.FromType,C.Type/10000,C.Number,C.Text,
- case C.Type/10000
- when 0 then '`' + C.Number +'`' + C.Text
- when 1 then '`' + C.Number +'`' + C.Text +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO`'
- when 7 then '`Table`'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath PPath,
- --'1' +
- case C.Type/10000
- when 0 then '`' + C.Number +'`' + C.Text
- when 1 then '`' + C.Number +'`' + C.Text +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO'
- when 7 then '`Table'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath Path
-
- from Parts P
- join Items I on I.ContentID = P.ContentID
- join Contents C on I.ContentID = C.ContentID
- join Itemz Z on P.ItemID=Z.ItemID
-)
-select @Path = path From Itemz where ItemCount=1 and CType=0
-OPTION (MAXRECURSION 10000)
-return @Path
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetPathFromContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetPathFromContentID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetPathFromContentID];
-GO
-
-/*
-select top 5
-[dbo].[ve_GetPathFromContentID](FromID)FromPath
-,[dbo].[ve_GetPath](ToID) ToPath
-,[dbo].[ve_GetPath](RangeID) RangePath
- from transitions
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetPathFromContentID] (@ContentID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @ItemID int;
- select top 1 @ItemID=ItemID from Items where ContentID = @ContentID;
- return DBO.ve_GetPath(@ItemID)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetPathFromContentID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetPathFromContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetShortPart] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetShortPart]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetShortPart];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[ve_GetShortPart] (@Number varchar(max),@Title varchar(max)) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- if(isnull(@Number,'') = '') return @Title
- return @Number
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetShortPart Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetShortPart Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetShortPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetShortPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetShortPath];
-GO
-
-/*
-select ItemID, CC.Type, dbo.ve_GetPath(ItemID)
-from Items II join Contents CC on II.ContentID = CC.ContentID
-where ItemID in(111,265,266,267)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetShortPath] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Itemz(ItemCount,ItemID,PreviousID,FromType,CType,Number,Text,PPath, Path) as (
- Select 1,ItemID,PreviousID,0,C.Type/10000,C.Number,C.Text,
- Cast(Case when C.Type < 20000 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) else '' end as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) else '1' end as nvarchar(max)) Path
- from Items I
- join Contents C on I.ContentID = C.ContentID
- where ItemID=@ItemID
- Union All
--- siblings
- Select ItemCount+1,I.PreviousID,II.PreviousID,0,C.Type/10000,Z.Number,Z.Text,PPath,cast(ItemCount + 1 as nvarchar(3)) + PPath
- from Items I
- join Contents C on I.ContentID = C.ContentID
- Join Items II on II.ItemID = I.PreviousID
- Join Itemz Z on I.ItemID=Z.ItemID
- where I.PreviousID != 0
- Union All
--- children
- select 1,I.ItemID,I.PreviousID,P.FromType,C.Type/10000,C.Number,C.Text,
- case C.Type/10000
- when 0 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text)
- when 1 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO`'
- when 7 then '`Table`'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath PPath,
- --'1' +
- case C.Type/10000
- when 0 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text)
- when 1 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO'
- when 7 then '`Table'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath Path
-
- from Parts P
- join Items I on I.ContentID = P.ContentID
- join Contents C on I.ContentID = C.ContentID
- join Itemz Z on P.ItemID=Z.ItemID
-)
-select @Path = path From Itemz where ItemCount=1 and CType=0
-OPTION (MAXRECURSION 10000)
-return REPLACE(@Path,'\u8209?','-')
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetShortPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetShortPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetShortPathFromContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetShortPathFromContentID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetShortPathFromContentID];
-GO
-
-/*
-select top 5
-[dbo].[ve_GetShortPathFromContentID](FromID)FromPath
-,[dbo].[ve_GetShortPath](ToID) ToPath
-,[dbo].[ve_GetShortPath](RangeID) RangePath
- from transitions
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetShortPathFromContentID] (@ContentID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @ItemID int;
- select top 1 @ItemID=ItemID from Items where ContentID = @ContentID;
- return DBO.ve_GetShortPath(@ItemID)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetShortPathFromContentID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetShortPathFromContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetSiblingCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetSiblingCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetSiblingCount];
-GO
-
-/*
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) HLStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 10000 and CC.Type < 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SectionCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type < 10000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SubStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetSiblingCount] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([Direction], [ItemID], [PreviousID]) as (
- Select 0 Direction,[ItemID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings Previous
-Union All
- select -1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.Direction <= 0
--- Siblings Next
-Union All
- select 1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.ItemID = Z.PreviousID
- where Z.Direction >= 0
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-return @Count END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetSiblingCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetSiblingCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelSteps] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelSteps]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelSteps];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelSteps]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetPath([ItemID]) Path
-from Itemz
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_AllHighLevelStepTransitions()
-where ExternalTransitions > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelStepTransitions]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,ExternalChildTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetShortPath([ItemID]) Path,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindExternalChildTransitions(ItemID)) ExternalChildTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-where (Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) > 0
-OR(Select count(*) from vefn_FindExternalTransitions(ItemID)) > 0
-OR(Select count(*) from vefn_FindInternalTransitions(ItemID)) > 0
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllSections] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllSections]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_AllSections];
-GO
-
--- Select .dbo.vefn_AllSections(10001) MyTypeSection, .dbo.vlnfn_AllSections(20001) MyTypeStep, .dbo.vlnfn_AllSections(5) MyTypeProc
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllSections](@type int)
-RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- IF(@type < 20000 and @type >= 10000)
- RETURN 10000
- RETURN @type
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_AllSections Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_AllSections Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AnnotationTypeSplit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AnnotationTypeSplit]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AnnotationTypeSplit];
-GO
-
-/*
-select * from vefn_AnnotationTypeSplit('1,4')
-select * from vefn_AnnotationTypeSplit(null)
-select * from vefn_AnnotationTypeSplit('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AnnotationTypeSplit](@AnnotationTypeList varchar(MAX))
-RETURNS @IDs TABLE
-(
- TypeID int PRIMARY KEY,
- Name varchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-IF(isnull(@AnnotationTypeList,'') = '')
- Insert into @IDs
- Select TypeID, Name
- from AnnotationTypes
-else
- Insert into @IDs
- Select TypeID,NAME
- from AnnotationTypes
- where TypeID in(select ID from vefn_SplitInt(@AnnotationTypeList,','))
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AnnotationTypeSplit Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AnnotationTypeSplit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItems];
-GO
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItems](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItemsRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItemsRange]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItemsRange];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItemsRange](@StartItemID int, @EndItemID int, @DestFormat int)
-RETURNS @Children TABLE
-(
-ItemID int PRIMARY KEY,
-ContentID int,
-FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @FormatID int
-SELECT @FormatID = isnull(@DestFormat,.dbo.vefn_GetInheritedFormat(@StartItemID,1))
-BEGIN
-with Itemz([Level], [ItemID], [ContentID], [FormatID], [FoundEnd]) as (
-Select 0 [Level], [ItemID], I.[ContentID], IsNull(C.[FormatID], @FormatID), case [ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-FROM [Items] I
-JOIN [Contents] C on I.ContentID = C.ContentID
-where [ItemID]=@StartItemID
-Union All
--- Children
-select [Level] + 1, I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Parts P on P.ContentID = Z.ContentID
-join Items I on I.ItemID = P.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
--- Siblings
-Union All
-select [Level] , I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Items I on I.PreviousID = Z.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
-where FoundEnd = 0
-)
-insert into @Children select ItemID, ContentID, FormatID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItemsRange Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItemsRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildrenItems](@ItemID int, @ParentID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildrenItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_CompareTranFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CompareTranFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CompareTranFormat];
-GO
-
-/*
- Determines if two transition formats are same string.
- returns 0 if identical, 1 if similar (range for range, item for item), 2 if totally different
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_CompareTranFormat] (@FormatID int, @NewFormatID int, @TranType int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --
- IF @FormatID = @NewFormatID
- RETURN 0 -- Exactly the same format file
- DECLARE @TransFormat varchar(max)
- DECLARE @NewTransFormat varchar(max)
- SET @TransFormat = isnull(.dbo.vefn_GetTransFormat(@FormatID, @TranType),'')
- SET @NewTransFormat = isnull(.dbo.vefn_GetTransFormat(@NewFormatID, @TranType),'')
- RETURN CASE
- WHEN @TransFormat = @NewTransFormat THEN 0 -- transition formats are identical
- WHEN @TransFormat LIKE '%{Last Step}%' THEN
- CASE
- WHEN @NewTransFormat LIKE '%{Last Step}%' THEN 1 -- both ranges, but different format
- ELSE 2 -- totally different format, not even same type (was single, changed to range)
- END
- ELSE
- CASE
- WHEN @NewTransFormat LIKE '%{Last Step}%' THEN 2 -- totally different format, not even same type (was range, changed to single)
- ELSE 1 -- both single, but different format
- END
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_CompareTranFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_CompareTranFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_DocVersionSplit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_DocVersionSplit]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_DocVersionSplit];
-GO
-
-/*
-select * from vefn_DocVersionSplit('1,4')
-select * from vefn_DocVersionSplit(null)
-select * from vefn_DocVersionSplit('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_DocVersionSplit](@DocVersionList varchar(MAX))
-RETURNS @IDs TABLE
-(
- VersionID int PRIMARY KEY,
- ItemID int,
- DVPath varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-IF(isnull(@DocVersionList,'') = '')
- Insert into @IDs
- Select VersionID, ItemID, dbo.ve_GetFolderPath(VersionID)
- from DocVersions where ItemID is not null
-else
- Insert into @IDs
- Select ID, ItemID, dbo.ve_GetFolderPath(VersionID)
- from vefn_SplitInt(@DocVersionList,',') as T
- join DocVersions DV on VersionID = T.ID
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_DocVersionSplit Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_DocVersionSplit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_DVContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_DVContent]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_DVContent];
-GO
-
-/*
-select contentID from vefn_DVContent('1')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_DVContent](@DocVersionList varchar(MAX))
-RETURNS @DVContents TABLE
-(
- ContentID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID] in (select [ItemID] from vefn_DocVersionSplit(@DocVersionList))
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @DVContents select distinct ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_DVContent Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_DVContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindAffectedTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindAffectedTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindAffectedTransitions];
-GO
-
-/*
-select top 1 * from items order by itemid desc
-Select
-FromID,.dbo.ve_GetPathFromContentID(FromID) ContentPath
-,ToID,dbo.ve_GetPath(ToID) ToPath
-,RangeID,dbo.ve_GetPath(RangeID) RangePath
-,cc.Text
-from vefn_FindAffectedTransitions(2102) ttz
-join transitions tt on ttz.TransitionID = tt.TransitionID
---join items ii on ii.ItemID = tt.fromID
-join contents cc on tt.FromID = cc.contentid
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindAffectedTransitions](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-, Itemz2([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] -1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz2 Z
- join Items I on Z.PreviousID = I.ItemID
- --where Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-insert into @Transitions
-select TransitionID from Transitions TT
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-UNION
-select TransitionID from Transitions TT
-JOIN Itemz2 on ToID=ItemID and RangeID=ItemID and IsRange = 2
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindContentText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindContentText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindContentText];
-GO
-
-/*
-SELECT * From vefn_FindContentText('1','%RCP%')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindContentText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
- ,Type int
- ,Text varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-IF(ISNULL(@DocVersionList,'')='')
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where [Text] like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-ELSE
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where [ContentID] in (select [ContentID] from vefn_DVContent(@DocVersionList))
- AND [Text] like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindContentText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindContentText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalChildTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalChildTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalChildTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalChildTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalChildTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz where Level > 0) OR RangeID in(select ItemID from Itemz where Level > 0))
-AND FromID not in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID not in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitions];
-GO
-
-/*
-Select * from vefn_FindInternalTransitions(185)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitionsForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitionsForCopy]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitionsForCopy];
-GO
-
-/*
-Select * from vefn_FindInternalTransitionsForCopy(10277)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitionsForCopy](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int,
- FromID int,
- TranType int,
- ToID int,
- RangeID int,
- OldTransition int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Transitions
-select TransitionID, FromID, TT.TranType, TT.ToID, TT.RangeID, CAST(TT.Config as int) --case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindText];
-GO
-
-/*
-SELECT * From vefn_FindText('1','turbine-driven',0,0,0,1,'')
-SELECT * From vefn_FindText('1','turbine\u8209?driven',0,0,0,0,'')
-SELECT * From vefn_FindText('1','trip',0,0,0,0,'')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX)
-,@CaseSensitive as int
-,@IncludeLinks as int
-,@IncludeRtfFormatting as int
-,@IncludeSpecialCharacters as int
-,@StepTypeList varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-IF isnull(@SearchString,'')=''
- BEGIN
- insert into @FoundContents
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- where(dbo.vefn_AllSections(C.Type)>=10000)
- or
- (dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- END
-ELSE
- Declare @SearchStringx nvarchar(200) --kbr
- set @SearchStringx = replace(@SearchString,'-','\u8209?') --kbr
- IF @CaseSensitive = 0 -- Not Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchStringx Collate SQL_Latin1_General_CP1_CI_AS)
- AND ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000) or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000) or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
- ELSE
- BEGIN
- IF @CaseSensitive = 1 -- Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchStringx Collate SQL_Latin1_General_CP1_CS_AS)
- AND ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000) or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000) or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
-END
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FirstLink] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FirstLink]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FirstLink];
-GO
-
-/*
-select .dbo.vefn_FirstLink('asdasdadsasd' + char(21) + 'asdasdasd\vasdasdasd', 2)
-select .dbo.vefn_FirstLink('asdasdadsasd' + char(21) + 'asdasdasd\vasdasdasd', 1)
-select .dbo.vefn_FirstLink('asdasdadsasd' + char(21) + 'asdasdasd\vasdasdasd', 0)
-*/
-
--- This is only used for testing by vefn_RemoveExtraText
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FirstLink](@text nvarchar(MAX),@includeLink int)
-RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-SET @index = 0
-if(@includeLink = 2)
- RETURN 0
-if(@includeLink = 1)
- return CHARINDEX('\v' , @text)
-DECLARE @index2 int
-SET @index = PATINDEX('%[' + nchar(9574)+nchar(9516)+nchar(21) + ']%',@text)
-return @index
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FirstLink Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FirstLink Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixROData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixROData]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixROData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_FixROData]
-(@data XML,@ROUsageID int,@NewROUsageID int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- Build Search String and Replace String
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:ReferencedObject:' + ltrim(str(@ROUsageID)) + ' '
- SET @replaceWith = '#Link:ReferencedObject:' + ltrim(str(@NewROUsageID)) + ' '
- return CAST(replace(CAST(@data AS VarChar(max)),@lookFor,@replaceWith) AS XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixROData Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixROData Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixROText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixROText]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixROText];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixROText]
-(@Text varchar(MAX),@ROUsageID int,@NewROUsageID int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- Build Search String and Replace String
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:ReferencedObject:' + ltrim(str(@ROUsageID)) + ' '
- SET @replaceWith = '#Link:ReferencedObject:' + ltrim(str(@NewROUsageID)) + ' '
- return replace(@text,@lookFor,@replaceWith)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixROText Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixROText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixSearchString] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixSearchString]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixSearchString];
-GO
-
-/*
-select ID,ss,.dbo.vefn_FixSearchString(ss)
-from (
-select 1 ID,'*' ss union
-select 2 ID,'50%' ss union
-select 3 ID,'IF*' ss union
-select 4 ID,'*then:' ss union
-select 5 ID,'530`F' ss union
-select 6 ID,'check' ss union
-select 7 ID,'RCP*Cooling' ss union
-select 8 ID,'14%[34%]' ss union
-select 9 ID,'\*' ss union
-select 10 ID,'\?' ss union
-select 11 ID,'_' ss union
-select 12 ID,'[' ss union
-select 13 ID,']' ss union
-select 14 ID,'%' ss union
-select 15 ID,'_' ss union
-select 16 ID,'-' ss
-) tt order by ID
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixSearchString](@SearchString nvarchar(MAX))
-RETURNS nvarchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- This code adds % at the beginning and end if the beginning and end
- -- of the search string if it does not have % at the beginning or end
- Set @SearchString = replace(@SearchString,'[','[[]')
- Set @SearchString = replace(@SearchString,'_','[_]')
- Set @SearchString = replace(@SearchString,'%','[%]')
- Set @SearchString = replace(@SearchString,'*','%')
- Set @SearchString = replace(@SearchString,'?','_')
- Set @SearchString = replace(@SearchString,'\%','*')
- Set @SearchString = replace(@SearchString,'\_','?')
- --Set @SearchString = replace(@SearchString,'-','[-'+nchar(8209)+']')
- IF(@SearchString like '[%]%') RETURN @SearchString
- IF(@SearchString like '%[%]') RETURN @SearchString
-RETURN '%' + @SearchString + '%'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixSearchString Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixSearchString Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixTransitionDataForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixTransitionDataForCopy]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixTransitionDataForCopy];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixTransitionDataForCopy]
-(@data XML,@TransitionID int,@TranType int,@OldToID int,@OldRangeID int, @NewID int, @NewToID int, @NewRangeID int, @NewTranType int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- -- Build Search String and Replace String
- DECLARE @offset int
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- DECLARE @text varchar(MAX)
- SET @text = Cast(@data as varchar(max))
- SET @lookFor = '#Link:Transition:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- if(@offset = 0)
- BEGIN
-
- SET @lookFor = '#Link:TransitionRange:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- SET @replaceWith = '#Link:TransitionRange:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID)) + ' ' + ltrim(str(@NewRangeID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID)) + ' ' + ltrim(str(@OldRangeID))
- END
- ELSE
- BEGIN
- SET @replaceWith = '#Link:Transition:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID))
- END
- return Cast(replace(@text,@lookFor,@replaceWith) as XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixTransitionText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixTransitionText]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixTransitionText];
-GO
-
-/*
-select top 5 * from contents order by contentid desc
-
-DECLARE @Text1 varchar(MAX),@Text2 varchar(MAX),@Text3 varchar(MAX),@Text4 varchar(MAX)
-SET @Text1='\v \v0 PERFORM the following:'
-SET @Text2='\v \v0 PERFORM the following:'
-SET @Text3='\v \v0 PERFORM the following:'
-SET @Text4='\v \v0 IF reactor will NOT trip, THEN:'
-
-Select @Text1 Before, dbo.vefn_FixTransitionText(@Text1,58,4,270,285,270,999) [After]
-Union Select @Text2 Before, dbo.vefn_FixTransitionText(@Text2,58,2,265,270,270,999) [After]
-Union Select @Text3 Before, dbo.vefn_FixTransitionText(@Text3,58,2,270,270,270,999) [After]
-Union Select @Text4 Before, dbo.vefn_FixTransitionText(@Text4,8,1,270,270,270,999) [After]
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixTransitionText]
-(@Text varchar(MAX),@TransitionID int,@TranType int,@OldToID int,@OldRangeID int,@OldID int,@NewID int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- Build Search String and Replace String
- DECLARE @offset int
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:Transition:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@Text)
- if(@offset = 0)
- BEGIN
-
- SET @lookFor = '#Link:TransitionRange:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@Text)
- SET @replaceWith = @lookFor
- + ' ' + ltrim(str(case @OldToID when @OldID then @NewID else @OldToID end))
- + ' ' + ltrim(str(case @OldRangeID when @OldID then @NewID else @OldRangeID end))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID)) + ' ' + ltrim(str(@OldRangeID))
- END
- ELSE
- BEGIN
- SET @replaceWith = @lookFor
- + ' ' + ltrim(str(case @OldToID when @OldID then @NewID else @OldToID end))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID))
- END
- return replace(@text,@lookFor,@replaceWith)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixTransitionText Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixTransitionText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixTransitionTextForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixTransitionTextForCopy]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixTransitionTextForCopy];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixTransitionTextForCopy]
-(@Text varchar(MAX),@TransitionID int,@TranType int,@OldToID int,@OldRangeID int, @NewID int, @NewToID int, @NewRangeID int, @NewTranType int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- -- Build Search String and Replace String
- DECLARE @offset int
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:Transition:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@Text)
- if(@offset = 0)
- BEGIN
-
- SET @lookFor = '#Link:TransitionRange:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@Text)
- SET @replaceWith = '#Link:TransitionRange:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID)) + ' ' + ltrim(str(@NewRangeID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID)) + ' ' + ltrim(str(@OldRangeID))
- END
- ELSE
- BEGIN
- SET @replaceWith = '#Link:Transition:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID))
- END
- return replace(@text,@lookFor,@replaceWith)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixTransitionTextForCopy Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixTransitionTextForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetDocumentPageLength] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetDocumentPageLength]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetDocumentPageLength];
-GO
-
-/*
-print .dbo.[vefn_GetDocumentPageLength](1)
-select DocID, .dbo.[vefn_GetDocumentPageLength](DocID) PageLength from Documents
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetDocumentPageLength] (@DocID int) RETURNS float
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @PageLength float
-SET @PageLength = (select top 1 v.value('.', 'nvarchar(100)') [Length]
-from (select DocID, cast (Config as xml) ConfigXML from Documents) T1
-CROSS APPLY ConfigXML.nodes('//@Length') TempXML(v)
-WHERE DocID = @DocID)
-return @PageLength
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetDocumentPageLength Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetDocumentPageLength Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatField] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatField]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFormatField];
-GO
-
-/*
-Select * from vefn_GetFormatField('Font')
-Select * from vefn_GetFormatField('PSADJBNGROW')
-Select * from vefn_GetFormatField('SectionTitle')
-Select * from vefn_GetFormatField('PrintNoTitle')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetFormatField](@find varchar(255))
-RETURNS @FormatFields TABLE
-(
- FormatID int
- ,Name varchar(20)
- ,Description varchar(250)
- ,Path varchar(max)
- ,Value varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @FormatFields
- Select FormatID, Name, Description,
- case when v9.exist('.') is null THEN '' ELSE v9.value('local-name(.)','varchar(max)') + '/' END +
- case when v8.exist('.') is null THEN '' ELSE v8.value('local-name(.)','varchar(max)') + '/' END +
- case when v7.exist('.') is null THEN '' ELSE v7.value('local-name(.)','varchar(max)') + '/' END +
- case when v6.exist('.') is null THEN '' ELSE v6.value('local-name(.)','varchar(max)') + '/' END +
- case when v5.exist('.') is null THEN '' ELSE v5.value('local-name(.)','varchar(max)') + '/' END +
- case when v4.exist('.') is null THEN '' ELSE v4.value('local-name(.)','varchar(max)') + '/' END +
- case when v3.exist('.') is null THEN '' ELSE v3.value('local-name(.)','varchar(max)') + '/' END +
- case when v2.exist('.') is null THEN '' ELSE v2.value('local-name(.)','varchar(max)') + '/' END +
- case when v1.exist('.') is null THEN '' ELSE v1.value('local-name(.)','varchar(max)') + '/' END +
- + '@' + v.value('local-name(.)','varchar(max)') Path
- , v.value('.', 'varchar(255)') Value
- FROM Formats
- CROSS APPLY Data.nodes('//*/@*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- OR v.value('.', 'varchar(255)') like '%' + @find + '%'
- UNION
- Select FormatID, Name, Description,
- case when v9.exist('.') is null THEN '' ELSE v9.value('local-name(.)','varchar(max)') + '/' END +
- case when v8.exist('.') is null THEN '' ELSE v8.value('local-name(.)','varchar(max)') + '/' END +
- case when v7.exist('.') is null THEN '' ELSE v7.value('local-name(.)','varchar(max)') + '/' END +
- case when v6.exist('.') is null THEN '' ELSE v6.value('local-name(.)','varchar(max)') + '/' END +
- case when v5.exist('.') is null THEN '' ELSE v5.value('local-name(.)','varchar(max)') + '/' END +
- case when v4.exist('.') is null THEN '' ELSE v4.value('local-name(.)','varchar(max)') + '/' END +
- case when v3.exist('.') is null THEN '' ELSE v3.value('local-name(.)','varchar(max)') + '/' END +
- case when v2.exist('.') is null THEN '' ELSE v2.value('local-name(.)','varchar(max)') + '/' END +
- case when v1.exist('.') is null THEN '' ELSE v1.value('local-name(.)','varchar(max)') + '/' END +
- + v.value('local-name(.)','varchar(max)') Path
- , '{node}'
- FROM Formats
- CROSS APPLY Data.nodes('//*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetFormatField Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetFormatField Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatFieldByStepType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatFieldByStepType]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFormatFieldByStepType];
-GO
-
-/*
-Select * from vefn_GetFormatFieldByStepType('Font')
-Select * from vefn_GetFormatFieldByStepType('PSADJBNGROW')
-Select * from vefn_GetFormatFieldByStepType('SectionTitle')
-Select * from vefn_GetFormatFieldByStepType('PrintNoTitle')
-Select * from vefn_GetFormatFieldByStepType('Off') where name ='AEP'
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetFormatFieldByStepType](@find varchar(255))
-RETURNS @FormatFields TABLE
-(
- FormatID int
- ,Name varchar(20)
- ,Description varchar(250)
- ,Path varchar(max)
- ,StepType varchar(255)
- ,Value varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @FormatFields
- Select FormatID, Name, Description,
- case when v9.exist('.') is null THEN '' ELSE v9.value('local-name(.)','varchar(max)') + '/' END +
- case when v8.exist('.') is null THEN '' ELSE v8.value('local-name(.)','varchar(max)') + '/' END +
- case when v7.exist('.') is null THEN '' ELSE v7.value('local-name(.)','varchar(max)') + '/' END +
- case when v6.exist('.') is null THEN '' ELSE v6.value('local-name(.)','varchar(max)') + '/' END +
- case when v5.exist('.') is null THEN '' ELSE v5.value('local-name(.)','varchar(max)') + '/' END +
- case when v4.exist('.') is null THEN '' ELSE v4.value('local-name(.)','varchar(max)') + '/' END +
- case when v3.exist('.') is null THEN '' ELSE v3.value('local-name(.)','varchar(max)') + '/' END +
- case when v2.exist('.') is null THEN '' ELSE v2.value('local-name(.)','varchar(max)') + '/' END +
- case when v1.exist('.') is null THEN '' ELSE v1.value('local-name(.)','varchar(max)') + '/' END +
- .dbo.vefn_XmlPath(v1.query('.')) +
- + '@' + v.value('local-name(.)','varchar(max)') Path
- , coalesce(v.value('../@Type','varchar(255)'),v.value('../../@Type','varchar(255)'),v.value('../../../@Type','varchar(255)')) StepType
- , v.value('.', 'varchar(255)') Value
- FROM Formats
- CROSS APPLY Data.nodes('//*/@*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- OR v.value('.', 'varchar(255)') like '%' + @find + '%'
- UNION ALL
- Select FormatID, Name, Description,
- case when v9.exist('.') is null THEN '' ELSE v9.value('local-name(.)','varchar(max)') + '/' END +
- case when v8.exist('.') is null THEN '' ELSE v8.value('local-name(.)','varchar(max)') + '/' END +
- case when v7.exist('.') is null THEN '' ELSE v7.value('local-name(.)','varchar(max)') + '/' END +
- case when v6.exist('.') is null THEN '' ELSE v6.value('local-name(.)','varchar(max)') + '/' END +
- case when v5.exist('.') is null THEN '' ELSE v5.value('local-name(.)','varchar(max)') + '/' END +
- case when v4.exist('.') is null THEN '' ELSE v4.value('local-name(.)','varchar(max)') + '/' END +
- case when v3.exist('.') is null THEN '' ELSE v3.value('local-name(.)','varchar(max)') + '/' END +
- case when v2.exist('.') is null THEN '' ELSE v2.value('local-name(.)','varchar(max)') + '/' END +
- case when v1.exist('.') is null THEN '' ELSE v1.value('local-name(.)','varchar(max)') + coalesce('[' + v1.value('@Index','varchar(255)')+']','') + '/' END +
- + v.value('local-name(.)','varchar(max)') Path
- , coalesce(v.value('../@Type','varchar(255)'),v.value('../../@Type','varchar(255)'),v.value('../../../@Type','varchar(255)')) StepType
- , '{node}'
- FROM Formats
- CROSS APPLY Data.nodes('//*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetFormatFieldByStepType Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetFormatFieldByStepType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatFieldByStepType2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatFieldByStepType2]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFormatFieldByStepType2];
-GO
-
-/*
-Select * from vefn_GetFormatFieldByStepType2('Font')
-Select * from vefn_GetFormatFieldByStepType2('PSADJBNGROW')
-Select * from vefn_GetFormatFieldByStepType2('SectionTitle')
-Select * from vefn_GetFormatFieldByStepType2('PrintNoTitle')
-Select * from vefn_GetFormatFieldByStepType2('Off')
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetFormatFieldByStepType2](@find varchar(255))
-RETURNS @FormatFields TABLE
-(
- FormatID int
- ,Name varchar(20)
- ,Description varchar(250)
- ,Path varchar(max)
- ,StepType varchar(255)
- ,Indx varchar(255)
- ,Value varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @FormatFields
- Select FormatID, Name, Description,
- .dbo.vefn_XmlPath(v9.query('.')) +
- .dbo.vefn_XmlPath(v8.query('.')) +
- .dbo.vefn_XmlPath(v7.query('.')) +
- .dbo.vefn_XmlPath(v6.query('.')) +
- .dbo.vefn_XmlPath(v5.query('.')) +
- .dbo.vefn_XmlPath(v4.query('.')) +
- .dbo.vefn_XmlPath(v3.query('.')) +
- .dbo.vefn_XmlPath(v2.query('.')) +
- .dbo.vefn_XmlPath(v1.query('.')) +
- + '@' + v.value('local-name(.)','varchar(max)') Path
- , coalesce(v.value('../@Type','varchar(255)'),v.value('../../@Type','varchar(255)'),v.value('../../../@Type','varchar(255)')) StepType
- , coalesce(v1.value('@Index','varchar(255)'),v2.value('@Index','varchar(255)'),v3.value('@Index','varchar(255)')) Indx
- , v.value('.', 'varchar(255)') Value
- FROM Formats
- CROSS APPLY Data.nodes('//*/@*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- OR v.value('.', 'varchar(255)') like '%' + @find + '%'
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetFormatFieldByStepType2 Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetFormatFieldByStepType2 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatFieldNoValue] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatFieldNoValue]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFormatFieldNoValue];
-GO
-
-/*
-Select * from vefn_GetFormatFieldNoValue('Font')
-Select * from vefn_GetFormatFieldNoValue('PSADJBNGROW')
-Select * from vefn_GetFormatFieldNoValue('SectionTitle')
-Select * from vefn_GetFormatFieldNoValue('PrintNoTitle')
-Select * from vefn_GetFormatFieldNoValue('Off')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetFormatFieldNoValue](@find varchar(255))
-RETURNS @FormatFields TABLE
-(
- FormatID int
- ,Name varchar(20)
- ,Description varchar(250)
- ,Path varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @FormatFields
- Select FormatID, Name, Description,
- case when v9.exist('.') is null THEN '' ELSE v9.value('local-name(.)','varchar(max)') + '/' END +
- case when v8.exist('.') is null THEN '' ELSE v8.value('local-name(.)','varchar(max)') + '/' END +
- case when v7.exist('.') is null THEN '' ELSE v7.value('local-name(.)','varchar(max)') + '/' END +
- case when v6.exist('.') is null THEN '' ELSE v6.value('local-name(.)','varchar(max)') + '/' END +
- case when v5.exist('.') is null THEN '' ELSE v5.value('local-name(.)','varchar(max)') + '/' END +
- case when v4.exist('.') is null THEN '' ELSE v4.value('local-name(.)','varchar(max)') + '/' END +
- case when v3.exist('.') is null THEN '' ELSE v3.value('local-name(.)','varchar(max)') + '/' END +
- case when v2.exist('.') is null THEN '' ELSE v2.value('local-name(.)','varchar(max)') + '/' END +
- case when v1.exist('.') is null THEN '' ELSE v1.value('local-name(.)','varchar(max)') + '/' END +
- + '@' + v.value('local-name(.)','varchar(max)') Path
- FROM Formats
- CROSS APPLY Data.nodes('//*/@*') TempXML(v)
- OUTER APPLY v.nodes('..') TempXML1(v1)
- OUTER APPLY v1.nodes('..') TempXML2(v2)
- OUTER APPLY v2.nodes('..') TempXML3(v3)
- OUTER APPLY v3.nodes('..') TempXML4(v4)
- OUTER APPLY v4.nodes('..') TempXML5(v5)
- OUTER APPLY v5.nodes('..') TempXML6(v6)
- OUTER APPLY v6.nodes('..') TempXML7(v7)
- OUTER APPLY v7.nodes('..') TempXML8(v8)
- OUTER APPLY v8.nodes('..') TempXML9(v9)
- where v.value('local-name(.)', 'varchar(255)') like '%' + @find + '%'
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetFormatFieldNoValue Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetFormatFieldNoValue Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatValues] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatValues]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFormatValues];
-GO
-
-/*
-
-SELECT * from vefn_GetFormatValues('WidSAdjByLevel')
-SELECT * from vefn_GetFormatValues('MatchProcNumber')
-SELECT * from vefn_GetFormatValues('TofCPositionAdj')
-
-*/
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetFormatValues](@FieldName as varchar(255))
-RETURNS @AllValues TABLE
-(
- FormatID int,
- Name varchar(100),
- ParentNode XML,
- Node XML,
- FieldValue varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @NodeName as varchar(255)
- set @NodeName = (Select distinct v.value('local-name(..)', 'varchar(255)') MyName
- FROM Formats CROSS APPLY Data.nodes('(*//@*[local-name()=sql:variable("@FieldName")])') TempXML(v))
- Insert into @AllValues
- Select FormatID, Name, v.query('..') ParentNode, v.query('.') Node,
- v.value('(./@*[local-name()=sql:variable("@FieldName")])[1]','varchar(255)') FieldValue
- FROM Formats CROSS APPLY Data.nodes('(//*[local-name()=sql:variable("@NodeName")])') TempXML(v)
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetFormatValues Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetFormatValues Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetGenMacMacros] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetGenMacMacros]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetGenMacMacros];
-GO
-
-/*
-Select * from vefn_GetGenMacMacros()
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetGenMacMacros]()
-RETURNS @GenMacMacros TABLE
-(
- FormatID int
- ,Name varchar(20)
- ,Description varchar(250)
- ,MacroName varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @GenMacMacros
- Select FormatID, Name, Description,v.value('@id','varchar(20)') MacroName
- FROM Formats CROSS APPLY GenMac.nodes('//g') TempXML(v)
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetGenMacMacros Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetGenMacMacros Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetInheritedFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetInheritedFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetInheritedFormat];
-GO
-
-/* Samples
-Select TranType, .dbo.vefn_GetInheritedFormat(355) TransFormat
- from(Select 1 TranType UNION Select 2 TranType UNION Select 3 TranType UNION
- Select 4 TranType UNION Select 5 TranType UNION Select 6 TranType UNION
- Select 7 TranType UNION Select 8 TranType UNION Select 9 TranType UNION Select 10 TranType) TT
-
-Select top 25 ItemID, TranType, .dbo.vefn_GetInheritedFormat(ItemID) TransFormat
- From Transitions TR
- Join Items II on II.ContentID = TR.FromID
-
-*/
-/*
- local is a 'boolean' (0=false, 1=true) to state whether to look at the item itself or
- only its parent
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetInheritedFormat] (@ItemID int, @local int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @FormatID as int
- -- First get the Active Format
- begin
- with Itemz([Level], [PreviousID], [ItemID], [ParentID], [FolderID], [FormatID]) as (
- Select 0 [Level], [PreviousID], [ItemID], null, null,
- case when @local = 1 then (Select FormatID from Contents CC where [CC].[ContentID] = [II].[ContentID])
- else null end FormatID
- FROM [Items] II
- where [ItemID]=@ItemID
- Union All
- -- Parent Item
- select [Level] + 1, I.[PreviousID], I.[ItemID], null, null, C.FormatID
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- join Contents C on C.ContentID = P.ContentID
- where Z.FormatID is null
- -- Siblings Item
- Union All
- select [Level] , I.[PreviousID] , I.[ItemID], null, null, Z.FormatID
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- where Z.FormatID is null
- Union All
- -- DocVersion From Item
- select [Level] + 1, null, null, DV.FolderID, null, DV.FormatID
- from Itemz Z
- join DocVersions DV on DV.ItemID = Z.ItemID
- where Z.FormatID is null
- Union All
- -- Folders
- select [Level] + 1, null, null, FF.ParentID, FF.FolderID, FF.FormatID
- from Itemz Z
- join Folders FF on FF.FolderID = Z.ParentID and FF.ParentID <> FF.FolderID
- where Z.FormatID is null
- )
- Select @FormatID = FormatID from Itemz ZZ Where FormatID is not null
- OPTION (MAXRECURSION 10000)
- RETURN @FormatID
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetNewTranType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetNewTranType]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetNewTranType];
-GO
-
-/* Samples
-
-SELECT .dbo.[vefn_GetNewTranType] (1, 2, 6)
-SELECT .dbo.[vefn_GetNewTranType] (1, 2, 7)
-SELECT .dbo.[vefn_GetNewTranType] (27, 29, 10)
-SELECT .dbo.[vefn_GetNewTranType] (29, 27, 10)
-SELECT .dbo.[vefn_GetNewTranType] (27, 31, 10)
---SELECT .dbo.[vefn_GetNewTranType] (29, 27, 10)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetNewTranType] (@FormatID int, @NewFormatID int, @TranType int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --
- IF @FormatID = @NewFormatID
- RETURN @TranType
- DECLARE @TransFormat varchar(max)
- DECLARE @NewTransFormat varchar(max)
- SET @TransFormat = isnull(.dbo.vefn_GetTransFormat(@FormatID, @TranType),'')
- SET @NewTransFormat = isnull(.dbo.vefn_GetTransFormat(@NewFormatID, @TranType),'')
- RETURN CASE
- WHEN @TransFormat = @NewTransFormat THEN @TranType
- WHEN @TransFormat LIKE '%{Last Step}%' THEN
- CASE
- WHEN @NewTransFormat LIKE '%{Last Step}%' THEN @TranType
- ELSE 3 -- This is a default 'range' type, all transition formats have it!
- END
- ELSE
- CASE
- WHEN @NewTransFormat LIKE '%{Last Step}%' THEN 0
- ELSE @TranType -- This is a default 'single' type, all transition formats have it!
- END
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetNewTranType Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetNewTranType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetNullFormatValues] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetNullFormatValues]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetNullFormatValues];
-GO
-
-/*
-
-SELECT * from vefn_GetNullFormatValues('WidSAdjByLevel')
-SELECT * from vefn_GetNullFormatValues('MatchProcNumber')
-SELECT * from vefn_GetNullFormatValues('TofCPositionAdj')
-
-*/
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetNullFormatValues](@FieldName as varchar(255))
-RETURNS @NullValues TABLE
-(
- FormatID int,
- Name varchar(100),
- ParentNode XML,
- Node XML
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @NodeName as varchar(255)
- set @NodeName = (Select distinct v.value('local-name(..)', 'varchar(255)') MyName
- FROM Formats CROSS APPLY Data.nodes('(*//@*[local-name()=sql:variable("@FieldName")])') TempXML(v))
- Insert into @NullValues
- Select FormatID, Name, ParentNode, Node FROM (
- Select FormatID, Name, v.query('..') ParentNode, v.query('.') Node,
- v.value('(./@*[local-name()=sql:variable("@FieldName")])[1]','varchar(255)') FieldValue
- FROM Formats CROSS APPLY Data.nodes('(//*[local-name()=sql:variable("@NodeName")])') TempXML(v)
- ) t1 WHERE FieldValue is null
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetNullFormatValues Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetNullFormatValues Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetTokens] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetTokens]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetTokens];
-GO
-
-/*
-select * from vefn_GetTokens('abc{Header1}def{Header2}ghi')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetTokens](@text varchar(64))
-RETURNS @Tokens TABLE
-(
- Token varchar(64)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-SET @index = -1
-WHILE (LEN(@text) > 0)
- BEGIN
- SET @index = CHARINDEX('{' , @text)
- IF @index = 0
- BREAK
- DECLARE @index2 int
- SET @index2 = CHARINDEX('}' , @text)
- if @index2 = 0
- BREAK
- INSERT INTO @Tokens VALUES (substring(@text, @index,1+@index2-@index))
- SET @text = RIGHT(@text, (LEN(@text) - @index2))
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetTokens Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetTokens Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetTransFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetTransFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetTransFormat];
-GO
-
-/* Samples
-select .dbo.vefn_GetTransFormat(1,6)
-select .dbo.vefn_GetTransFormat(1,1)
-select .dbo.vefn_GetTransFormat(1,2)
-select .dbo.vefn_GetTransFormat(1,3)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetTransFormat] (@FormatID int, @TranType int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- -- Walk up the Formats (inheritance) looking for the TransFormat
- Declare @TransFormat as varchar(MAX)
- BEGIN
- with Formatz([MyOrder],[FormatID],[ParentID],[Data]) as (
- Select 0,FormatID, ParentID, Data From Formats where FormatID=@FormatID
- Union All
- Select [MyOrder]+1,FF.FormatID, FF.ParentID, FF.Data From Formats FF
- Join Formatz ZZ on ZZ.ParentID=FF.FormatID
- Where ZZ.FormatID <> ZZ.ParentID)
- Select Top 1 @TransFormat=v.value('./@TransFormat', 'varchar(MAX)')
- FROM Formatz
- CROSS APPLY Data.nodes('//TransTypes') TempXML(v)
- where v.value('./@TransType', 'int')=@TranType
- order by [MyOrder]
- END
- return @TransFormat
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetTransFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetTransFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_HighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_HighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_HighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_HighLevelStepTransitions(105,104)
-where TransCount > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_HighLevelStepTransitions](@ItemID int, @ParentID int)
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,dbo.ve_GetPath([ItemID]) ,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_NextStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_NextStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_NextStepTransitions];
-GO
-
-/*
-select * from vefn_NextStepTransitions(450,443)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_NextStepTransitions](@ItemID int, @PreviousID int)
-RETURNS @Transitions TABLE
-(
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @Transitions
- SELECT [TransitionID],[FromID],[ToID],[RangeID],[TranType],[Config]
- FROM [Transitions] where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
- AND (ToID = @ItemID OR RangeID = @ItemID)
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_NextStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_NextStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_RemoveExtraText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveExtraText]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveExtraText];
-GO
-
-/*
-select text, .dbo.vefn_RemoveExtraText(text,2,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,1,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,0,0,0) StrippedText ,.dbo.vefn_FirstLink(text,0), PATINDEX('%[' + nchar(9516) + nchar(9574) + char(21) + ']%' , text) from Contents where ContentID=373
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,0,0)
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,1,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,1)
-*/
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveExtraText](@text nvarchar(MAX),@includeLink int, @includeRtfFormatting int , @includeSpecialCharacters int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-DECLARE @index2 int
--- Strip Links
-IF @includeLink = 0 -- Remove Links
- SET @text = [dbo].[vefn_RemoveRange](@text,'')
-IF @includeLink < 2 -- Remove Comments
- SET @text = [dbo].[vefn_RemoveRange](@text,'\v' ,'\v0')
-if(@includeRtfFormatting=0)
- -- Remove Rtf Formatting
- BEGIN
- SET @text = Replace(@text, '\b0 ', '');
- SET @text = Replace(@text, '\b ', '');
- SET @text = Replace(@text, '\ul0 ', '');
- SET @text = Replace(@text, '\ul ', '');
- SET @text = Replace(@text, '\i0 ', '');
- SET @text = Replace(@text, '\i ', '');
- SET @text = Replace(@text, '\super ', '');
- SET @text = Replace(@text, '\sub ', '');
- SET @text = Replace(@text, '\nosupersub ', '');
- SET @text = Replace(@text, '\b0', '');
- SET @text = Replace(@text, '\b', '');
- SET @text = Replace(@text, '\ul0', '');
- SET @text = Replace(@text, '\ul', '');
- SET @text = Replace(@text, '\i0', '');
- SET @text = Replace(@text, '\i', '');
- SET @text = Replace(@text, '\super', '');
- SET @text = Replace(@text, '\sub', '');
- SET @text = Replace(@text, '\nosupersub', '');
- END
-if(@includeSpecialCharacters=0)
- -- Remove Special Characters
- BEGIN
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+5,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+6,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+7,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- END
-
- END
-RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_RemoveRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveRange]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveRange];
-GO
-
-/*
-SELECT ContentID, text, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid in (select top 25 ContentID from contents where text like '%[[]END>%')
-
-select top 25 * from contents where text like '%[[]END>%'
-
-SELECT ContentID, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid =189
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveRange](@text nvarchar(MAX),@startToken nvarchar(MAX), @endToken nvarchar(MAX))
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @index int
- DECLARE @index2 int
- DECLARE @lenStartToken int
- DECLARE @lenEndToken int
- SET @lenStartToken = len(@startToken)
- SET @lenEndToken = len(@endToken)
- SET @index = CHARINDEX(@startToken , @text)
- while (@index != 0)
- BEGIN
- SET @index2 = CHARINDEX(@endToken , @text, @index + @lenStartToken)
- SET @text = substring(@text,1,@index-1) + substring(@text,@index2+@lenEndToken,len(@text))
- SET @index = CHARINDEX(@startToken , @text)
- END
- RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveRange Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SectionFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SectionFormats]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SectionFormats];
-GO
-
---select FormatID
---,10000 + v.value('../@Index', 'int') [SectionType]
---,[Name]
---,v.value('../@Name', 'varchar(255)') [SectionFormatName]
---,v.value('@TopRow', 'int') TopRow
---,v.value('@PageLength', 'int') PageLength
---,v.value('@FooterLength', 'int') FooterLength
---,v.value('@LeftMargin', 'int') LeftMargin
---,v.value('@PageWidth', 'int') PageWidth
---from Formats
---CROSS APPLY Data.nodes('//DocStyle/Layout') TempXML(v)
-
-/*
-
-select * from vefn_SectionFormats() where Name = 'OHLP'
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SectionFormats]()
-RETURNS @SectionFormats TABLE
-(
- [FormatID] int
- ,[SectionType] int
- ,[Name] nvarchar(20)
- ,[SectionFormatName] nvarchar(max)
- ,[TopRow] int
- ,[PageLength] int
- ,[FooterLength] int
- ,[LeftMargin] int
- ,[PageWidth] int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Insert into @SectionFormats
-select FormatID
-,10000 + v.value('../@Index', 'int') [SectionType]
-,[Name]
-,v.value('../@Name', 'varchar(255)') [SectionFormatName]
-,v.value('@TopRow', 'int') TopRow
-,v.value('@PageLength', 'int') PageLength
-,v.value('@FooterLength', 'int') FooterLength
-,v.value('@LeftMargin', 'int') LeftMargin
-,v.value('@PageWidth', 'int') PageWidth
-from Formats
-CROSS APPLY Data.nodes('//DocStyle/Layout') TempXML(v)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SectionFormats Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SectionFormats Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingAndChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingAndChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingAndChildrenItems];
-GO
-
-/*
-select * from vefn_SiblingAndChildrenItems('3') II
-join
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingAndChildrenItems](@DocVersionList varchar(MAX),@UnitPrefix varchar(MAX))
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ItemID], [DVPath], [Level], [ParentID], [Ordinal], [PreviousID], [FromType], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],PPath, [Path], [IsRNO], [POrdinalPath], [OrdinalPath]) as (
- Select [I].[ItemID], DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],
- Cast('' as nvarchar(max)) [PPath],
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) [Path],
- 0 IsRNO, Cast('' as nvarchar(max)) [POrdinalPath], Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select I.[ItemID], DVPath, [Level] + 1,Z.ItemID,0, I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text -- Procedure
- when 1 then @Delim + C.Number + @DelimNumber + C.Text -- Section
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select I.[ItemID], DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text -- Procedure
- when 1 then @Delim + C.Number + @DelimNumber + C.Text -- Section
- else case when Path like '%.%' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-
-)
-insert into @SiblingAndChildren
-select I.[ItemID], [DvPath], [Path], I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO]/*,[PPath],[POrdinalPath]*/,[OrdinalPath]
- from ItemZ I
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingChildrenItems](@ItemID int)
-RETURNS @SiblingChildren TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 as [pContentID],[DTS] As [pDTS], [UserID] As [pUserID], [LastChanged] As [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] as [pContentID],P.[DTS] As [pDTS],P.[UserID] As [pUserID],P.[LastChanged] As [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @SiblingChildren select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_SiblingItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingItems](@ItemID int, @ParentID int)
-RETURNS @Siblings TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @Siblings select ItemID, ContentID, Ordinal from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SplitInt] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SplitInt]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SplitInt];
-GO
-
---select * from DocVersions where VersionID in(select * from vefn_SplitInt('1,2,4',','))
---select Type, Count(*) from Contents where Type in(select * from vefn_SplitInt('20001,20002,20004',',')) group by Type
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SplitInt](@text varchar(MAX), @delimiter varchar(20) = ',')
-RETURNS @IDs TABLE
-(
- ID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-SET @index = -1
-WHILE (LEN(@text) > 0)
- BEGIN
- SET @index = CHARINDEX(@delimiter , @text)
- IF (@index = 0) AND (LEN(@text) > 0)
- BEGIN
- INSERT INTO @IDs VALUES (CAST(@text AS INT ))
- BREAK
- END
- IF (@index > 1)
- BEGIN
- INSERT INTO @IDs VALUES (CAST(LEFT(@text, @index - 1) AS INT))
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- END
- ELSE
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SplitInt Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SplitInt Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SplitROSearch] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SplitROSearch]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SplitROSearch];
-GO
-
-/*
-select * from vefn_SplitROSearch(null)
-select * from vefn_SplitROSearch('')
-select * from vefn_SplitROSearch('1')
-select * from vefn_SplitROSearch('1:0001')
-select * from vefn_SplitROSearch('1:0001000019C')
-select * from vefn_SplitROSearch('1:0001000019C,0001000019D')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SplitROSearch](@text varchar(MAX)='')
-RETURNS @ROIDSearch TABLE
-(
- RODBID int,
- ROID varchar(16)
- --,CONSTRAINT ROIDSearchPK PRIMARY KEY(RODBID, ROID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-IF(isnull(@text,'') = '')
-BEGIN
- Insert into @ROIDSearch
- Select RODBID, ''
- from RODbs
- RETURN
-END
-SET @index = CHARINDEX(':' , @text)
-DECLARE @RODBID int
-IF (@index = 0) AND (LEN(@text) > 0)
- BEGIN
- SET @RODBID = CAST(@text AS INT)
- INSERT INTO @ROIDSearch VALUES (@RODBID,'')
- SET @Text=''
- END
-ELSE
- BEGIN
- SET @RODBID = CAST(LEFT(@text, @index - 1) AS INT)
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- SET @index = -1
- END
-SET @text = RIGHT(@text, (LEN(@text) - @index))
-WHILE (LEN(@text) > 0)
- BEGIN
- SET @index = CHARINDEX(',' , @text)
- IF (@index = 0) AND (LEN(@text) > 0)
- BEGIN
- INSERT INTO @ROIDSearch VALUES (@RODBID,@text)
- BREAK
- END
- IF (@index > 1)
- BEGIN
- INSERT INTO @ROIDSearch VALUES (@RODBID,LEFT(@text, @index - 1))
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- END
- ELSE
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SplitROSearch Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SplitROSearch Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_XmlPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_XmlPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_XmlPath];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_XmlPath] (@xml XML) RETURNS varchar(255)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- return case when @xml.exist('*[1]') is null THEN '' ELSE @xml.value('local-name(*[1])','varchar(max)') +
- coalesce('[' + @xml.value('*[1]/@Type','varchar(255)')+']','[' + @xml.value('*[1]/@Index','varchar(255)')+']','') + '/' END
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_XmlPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_XmlPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_CleanUpItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CleanUpItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CleanUpItems];
-GO
-
-/*
-select *, .dbo.ve_GetParts(ContentID,6) SubSteps from items
-where contentid in(select contentid from contents where text like 'DISPATCH operator to open breaker%')
-
-
-select * from items
-where itemid in(298,299,436,440)
-
-select itemid from items
-where previousid is null and itemid not in (select itemid from parts)
-
---select * from contents where text like 'foldout cip%'
-
-select count(*) from parts
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_CleanUpItems]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- BEGIN
-with Itemz(ItemID) as(
-select itemid from items
-where previousid is null
-and itemid not in(1)
-and itemid not in (select itemid from parts)
-UNION ALL
-select ii.itemid from items ii join itemz zz on zz.itemid = ii.previousid
-)
-delete from items where itemid in (select itemid from itemz)
-OPTION (MAXRECURSION 10000)
- END
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_CleanUpItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_CleanUpItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatFields] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatFields]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatFields];
-GO
-
-/*
-vesp_GetFormatFields 'PrintNoTitle'
-vesp_GetFormatFields 'Sep'
-vesp_GetFormatFields 'TabFormat'
-vesp_GetFormatFields 'ShowSectionTitles'
-vesp_GetFormatFields 'Caution'
-vesp_GetFormatFields 'Ident'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatFields]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from vefn_GetFormatField(@find)
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,''Format Description'' Path,'''' Value, Description From Formats) T1 PIVOT ( Max(Description) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,''FormatID'' Path,'''' Value, FormatID From Formats) T1 PIVOT ( Max(FormatID) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,Path,Value From vefn_GetFormatField(''' + @find + ''')) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatFields Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatFields Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatFieldsAll] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatFieldsAll]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatFieldsAll];
-GO
-
-/*
-vesp_GetFormatFieldsAll 'PrintNoTitle'
-vesp_GetFormatFieldsAll 'Sep'
-vesp_GetFormatFieldsAll 'TabFormat'
-vesp_GetFormatFieldsAll 'ShowSectionTitles'
-vesp_GetFormatFieldsAll 'Caution'
-vesp_GetFormatFieldsAll 'Ident'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatFieldsAll]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from Formats
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,Path,Value From vefn_GetFormatField(''' + @find + ''')) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatFieldsAll Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatFieldsAll Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatFieldsByStepType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatFieldsByStepType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatFieldsByStepType];
-GO
-
-/*
-vesp_GetFormatFieldsByStepType 'PrintNoTitle'
-vesp_GetFormatFieldsByStepType 'Sep'
-vesp_GetFormatFieldsByStepType 'TabFormat'
-vesp_GetFormatFieldsByStepType 'ShowSectionTitles'
-vesp_GetFormatFieldsByStepType 'Caution'
-vesp_GetFormatFieldsByStepType 'Ident'
-vesp_GetFormatFieldsByStepType 'Off'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatFieldsByStepType]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from vefn_GetFormatField(@find)
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,''Format Description'' Path,'''' StepType, '''' Value, Description From Formats) T1 PIVOT ( Max(Description) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,''FormatID'' Path, '''' StepType,'''' Value, FormatID From Formats) T1 PIVOT ( Max(FormatID) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,Path,StepType,Value From vefn_GetFormatFieldByStepType(''' + @find + ''')) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH,StepType,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatFieldsByStepType Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatFieldsByStepType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatFieldsByStepType2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatFieldsByStepType2]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatFieldsByStepType2];
-GO
-
-/*
-vesp_GetFormatFieldsByStepType2 'PrintNoTitle'
-vesp_GetFormatFieldsByStepType2 'Sep'
-vesp_GetFormatFieldsByStepType2 'TabFormat'
-vesp_GetFormatFieldsByStepType2 'ShowSectionTitles'
-vesp_GetFormatFieldsByStepType2 'Caution'
-vesp_GetFormatFieldsByStepType2 'Ident'
-vesp_GetFormatFieldsByStepType2 'Off'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create PROCEDURE [dbo].[vesp_GetFormatFieldsByStepType2]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from vefn_GetFormatFieldByStepType2(@find)
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,''Format Description'' Path,'''' StepType, '''' Value, Description From Formats) T1 PIVOT ( Max(Description) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,''FormatID'' Path, '''' StepType,'''' Value, FormatID From Formats) T1 PIVOT ( Max(FormatID) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,Path,StepType,Value From vefn_GetFormatFieldByStepType2(''' + @find + ''')) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH,StepType,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatFieldsByStepType2 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatFieldsByStepType2 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatFieldsNoValue] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatFieldsNoValue]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatFieldsNoValue];
-GO
-
-/*
-vesp_GetFormatFieldsNoValue 'PrintNoTitle'
-vesp_GetFormatFieldsNoValue 'Sep'
-vesp_GetFormatFieldsNoValue 'TabFormat'
-vesp_GetFormatFieldsNoValue 'ShowSectionTitles'
-vesp_GetFormatFieldsNoValue 'Caution'
-vesp_GetFormatFieldsNoValue 'Ident'
-vesp_GetFormatFieldsNoValue 'Off'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatFieldsNoValue]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from vefn_GetFormatField(@find)
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,''Format Description'' Path, Description From Formats) T1 PIVOT ( Max(Description) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,''FormatID'' Path, FormatID From Formats) T1 PIVOT ( Max(FormatID) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,Path From vefn_GetFormatFieldNoValue(''' + @find + ''')) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatFieldsNoValue Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatFieldsNoValue Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatGroupFields] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatGroupFields]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatGroupFields];
-GO
-
-/*
-vesp_GetFormatGroupFields 'PrintNoTitle'
-vesp_GetFormatGroupFields 'Sep'
-vesp_GetFormatGroupFields 'TabFormat'
-vesp_GetFormatGroupFields 'ShowSectionTitles'
-vesp_GetFormatGroupFields 'Caution'
-vesp_GetFormatGroupFields 'Ident'
-vesp_GetFormatGroupFields 'SectionTitleLen'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatGroupFields]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + substring([Name],1,3) + ']' from vefn_GetFormatField(@find)
- order by ',[' + substring([Name],1,3) + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select substring([Name],1,3) FormatGroup,Path,Value From vefn_GetFormatField(''' + @find + ''')) T1 PIVOT ( Count(FormatGroup) FOR FormatGroup IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatGroupFields Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatGroupFields Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatGroupFieldsByStepType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatGroupFieldsByStepType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatGroupFieldsByStepType];
-GO
-
-/*
-vesp_GetFormatGroupFieldsByStepType 'PrintNoTitle'
-vesp_GetFormatGroupFieldsByStepType 'Sep'
-vesp_GetFormatGroupFieldsByStepType 'TabFormat'
-vesp_GetFormatGroupFieldsByStepType 'ShowSectionTitles'
-vesp_GetFormatGroupFieldsByStepType 'Caution'
-vesp_GetFormatGroupFieldsByStepType 'Ident'
-vesp_GetFormatGroupFieldsByStepType 'SectionTitleLen'
-vesp_GetFormatGroupFieldsByStepType 'Off'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatGroupFieldsByStepType]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + substring([Name],1,3) + ']' from vefn_GetFormatField(@find)
- order by ',[' + substring([Name],1,3) + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select substring([Name],1,3) FormatGroup,Path,StepType,Value From vefn_GetFormatFieldByStepType(''' + @find + ''')) T1 PIVOT ( Count(FormatGroup) FOR FormatGroup IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH, StepType,VALUE'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatGroupFieldsByStepType Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatGroupFieldsByStepType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatGroupFieldsNoValues] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatGroupFieldsNoValues]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetFormatGroupFieldsNoValues];
-GO
-
-/*
-vesp_GetFormatGroupFieldsNoValues 'PrintNoTitle'
-vesp_GetFormatGroupFieldsNoValues 'Sep'
-vesp_GetFormatGroupFieldsNoValues 'TabFormat'
-vesp_GetFormatGroupFieldsNoValues 'ShowSectionTitles'
-vesp_GetFormatGroupFieldsNoValues 'Caution'
-vesp_GetFormatGroupFieldsNoValues 'Ident'
-vesp_GetFormatGroupFieldsNoValues 'SectionTitleLen'
-vesp_GetFormatGroupFieldsNoValues 'Off'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetFormatGroupFieldsNoValues]
-(
- @find varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + substring([Name],1,3) + ']' from vefn_GetFormatFieldNoValue(@find)
- order by ',[' + substring([Name],1,3) + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select substring([Name],1,3) FormatGroup,Path From vefn_GetFormatFieldNoValue(''' + @find + ''')) T1 PIVOT ( Count(FormatGroup) FOR FormatGroup IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY PATH'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatGroupFieldsNoValues Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatGroupFieldsNoValues Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetGenMacMacros] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetGenMacMacros]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetGenMacMacros];
-GO
-
-/*
-vesp_GetGenMacMacros
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetGenMacMacros]
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @pivotlist varchar(max)
- select @pivotlist = stuff((select distinct ',[' + [Name] + ']' from vefn_GetGenMacMacros()
- order by ',[' + [Name] + ']' for xml path('')),1,1,'')
- DECLARE @query VARCHAR(max)
- SET @query = 'SELECT * FROM (Select Name,''Format Description'' Path, Description From Formats) T1 PIVOT ( Max(Description) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,''FormatID'' Path, FormatID From Formats) T1 PIVOT ( Max(FormatID) FOR [Name] IN (' + @pivotlist + ') ) As Pivot2'
- EXECUTE(@query)
- SET @query = 'SELECT * FROM (Select Name,MacroName From vefn_GetGenMacMacros()) T1 PIVOT ( Count(Name) FOR [Name] IN (' + @pivotlist + ') ) AS Pivot1 ORDER BY MacroName'
- print @Query
- EXECUTE(@query)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetGenMacMacros Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetGenMacMacros Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListChildren];
-GO
-
--- vesp_ListChildren 17
--- drop procedure [getItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentPath]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListContentPath];
-GO
-
--- vesp_ListContentPath 148
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[vesp_ListContentPath]
- (
- @ContentID int
- )
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with ContentZ(BaseID,ContentID,ItemID,Number,Text,Item,Level,PreviousID) as (
- Select II.ItemID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,1,II.PreviousID
- from Items II join Contents CC on CC.ContentID=II.ContentID where @ContentID=II.ContentID
- Union All
---
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,ZZ.Item+1,ZZ.Level,II.PreviousID
- FROM ContentZ ZZ
- Join Items II on II.ItemID = ZZ.PreviousID
- Join Contents CC on II.ContentID = CC.ContentID
- where ZZ.PreviousID is not null
- Union All
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,ZZ.Level+1,II.PreviousID
- FROM ContentZ ZZ
- Join Parts PP on ZZ.ItemID = PP.ItemID
- Join Contents CC on PP.ContentID = CC.ContentID
- Join Items II on II.ContentID = CC.ContentID
- where ZZ.PreviousID is null --and ZZ.ItemID in(717,715,711,662)
-)
-Select ZZ.BaseID,ZZ.Level,MaxItem,ZZ.Number,ZZ.Text from ContentZ ZZ
-join (select BaseID, Level, max(item) MaxItem from ContentZ group by BaseID,Level) T1 on T1.BaseID=ZZ.BaseID and T1.Level = ZZ.Level
-where Item=1
-order by ZZ.BaseID,ZZ.Level Desc, Item Desc
-OPTION (MAXRECURSION 10000)
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentPath Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListContentsByItemID];
-GO
-
---vesp_ListContentsByItemID 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListContentsByItemID]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select C.ItemID,C.PreviousID,C.ContentID,C.[DTS],C.[UserID],C.[LastChanged]
- from Items C
- Join Itemz Z on C.PreviousID=Z.ItemID
-)
- SELECT
- cc.[ContentID],
- cc.[Number],
- cc.[Text],
- cc.[Type],
- cc.[FormatID],
- cc.[Config],
- cc.[DTS],
- cc.[UserID],
- cc.[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=cc.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=cc.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=cc.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=cc.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=cc.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=cc.[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=cc.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=cc.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=cc.[ContentID]) [ZContentCount]
- FROM [Contents] cc
- join itemz zz on cc.contentid=zz.contentid
-OPTION (MAXRECURSION 1000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemAndChildren];
-GO
-
--- vesp_ListItemAndChildren 1,0
--- drop procedure [vesp_ListItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemAndChildren] (@ItemID int, @ParentID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItems];
-GO
-
---vesp_ListItems 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItems]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select C.ItemID,C.PreviousID,C.ContentID,C.[DTS],C.[UserID],C.[LastChanged]
- from Items C
- Join Itemz Z on C.PreviousID=Z.ItemID
-)
-Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Itemz].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Itemz].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[Itemz].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Itemz].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Itemz].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Itemz].[ItemID]) [Transition_ToIDCount]
-from Itemz
-OPTION (MAXRECURSION 1000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemsAndContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsAndContent];
-GO
-
---vesp_ListItemsAndContent 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsAndContent]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged]
- from Items I
- Join Itemz Z on I.PreviousID=Z.ItemID
-)
-Select I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz I Join Contents C on I.ContentID = C.ContentID
-OPTION (MAXRECURSION 1000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsAndContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListTables] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListTables]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListTables];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[vesp_ListTables]
-WITH EXECUTE AS OWNER
-AS
-begin
-select o.name TableName,c.name ColumnName,
-case c.xtype
- when 56 then 'int'
- when 231 then 'nvarchar(' + case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end + ')'
- when 165 then 'varbinary(' + case c.length when -1 then 'Max' else cast(c.length as varchar(10)) end + ')'
- when 239 then 'nchar(' + case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end + ')'
- when 175 then 'char(' + case c.length when -1 then 'Max' else cast(c.length as varchar(10)) end + ')'
- when 61 then 'datetime'
- when 104 then 'bit'
- when 48 then 'TinyInt'
- when 189 then 'timestamp'
- else '???' + cast(c.xtype as varchar(10)) end ItemType,
- case when c.isnullable=1 then 'Yes' else '' end AllowNulls,
- case when c.colstat=1 then 'Identity' else dc.definition end DefaultValue
-from sysobjects o
-join syscolumns c on o.id=c.id
-left join sysconstraints cn on o.id=cn.id and c.colid=cn.colid
-left join sys.default_constraints dc on dc.object_id = cn.constid
-where o.xtype='U'
-order by o.name,c.colid
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListTables Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListTables Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListTables2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListTables2]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListTables2];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[vesp_ListTables2]
-WITH EXECUTE AS OWNER
-AS
-begin
-select o.name TableName,c.name ColumnName,
-case c.xtype
- when 56 then 'int'
- when 231 then 'nvarchar'
- when 165 then 'varbinary'
- when 239 then 'nchar'
- when 175 then 'char'
- when 61 then 'datetime'
- when 104 then 'bit'
- when 48 then 'TinyInt'
- when 189 then 'timestamp'
- else '???' + cast(c.xtype as varchar(10)) end ItemType,
-case c.xtype
- when 56 then '0'
- when 231 then case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end
- when 165 then case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end
- when 239 then case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end
- when 175 then case c.length when -1 then 'Max' else cast(c.length/2 as varchar(10)) end
- when 61 then '0'
- when 104 then '0'
- when 48 then '0'
- when 189 then '0'
- else '0' end ItemSize,
-
- case when c.isnullable=1 then 'Yes' else '' end AllowNulls,
- case when c.colstat=1 then 'Identity' else dc.definition end DefaultValue
-from sysobjects o
-join syscolumns c on o.id=c.id
-left join sysconstraints cn on o.id=cn.id and c.colid=cn.colid
-left join sys.default_constraints dc on dc.object_id = cn.constid
-where o.xtype='U'
-order by o.name,c.colid
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListTables2 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListTables2 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListTables3] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListTables3]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListTables3];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_ListTables3]
-WITH EXECUTE AS OWNER
-AS
-begin
-select o.name TableName,c.name ColumnName,
-case c.system_type_id
- when 56 then 'int'
- when 231 then 'nvarchar'
- when 165 then 'varbinary'
- when 167 then 'varchar'
- when 239 then 'nchar'
- when 175 then 'char'
- when 61 then 'datetime'
- when 104 then 'bit'
- when 48 then 'TinyInt'
- when 189 then 'timestamp'
- else '???' + cast(c.system_type_id as varchar(10)) end ItemType,
-case c.system_type_id
- when 56 then '0'
- when 231 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 165 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 167 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 239 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 175 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 61 then '0'
- when 104 then '0'
- when 48 then '0'
- when 189 then '0'
- else '0' end ItemSize,
-
- case when c.is_nullable=1 then 'Yes' else '' end AllowNulls,
- case when c.is_identity=1 then 'Identity' else dc.definition end DefaultValue,
- x.value Description
-from sys.objects o
-join sys.columns c on o.object_id=c.object_id
-left join sysconstraints cn on o.object_id=cn.id and c.column_id=cn.colid
-left join sys.default_constraints dc on dc.object_id = cn.constid
-left join sys.extended_properties x on x.major_id = o.OBJECT_ID AND x.minor_id=c.column_id AND x.Name='MS_Description'
-where o.type='U'
-order by o.name,c.column_id
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListTables3 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListTables3 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ResetFolderManualOrder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetFolderManualOrder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetFolderManualOrder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetFolderManualOrder]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-update fld
- set Fld.ManualOrder =Fld.MyRow
-from (Select ROW_NUMBER() OVER(Partition by ParentID Order BY FolderID) MyRow,* from folders ) fld
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchAnnotationItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchAnnotationItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SearchAnnotationItemAndChildren];
-GO
-
-/*
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'1',Null,0,"3-"
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'2',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'3',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'4',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'5',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'',Null,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchAnnotationItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @AnnotationTypeList varchar(MAX), @SearchString nvarchar(MAX), @CaseSensitive as int, @UnitPrefix nvarchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else case when Path like '%.%' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],AnnotationID SearchAnnotationID, SearchText, TT.Name AnnotationType,
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- join Annotations A on A.ItemID = I.ItemID
- join vefn_AnnotationTypeSplit(@AnnotationTypeList) TT on TT.TypeID=A.TypeID
-where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CI_AS))
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SearchItemAndChildren];
-GO
-
-/*
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildren '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildren '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildren '','','RCP',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%',0,0,0,0
-exec vesp_SearchItemAndChildren '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildren '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildren '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildren '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildren '','','turbine-driven',0,0,0,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else case when Path like '%.%' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- OR (@CaseSensitive = 1 AND D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- )
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchItemAndChildrenNew] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildrenNew]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SearchItemAndChildrenNew];
-GO
-
-/*
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '1','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildrenNew '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(Resolved Transition Text)',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%turbine-driven%',0,0,0,0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildrenNew] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-select ZZ.DvPath, ZZ.Path, ZZ.[Level],ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,II.[LastChanged]
- ,CC.[Number],CC.[Text],CC.[Type],CC.[FormatID],CC.[Config],CC.[DTS] [cDTS],CC.[UserID] [cUserID]
- ,CC.[LastChanged] [cLastChanged],
- PP.[ContentID] [pContentID], PP.[DTS] [pDTS],PP.[UserID] [pUserID], PP.[LastChanged] [pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=CC.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=CC.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=CC.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=CC.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=CC.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=CC.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=CC.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=CC.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=CC.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItems(@DocVersionList, @UnitPrefix) ZZ
- Join Items II on ZZ.ItemID=II.ItemID
- Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- Join Contents CC on CC.ContentID=ZZ.ContentID
-where ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
- order by DvPath,OrdinalPath
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchROItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchROItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SearchROItemAndChildren];
-GO
-
-/*
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:00010000019C,0001000002AE'
-exec vesp_SearchROItemAndChildren '1,2,4','','1:00010000019C,0001000002AE'
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:0001'
-exec vesp_SearchROItemAndChildren '1,2,4','20006','1'
-exec vesp_SearchROItemAndChildren '1,2,4','20006',''
-exec vesp_SearchROItemAndChildren '1,2,4',Null,Null
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchROItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @ROSearchString varchar(MAX), @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath
-
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- --Path + case when Z.FromType < 3 then @Delim else @DelimStep end + case C.Type/10000
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + @UnitPrefix + C.Number + @DelimNumber + C.Text
- else case when Path like '%.%' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- I.ContentID in(select ContentID from ROUsages RU
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- RU.ROID like RR.ROID + '%' Collate SQL_Latin1_General_CP1_CI_AS
-UNION
-select Distinct ContentID from Entries EE
- Join DROUsages RU on RU.DocID = EE.DocID
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- RU.ROID = RR.ROID)
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFrom]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFrom];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFrom] Script Date: 10/03/2012 10:06:38 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFrom]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=I.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=I.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=I.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=I.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=I.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=I.[ItemID]) [Transition_ToIDCount]
-from Items I
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFrom Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFrom Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranTo]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranTo];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranTo] Script Date: 10/03/2012 10:08:03 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranTo]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=Z.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=Z.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=Z.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=Z.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=Z.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=Z.[ItemID]) [Transition_ToIDCount]
-from Itemz Z join Items I on I.ItemID = Z.ItemID
-OPTION (MAXRECURSION 1000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranTo Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranTo Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFromAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFromAndContent];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFromAndContent] Script Date: 10/03/2012 10:52:31 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFromAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Items I Join Contents C on I.ContentID = C.ContentID
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranToAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranToAndContent];
-GO
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranToAndContent] Script Date: 10/03/2012 10:08:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranToAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz Z
-Join Items I on Z.ItemID = I.ItemID
-Join Contents C on I.ContentID = C.ContentID
-OPTION (MAXRECURSION 1000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_TurnChangeManagerOFF] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerOFF]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerOFF];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerOFF] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerOFF
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerOFF] WITH EXECUTE AS OWNER AS
-BEGIN
- PRINT 'NOTHING TO DO'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_TurnChangeManagerON] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerON]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerON];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerON] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerON
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerON] WITH EXECUTE AS OWNER AS
-BEGIN
- PRINT 'NOTHING TO DO'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerON Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerON Error on Creation'
-GO
diff --git a/PROMS/DataLoader/PROMSApproveApprove.sql b/PROMS/DataLoader/PROMSApproveApprove.sql
deleted file mode 100644
index 69e39ebb..00000000
Binary files a/PROMS/DataLoader/PROMSApproveApprove.sql and /dev/null differ
diff --git a/PROMS/DataLoader/PROMSFixes.Sql b/PROMS/DataLoader/PROMSFixes.Sql
deleted file mode 100644
index dc4a33b0..00000000
--- a/PROMS/DataLoader/PROMSFixes.Sql
+++ /dev/null
@@ -1,21997 +0,0 @@
-
-
-Set NoCount On;
-
-If (db_name() in('master','model','msdn','tempdb'))
-begin
- DECLARE @ErrorMsg varchar(255)
- SET @ErrorMsg = 'Don''t add these procedures and functions to ' + db_name()
- PRINT '=========================================================================='
- PRINT ''
- PRINT @ErrorMsg
- PRINT ''
- PRINT 'You probably want to be in the VEPROMS database'
- PRINT ''
- PRINT '=========================================================================='
- RAISERROR (@ErrorMsg, 20, -1) with log
- RETURN
-end
-print 'Adding procedures and functions to ' + db_name()
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemReplace]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemReplace];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemReplace] Script Date: 03/20/2012 16:02:54 ******/
-/*
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteItemReplace 398,397,20014,@dts,'bodine',@NewItemID output
-*/
--- ItemID is item to replace
--- StartItemID is item to copy
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemReplace]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
-
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First check if the replaced item can be deleted, i.e. it doesn't have transitions
- -- pointing to it or children.
-
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- DECLARE @DeleteID int
- INSERT INTO DeleteLog (UserID) VALUES (@UserID)
- SELECT @DeleteID = SCOPE_IDENTITY()
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- --SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID)
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- --IF @ExternalCount > 0 AND @NextItemID is null
- --BEGIN
- -- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- -- RETURN
- --END
-
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- -- Copy the item, 'NewItemID' represents the new item(s)
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
-
- -- Adjust the next/previous to point to the new item
-
- DECLARE @PreviousID int
- SELECT @PreviousID = [PreviousID]
- FROM [ITEMS] II
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [PreviousID]=@ItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
-
- -- UPDATE DocVersion if this was a procedure
- UPDATE DocVersions SET ItemID=@NewItemID where ItemID = @ItemID
-
- -- If there were 'external transitions' that pointed to the original
- -- top replaced step, adjust them to point to the new top.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @ExternalTrans) > 0
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NewItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NewItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
-
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that pointed to top step
- -- and need to point to
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Replaced Step Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
-
- END
- -- Remove the old one
-
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
---delete from itemaudits where itemid = @newitemid
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
---delete from contentaudits where contentid = (select contentid from items where itemid = @newitemid)
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- DELETE from DeleteLog where DeleteID = @DeleteID
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemReplace Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemReplace Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChronologyReport]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChronologyReport];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from vefn_chronologyreport(2) where type > 0 order by contentid,auditid
-*/
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 05/18/2011 11:20:48 ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_ChronologyReport](@ProcItemID int, @DTS datetime)
-returns @Report table
-(
-src int,
-AuditID bigint,
-ContentID int,
-Number nvarchar(512),
-Text nvarchar(max),
-Type int,
-FormatID int,
-Config nvarchar(max),
-DTS datetime,
-UserID nvarchar(200),
-DeleteStatus int,
-ActionDTS datetime,
-ItemDTS datetime,
-LastAuditID int,
-DeletedAuditID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
---added rhm/jcb 20121218i
-declare @tmpTable table
-(
- icontentid int primary key
-)
-insert into @tmpTable select icontentid from vefn_tblchilditems(@ProcItemID,@ProcItemID,1)
---added jcb 20111122
---declare @dts datetime
---set @dts = (select dts from items where itemid = @ProcItemID )
---set @dts = (SELECT .[dbo].[vefn_GetPreviousRevisionDTSByItemID] (@ProcItemID))
---end added jcb 20111122
- insert into @Report
- SELECT
-1 src,
- [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- where Number is not null
---added jcb 20111028_1827
-and ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > @dts)
---and ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.dts > @dts
---end added jcb 20111122
--- UNION
--- SELECT
---2 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
----- (select max(auditid) + 1 from contentaudits) [AuditID]
----- 0 [AuditID]
--- ,ca.[ContentID]
--- ,[Number]
--- ,[Text]
--- ,[Type]
--- ,[FormatID]
--- ,[Config]
--- ,ca.[DTS] cadts
--- ,ca.[UserID]
--- ,ca.[DeleteStatus]
--- ,ActionDTS
--- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
--- FROM tblContents ca
----- inner join tblitems ti on ca.contentid = ti.contentid
---WHERE ca.DeleteStatus = 0 AND
-----added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) and
-----end added jcb 20111028_1827
-----ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-----added jcb 20111122
-----ca.ContentID in (SELECT [ContentID] FROM Contents where dts > (select dts from items where itemid = @ProcItemID ))
---ca.ContentID in (SELECT [ContentID] FROM Contents where dts > @dts)
-----end added jcb 20111122
-----order by ca.DTS,ActionDTS
- UNION
- SELECT
-3 src,
- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
--- 0 [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM tblContents ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus = 0 AND
---added jcb 20111028_1827
-ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
- UNION
- SELECT distinct
-5 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
- ca.[AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus > 0
---added jcb 20111028_1827
- --ca.contentid != (select contentid from items where itemid = @procitemid) and
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.contentid in (select icontentid from @tmpTable)
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
-order by ca.DTS,ActionDTS
-
- insert into @Report
- SELECT
-4 src,
- ca.[AuditID]
- ,ca.[ContentID]
- ,ca.[Number]
- ,ca.[Text]
- ,ca.[Type]
- ,ca.[FormatID]
- ,ca.[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ca.ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- inner join @Report rpt on ca.contentid = rpt.contentid and ca.auditid = rpt.lastauditid
-where ca.auditid not in (select auditid from @report)
-and rpt.lastauditid is not null
-and ca.contentid in (select icontentid from @tmpTable)
- return
-end
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ChronologyReport Succeeded'
-ELSE PRINT 'Function: vefn_ChronologyReport Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingAfter]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemSiblingAfter];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemSiblingAfter] Script Date: 03/21/2012 15:25:31 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingAfter]
-(
- @ItemID int=null, @StartItemID int=null, -- ItemID is destination, StartItemID is top of copy
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- Adjust previous field
- DECLARE @NextID int
- SELECT @NextID = [ItemID]
- FROM [ITEMS]
- WHERE [PreviousID]=@ItemID
- IF @NextID is not null -- step after the copy point. Adjust it's previous to point to the new step
- BEGIN
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID, [DTS]=@DTS, [UserID]=@UserID where [ItemID]=@NextID
- END
- UPDATE [ITEMS] SET [PreviousID]=@ItemID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
-
-
- -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@NextID,@ItemID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @NextID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @NextID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@NextID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Next Step Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@newItemID) OR RangeID IN(@newItemID))
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@NextID) OR RangeID IN(@NextID))
- -- Transition Text gets updated in ItemInsertExt.cs
-
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingAfter Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingAfter Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingBefore]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [PasteItemSiblingBefore];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemSiblingBefore] Script Date: 03/21/2012 15:26:23 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingBefore]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input CopyStartID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- First adjust previous fields, may also have to do parts, if before first one in list.
- DECLARE @PreviousID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @PreviousID = [PreviousID], @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II
- JOIN [CONTENTS] CC ON CC.[ContentID]=II.[CONTENTID]
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [DOCVERSIONS] SET [ItemID] = @NewItemID where [ItemID]=@ItemID
-
- IF @PreviousID is null -- The step is replacing the first step
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ItemID OR TT.RangeID = @ItemID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ItemID THEN @NewItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ItemID THEN @NewItemID ELSE RangeID END
- WHERE ToID = @ItemID OR RangeID = @ItemID
- END
- ELSE -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@ItemID,@PreviousID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @ItemID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @ItemID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ItemID,@NewItemID) OR RangeID IN(@ItemID,@NewItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingBefore Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingBefore Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetMyChronology]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetMyChronology];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetMyChronology] Script Date: 11/07/2012 18:09:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetMyChronology](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int, @DTS datetime)
-RETURNS @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-insert into @Chrono
-select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
- from
- (
- select
- case
- when lastauditid is null then 'Added'
- when r.deletestatus > 0 then 'Deleted'
- when lastauditid = -1 then 'Changed'
- when DeletedAuditID is not null then 'Restored'
--- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end actionwhat
-,actiondts actionwhen
--- ,case
--- when lastauditid is null then dts
--- when r.deletestatus > 0 then ActionDTS
--- when lastauditid = -1 then dts
--- when DeletedAuditID is not null then ActionDTS
--- else dts
--- end actionwhen
-,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
- ,*
- from vefn_tblchilditems (@ProcItemID,@ItemID,@IncludeDeletedChildren) t
- inner join vefn_chronologyreport(@ProcItemID,@DTS) r
- on t.icontentid = r.contentid
--- where ActionDTS > procdts or dts > procdts
- ) ah
- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-END
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetMyChronology] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetMyChronology] Error on Creation'
-go
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsChronologyByItemID] Script Date: 03/21/2012 15:58:26 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getContentAuditsChronologyByItemID];
-GO
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemID] ******/
-/*
-getContentAuditsChronologyByItemID 10154,10154,0
-getContentAuditsChronologyByItemID 42,42,0
-getContentAuditsChronologyByItemID 9,9,0
-getContentAuditsChronologyByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Succeeded'
-ELSE PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Error on Creation'
-go
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsSummaryByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsSummaryByItemID];
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-/*
-getContentAuditsSummaryByItemID 146,146,0
-getContentAuditsSummaryByItemID 42,42,0
-getContentAuditsSummaryByItemID 9,9,0
-getContentAuditsSummaryByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsSummaryByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-insert into @Chrono
-select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
-select * from @Chrono
-where AuditID is null OR AuditID in (select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid)
-order by OrdinalPath, contentid,auditid
---select z.* from
---(
---select contentid,min(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---union
---select z.* from
---(
---select contentid,max(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixSearchString]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixSearchString];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_FixSearchString] Script Date: 03/26/2012 09:31:13 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select ID,ss,.dbo.vefn_FixSearchString(ss)
-from (
-select 1 ID,'*' ss union
-select 2 ID,'50%' ss union
-select 3 ID,'IF*' ss union
-select 4 ID,'*then:' ss union
-select 5 ID,'530`F' ss union
-select 6 ID,'check' ss union
-select 7 ID,'RCP*Cooling' ss union
-select 8 ID,'14%[34%]' ss union
-select 9 ID,'\*' ss union
-select 10 ID,'\?' ss union
-select 11 ID,'_' ss union
-select 12 ID,'[' ss union
-select 13 ID,']' ss union
-select 14 ID,'%' ss union
-select 15 ID,'_' ss union
-select 16 ID,'-' ss union
-select 17 ID,'%' ss union
-select 18 ID,'C* - *' ss union
-select 19 ID,'' ss union
-select 20 ID,null ss
-) tt order by ID
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixSearchString](@SearchString nvarchar(MAX))
-RETURNS nvarchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- This code adds % at the beginning and end if the beginning and end
- -- of the search string if it does not have % at the beginning or end
- Set @SearchString = replace(@SearchString,'[','[[]')
- Set @SearchString = replace(@SearchString,'_','[_]')
- Set @SearchString = replace(@SearchString,'%','[%]')
- Set @SearchString = replace(@SearchString,'*','%')
- Set @SearchString = replace(@SearchString,'?','_')
- Set @SearchString = replace(@SearchString,'\%','*')
- Set @SearchString = replace(@SearchString,'\_','?')
- Set @SearchString = replace(@SearchString,'-','\u8209?')
- Set @SearchString = replace(@SearchString,'\''A9','\u169?') -- copyright symbol
- Set @SearchString = replace(@SearchString,'\''AE','\u174?') -- Register symbol
- Set @SearchString = replace(@SearchString,'\\line ','\line ') -- newline
- Set @SearchString = replace(@SearchString,'\\','\u9586?') -- use a double backslash to search for a backslash
- IF(@SearchString like '[%]%') RETURN @SearchString
- IF(@SearchString like '%[%]') RETURN @SearchString
- Set @SearchString = replace('%' + @SearchString + '%','%%','%')
- RETURN @SearchString
-END
-GO
--- Display the status
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_FixSearchString] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_FixSearchString] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreDeletedItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [restoreDeletedItem];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-restoreDeletedItem 10133,1,10130,2
-select dbo.ve_GetPartContentID(10133)
-select dbo.ve_GetPartFromType(10133)
-select itemid from parts where contentid = 10126 and fromtype = 6
-SELECT ItemID FROM PartAudits WHERE DeleteStatus = 1
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreDeletedItem]
-(
- @ItemID int,
- @DeleteID int,
- @CurrentID int,
- @Level int
-)
-
-WITH EXECUTE AS OWNER
-AS
- DECLARE @PreviousID int
- declare @oldPreviousID int
- DECLARE @NextID int
- DECLARE @ContentID int
- declare @fromtype int
- IF @Level = 0 BEGIN
- SET @NextID = @CurrentID
- SELECT @PreviousID = PreviousID FROM Items WHERE ItemID = @CurrentID
- END
- IF @Level = 1 BEGIN
- SELECT @NextID = ItemID FROM Items WHERE PreviousID = @CurrentID
- SET @PreviousID = @CurrentID
- END
- SELECT @ContentID = dbo.[ve_GetPartContentID](@ItemID)
- select @fromtype = dbo.[ve_GetPartFromType](@ItemID)
- select @oldPreviousID = isnull(PreviousID,0) from tblItems where ItemID = @ItemID
- if @level = 2 begin
- select @NextID = itemid from parts where contentid = @contentid and fromtype = @fromtype
- end
- --restore parts from step being restored
- UPDATE tblParts SET DeleteStatus = 0 WHERE ItemID IN (SELECT ItemID FROM PartAudits WHERE DeleteStatus = @DeleteID)
---print 'oldpreviousid: ' + cast(@oldpreviousid as varchar(10))
---print 'currentid: ' + cast(@currentid as varchar(10))
- --restore of children in different order
- if(@oldPreviousID != @CurrentID and @Level = 2) begin
- update tblparts set deletestatus = 0, itemid = @itemid where contentid = @contentid and fromtype = @fromtype
---print 'special code'
- end
- UPDATE tblContents SET DeleteStatus = 0, ActionDTS = getdate() WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblItems SET DeleteStatus = 0,PreviousID = CASE WHEN ItemID = @ItemID THEN @PreviousID ELSE PreviousID END
- WHERE ItemID IN (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblGrids SET DeleteStatus = 0 WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblImages SET DeleteStatus = 0 WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblEntries SET DeleteStatus = 0 WHERE DocID IN (SELECT DocID FROM EntryAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblAnnotations SET DeleteStatus = 0, ActionDTS = getdate() WHERE deletestatus = @deleteid -- ItemID in (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblROUsages SET DeleteStatus = 0 WHERE deletestatus = @deleteid --ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblTransitions SET DeleteStatus = 0 WHERE deletestatus = @deleteid --FromID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- IF @NextID IS NOT NULL BEGIN
- UPDATE Items SET PreviousID = @ItemID WHERE ItemID = @NextID
- UPDATE DocVersions SET ItemID = @ItemID WHERE ItemID = @NextID
- IF @ContentID IS NOT NULL BEGIN
- UPDATE Parts SET ItemID = @ItemID WHERE ItemID = @NextID and ContentID = @ContentID
---print 'old code'
- END
- END
---else
--- begin
---update parts set itemid = @itemid where contentid = @contentid and fromtype = @fromtype
--- end
-RETURN
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreDeletedItem Succeeded'
-ELSE PRINT 'Procedure Creation: restoreDeletedItem Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetLastDelim] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetLastDelim]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetLastDelim];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select .dbo.vefn_GetLastDelim(bozo) delim,bozo
-from
-(
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using Backfill' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1.RNO..1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1.RNO..1.3' bozo
-) ah
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetLastDelim](@SearchString nvarchar(MAX))
-RETURNS nvarchar(1)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @patstr nvarchar(7)
- set @patstr = '%[' + char(7) + char(17) + '.]%'
- declare @patidx bigint
- set @patidx = patindex(@patstr,Reverse(@SearchString))
- if @patidx = 0 return ' '
- return substring(@SearchString,1 + len(@SearchString) - @patidx,1)
-END
-GO
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetLastDelim] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetLastDelim] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_tblChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_tblChildItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 03/28/2012 17:43:20 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_tblChildItems](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @path nvarchar(max)
- declare @ppath nvarchar(max)
- declare @ordinalpath nvarchar(max)
- declare @pordinalpath nvarchar(max)
- declare @ordinal int
- declare @pitemid int
- select @path = path,@ordinalpath = ordinalpath,@ordinal = ordinal,@pitemid = parentid from vefn_ProcedureByProcID(@ProcItemID) where itemid = @ItemID
- if @pitemid = 0 begin
- set @pordinalpath = ''
- set @ppath = ''
- end
- else begin
- select @ppath = path,@pordinalpath = ordinalpath from vefn_ProcedureByProcID(@ProcItemID) where itemid = @pitemID
- end
- declare @procdts datetime
- select @procdts = dts from items where itemid = @ProcItemID
- Declare @Delim char(1)
- Set @Delim=char(7)
- Declare @DelimNumber char(1)
- Set @DelimNumber=char(17)
- Declare @DelimStep char(1)
- Set @DelimStep='.'
- begin
- with Itemz([Level], [ItemID], [ContentID], DeleteStatus, ProcDTS, PPath, [Path], [POrdinalPath], [OrdinalPath], [FromType], [Ordinal]) as (
- Select 0 [Level], [ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- @ppath [PPath],
- @path [Path],
- @pordinalpath [POrdinalPath],
- @ordinalpath [OrdinalPath],
- 0 [FromType],@ordinal [Ordinal]
- FROM [tblItems] I
- --inner join tblContents C on C.ContentID=I.ContentID
- where I.[ItemID]=@ItemID
- Union All
- -- Children
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(4))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
- P.[FromType],0
- from Itemz Z
- join tblParts P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID
- inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus = 0
- Union All
- -- Children2
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(4))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
- P.[FromType],0
- from Itemz Z
- join PartAudits P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID and i.PreviousID is null
- inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus >= 0
- -- Siblings
- Union All
- select [Level] , I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(Ordinal + 2 as varchar(4))
- end Path,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5),
- FromType,Z.[Ordinal] +1
- from Itemz Z
- join tblItems I on I.PreviousID = Z.ItemID
- inner join tblContents C on C.ContentID=I.ContentID
- where Z.[Level] > 0
- )
- insert into @Children select distinct ItemID, ContentID, DeleteStatus, ProcDTS, Path, OrdinalPath from Itemz
- OPTION (MAXRECURSION 10000)
- END
- RETURN
-end
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_tblChildItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_tblChildItems] Error on Creation'
-go
-
-/****** Object: StoredProcedure [dbo].[getAnnotationAuditsChronologyByItemID] Script Date: 04/02/2012 15:57:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getAnnotationAuditsChronologyByItemID];
-GO
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemID] ******/
-/*
-getAnnotationAuditsChronologyByItemID 13,13
-getAnnotationAuditsChronologyByItemID 30,8570
-getAnnotationAuditsChronologyByItemID 30,8513
-getAnnotationAuditsChronologyByItemID 30,8505
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[getAnnotationAuditsChronologyByItemID]
-(
- @ProcItemID int,
- @ItemID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from @tci)
- and dts > @dts
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Error on Creation'
-GO
-
-
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[ve_GetFolderPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [dbo].[ve_GetFolderPath];
-
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Rich Mark
- Create Date: 01/01/2012
- Description: Returns the Folder Path for a specified Document Version using recursion
- 08/20/2021 Jake Ropar: Reformatted and added With Execute as Owner statement
-
- Parameters: @VersionID Document Version ID
-
- Examples: Select VersionID,Name,dbo.ve_GetFolderPath(VersionID) from DocVersions order by VersionID;
-==========================================================================================================
- */
-Create Function [dbo].[ve_GetFolderPath] (@VersionID int)
-Returns VarChar(Max)
-With Execute as Owner
-as
-Begin
-
- Declare @Path VarChar(Max);
-
- With zFolders ([Level], FolderID, [Path])
- as (
-
- Select 1 as 'Level',
- dv.FolderID as 'FolderID',
- Cast(dv.[Name] as VarChar(Max)) as 'Path'
- From DocVersions dv with (NoLock)
- Where dv.VersionID = @VersionID
-
- Union All
-
- Select f.ParentID - (Select ParentID from Folders where FolderID = f.ParentID) as 'Level',
- f.ParentID as 'FolderID',
- Cast(f.[Name] + char(7) + zf.[Path] as VarChar(Max)) as 'Path'
- From Folders f with (NoLock)
- inner join zFolders zf on f.FolderID = zf.FolderID
- Where f.FolderID <> f.ParentID
-
- )
- Select @Path = zf.[Path]
- From zFolders zf
- Where zf.[Level] = 0;
-
- return @Path;
-
-End
-Go
-
-
-IF (@@Error = 0) PRINT 'Function: [vefn_GetUnitPrefix] Succeeded'
-ELSE PRINT 'Function: [vefn_GetUnitPrefix] Error on Creation'
-GO
-
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vefn_GetUnitPrefix]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [dbo].[vefn_GetUnitPrefix];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Rich Mark
- Create Date: 01/01/2012
- Description: Returns the Unit Prefix from the specified Xml Configuration Data
- 08/20/2021 Jake Ropar: Reformatted and added With Execute as Owner statement
-
- Parameters: @Config Xml Configuration Data
-
- Examples: Select 'DocVersions' Type, VersionID, Config, .dbo.vefn_GetUnitPrefix(config) UnitPrefix from DocVersions
- UNION select 'Blank' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
- UNION select 'Null' Type, 0 VersionID, null Config, .dbo.vefn_GetUnitPrefix(null) UnitPrefix
- UNION select 'XML with' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
- UNION select 'XML without' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
- UNION select 'XML empty' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
-==========================================================================================================
- */
-Create Function [dbo].[vefn_GetUnitPrefix](@Config varchar(MAX))
-Returns VarChar(Max)
-With Execute as Owner
-as
-Begin
-
- Declare @Xml xml;
- Declare @UnitPrefix VarChar(Max);
-
- Set @Xml = Cast(@Config as xml)
-
- Set @UnitPrefix = (Select Replace(v.value('@ProcedureNumber', 'nvarchar(100)'),'#','') as 'UnitPrefix' From @XML.nodes('//Unit') as tmpXml(v))
-
- Return IsNull(@UnitPrefix,'');
-
-End
-Go
-
-IF (@@Error = 0) PRINT 'Function: [vefn_GetUnitPrefix] Succeeded'
-ELSE PRINT 'Function: [vefn_GetUnitPrefix] Error on Creation'
-GO
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vefn_DocVersionSplit]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [dbo].[vefn_DocVersionSplit];
-
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Rich Mark
- Create Date: 01/01/2012
- Description: Returns a table of document version info from a comma delimited list of specified document version IDs
- 08/20/2021 Jake Ropar: Add with (NoLock) statements to prevent table locking
-
- Parameters: @DocVersionList Comma delimited list of document version IDs (pass '' or null to retrieve all versions)
-
- Examples: select * from vefn_DocVersionSplit('1,4');
- select * from vefn_DocVersionSplit(null);
- select * from vefn_DocVersionSplit('');
-==========================================================================================================
- */
-Create Function [dbo].[vefn_DocVersionSplit](@DocVersionList varchar(MAX))
-Returns @IDs Table
-(
- VersionID Int Primary Key,
- ItemID Int,
- DVPath VarChar(Max),
- UnitPrefix VarChar(MAX)
-)
-With Execute as Owner
-as
-Begin
-
- If(IsNull(@DocVersionList,'') = '')
- Insert into @IDs
- Select dv.VersionID, dv.ItemID, dbo.ve_GetFolderPath(dv.VersionID), dbo.vefn_GetUnitPrefix(dv.Config)
- From DocVersions dv with (NoLock) Where dv.ItemID is not null;
- Else
- Insert into @IDs
- Select t.ID, dv.ItemID, dbo.ve_GetFolderPath(dv.VersionID), .dbo.vefn_GetUnitPrefix(dv.config)
- From dbo.vefn_SplitInt(@DocVersionList,',') as t
- inner join DocVersions dv with (NoLock) on dv.VersionID = t.ID;
-
- Return;
-
-End
-Go
-
-IF (@@Error = 0) PRINT 'Function: [vefn_DocVersionSplit] Succeeded'
-ELSE PRINT 'Function: [vefn_DocVersionSplit] Error on Creation'
-GO
-
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vefn_SiblingAndChildrenItemsNewByWord]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [dbo].[vefn_SiblingAndChildrenItemsNewByWord];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Rich Mark
- Create Date: 01/01/2021
- Description: Returns all items mathcing the specified search critera, filtered by a list of specified document versions
- 08/20/2021 Jake Ropar: Add with (NoLock) and Option (Recompile) statements to eliminate UI locking and improve performace
-
- Parameters: @DocVersionList Comma delimited list of document version IDs used to filter search results (pass '' or null to include all versions)
- @UnitPrefix The unit prefix to use when building the item path
- @SearchString Search string criteria
- @SearchStringx Alternate search string criteria
- @StepTypeList Comma delimited list of of step types used to filter search results (pass '' or null to include all step type sections)
-
- Examples: select Text from vefn_SiblingAndChildrenItemsNewByWord('194','','%[^a-z]red[^a-z]%', '%[^a-z]red[^a-z]%','');
- select Text from vefn_SiblingAndChildrenItemsNewByWord('194','','%[^a-zA-Z]step 25[^0-9a-zA-Z.vbpi:\\-]%','%[^a-zA-Z]step 25[^0-9a-zA-Z.vbpi:\\-]%','');
-==========================================================================================================
- */
-Create Function [dbo].[vefn_SiblingAndChildrenItemsNewByWord](@DocVersionList VarChar(Max), @UnitPrefix VarChar(Max), @SearchString VarChar(Max),
- @SearchStringx VarChar(Max), @StepTypeList VarChar(Max),
- @includeLinks int, @includeRtfFormatting int , @includeSpecialCharacters int)
-Returns @SiblingAndChildren Table
-(
- ILastChanged VarBinary(8),
- ItemID int Primary Key,
- DVPath nVarChar(Max),
- [Path] nVarChar(Max),
- FromType Int,
- Ordinal Int,
- ParentID Int,
- PreviousID Int,
- ContentID Int,
- DTS DateTime,
- UserID nVarChar(100),
- pContentID Int,
- pDTS DateTime,
- pUserID nVarChar(100),
- IsRNO Int,
- [Text] nVarChar(Max),
- DocAscii nVarChar(Max),
- Number nVarChar(256),
- CType Int,
- CFormatID Int,
- CConfig nVarChar(Max),
- CDTS DateTime,
- CUserID nVarChar(100),
- CLastChanged VarBinary(8),
- PLastChanged VarBinary(8)
-)
-With Execute as Owner
-as
-Begin
-
- -- Declare Local Variables
- Declare @Delim Char(1);
- Declare @DelimNumber Char(1);
- Declare @DelimStep Char(1);
- declare @TextPrefix nVarChar(1);
- declare @TextSuffix nVarChar(1);
-
- -- Set Default Values
- Set @Delim = Char(7);
- Set @DelimNumber = Char(17);
- Set @DelimStep = '.';
- Set @TextPrefix = '';
- Set @TextSuffix = '';
-
- -- Check Input Parameters
- If (@SearchString Like '[%]%') Set @TextPrefix = '~';
- if (@SearchString Like '%[%]') Set @TextSuffix = '~';
-
-
- With zItems (ILastChanged, ItemID, VersionID, [Path], FromType, Ordinal, ParentID, PreviousID, ContentID, DTS, UserID, pContentID,
- pDTS, pUserID, IsRNO, [Text], Number, PPath, CType, CFormatID, CConfig, CDTS, CUserID, CLastChanged, PLastChanged)
- as (
-
- -- Parent Records
- Select Cast(i.LastChanged as varbinary(8)) as 'ILastChanged',
- i.ItemID as 'ItemID',
- dv.VersionID as 'VersionID',
- Cast((Case When (c.[Type] < 20000) Then @Delim + @UnitPrefix + IsNull(c.Number,'') + @DelimNumber + IsNull(c.[Text],'') Else '1' End) as nVarChar(Max)) as 'Path',
- 0 as 'FromType',
- 0 as 'Ordinal',
- 0 as 'ParentID',
- i.PreviousID as 'PreviousID',
- i.ContentID as 'ContentID',
- i.DTS as 'DTS',
- i.UserID as 'UserID',
- 0 as 'pContentID',
- i.DTS as 'pDTS',
- i.UserID as 'pUserID',
- 0 as 'IsRNO',
- c.[Text] as 'Text',
- c.Number as 'Number',
- Cast('' as nVarChar(Max)) as 'PPath',
- c.Type as 'CType',
- c.FormatID as 'CFormatID',
- c.Config as 'CConfig',
- c.DTS as 'CDTS',
- c.UserID as 'CUserID',
- Cast(c.LastChanged as VarBinary(8)) as 'CLastChanged',
- Cast(0 as VarBinary(8)) as 'PLastChanged'
- From Items i with (NoLock)
- join Contents c with (NoLock) on c.ContentID = i.ContentID
- join dbo.vefn_DocVersionSplit(@DocVersionList) dv on i.ItemID = dv.ItemID
-
- Union All
-
- -- Children Records
- Select Cast(i.LastChanged as varbinary(8)) as 'ILastChanged',
- i.ItemID as 'ItemID',
- zi.VersionID as 'VersionID',
- zi.Path +
- Case (c.[Type]/10000)
- When 0 Then @Delim + @UnitPrefix + IsNull(c.Number,'') + @DelimNumber + IsNull(c.Text,'') -- Procedure
- When 1 Then @Delim + IsNull(c.Number,'') + @DelimNumber + IsNull(c.Text,'') -- Section
- Else Case (p.FromType)
- When 3 Then @DelimStep +'Caution' + @DelimStep + Cast(1 as varchar(4))
- When 4 Then @DelimStep +'Note' + @DelimStep + Cast(1 as varchar(4))
- When 5 Then @DelimStep +'RNO' + @DelimStep
- When 7 Then @DelimStep +'Table' + @DelimStep + Cast(1 as varchar(4))
- When 8 Then @DelimStep +'SupInfo' + @DelimStep
- Else Case When (zi.FromType < 3) Then @Delim Else @DelimStep End + Cast(1 as varchar(4))
- End
- End as 'Path',
- p.FromType as 'FromType',
- 0 as 'Ordinal',
- zi.ItemID as 'ParentID',
- i.PreviousID as 'PreviousID',
- i.ContentID as 'ContentID',
- i.DTS as 'DTS',
- i.UserID as 'UserID',
- p.ContentID as 'pContentID',
- p.DTS as 'pDTS',
- p.UserID as 'pUserID',
- Case When (p.FromType = 5) Then -1 Else 0 End as 'IsRNO',
- c.Text as 'Text',
- c.Number as 'Number',
- zi.Path +
- Case (c.[Type]/10000)
- When 2 Then Case(p.FromType)
- When 3 Then @DelimStep + 'Caution'
- When 4 Then @DelimStep + 'Note'
- When 8 Then @DelimStep + 'SupInfo'
- Else '' End
- Else ''
- End as 'PPath',
- c.[Type] as 'CType',
- c.FormatID as 'CFormatID',
- c.Config as 'CConfig',
- c.DTS as 'CDTS',
- c.UserID as 'CUserID',
- Cast(c.LastChanged as varbinary(8)) as 'CLastChanged',
- Cast(p.LastChanged as varbinary(8)) as 'PLastChanged'
- From zItems zi
- join Parts p with (NoLock) on p.ContentID = zi.ContentID
- join Items i with (NoLock) on i.ItemID = p.ItemID
- join Contents c with (NoLock) on c.ContentID = i.ContentID
-
- Union All
-
- -- Sibling Records
- Select Cast(i.LastChanged as varbinary(8)) as 'ILastChanged',
- i.ItemID as 'ItemID',
- zi.VersionID as 'VersionID',
- zi.PPath +
- Case (c.[Type]/10000)
- When 0 Then @Delim + @UnitPrefix + IsNull(c.Number,'') + @DelimNumber + IsNull(c.Text,'') -- Procedure
- When 1 Then @Delim + IsNull(c.Number,'') + @DelimNumber + IsNull(c.Text,'') -- Section
- Else Case When (dbo.vefn_GetLastDelim(zi.Path) = '.') Then @DelimStep Else @Delim End + Cast(zi.Ordinal + 2 as varchar(4))
- End as 'Path',
- zi.FromType as 'FromType',
- zi.Ordinal + 1 as 'Ordinal',
- zi.ParentID as 'ParentID',
- i.PreviousID as 'PreviousID',
- i.ContentID as 'ContentID',
- i.DTS as 'DTS',
- i.UserID as 'UserID',
- Null as 'pContentID',
- Null as 'pDTS',
- Null as 'pUserID',
- 0 as 'IsRNO',
- c.[text] as 'Text',
- c.Number as 'Number',
- zi.PPath as 'PPath',
- c.[Type] as 'CType',
- c.FormatID as 'CFormatID',
- c.Config as 'CConfig',
- c.DTS as 'CDTS',
- c.UserID as 'CUserID',
- Cast(c.LastChanged as varbinary(8)) as 'CLastChanged',
- Cast(0 as varbinary(8)) as 'PLastChanged'
- From zItems zi
- join Items i with (NoLock) on i.PreviousID = zi.ItemID
- join Contents c with (NoLock) on c.ContentID = i.ContentID
-
- )
- Insert Into @SiblingAndChildren
- Select zi.ILastChanged,
- zi.ItemID,
- dv.DVPath,
- zi.Path,
- zi.FromType,
- zi.Ordinal,
- zi.ParentID,
- zi.PreviousID,
- zi.ContentID,
- zi.DTS,
- zi.UserID,
- zi.pContentID,
- zi.pDTS,
- zi.pUserID,
- zi.IsRNO,
- zi.Text,
- d.DocAscii,
- zi.Number,
- zi.CType,
- zi.CFormatID,
- zi.CConfig,
- zi.DTS,
- zi.CUserID,
- zi.CLastChanged,
- zi.PLastChanged
- From zItems zi
- join dbo.vefn_DocVersionSplit(@DocVersionList) dv on dv.VersionID = zi.VersionID
- left join Entries e with (NoLock) on e.ContentID = zi.ContentID
- left join Documents d with (NoLock) on d.DocID = e.DocID
- -- B2022-082: use the vefn_RemoveExtraText to get rid of rtf commands before comparing text
- Where (dbo.vefn_RemoveExtraText(@TextPrefix + zi.[Text] + @TextSuffix, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters)
- like @SearchString Or Replace(d.DocAscii, nChar(176), '\''B0') like @SearchString
- Or dbo.vefn_RemoveExtraText(@TextPrefix + zi.[Text] + @TextSuffix, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters)
- like @SearchStringx Or Replace(d.DocAscii, nChar(176), '\''B0') like @SearchStringx)
- And (IsNull(@StepTypeList,'') = '' or (dbo.vefn_AllSections(zi.CType) in (Select ID from dbo.vefn_SplitInt(@StepTypeList,','))))
- Option (Recompile, MaxRecursion 10000);
-
- Return;
-End
-Go
-
-IF (@@Error = 0) PRINT 'Function: vefn_SiblingAndChildrenItems Succeeded'
-ELSE PRINT 'Function: vefn_SiblingAndChildrenItems Error on Creation'
-GO
-
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[FindAnnotations]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [FindAnnotations];
-
-/****** Object: UserDefinedFunction [dbo].[FindAnnotations] Script Date: 09/28/2012 11:06:59 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select * from [FindAnnotations]('12','',0,'')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[FindAnnotations](@AnnotationTypeList varchar(MAX), @SearchString varchar(MAX), @CaseSensitive int, @StepTypeList varchar(MAX))
-RETURNS @Results TABLE
-(
- AnnotationID int Primary Key
-)
-WITH EXECUTE AS OWNER
-BEGIN
- insert into @Results
- select Distinct A.AnnotationID from Items I
- join Contents C on I.ContentID = C.ContentID
- left Join Parts P on P.ItemID = I.ItemID
- join Annotations A on A.ItemID = I.ItemID
- join vefn_AnnotationTypeSplit(@AnnotationTypeList) TT on TT.TypeID=A.TypeID
-where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CI_AS))
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND isnull(P.FromType,0) = 5)))
-
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'Function: FindAnnotations Succeeded'
-ELSE PRINT 'Function: FindAnnotations Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchAnnotationItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchAnnotationItemAndChildren];
-GO
-/*
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'1',Null,0,"3-"
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'2',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'3',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'4',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'5',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'',Null,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchAnnotationItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @AnnotationTypeList varchar(MAX), @SearchString nvarchar(MAX), @CaseSensitive as int, @UnitPrefix nvarchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],AnnotationID SearchAnnotationID, SearchText, TT.Name AnnotationType,
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- join Annotations A on A.ItemID = I.ItemID
- join vefn_AnnotationTypeSplit(@AnnotationTypeList) TT on TT.TypeID=A.TypeID
-where
- A.AnnotationID in(select AnnotationID from [FindAnnotations](@AnnotationTypeList, @SearchString, @CaseSensitive, @StepTypeList))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchItemAndChildren];
-GO
-/*
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildren '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildren '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildren '','','RCP',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%',0,0,0,0
-exec vesp_SearchItemAndChildren '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildren '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildren '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildren '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildren '','','turbine-driven',0,0,0,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- OR (@CaseSensitive = 1 AND Replace(D.DocAscii,nchar(176),'\''B0') like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND Replace(D.DocAscii,nchar(176),'\''B0') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- )
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchItemAndChildrenNew] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildrenNew]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchItemAndChildrenNew];
-GO
-
-/*
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '1','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildrenNew '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(Resolved Transition Text)',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%turbine-driven%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '37','','rcp',0,0,0,0,'3-' -- Wolf Creek sample
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2019 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildrenNew] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-Declare @SearchStringx nvarchar(200) --kbr
-set @SearchStringx = replace(@SearchString,'\u8209?','-') --JSJ B2016-209 not finding dashes in Word sections (FixSearchString converts '-' to '\u8209?')
-if (@IncludeLinks + @IncludeRtfFormatting + @IncludeSpecialCharacters = 0)
-begin
-if (@CaseSensitive = 0)
-Begin
- select ZZ.DvPath, ZZ.Path, ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,ZZ.[ILastChanged]
- ,ZZ.[Number],ZZ.[Text],ZZ.[CType] [Type],ZZ.[CFormatID] [FormatID],ZZ.[CConfig] [Config],ZZ.[CDTS] ,ZZ.[CUserID]
- ,ZZ.[cLastChanged],
- zz.[pContentID], ZZ.[pDTS],ZZ.[pUserID], ZZ.[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=ZZ.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=ZZ.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=ZZ.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=ZZ.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=ZZ.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=ZZ.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=ZZ.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=ZZ.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=ZZ.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItemsNew(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx,@StepTypeList) ZZ
- --Join Items II on ZZ.ItemID=II.ItemID
- --Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- --Join Contents CC on CC.ContentID=ZZ.ContentID
---where ZZ.Text like @SearchString or zz.text like @SearchStringx-- ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
- order by DvPath
- end
- else
- begin
- select ZZ.DvPath, ZZ.Path, ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,ZZ.[ILastChanged]
- ,ZZ.[Number],ZZ.[Text],ZZ.[CType] [Type],ZZ.[CFormatID] [FormatID],ZZ.[CConfig] [Config],ZZ.[CDTS] ,ZZ.[CUserID]
- ,ZZ.[cLastChanged],
- zz.[pContentID], ZZ.[pDTS],ZZ.[pUserID], ZZ.[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=ZZ.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=ZZ.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=ZZ.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=ZZ.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=ZZ.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=ZZ.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=ZZ.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=ZZ.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=ZZ.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItemsNew(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx,@StepTypeList) ZZ
- --Join Items II on ZZ.ItemID=II.ItemID
- --Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- --Join Contents CC on CC.ContentID=ZZ.ContentID
---where ZZ.Text like @SearchString or zz.text like @SearchStringx-- ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
-where zz.text Collate SQL_Latin1_General_CP1_CS_AS like @SearchString or
-zz.text Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx or
--- docascii are the word sections
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchString or
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx
- order by DvPath
- end
- end -- no links
- else
-begin -- include linked text
-if (@CaseSensitive = 0)
-Begin
- select ZZ.DvPath, ZZ.Path, ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,ZZ.[ILastChanged]
- ,ZZ.[Number],ZZ.[Text],ZZ.[CType] [Type],ZZ.[CFormatID] [FormatID],ZZ.[CConfig] [Config],ZZ.[CDTS] ,ZZ.[CUserID]
- ,ZZ.[cLastChanged],
- zz.[pContentID], ZZ.[pDTS],ZZ.[pUserID], ZZ.[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=ZZ.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=ZZ.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=ZZ.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=ZZ.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=ZZ.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=ZZ.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=ZZ.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=ZZ.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=ZZ.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItemsNew(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx,@StepTypeList) ZZ
- --Join Items II on ZZ.ItemID=II.ItemID
- --Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- --Join Contents CC on CC.ContentID=ZZ.ContentID
---where ZZ.Text like @SearchString or zz.text like @SearchStringx-- ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
-where .dbo.vefn_RemoveExtraText(zz.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CI_AS like @SearchString or
-.dbo.vefn_RemoveExtraText(zz.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CI_AS like @SearchStringx or
--- docascii are the word sections
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CI_AS like @SearchString or
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CI_AS like @SearchStringx
- order by DvPath
- end
- else -- case sensitive
- begin
- select ZZ.DvPath, ZZ.Path, ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,ZZ.[ILastChanged]
- ,ZZ.[Number],ZZ.[Text],ZZ.[CType] [Type],ZZ.[CFormatID] [FormatID],ZZ.[CConfig] [Config],ZZ.[CDTS] ,ZZ.[CUserID]
- ,ZZ.[cLastChanged],
- zz.[pContentID], ZZ.[pDTS],ZZ.[pUserID], ZZ.[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=ZZ.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=ZZ.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=ZZ.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=ZZ.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=ZZ.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=ZZ.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=ZZ.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=ZZ.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=ZZ.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItemsNew(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx,@StepTypeList) ZZ
- --Join Items II on ZZ.ItemID=II.ItemID
- --Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- --Join Contents CC on CC.ContentID=ZZ.ContentID
---where ZZ.Text like @SearchString or zz.text like @SearchStringx-- ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
---
-where .dbo.vefn_RemoveExtraText(replace(zz.Text,'\''b0', '\''B0'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like replace(@SearchString,'\''b0', '\''B0') or
-.dbo.vefn_RemoveExtraText(replace(zz.Text,'\''b0', '\''B0'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like replace(@SearchStringx,'\''b0', '\''B0') or
--- docascii are the word sections
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchString or
-Replace(zz.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx
- order by DvPath
- end
- end -- include links
- GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tr_tblItems_Update]') AND OBJECTPROPERTY(id,N'IsTrigger') = 1)
- DROP TRIGGER [tr_tblItems_Update];
-
- /****** Object: Trigger [dbo].[tr_tblItems_Update] Script Date: 04/25/2012 14:09:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: Trigger [tr_tblItems_Update] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE trigger [dbo].[tr_tblItems_Update] on [dbo].[tblItems] for update as
- begin
- if exists (select * from inserted)
- begin
- if update(PreviousID) or update(ContentID) or update(UserID) or update(DeleteStatus)
- begin
- insert into ItemAudits(ItemID,PreviousID,ContentID,DTS,UserID,DeleteStatus)
- select dd.ItemID,dd.PreviousID,dd.ContentID,dd.DTS,dd.UserID,dd.DeleteStatus from deleted dd
- inner join inserted ii on dd.ItemID = ii.ItemID
- where dd.deletestatus = 0 or ii.deletestatus != 0
- end
- end
- end
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger alteration: tr_tblItems_Update Succeeded'
-ELSE PRINT 'Trigger alteration: tr_tblItems_Update Error on Alteration'
-GO
-
-/****** Object: StoredProcedure [vesp_GetROUsagesByProcedure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetROUsagesByProcedure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetROUsagesByProcedure];
-GO
-
-/*
-exec vesp_GetROUsagesByProcedure '1,2,4','20007','1:00010000019C,0001000002AE'
-exec vesp_GetROUsagesByProcedure '1,2,4','','1:00010000019C,0001000002AE'
-exec vesp_GetROUsagesByProcedure '1,2,4','20007','1:0001'
-exec vesp_GetROUsagesByProcedure '1,2,4','20006','1'
-exec vesp_GetROUsagesByProcedure '1,2,4','20006',''
-exec vesp_GetROUsagesByProcedure '1,2,4',Null,Null
-exec vesp_GetROUsagesByProcedure '1','','1:000700000124',''
-exec vesp_GetROUsagesByProcedure '','','1:0007000001C9,000700000124', ''
-exec vesp_SearchROItemAndChildren '1','','1:000700000124',''
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetROUsagesByProcedure] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @ROSearchString varchar(MAX), @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, FoundROID) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, null
-
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- --Path + case when Z.FromType < 3 then @Delim else @DelimStep end + case C.Type/10000
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001',
- null
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4),
- null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount],
- RRU.ROID FoundROID
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
-join (select contentid, ru.roid from ROusages RU
-join vefn_SplitROSearch(@ROSearchString) RR on case when len(RU.ROID) = 12 then RU.ROID +'0000' else RU.ROID end
- like RR.roid + '%'
-union
-select contentid, du.roid from DROusages DU
-join entries ee on DU.DOCID = EE.DOCID
-join vefn_SplitROSearch(@ROSearchString) RR on case when len(DU.ROID) = 12 then DU.ROID +'0000' else DU.ROID end like RR.roid + '%') RRU on RRU.ContentID = I.ContentID
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath /*having foundroid in ( select roid from vefn_SplitROSearch(@ROSearchString))*/
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetROUsagesByProcedure Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetROUsagesByProcedure Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[FindRoUsages]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [FindRoUsages];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Declare @ROSearchString varchar(MAX)
-set @ROSearchString='1:000200000089'
-select * from FindRoUsages('1:000200000089')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[FindRoUsages](@ROSearchString varchar(Max))
-RETURNS @Results TABLE
-(
- ContentID int Primary Key
-)
-WITH EXECUTE AS OWNER
-BEGIN
- insert into @Results
- select ContentID from ROUsages RU
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- RU.ROID like RR.ROID + '%' Collate SQL_Latin1_General_CP1_CI_AS
- UNION
- select ContentID from Entries EE
- Join DROUsages RU on RU.DocID = EE.DocID
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- case when len(RU.ROID) = 12 then RU.ROID +'0000' else RU.ROID end like RR.ROID + '%' Collate SQL_Latin1_General_CP1_CI_AS
- RETURN
-END
-GO
-
-IF (@@Error = 0) PRINT 'Function: FindRoUsages Succeeded'
-ELSE PRINT 'Function: FindRoUsages Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchROItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchROItemAndChildren];
-
-GO
-/****** Object: StoredProcedure [dbo].[vesp_SearchROItemAndChildren] Script Date: 09/28/2012 09:02:50 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:00010000019C,0001000002AE',''
-exec vesp_SearchROItemAndChildren '1,2,4','','1:00010000019C,0001000002AE',''
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:0001',''
-exec vesp_SearchROItemAndChildren '1,2,4','20006','1',''
-exec vesp_SearchROItemAndChildren '1,2,4','20006','',''
-exec vesp_SearchROItemAndChildren '',Null,Null,'XXX-',''
-exec vesp_SearchROItemAndChildren '1','','1:000200000089',''
-exec vesp_SearchROItemAndChildren '1','','1:00010000019c',''
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchROItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @ROSearchString varchar(MAX), @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
-
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- --Path + case when Z.FromType < 3 then @Delim else @DelimStep end + case C.Type/10000
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- I.ContentID in(select ContentID from FindROUsages(@ROSearchString))
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFrom]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFrom];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFrom] Script Date: 10/03/2012 10:06:38 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFrom]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=I.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=I.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=I.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=I.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=I.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=I.[ItemID]) [Transition_ToIDCount]
-from Items I
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFrom Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFrom Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranTo]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranTo];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranTo] Script Date: 10/03/2012 10:08:03 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranTo]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=Z.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=Z.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=Z.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=Z.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=Z.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=Z.[ItemID]) [Transition_ToIDCount]
-from Itemz Z join Items I on I.ItemID = Z.ItemID
-OPTION (MAXRECURSION 10000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranTo Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranTo Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFromAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFromAndContent];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFromAndContent] Script Date: 10/03/2012 10:52:31 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFromAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Items I Join Contents C on I.ContentID = C.ContentID
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranToAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranToAndContent];
-GO
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranToAndContent] Script Date: 10/03/2012 10:08:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranToAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz Z
-Join Items I on Z.ItemID = I.ItemID
-Join Contents C on I.ContentID = C.ContentID
-OPTION (MAXRECURSION 10000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingAndChildrenItemsByProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingAndChildrenItemsByProc]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingAndChildrenItemsByProc];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select * from vefn_SiblingAndChildrenItemsByProc(30) II
-join
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingAndChildrenItemsByProc](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ItemID], [DVPath], [Level], [ParentID], [Ordinal], [PreviousID], [FromType], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],PPath, [Path], [IsRNO], [POrdinalPath], [OrdinalPath]) as (
- Select [I].[ItemID], '' DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],
- Cast('' as nvarchar(max)) [PPath],
- Cast(Case when C.Type < 20000 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path],
- 0 IsRNO, Cast('' as nvarchar(max)) [POrdinalPath], Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-Union All
--- Children
- select I.[ItemID], DVPath, [Level] + 1,Z.ItemID,0, I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select I.[ItemID], DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' THEN @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-
-)
-insert into @SiblingAndChildren
-select I.[ItemID], [DvPath], [Path], I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO]/*,[PPath],[POrdinalPath]*/,[OrdinalPath]
- from ItemZ I
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsByProc Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsByProc Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_RemoveRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveRange]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveRange];
-GO
-
-/*
-SELECT ContentID, text, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid in (select top 25 ContentID from contents where text like '%[[]END>%')
-
-select top 25 * from contents where text like '%[[]END>%'
-
-SELECT ContentID, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid =189
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveRange](@text nvarchar(MAX),@startToken nvarchar(MAX), @endToken nvarchar(MAX))
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @index int
- DECLARE @index2 int
- DECLARE @lenStartToken int
- DECLARE @lenEndToken int
- DECLARE @lastIndex int
- SET @lenStartToken = len(@startToken)
- SET @lenEndToken = len(@endToken)
- SET @index = CHARINDEX(@startToken , @text)
- SET @lastIndex = -1
- while (@index != 0)
- BEGIN
- SET @index2 = CHARINDEX(@endToken , @text, @index + @lenStartToken)
- if (@index2>0)
- SET @text = substring(@text,1,@index-1) + substring(@text,@index2+@lenEndToken,len(@text))
- SET @lastIndex = @index
- SET @index = CHARINDEX(@startToken , @text)
- if (@index = @lastIndex) SET @index = 0
- END
- RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveRange Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetPath];
-GO
-
-/*
-select ItemID, CC.Type, dbo.ve_GetPath(ItemID)
-from Items II join Contents CC on II.ContentID = CC.ContentID
-where ItemID in(111,265,266,267)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetPath] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Itemz(ItemCount,ItemID,PreviousID,FromType,CType,Number,Text,PPath, Path) as (
- Select 1,ItemID,PreviousID,0,C.Type/10000,C.Number,C.Text,
- Cast(Case when C.Type < 20000 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') else '' end as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path
- from Items I
- join Contents C on I.ContentID = C.ContentID
- where ItemID=@ItemID
- Union All
--- siblings
- Select ItemCount+1,I.PreviousID,II.PreviousID,0,C.Type/10000,Z.Number,Z.Text,PPath,cast(ItemCount + 1 as nvarchar(4)) + PPath
- from Items I
- join Contents C on I.ContentID = C.ContentID
- Join Items II on II.ItemID = I.PreviousID
- Join Itemz Z on I.ItemID=Z.ItemID
- where I.PreviousID != 0
- Union All
--- children
- select 1,I.ItemID,I.PreviousID,P.FromType,C.Type/10000,C.Number,C.Text,
- case C.Type/10000
- when 0 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'')
- when 1 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') +'`' + cast(ItemCount + 0 as varchar(4))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(4))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(4))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(4))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(4))
- when 5 then '`RNO`'
- when 7 then '`Table`'
- when 8 then '`SupInfo`'
- else '`' + cast(ItemCount + 0 as varchar(4))
- end end + PPath PPath,
- --'1' +
- case C.Type/10000
- when 0 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'')
- when 1 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') +'`' + cast(ItemCount + 0 as varchar(4))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(4))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(4))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(4))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(4))
- when 5 then '`RNO'
- when 7 then '`Table'
- when 8 then '`SupInfo'
- else '`' + cast(ItemCount + 0 as varchar(4))
- end end + PPath Path
-
- from Parts P
- join Items I on I.ContentID = P.ContentID
- join Contents C on I.ContentID = C.ContentID
- join Itemz Z on P.ItemID=Z.ItemID
-)
-select @Path = path From Itemz where ItemCount=1 and CType=0
-OPTION (MAXRECURSION 10000)
-return @Path
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetPath Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_ProcedureByProcID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ProcedureByProcID]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ProcedureByProcID];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_ProcedureByProcID] Script Date: 05/18/2011 11:20:48 ******/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_ProcedureByProcID](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-insert into @SiblingAndChildren
- Select
-[I].[ItemID]
-, '' DVPath
-, Cast(Case when C.Type < 20000 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path]
-,0 [Level]
-,0 [FromType]
-, 0 [Ordinal]
-, 0 [ParentID]
-, [PreviousID]
-,[I].[ContentID]
-,[I].[DTS]
-,[I].[UserID]
- ,0 [pContentID]
-,[I].[DTS] [pDTS]
-, [I].[UserID] [pUserID]
-,0 IsRNO
- , Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ProcedureByProcID Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ProcedureByProcID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindContentText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindContentText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindContentText];
-GO
-
-/*
-SELECT * From vefn_FindContentText('1','%RCP%')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindContentText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX)
-,@IncludeLinks as int
-,@IncludeRtfFormatting as int
-,@IncludeSpecialCharacters as int)
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
- ,Type int
- ,Text varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @Dashes varchar(25)
-set @Dashes = '\u8209?'
-if(@SearchString not like '%\u8209?%')
-BEGIN
-set @Dashes='-'
-END
-IF(ISNULL(@DocVersionList,'')='')
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where replace(.dbo.vefn_RemoveExtraText(Replace([Text],'-','\u8209?'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters),'\u8209?',@Dashes) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- --where .dbo.vefn_RemoveExtraText(Replace(Replace([Text],'-','\u8209?'),'\','\u9586?'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
--- where Replace([Text],'-','\u8209?') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- --where Replace(Replace([Text],'-','\u8209?'),'\u160?',' ') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-ELSE
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where [ContentID] in (select [ContentID] from vefn_DVContent(@DocVersionList))
- -- bug fix B2014-056 and B2014-102 now use vefn_RemoveExtraText which fixes searching for hard spaces and finding procedure text when it is bolded (or italics or underlined etc)
- AND Replace(.dbo.vefn_RemoveExtraText(Replace([Text],'-','\u8209?'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters),'\u8209?',@Dashes) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- --AND .dbo.vefn_RemoveExtraText(Replace(Replace([Text],'-','\u8209?'),'\','\u9586?'),@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- --AND Replace([Text],'-','\u8209?') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- --AND Replace(Replace([Text],'-','\u8209?'),'\u160?',' ') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindContentText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindContentText Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindText];
-GO
-
-/*
-SELECT * From vefn_FindText('8','Dog',1,0,0,1,'')
-SELECT * From vefn_FindText('1','turbine\u8209?driven',0,0,0,0,'')
-SELECT * From vefn_FindText('1','trip',0,0,0,0,'')
-select * from vefn_FindText('1','',0,0,0,1,'20010,20008')
-select * from vefn_FindText('1',null,0,0,0,1,'20010,20008')
-select * from vefn_FindText('1',' ',0,0,0,1,'20010,20008')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX)
-,@CaseSensitive as int
-,@IncludeLinks as int
-,@IncludeRtfFormatting as int
-,@IncludeSpecialCharacters as int
-,@StepTypeList varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-IF isnull(@SearchString,'%')='%'
- BEGIN
- insert into @FoundContents
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- where(isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or (dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- END
-ELSE
- BEGIN
- Declare @SearchStringx nvarchar(200) --kbr
- --set @SearchStringx = replace(@SearchString,'-','\u8209?') --kbr
- --set @SearchStringx = replace(replace(@SearchString,'-','\u8209?'),'\','\u9586?') --kbr
- set @SearchStringx = replace(@SearchString,'\u8209?','-') --JSJ B2016-209 not finding dashes in Word sections (FixSearchString converts '-' to '\u8209?')
- IF @CaseSensitive = 0 -- Not Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchString,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- AND ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION -- B2016-209 to find dashes in word sections
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchStringx Collate SQL_Latin1_General_CP1_CI_AS)
- AND ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (Replace(D.DocAscii,nchar(176),'\''B0') like @SearchString OR Replace(D.DocAscii,nchar(176),'\''B0') like @SearchStringx Collate SQL_Latin1_General_CP1_CI_AS)
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
- ELSE
- BEGIN
- IF @CaseSensitive = 1 -- Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchString,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) C
- where
- -- B2019-023 moved placement of Collate SQL_Latin1_CP1_CS_AS to before each like statement to enable case sensitive in Word sections
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like @SearchString)
- AND ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx)
- AND ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
-
- UNION -- B2016-209 to find dashes in word sections
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (Replace(D.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchString OR Replace(D.DocAscii,nchar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx)
- AND
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
- END
-END
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindText Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMS2010.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [getItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAndChildren];
-GO
-
--- getItemAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemNextAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemNextAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemNextAndChildren];
-GO
-
--- getItemNextAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemNextAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemNextAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemNextAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetSiblingCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetSiblingCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetSiblingCount];
-GO
-
-/*
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) HLStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 10000 and CC.Type < 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SectionCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type < 10000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SubStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetSiblingCount] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([Direction], [ItemID], [PreviousID]) as (
- Select 0 Direction,[ItemID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings Previous
-Union All
- select -1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.Direction <= 0
--- Siblings Next
-Union All
- select 1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.ItemID = Z.PreviousID
- where Z.Direction >= 0
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-return @Count END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetSiblingCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetSiblingCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelSteps] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelSteps]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelSteps];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelSteps]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetPath([ItemID]) Path
-from Itemz
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_AllHighLevelStepTransitions()
-where ExternalTransitions > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelStepTransitions]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,ExternalChildTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetShortPath([ItemID]) Path,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindExternalChildTransitions(ItemID)) ExternalChildTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-where (Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) > 0
-OR(Select count(*) from vefn_FindExternalTransitions(ItemID)) > 0
-OR(Select count(*) from vefn_FindInternalTransitions(ItemID)) > 0
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItems];
-GO
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItems](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItemsRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItemsRange]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItemsRange];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItemsRange](@StartItemID int, @EndItemID int, @DestFormat int)
-RETURNS @Children TABLE
-(
-ItemID int PRIMARY KEY,
-ContentID int,
-FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @FormatID int
-SELECT @FormatID = isnull(@DestFormat,.dbo.vefn_GetInheritedFormat(@StartItemID,1))
-BEGIN
-with Itemz([Level], [ItemID], [ContentID], [FormatID], [FoundEnd]) as (
-Select 0 [Level], [ItemID], I.[ContentID], IsNull(C.[FormatID], @FormatID), case [ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-FROM [Items] I
-JOIN [Contents] C on I.ContentID = C.ContentID
-where [ItemID]=@StartItemID
-Union All
--- Children
-select [Level] + 1, I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Parts P on P.ContentID = Z.ContentID
-join Items I on I.ItemID = P.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
--- Siblings
-Union All
-select [Level] , I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Items I on I.PreviousID = Z.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
-where FoundEnd = 0
-)
-insert into @Children select ItemID, ContentID, FormatID from Itemz
-OPTION (MAXRECURSION 10000)
-
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItemsRange Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItemsRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildrenItems](@ItemID int, @ParentID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildrenItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindAffectedTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindAffectedTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindAffectedTransitions];
-GO
-
-/*
-select top 1 * from items order by itemid desc
-Select
-FromID,.dbo.ve_GetPathFromContentID(FromID) ContentPath
-,ToID,dbo.ve_GetPath(ToID) ToPath
-,RangeID,dbo.ve_GetPath(RangeID) RangePath
-,cc.Text
-from vefn_FindAffectedTransitions(2102) ttz
-join transitions tt on ttz.TransitionID = tt.TransitionID
---join items ii on ii.ItemID = tt.fromID
-join contents cc on tt.FromID = cc.contentid
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindAffectedTransitions](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Type int
-select @Type = CC.Type from Contents CC Join Items II ON II.ContentID = CC.ContentID Where ItemID = @ItemID
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where @Type >= 20000 OR Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-, Itemz2([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] -1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz2 Z
- join Items I on Z.PreviousID = I.ItemID
- where @Type >= 20000 OR Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-insert into @Transitions
-select TransitionID from Transitions TT
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-UNION
-select TransitionID from Transitions TT
-JOIN Itemz2 on ToID=ItemID and RangeID=ItemID and IsRange = 2
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalChildTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalChildTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalChildTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalChildTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalChildTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @ChildList AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT,
- Level INT
- )
-INSERT INTO @ChildList SELECT * FROM vefn_ChildItemz(@ItemID)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from @ChildList) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from @ChildList where Level > 0) OR RangeID in(select ItemID from @ChildList where Level > 0))
-AND FromID not in(Select ContentID from @ChildList)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @ChildList AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT,
- Level INT
- )
-INSERT INTO @ChildList SELECT * FROM vefn_ChildItemz(@ItemID)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from @ChildList) OR RangeID in(select ItemID from @ChildList))
-AND FromID not in(Select ContentID from @ChildList)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItemz] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItemz]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItemz];
-GO
-
-/*
-Select * from vefn_ChildItemz(185)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2015 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItemz](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int,
- Level int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID, Level from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItemz Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItemz Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitions];
-GO
-
-/*
-Select * from vefn_FindInternalTransitions(185)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitionsForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitionsForCopy]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitionsForCopy];
-GO
-
-/*
-Select * from vefn_FindInternalTransitionsForCopy(10277)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitionsForCopy](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int,
- FromID int,
- TranType int,
- ToID int,
- RangeID int,
- OldTransition int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Transitions
-select TransitionID, FromID, TT.TranType, TT.ToID, TT.RangeID, CAST(TT.Config as int) --case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetInheritedFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetInheritedFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetInheritedFormat];
-GO
-
-/* Samples
-Select TranType, .dbo.vefn_GetInheritedFormat(355) TransFormat
- from(Select 1 TranType UNION Select 2 TranType UNION Select 3 TranType UNION
- Select 4 TranType UNION Select 5 TranType UNION Select 6 TranType UNION
- Select 7 TranType UNION Select 8 TranType UNION Select 9 TranType UNION Select 10 TranType) TT
-
-Select top 25 ItemID, TranType, .dbo.vefn_GetInheritedFormat(ItemID) TransFormat
- From Transitions TR
- Join Items II on II.ContentID = TR.FromID
-
-*/
-/*
- local is a 'boolean' (0=false, 1=true) to state whether to look at the item itself or
- only its parent
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetInheritedFormat] (@ItemID int, @local int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @FormatID as int
- -- First get the Active Format
- begin
- with Itemz([Level], [PreviousID], [ItemID], [ParentID], [FolderID], [FormatID]) as (
- Select 0 [Level], [PreviousID], [ItemID], null, null,
- case when @local = 1 then (Select FormatID from Contents CC where [CC].[ContentID] = [II].[ContentID])
- else null end FormatID
- FROM [Items] II
- where [ItemID]=@ItemID
- Union All
- -- Parent Item
- select [Level] + 1, I.[PreviousID], I.[ItemID], null, null, C.FormatID
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- join Contents C on C.ContentID = P.ContentID
- where Z.FormatID is null
- -- Siblings Item
- Union All
- select [Level] , I.[PreviousID] , I.[ItemID], null, null, Z.FormatID
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- where Z.FormatID is null
- Union All
- -- DocVersion From Item
- select [Level] + 1, null, null, DV.FolderID, null, DV.FormatID
- from Itemz Z
- join DocVersions DV on DV.ItemID = Z.ItemID
- where Z.FormatID is null
- Union All
- -- Folders
- select [Level] + 1, null, null, FF.ParentID, FF.FolderID, FF.FormatID
- from Itemz Z
- join Folders FF on FF.FolderID = Z.ParentID and FF.ParentID <> FF.FolderID
- where Z.FormatID is null
- )
- Select @FormatID = FormatID from Itemz ZZ Where FormatID is not null
- OPTION (MAXRECURSION 10000)
- END
- RETURN @FormatID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_HighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_HighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_HighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_HighLevelStepTransitions(105,104)
-where TransCount > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_HighLevelStepTransitions](@ItemID int, @ParentID int)
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,dbo.ve_GetPath([ItemID]) ,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingChildrenItems](@ItemID int)
-RETURNS @SiblingChildren TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 as [pContentID],[DTS] As [pDTS], [UserID] As [pUserID], [LastChanged] As [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] as [pContentID],P.[DTS] As [pDTS],P.[UserID] As [pUserID],P.[LastChanged] As [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @SiblingChildren select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_SiblingItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingItems](@ItemID int, @ParentID int)
-RETURNS @Siblings TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @Siblings select ItemID, ContentID, Ordinal from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_CleanUpItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CleanUpItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CleanUpItems];
-GO
-
-/*
-select *, .dbo.ve_GetParts(ContentID,6) SubSteps from items
-where contentid in(select contentid from contents where text like 'DISPATCH operator to open breaker%')
-
-
-select * from items
-where itemid in(298,299,436,440)
-
-select itemid from items
-where previousid is null and itemid not in (select itemid from parts)
-
---select * from contents where text like 'foldout cip%'
-
-select count(*) from parts
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_CleanUpItems]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- BEGIN
-with Itemz(ItemID) as(
-select itemid from items
-where previousid is null
-and itemid not in(1)
-and itemid not in (select itemid from parts)
-UNION ALL
-select ii.itemid from items ii join itemz zz on zz.itemid = ii.previousid
-)
-delete from items where itemid in (select itemid from itemz)
-OPTION (MAXRECURSION 10000)
- END
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_CleanUpItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_CleanUpItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListChildren];
-GO
-
--- vesp_ListChildren 17
--- drop procedure [getItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentPath]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListContentPath];
-GO
-
--- vesp_ListContentPath 148
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[vesp_ListContentPath]
- (
- @ContentID int
- )
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with ContentZ(BaseID,ContentID,ItemID,Number,Text,Item,Level,PreviousID) as (
- Select II.ItemID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,1,II.PreviousID
- from Items II join Contents CC on CC.ContentID=II.ContentID where @ContentID=II.ContentID
- Union All
---
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,ZZ.Item+1,ZZ.Level,II.PreviousID
- FROM ContentZ ZZ
- Join Items II on II.ItemID = ZZ.PreviousID
- Join Contents CC on II.ContentID = CC.ContentID
- where ZZ.PreviousID is not null
- Union All
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,ZZ.Level+1,II.PreviousID
- FROM ContentZ ZZ
- Join Parts PP on ZZ.ItemID = PP.ItemID
- Join Contents CC on PP.ContentID = CC.ContentID
- Join Items II on II.ContentID = CC.ContentID
- where ZZ.PreviousID is null --and ZZ.ItemID in(717,715,711,662)
-)
-Select ZZ.BaseID,ZZ.Level,MaxItem,ZZ.Number,ZZ.Text from ContentZ ZZ
-join (select BaseID, Level, max(item) MaxItem from ContentZ group by BaseID,Level) T1 on T1.BaseID=ZZ.BaseID and T1.Level = ZZ.Level
-where Item=1
-order by ZZ.BaseID,ZZ.Level Desc, Item Desc
-OPTION (MAXRECURSION 10000)
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentPath Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemAndChildren];
-GO
-
--- vesp_ListItemAndChildren 1,0
--- drop procedure [vesp_ListItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemAndChildren] (@ItemID int, @ParentID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemAndChildren Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMStoCM.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [getItemAuditsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAuditsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAuditsByItemID];
-GO
-
-/*
-getitemauditsbyitemid 10183
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAuditsByItemID]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-/*
- with Itemz([AuditType],[Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 'root' [AuditType], 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]= @ItemID
- Union All
- -- Children
- select 'chld' [AuditType], [Level] + 2,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- -- Siblings
- Union All
- select 'sibl' [AuditType], [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
- )
-*/
-
-select * from
-(
- --get deleted previous item
- select 0 Level,ia.*,dbo.[ve_GetPartType](@ItemID) ItemType from
- itemaudits ia
- inner join itemaudits iaa on ia.itemid = iaa.previousid
- where iaa.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
- union
- --get deleted next item
-/*
- select 1 Level,ia.*,@itemtype ItemType from itemaudits ia
- where ia.previousid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-*/
- select 1 Level,
- ia.[AuditID],
- ia.[ItemID],
- ia.[PreviousID],
- ia.[ContentID],
- ia.[DTS],
- ia.[UserID],
- ti.[DeleteStatus]
-,dbo.[ve_GetPartType](@ItemID) ItemType
- from itemaudits ia
- inner join tblitems ti on ia.itemid = ti.itemid
- where ia.previousid = @ItemID
- and ti.deletestatus > 0
-and ia.dts = ti.dts
- union
- --get chillins
- select 2 Level,ia.*,
-case
-when pa.fromtype = 1 then 'Procedure'
-when pa.fromtype = 2 then 'Section'
-when pa.fromtype = 3 then 'Caution'
-when pa.fromtype = 4 then 'Note'
-when pa.fromtype = 5 then 'RNO'
-when pa.fromtype = 6 then 'Step'
-when pa.fromtype = 7 then 'Table'
-else 'Unknown'
-end itemtype
- from itemaudits ia
- inner join partaudits pa on ia.itemid = pa.itemid
- inner join items ii on pa.contentid = ii.contentid
- where ii.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-) ia
-order by deletestatus desc
-OPTION (MAXRECURSION 10000)
---select * from itemz order by parentid,ordinal
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAuditsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAuditsByItemID Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMStoAPPR.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [vefn_FindExternalFromTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalFromTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalFromTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalFromTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_FindExternalFromTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID not in(select ItemID from Itemz) OR RangeID not in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getAnnotationAuditsChronologyByItemIDandUnitID] Script Date: 10/10/2012 14:45:33 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsChronologyByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAuditsChronologyByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemIDandUnitID] ******/
-/*
-getAnnotationAuditsChronologyByItemIDandUnitID 13,13,1
-getAnnotationAuditsChronologyByItemIDandUnitID 30,8570,1
-getAnnotationAuditsChronologyByItemIDandUnitID 1,1,1
-getAnnotationAuditsChronologyByItemIDandUnitID 30,8505,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[getAnnotationAuditsChronologyByItemIDandUnitID]
-(
- @ProcItemID int,
- @ItemID int,
- @UnitID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from vefn_tblchilditems (@procitemid,@itemid,0))
- and dts > @dts
- and (dbo.ve_GetItemDerivedApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemDerivedApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%')
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsChronologyByItemIDandUnitID] Script Date: 10/10/2012 12:48:39 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsChronologyByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemIDandUnitID] ******/
-/*
-getContentAuditsChronologyByItemIDandUnitID 10154,10154,0,1
-getContentAuditsChronologyByItemIDandUnitID 42,42,0,1
-getContentAuditsChronologyByItemIDandUnitID 1,1,0,1
-getContentAuditsChronologyByItemIDandUnitID 146,146,1,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemIDandUnitID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @UnitID int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
- where dbo.ve_GetItemDerivedApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemDerivedApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsChronologyByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsChronologyByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsSummaryByItemIDandUnitID] Script Date: 10/10/2012 12:56:01 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsSummaryByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsSummaryByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemIDandUnitID] ******/
-/*
-getContentAuditsSummaryByItemIDandUnitID 146,146,0,1
-getContentAuditsSummaryByItemIDandUnitID 42,42,0,1
-getContentAuditsSummaryByItemIDandUnitID 1,1,0,1
-getContentAuditsSummaryByItemIDandUnitID 146,146,1,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getContentAuditsSummaryByItemIDandUnitID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @UnitID int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- DECLARE @ProcId Int
- Set @ProcID = @ProcedureItemID
- DECLARE @Apples TABLE
- (
- ProcID int,
- ItemId int,
- ContentID int Primary Key,
- Apple nvarchar(255),
- DerApple nvarchar(255)
- )
---Build Applicabilty table for the specified Procedure ID
- BEGIN
- with Itemz([Level],[Apple],[DerApple],[ParApple],[ItemID], [ContentID]) as
- (Select 0
- ,xMasterSlave.value('@Applicability','nvarchar(255)') Apple
- ,IsNull(xMasterSlave.value('@Applicability','nvarchar(255)'),dbo.ve_getItemDerivedApplicability(@ProcID)) DerApple
- ,cast(dbo.ve_getItemDerivedApplicability(@ProcID) as nvarchar(255)) ParApple
- ,[II].[ItemID], [II].[ContentID]
- FROM [Items] II
- JOIN (Select ContentID, cast(config as XML) xConfig FROM Contents) CC ON II.ContentID = CC.ContentID
- outer apply xConfig.nodes('//MasterSlave') tMasterSlave(xMasterSlave)
- Where II.[ItemID] = @ProcID
- Union All
- -- Children
- select ZZ.Level + 1 Level
- ,xMasterSlave.value('@Applicability','nvarchar(255)') Apple
- ,IsNull(xMasterSlave.value('@Applicability','nvarchar(255)'),ZZ.DerApple) DerApple
- ,ZZ.DerApple ParApple
- , II.[ItemID], II.[ContentID]
- from Itemz ZZ
- join Parts PP on PP.ContentID = ZZ.ContentID
- join Items II on II.ItemID = PP.ItemID
- JOIN (Select ContentID, cast(config as XML) xConfig FROM Contents) CC ON II.ContentID = CC.ContentID
- outer apply xConfig.nodes('//MasterSlave') tMasterSlave(xMasterSlave)
- Union All
- -- Siblings
- select ZZ.Level
- ,xMasterSlave.value('@Applicability','nvarchar(255)') Apple
- ,IsNull(xMasterSlave.value('@Applicability','nvarchar(255)'),ZZ.ParApple) DerApple
- ,ZZ.ParApple
- , II.[ItemID], II.[ContentID]
- from Itemz ZZ
- join Items II on II.PreviousID = ZZ.ItemID
- JOIN (Select ContentID, cast(config as XML) xConfig FROM Contents) CC ON II.ContentID = CC.ContentID
- outer apply xConfig.nodes('//MasterSlave') tMasterSlave(xMasterSlave)
- Where Level >= 1
- )
- insert into @Apples
- select @ProcID ProcID, ItemID, ContentID, Apple, DerApple--, [ItemID], [ContentID]
- from ItemZ II
- OPTION (MAXRECURSION 10000)
-END
-
-
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-
--- Use the Applicability Table to limit Items included in the list of changes
-insert into @Chrono
-select Distinct VC.* from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS) VC
-Left JOIN @Apples AA ON AA.ContentID = VC.ContentID
-Where aa.ContentID is null or AA.DerApple = '-1' or ',' + AA.DerApple + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
-
-Declare @Audits TABLE
-(
-AuditID int primary key
-)
--- Create a Unique list of Minimum and Maximum AuditIDs for Each ContentID
-insert into @Audits
-select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid
--- Return the List Of Changes with the first Audit Record and the Last Audit Record
-select * from @Chrono
-where AuditID is null OR AuditID in (select AuditID from @Audits)
-order by OrdinalPath, contentid,auditid
-
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsSummaryByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsSummaryByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getCurrentRevisionByItemIDandUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getCurrentRevisionByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getCurrentRevisionByItemIDandUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getCurrentRevisionByItemIDandUnitID] Script Date: 06/22/2012 16:58:12 ******/
-/*
-getCurrentRevisionByItemID 41
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getCurrentRevisionByItemIDandUnitID]
-(
- @ItemID int,
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [Revisions].[RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-inner join
-(
-select top 1 revisionid,mxvid from
-(
-select rr.revisionid,max(vv.versionid) mxvid
-from items ii
-inner join revisions rr on ii.itemid = rr.itemid
-inner join versions vv on rr.revisionid = vv.revisionid
-inner join stages ss on vv.stageid = ss.stageid
-cross apply rr.config.nodes('Config/Applicability') t1(r1)
-where ss.isapproved = 1
-and ii.itemid = @ItemID
-and r1.value('@Index','int') = @UnitID
-group by rr.revisionid
-union
-select null,null
-) ds
-order by mxvid desc
-) rr on [Revisions].revisionid = rr.revisionid
--- WHERE [ItemID] = @ItemID
--- ORDER BY [RevisionID] DESC
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getCurrentRevisionByItemIDandUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getCurrentRevisionByItemIDandUnitID] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getDocumentByLibDoc] Script Date: 01/30/2012 14:08:10 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentByLibDoc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentByLibDoc];
-GO
-
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',4
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',3
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',2
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',1
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentByLibDoc]
-
-(
- @LibDoc varchar(12),
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- DECLARE @DocID int
- select @DocID = docid
- from
- (
- select
- distinct ah.docid,.dbo.vefn_GetVersionIDByItemID(ii.itemid) versionid
- from
- (
- select dd.docid,ofn.value('@OriginalFileName','varchar(20)') origfilename,dts
- from (select docid,cast(config as xml) xconfig,dts from documents) dd
- cross apply xconfig.nodes('//History') t1(ofn)
- ) ah
- inner join entries ee on ah.docid = ee.docid
- inner join items ii on ee.contentid = ii.itemid
- where origfilename = @LibDoc + '.LIB'
- ) ah
- where versionid = @VersionID
-
--- from (select docid,cast(config as xml) xconfig from documents) ah
--- cross apply xconfig.nodes('//Config/History') t1(roc)
--- where roc.value('@OriginalFileName','varchar(12)') = @LibDoc + '.LIB'
-
- SELECT
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [FileExtension],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[Documents].[DocID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[Documents].[DocID]) [EntryCount],
- (SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[Documents].[DocID]) [PdfCount]
- FROM [Documents]
- WHERE [DocID]=@DocID
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [DROUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[DROUsages].[RODbID]
- WHERE
- [DROUsages].[DocID]=@DocID
-
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Entries]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Entries].[ContentID]
- WHERE
- [Entries].[DocID]=@DocID
-
-
- SELECT
- [Pdfs].[DocID],
- [Pdfs].[DebugStatus],
- [Pdfs].[TopRow],
- [Pdfs].[PageLength],
- [Pdfs].[LeftMargin],
- [Pdfs].[PageWidth],
- [Pdfs].[PageCount],
- [Pdfs].[DocPdf],
- [Pdfs].[DTS],
- [Pdfs].[UserID],
- [Pdfs].[LastChanged]
- FROM [Pdfs]
- WHERE
- [Pdfs].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentByLibDoc Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentByLibDoc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getRevisionByItemIDandRevisionNumberAndUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID] Script Date: 06/25/2012 23:05:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID]
-
-(
- @ItemID int,
- @RevisionNumber nvarchar(50),
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
-declare @RevisionID int
-set @RevisionID = (select revisionid from revisions rr cross apply rr.config.nodes('//Applicability') t1(r1) where itemid = @itemid and revisionnumber = @RevisionNumber and r1.value('@Index','int') = @UnitID)
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [RevisionID]=@RevisionID
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Checks]
- JOIN [Stages] ON
- [Stages].[StageID]=[Checks].[StageID]
- WHERE
- [Checks].[RevisionID]=@RevisionID
-
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getRevisionByItemIDandRevisionNumberAndUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getRevisionByItemIDandRevisionNumberAndUnitID] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionsByItemIDandUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getRevisionsByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getRevisionsByItemIDandUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionsByItemIDandUnitID] Script Date: 06/26/2012 16:22:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionsByItemIDandUnitID]
-(
- @ItemID int,
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-cross apply config.nodes('//Applicability') t1(r1)
- WHERE [ItemID] = @ItemID
-and r1.value('@Index','int') = @UnitID
-and (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) > 0
- ORDER BY [RevisionID] DESC
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getRevisionsByItemIDandUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getRevisionsByItemIDandUnitID] Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetItemApplicability] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetItemApplicability]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetItemApplicability];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetItemApplicability] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @apple varchar(max)
- select @apple = r2.value('@Applicability','varchar(max)')
- from
- (
- select itemid,cast(config as xml) xconfig from items ii join contents cc on ii.contentid = cc.contentid
- ) t1
- outer apply xconfig.nodes('//MasterSlave') t2(r2)
- where itemid = @ItemID
- return @apple
-END
-GO
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetItemApplicability] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetItemApplicability] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ParentItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ParentItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_ParentItems] Script Date: 10/12/2012 16:12:01 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from [dbo].[vefn_ParentItems](212)
-select * from [dbo].[vefn_ParentItems](48)
-select * from [dbo].[vefn_ParentItems](49)
-select * from [dbo].[vefn_ParentItems](50)
-select * from [dbo].[vefn_ParentItems](51)
-select * from [dbo].[vefn_ParentItems](52)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ParentItems](@ItemID int)
-RETURNS @Parents TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Relationship], [ItemID], [ContentID], [PreviousID]) as (
- Select 1 [Relationship], [ItemID], [ContentID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Parents
- select 2 [Relationship], I.[ItemID], I.[ContentID], I.[PreviousID]
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
--- Siblings
-Union All
- select 0 [Relationship] , I.[ItemID], I.[ContentID], I.[PreviousID]
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
-)
-insert into @Parents select ItemID, ContentID from Itemz where Relationship > 0
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ParentItems Succeeded'
-ELSE PRINT 'Function: vefn_ParentItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetItemDerivedApplicability]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetItemDerivedApplicability];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetItemDerivedApplicability] Script Date: 10/13/2012 00:57:34 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select [dbo].[ve_GetItemDerivedApplicability](48)
-select [dbo].[ve_GetItemDerivedApplicability](49)
-select [dbo].[ve_GetItemDerivedApplicability](50)
-select [dbo].[ve_GetItemDerivedApplicability](51)
-select [dbo].[ve_GetItemDerivedApplicability](52)
---Prairie Island
-select [dbo].[ve_GetItemDerivedApplicability](29544) [ParentChild]
-select [dbo].[ve_GetItemDerivedApplicability](123816) [ParentChild]
-select [dbo].[ve_GetItemDerivedApplicability](125916) [ParentChild]
-select [dbo].[ve_GetItemDerivedApplicability](26955) [NonParentChild]
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetItemDerivedApplicability] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @apple varchar(max)
- select @apple = dbo.ve_getitemapplicability(@ItemID)
- if @apple is null
- begin
- declare @ParentID int
- select @ParentID = dbo.ve_getparentitem(@ItemID)
- if @parentid is not null
- set @apple = dbo.ve_GetItemDerivedApplicability(@ParentID)
- else
- begin
- select @apple = coalesce(@apple + ',','') + r2.value('@index','varchar(max)') from
- (select cast(config as xml) xconfig from docversions
- where versionid = dbo.vefn_GetVersionIDByItemID(@ItemID)) ah
- cross apply xconfig.nodes('//Slave') t2(r2)
- if(@apple is null) -- Non PC P/C Item
- BEGIN -- Get maximum Applicabilty
- declare @n int
- select @n=max(xSlave.value('@index','int')) from (
- select versionID, Cast(config as xml) xConfig from DocVersions) t1
- cross apply xconfig.nodes('//Slave') tSlave(xSlave)
- if(@n is not null)
- begin -- Build a list based upon the maximum
- with cte(ii) as (select 1 ii union all select ii+1 from cte where ii < @n)
- select @apple = coalesce(@apple+',','') + cast(ii as varchar(max)) from cte
- end
- if(@apple is null)Set @Apple=''
- END
- end
- end
- return @apple
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: ve_GetItemDerivedApplicability Succeeded'
-ELSE PRINT 'Function: ve_GetItemDerivedApplicability Error on Creation'
-GO
--------
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetItemAppliedApplicability]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetItemAppliedApplicability];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetItemAppliedApplicability] Script Date: 09/17/2018 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select [dbo].[ve_GetItemAppliedApplicability](48)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetItemAppliedApplicability] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @apple varchar(max)
- select @apple = dbo.ve_getitemapplicability(@ItemID)
- if(@apple is null)Set @Apple=''
- /***
- begin
- declare @ParentID int
- select @ParentID = dbo.ve_getparentitem(@ItemID)
- if @parentid is not null
- set @apple = dbo.ve_GetItemDerivedApplicability(@ParentID)
- else
- begin
- select @apple = coalesce(@apple + ',','') + r2.value('@index','varchar(max)') from
- (select cast(config as xml) xconfig from docversions
- where versionid = dbo.vefn_GetVersionIDByItemID(@ItemID)) ah
- cross apply xconfig.nodes('//Slave') t2(r2)
- if(@apple is null) -- Non PC P/C Item
- BEGIN -- Get maximum Applicabilty
- declare @n int
- select @n=max(xSlave.value('@index','int')) from (
- select versionID, Cast(config as xml) xConfig from DocVersions) t1
- cross apply xconfig.nodes('//Slave') tSlave(xSlave)
- if(@n is not null)
- begin -- Build a list based upon the maximum
- with cte(ii) as (select 1 ii union all select ii+1 from cte where ii < @n)
- select @apple = coalesce(@apple+',','') + cast(ii as varchar(max)) from cte
- end
- if(@apple is null)Set @Apple=''
- END
- end
- end
- ***/
- return @apple
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: ve_GetItemDerivedApplicability Succeeded'
-ELSE PRINT 'Function: ve_GetItemDerivedApplicability Error on Creation'
-GO
-
--------
-/****** Object: UserDefinedFunction [dbo].[vefn_GetParentItem] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetParentItem]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetParentItem];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetParentItem] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ParentID int;
-WITH Itemz([ItemID],[IsFound]) as
-(
-select ii.itemid,0 from items ii where ii.itemid = @ItemID
-union all
-select ii.previousid,0 from items ii
-join itemz zz on ii.itemid = zz.itemid
-where ii.previousid is not null
-and zz.isfound = 0
-union all
-select ii.itemid,1
-from parts pp
-join itemz zz on pp.itemid = zz.itemid
-join items ii on ii.contentid = pp.contentid
-)
-select top 1 @ParentID = itemid from itemz
-where isfound = 1 OPTION (MAXRECURSION 10000)
-RETURN @ParentID
-END
-GO
-
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetParentItem] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetParentItem] Error on Creation'
-go
-
-/****** Object: UserDefinedFunction [dbo].[vefn_CanTransitionBeCreated] Script Date: 10/14/2012 02:03:30 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CanTransitionBeCreated]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CanTransitionBeCreated];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_CanTransitionBeCreated(49,51)
-select dbo.vefn_CanTransitionBeCreated(51,49)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_CanTransitionBeCreated](@fromID int, @toID int) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@fromID),',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if (@tCount = 0) or (@tCount >= @uCount) begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_CanTransitionBeCreated Succeeded'
-ELSE PRINT 'Function: vefn_CanTransitionBeCreated Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionIDByItemID] Script Date: 02/03/2012 16:48:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionIDByItemID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetVersionIDByItemID];
-GO
-
-/*
-select dbo.vefn_GetVersionIDByItemID(41)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create function [dbo].[vefn_GetVersionIDByItemID]
-(@ItemID int)
-returns int
-as begin
- declare @VersionID int;
- with itemz
- (
- itemid,previousid,versionid
- ) as
- (
- select itemid,previousid,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- where itemid = @ItemID
- --siblins
- union all
- select ii.itemid,ii.previousid,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.previousid = ii.itemid
- where zz.versionid is null
- --chillins
- union all
- select ii.itemid,ii.previousid,null
- from parts pp
- join items ii on ii.contentid = pp.contentid
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.itemid = pp.itemid
- where zz.versionid is null
- --docversions
- union all
- select 0,0,dv.versionid
- from docversions dv
- join itemz zz on dv.itemid = zz.itemid
- where zz.versionid is null
- )
- select @VersionID = versionid from itemz zz
- where versionid is not null
- OPTION (MAXRECURSION 10000)
- return @VersionID
-end
-GO
--- Display the status of Func creation
-IF (@@Error = 0) PRINT 'Function Creation: vefn_GetVersionIDByItemID Succeeded'
-ELSE PRINT 'Function Creation: vefn_GetVersionIDByItemID Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_WillTransitionBeValidFrom] Script Date: 10/16/2012 18:17:37 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_WillTransitionBeValidFrom]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_WillTransitionBeValidFrom];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_WillTransitionBeValidFrom(194,'2')
-select dbo.vefn_WillTransitionBeValidFrom(216,'2')
-select dbo.vefn_WillTransitionBeValidFrom(246,'2')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_WillTransitionBeValidFrom](@toID int, @newAppl varchar(max)) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt(@newAppl,',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if @tCount >= @uCount begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_WillTransitionBeValidFrom Succeeded'
-ELSE PRINT 'Function: vefn_WillTransitionBeValidFrom Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_WillTransitionBeValidTo] Script Date: 10/16/2012 18:20:23 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_WillTransitionBeValidTo]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_WillTransitionBeValidTo];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_WillTransitionBeValidTo(10617,'2')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_WillTransitionBeValidTo](@toID int, @newAppl varchar(max)) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt(@newAppl,',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt(@newAppl,',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if @tCount >= @uCount begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_WillTransitionBeValidTo Succeeded'
-ELSE PRINT 'Function: vefn_WillTransitionBeValidTo Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_CanTransitionBeCreated] Script Date: 10/15/2012 14:37:32 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CanTransitionBeCreated]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CanTransitionBeCreated];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-exec vesp_CanTransitionBeCreated 46,180
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_CanTransitionBeCreated]
-(
- @fromItemID int,
- @toItemID int
-)
-AS BEGIN
- select dbo.vefn_CanTransitionBeCreated(@fromItemID,@toItemID) Status,
- dbo.ve_GetItemDerivedApplicability(@fromItemID) fromAppl,
- dbo.ve_GetItemDerivedApplicability(@toItemID) toAppl,
- dbo.ve_GetShortPath(@fromItemID) fromStep,
- dbo.ve_GetShortPath(@toItemID) toStep
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_CanTransitionBeCreated Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_CanTransitionBeCreated Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_ListItemAndChildrenByUnit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_ListItemAndChildrenByUnit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[vesp_ListItemAndChildrenByUnit];
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_ListItemAndChildrenByUnit] Script Date: 05/02/2012 23:16:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- vesp_ListItemAndChildrenByUnit 29546,0,'8'
--- drop procedure [vesp_ListItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemAndChildrenByUnit] (@ItemID int, @ParentID int, @UnitID varchar(max))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([apple],[Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 1 [apple],0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select case when s1.value('@Applicability','varchar(max)') is null or ',' + s1.value('@Applicability','varchar(max)') + ',' like '%,' + @UnitID + ',%' then 1 else 0 end apple
-,[Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join (select ContentID,cast(Config as xml) xConfig from Contents) C on C.ContentID = I.ContentID
- outer apply C.xConfig.nodes('//MasterSlave') m1(s1)
-where Z.[Apple] = 1
--- Siblings
-Union All
- select case when s1.value('@Applicability','varchar(max)') is null or ',' + s1.value('@Applicability','varchar(max)') + ',' like '%,' + @UnitID + ',%' then 1 else 0 end apple
-,[Level] ,Z.[ParentID],
-case when Z.[Apple] = 1 then Z.[Ordinal] +1 else Z.[Ordinal] end, I.[ItemID],
-case when Z.[Apple] = 1 then I.[PreviousID] else Z.[PreviousID] end, [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join (select ContentID,cast(Config as xml) xConfig from Contents) C on C.ContentID = I.ContentID
- outer apply C.xConfig.nodes('//MasterSlave') m1(s1)
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- CASE WHEN I.ItemID IN (SELECT ParentID FROM ItemZ WHERE apple = 1) THEN (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) ELSE 0 END [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
-where i.apple = 1
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Procedure Creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemAndChildrenByUnit Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemAndChildrenByUnit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_WillTransitionsBeValid] Script Date: 10/15/2012 14:37:32 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_WillTransitionsBeValid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_WillTransitionsBeValid];
-GO
-/*
-dbo.vesp_WillTransitionsBeValid 10616,'2'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [DBO].[vesp_WillTransitionsBeValid]
-(
- @ItemID int,
- @NewAppl varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS BEGIN
- select *, dbo.ve_GetShortPath(@ItemID) SrcStep, dbo.ve_GetShortPath(myitemid) TgtStep
- from
- (
- select tt.toid MyItemID, dbo.vefn_WillTransitionBeValidFrom(tt.toid,@NewAppl) Valid, @NewAppl SrcAppl, dbo.ve_GetItemDerivedApplicability(tt.toid) TgtAppl
- from transitions tt
- inner join items ii on tt.fromid = ii.contentid
- where fromid in (select contentid from dbo.vefn_childitems(@ItemID))
- union
- select ii.itemid MyItemID, dbo.vefn_WillTransitionBeValidTo(ii.itemid,@NewAppl) Valid, dbo.ve_GetItemDerivedApplicability(ii.itemid) SrcAppl, @NewAppl TgtAppl
- from transitions tt
- inner join items ii on tt.fromid = ii.contentid
- where toid in (select itemid from dbo.vefn_childitems(@ItemID))
- ) ah
- where Valid = 0
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_WillTransitionsBeValid Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_WillTransitionsBeValid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vefn_NextCount] Script Date: 02/05/2013 11:58:00 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_NextCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP Function [vefn_NextCount];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_NextCount](@ItemID int)
-RETURNS Int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([NextCnt], [ItemID], [PreviousID]) as (
- Select 0 [NextCnt], [ItemID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select Z.[NextCnt] +1, I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN @Count
-END
-GO
-IF (@@Error = 0) PRINT 'Function Creation: vefn_NextCount Succeeded'
-ELSE PRINT 'Function Creation: vefn_NextCount Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_ListItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItems];
-GO
-
---vesp_ListItems 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItems]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select 0 knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select Z.knt + 1,C.ItemID,C.PreviousID,C.ContentID,C.[DTS],C.[UserID],C.[LastChanged]
- from Items C
- Join Itemz Z on C.PreviousID=Z.ItemID
-)
-Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Itemz].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Itemz].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[Itemz].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Itemz].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Itemz].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Itemz].[ItemID]) [Transition_ToIDCount]
-from Itemz order by knt
-OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemsAndContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsAndContent];
-GO
-
---vesp_ListItemsAndContent 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsAndContent]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select 0 knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select z.knt + 1, I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged]
- from Items I
- Join Itemz Z on I.PreviousID=Z.ItemID
-)
-Select I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz I Join Contents C on I.ContentID = C.ContentID Order by knt
-OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsAndContent Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_SortProcedures] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SortProcedures]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SortProcedures];
-GO
-
-/*
-select versionid, ff.folderid, ff.name,itemid
-from docversions dv
-join folders ff on dv.folderid=ff.folderid
-
-Westinghouse Data
-exec vesp_SortProcedures 1 -- Abnormal Procedures
---exec vesp_SortProcedures 4 -- Emergency Operating Procedures - Rev 2
-exec vesp_SortProcedures 5 -- System Operating Procedures
-exec vesp_SortProcedures 6 -- Maintenance, Test, Inspection, Surveillance Procedures
---exec vesp_SortProcedures 7 -- Severe Accident Management Guidelines
---exec vesp_SortProcedures 8 -- Emergency Response Guidelines
-exec vesp_SortProcedures 9 -- General Operating Procedures
-exec vesp_SortProcedures 11 -- Post 72-Hour Procedures 103811
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SortProcedures]( @VersionID int )
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @TopID int
- select @TopID = ItemID from DocVersions where versionID = @VersionID
- DECLARE @Procs TABLE
- (
- ItemID int PRIMARY KEY,
- ProcNum nvarchar(255)
- )
- DECLARE @Organize TABLE
- (
- ItemID int PRIMARY KEY,
- NewPreviousID int
- )
- DECLARE @NewTopID as int
- INSERT INTO @Procs select ZZ.ItemID, isnull(Replace(CC.Number,'\u8209?','-'),'') + ':' + substring('0000000000000000' + cast(ItemID as varchar(16)), 1+ len( cast(ItemID as varchar(16))), 16) ProcNum from vefn_SiblingItems(@TopID,0) ZZ Join Contents CC on CC.ContentID = ZZ.ContentID
- --INSERT INTO @Procs select ZZ.ItemID, isnull(Replace(Replace(CC.Number,'\u8209?','-'),'\','\u9586?'),'') + ':' + substring('0000000000000000' + cast(ItemID as varchar(16)), 1+ len( cast(ItemID as varchar(16))), 16) ProcNum from vefn_SiblingItems(@TopID,0) ZZ Join Contents CC on CC.ContentID = ZZ.ContentID
- --select * from @Procs order by ProcNum + cast(ItemID as nvarchar(max))
- select top 1 @NewTopID = ItemID from @Procs order by ProcNum
- INSERT INTO @Organize
- select ItemID, (select top 1 ItemID from @Procs P2 where P1.ProcNum > P2.ProcNum order by P2.ProcNum DESC ) NewPreviousID
- from @Procs P1 order by isnull(ProcNum,'') + cast(ItemID as nvarchar(max))
- --select * from @Organize
- Update DocVersions Set ItemID = @NewTopID where versionID = @VersionID
- Update II Set II.PreviousID = ZZ.NewPreviousID
- from Items II join @Organize ZZ On II.ItemID = ZZ.ItemID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SortProcedures Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SortProcedures Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_RemoveExtraText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveExtraText]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveExtraText];
-GO
-
-/*
-select text, .dbo.vefn_RemoveExtraText(text,2,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,1,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,0,0,0) StrippedText ,.dbo.vefn_FirstLink(text,0), PATINDEX('%[' + nchar(9516) + nchar(9574) + char(21) + ']%' , text) from Contents where ContentID=373
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,0,0)
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,1,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,1)
-*/
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveExtraText](@text nvarchar(MAX),@includeLink int, @includeRtfFormatting int , @includeSpecialCharacters int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-DECLARE @index2 int
--- Replace Hard Hyphen with Hyphen
-SET @text = replace(@text,'\u8209?','-')
---SET @text = replace(replace(@text,'\u8209?','-'),'\u9586?','\')
--- Replace Hard Space with Space
--- commenting out the bottom two lines will fix the global search for hard space bug (B2014-056)
---SET @text = replace(@text,'\u160?',' ')
---set @text = replace(@text,nchar(160),' ')
--- Strip Links
-IF @includeLink = 0 -- Remove Links
- SET @text = [dbo].[vefn_RemoveRange](@text,'')
-IF @includeLink < 2 -- Remove Comments
- SET @text = [dbo].[vefn_RemoveRange](@text,'\v' ,'\v0')
-if(@includeRtfFormatting=0)
- -- Remove Rtf Formatting
- BEGIN
- -- B2022-082: underline/bold of word removes space between 2 words so was not finding cases
- SET @text = Replace(@text, '\ulnone\b0 ', '');
- SET @text = Replace(@text, '\b0\ulnone ', '');
- SET @text = Replace(@text, '\b0 ', '');
- SET @text = Replace(@text, '\b ', '');
- SET @text = Replace(@text, '\ulnone ', '');
- SET @text = Replace(@text, '\ul0 ', '');
- SET @text = Replace(@text, '\ul ', '');
- SET @text = Replace(@text, '\i0 ', '');
- SET @text = Replace(@text, '\i ', '');
- SET @text = Replace(@text, '\super ', '');
- SET @text = Replace(@text, '\sub ', '');
- SET @text = Replace(@text, '\nosupersub ', '');
- SET @text = Replace(@text, '\up2 ', '');
- SET @text = Replace(@text, '\up0 ', '');
- SET @text = Replace(@text, '\up3 ', '');
- SET @text = Replace(@text, '\dn2 ', '');
- SET @text = Replace(@text, '\dn3 ', '');
- SET @text = Replace(@text, '\b0', '');
- SET @text = Replace(@text, '\b', '');
- SET @text = Replace(@text, '\ul0', '');
- SET @text = Replace(@text, '\ul', '');
- SET @text = Replace(@text, '\i0', '');
- SET @text = Replace(@text, '\i', '');
- SET @text = Replace(@text, '\super', '');
- SET @text = Replace(@text, '\sub', '');
- SET @text = Replace(@text, '\nosupersub', '');
- SET @text = Replace(@text, '\up2', '');
- SET @text = Replace(@text, '\up0', '');
- SET @text = Replace(@text, '\up3', '');
- SET @text = Replace(@text, '\dn2', '');
- SET @text = Replace(@text, '\dn3', '');
- END
-if(@includeSpecialCharacters=0)
- -- Remove Special Characters
- BEGIN
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+5,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+6,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+7,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- END
-
- END
- -- Replace Hyphen with Hard Hyphen
-SET @text = replace(@text,'-','\u8209?')
---SET @text = replace(replace(@text,'-','\u8209?'),'\','\u9586?')
-
-RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Error on Creation'
-GO
-
-
-/****** Object: Table Function [vefn_FindSpecialChars] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindSpecialChars]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindSpecialChars];
-GO
-
-/*
-
-select * from vefn_FindSpecialChars('\u160?\ulnone \u8209?')
-
-select MIN(ContentID) MinContentID,Count(*) HowMany,UChar SpecialChar from Contents
-cross apply vefn_FindSpecialChars(text) SC
-where text like '%\u[0-9]%'
-group by UChar
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindSpecialChars](@text varchar(MAX))
-RETURNS @SpecialChars TABLE
-(
- uchar varchar(10)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @index1 int
- DECLARE @index2 int
- SET @index1 = -1
- SET @index1 = PATINDEX('%\u[0-9]%' , @text)
- WHILE (@index1 > 0)
- BEGIN
- SET @index2 = CHARINDEX('?' , @text, @index1 + 3)
- if @index2 > 0
- BEGIN
- INSERT INTO @SpecialChars VALUES (substring(@text,@index1,1 + @index2-@index1))
- SET @Text = substring(@text,@index2 + 1,len(@text))
- END
- SET @index1 = PATINDEX('%\u[0-9]%' , @text)
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindSpecialChars Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindSpecialChars Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_FindSpecialChars2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindSpecialChars2]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindSpecialChars2];
-GO
-
-/*
-
-select * from vefn_FindSpecialChars2(nchar(255) + nchar(8209) + nchar(160))
-
-select MIN(ContentID) MinContentID,Count(*) HowMany,UChar SpecialChar from Contents
-cross apply vefn_FindSpecialChars2(text) SC
-group by UChar
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindSpecialChars2](@text nvarchar(MAX))
-RETURNS @SpecialChars TABLE
-(
- uchar int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- WHILE (len(@text) > 0)
- BEGIN
- if(unicode(@text) > 127)
- INSERT INTO @SpecialChars VALUES (unicode(@text))
- SET @Text = substring(@text,2,len(@text))
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindSpecialChars2 Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindSpecialChars2 Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[MoveItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [MoveItem];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[MoveItem](@ItemID int, @Index int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ItemsChanged TABLE
- (
- ItemID int Primary Key
- )
- DECLARE @Siblings TABLE
- (
- ItemID int PRIMARY KEY,
- Ordinal int
- )
- DECLARE @OldPreviousID int
- SELECT @OldPreviousID = PreviousID FROM [Items] where ItemID = @ItemID
- DECLARE @OldNextID int
- SELECT @OldNextID = ItemID FROM [Items] where PreviousID = @ItemID
- insert into @Siblings select * from vefn_AllSiblingItems(@ItemID)
- DECLARE @NewNextID int
- SELECT @NewNextID = ItemID from @Siblings where Ordinal = @index
- DECLARE @NewPreviousID int
- SELECT @NewPreviousID = ItemID from @Siblings where Ordinal = @index -1
- --PRINT '****************************************************************'
- --PRINT '@ItemID = ' + isnull(Cast( @ItemID as varchar(20)),'{null}')
- --PRINT '@OldPreviousID = ' + isnull(Cast( @OldPreviousID as varchar(20)),'{null}')
- --PRINT '@OldNextID = ' + isnull(Cast( @OldNextID as varchar(20)),'{null}')
- --PRINT '@NewPreviousID = ' + isnull(Cast( @NewPreviousID as varchar(20)),'{null}')
- --PRINT '@NewNextID = ' + isnull(Cast( @NewNextID as varchar(20)),'{null}')
- Update Items set PreviousID = @NewPreviousID where ItemID = @ItemID
- Insert INTO @ItemsChanged Select @ItemID
- IF @OldNextID is not Null
- BEGIN
- Update Items set PreviousID = @OldPreviousID where ItemID = @OldNextID
- Insert INTO @ItemsChanged Select @OldNextID
- END
- IF @NewNextID is not Null
- BEGIN
- Update Items set PreviousID = @ItemID where ItemID = @NewNextID
- Insert INTO @ItemsChanged Select @NewNextID
- END
- IF @OldPreviousID is null
- BEGIN
- Update Parts set ItemID = @OldNextID where ItemID = @ItemID
- Update DocVersions set ItemID = @OldNextID where ItemID = @ItemID
- END
- IF @NewPreviousID is null
- BEGIN
- Update Parts set ItemID = @ItemID where ItemID = @NewNextID
- Update DocVersions set ItemID = @ItemID where ItemID = @NewNextID
- END
- SELECT
- ii.[ItemID],
- [PreviousID],
- ii.[ContentID],
- ii.[DTS],
- ii.[UserID],
- ii.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount]
- FROM [Items] ii
- WHERE ItemID in (Select ItemID from @ItemsChanged)
- IF( @@TRANCOUNT > 0 )
- BEGIN
- PRINT 'COMMIT'
- COMMIT
- END
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 )
- BEGIN
- PRINT 'ROLLBACK'
- ROLLBACK -- Only rollback if top level
- END
- ELSE IF( @@TRANCOUNT > 1 )
- BEGIN
- PRINT 'COMMIT'
- COMMIT -- Otherwise commit. Top level will rollback
- END
- EXEC vlnErrorHandler
-END CATCH
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: MoveItem Succeeded'
-ELSE PRINT 'Procedure Creation: MoveItem Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllSiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllSiblingItems];
-GO
-/*
-DECLARE @ItemID int
-select @ItemID = ItemID from DocVersions where VersionID = 1
-Select * from vefn_AllSiblingItems(@ItemID) order by Ordinal
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllSiblingItems](@ItemID int)
-RETURNS @Siblings TABLE
-(
- ItemID int,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([ItemID], [PreviousID], [Ordinal]) as (
- Select [ItemID], [PreviousID], case when [PreviousID] is null then 0 else -1 end
- FROM [Items]
- where [ItemID]=@ItemID
--- Previous Siblings
-Union All
- select I.[ItemID], I.[PreviousID] ,case when I.[PreviousID] is null then 0 else Z.[Ordinal] -1 end
- from Itemz Z
- join Items I on I.ItemID = Z.PreviousID
- where Z.Ordinal < 0
--- Next Siblings
-Union All
- select I.[ItemID], I.[PreviousID] ,Z.[Ordinal] +1
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.Ordinal >= 0
-)
-insert into @Siblings select ItemID, Ordinal from Itemz Where Ordinal >= 0
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-
-GO
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllSiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllSiblingItems Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_JustSiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_JustSiblingItems];
-GO
-/*
-DECLARE @ItemID int
-select @ItemID = ItemID from DocVersions where VersionID = 1
-Select * from vefn_JustSiblingItems(@ItemID) order by Ordinal
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_JustSiblingItems](@FirstItemID int)
-RETURNS @Siblings TABLE
-(
- ItemID int PRIMARY KEY,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([ItemID],[Ordinal]) as (
- Select [ItemID],0
- FROM [Items]
- where [ItemID]=@FirstItemID
--- Siblings
-Union All
- select I.[ItemID],Z.[Ordinal] +1
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @Siblings select ItemID, Ordinal from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_JustSiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_JustSiblingItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ResetFolderManualOrder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetFolderManualOrder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetFolderManualOrder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetFolderManualOrder]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-update fld
- set Fld.ManualOrder =Fld.MyRow
-from (Select ROW_NUMBER() OVER(Partition by ParentID Order BY FolderID) MyRow,* from folders ) fld
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ResetFolderManualOrderAlphabetical] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetFolderManualOrderAlphabetical]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetFolderManualOrderAlphabetical];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetFolderManualOrderAlphabetical]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-update fld
- set Fld.ManualOrder =Fld.MyRow
-from (Select case when FolderID <> ParentID then ROW_NUMBER() OVER(Partition by ParentID Order BY Name) else 0 end MyRow,* from folders) fld
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetFolderManualOrderAlphabetical Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetFolderManualOrderAlphabetical Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tr_Documents_Delete]') AND OBJECTPROPERTY(id,N'IsTrigger') = 1)
- DROP TRIGGER [tr_Documents_Delete];
-
- /****** Object: Trigger [dbo].[tr_Documents_Delete] Script Date: 03/28/2013 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: Trigger [tr_Documents_Delete] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE trigger [dbo].[tr_Documents_Delete] on [dbo].[Documents] instead of delete as
- begin
- update ii set DeleteStatus = Isnull((select max(DeleteID) from DeleteLog where SPID = @@spid),-1), DTS = getdate(),
- UserID = IsNull((select top 1 UserID from DeleteLog where SPID = @@spid order by deleteid desc),ii.UserID)
- from tblDocuments ii inner join deleted dd on dd.DocID = ii.DocID
- insert into DocumentAudits(DocID,LibTitle,DocContent,DocAscii,Config,DTS,UserID,FileExtension,DeleteStatus)
- select ii.DocID,ii.LibTitle,ii.DocContent,ii.DocAscii,ii.Config,ii.DTS,ii.UserID,ii.FileExtension,ii.DeleteStatus
- from tblDocuments ii inner join deleted dd on dd.DocID = ii.DocID
- where ii.DeleteStatus != 0
- end
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger alteration: tr_Documents_Delete Succeeded'
-ELSE PRINT 'Trigger alteration: tr_Documents_Delete Error on Alteration'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Select * from vefn_GetVersionItems('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetVersionItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetVersionItems] Error on Creation'
-
-/****** Object: StoredProcedure [getAffectedRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedRoUsages];
-GO
-
-/*
-getAffectedROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedRoUsages]
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100),
- @VersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @JustThisVersion TABLE
- (
- ContentID int primary key
- )
- Insert INTO @JustThisVersion
- SELECT Distinct ContentID From vefn_GetVersionItems(@VersionList)
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID FROM ROUSAGES
- where RODbID = @RODbID AND ROID = @ROID AND ContentID in (select ContentID from @JustThisVersion))
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID AND [RoUsages].[ROID]=@ROID
- AND [Contents].ContentID in (select ContentID from @JustThisVersion)
-END
-RETURN
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAffectedDRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedDRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedDRoUsages];
-GO
-
-/*
-getAffectedDROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR',''
-getAffectedDROUsages 1, '000300003D8E', 'KBR Test', 'Changed', 'KBR',''
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedDRoUsages]
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100),
- @VersionList nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @JustThisVersion TABLE
- (
- ContentID int primary key
- )
- Insert INTO @JustThisVersion
- SELECT Distinct ContentID From vefn_GetVersionItems(@VersionList)
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- DECLARE @DRoUsages TABLE
- (
- DRoUsageID int primary key
- )
- Insert INTO @DRoUsages
- select DRoUsageID from DRoUsages where ROID like substring(@ROID,1,12) + '%' AND dbo.vefn_CompareROIDS(ROID,@ROID) > 0
-
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID
- FROM (select dr.* from DRoUsages dr join @DRoUsages dd on dr.DRoUsageid = dd.DRoUsageid) DR
- JOIN Entries EE on EE.DocID = DR.DocID
- where RODbID = @RODbID AND ContentID in (select ContentID from @JustThisVersion))
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DRoUsages].[DRoUsageID] in (select DRoUsageid from @DRoUsages)
- AND [Documents].[DocID] in (select EE.DocID from Entries EE where ContentID in (select ContentID from @JustThisVersion))
- RETURN
- END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedDRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedDRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAnnotationType]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [tblAnnotations]
- WHERE [TypeID]=@TypeID
- DELETE [AnnotationTypes]
- WHERE [TypeID] = @TypeID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getJustFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getJustFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getJustFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_TurnChangeManagerOFF] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerOFF]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerOFF];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerOFF] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerOFF
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerOFF] WITH EXECUTE AS OWNER AS
-BEGIN
- DECLARE @cmd VARCHAR(MAX)
- SET @cmd = 'DISABLE TRIGGER tr_Annotations_Delete ON Annotations'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Contents_Delete ON Contents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Documents_Delete ON Documents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Entries_Delete ON Entries'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_GridAudits_insert ON GridAudits'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Grids_Delete ON Grids'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Images_Delete ON Images'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Items_Delete ON Items'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Parts_Delete ON Parts'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_ROUsages_Delete ON ROUsages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblAnnotations_Update ON tblAnnotations'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblContents_Update ON tblContents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblDocuments_Update ON tblDocuments'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblEntries_Update ON tblEntries'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblGrids_Update ON tblGrids'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblImages_Update ON tblImages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblItems_Update ON tblItems'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblParts_Update ON tblParts'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblROUsages_Update ON tblROUsages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblTransitions_Update ON tblTransitions'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Transitions_Delete ON Transitions'
- EXEC (@cmd)
- PRINT '***** Change Manager has been turned OFF *****'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_TurnChangeManagerON] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerON]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerON];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerON] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerON
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerON] WITH EXECUTE AS OWNER AS
-BEGIN
- DECLARE @cmd VARCHAR(MAX)
- SET @cmd = 'ENABLE TRIGGER tr_Annotations_Delete ON Annotations'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Contents_Delete ON Contents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Documents_Delete ON Documents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Entries_Delete ON Entries'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_GridAudits_insert ON GridAudits'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Grids_Delete ON Grids'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Images_Delete ON Images'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Items_Delete ON Items'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Parts_Delete ON Parts'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_ROUsages_Delete ON ROUsages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblAnnotations_Update ON tblAnnotations'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblContents_Update ON tblContents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblDocuments_Update ON tblDocuments'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblEntries_Update ON tblEntries'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblGrids_Update ON tblGrids'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblImages_Update ON tblImages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblItems_Update ON tblItems'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblParts_Update ON tblParts'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblROUsages_Update ON tblROUsages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblTransitions_Update ON tblTransitions'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Transitions_Delete ON Transitions'
- EXEC (@cmd)
- PRINT '***** Change Manager has been turned ON *****'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerON Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerON Error on Creation'
-GO
-/****** Object: TableFunction [vefn_FindROUsageIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindROUsageIDs]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindROUsageIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindROUsageIDs](@ContentAuditID int)
-RETURNS @IDs TABLE
-(
- ROUsageID int PRIMARY KEY,
- ROUsageAction char(3)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- DECLARE @ContentID int
- DECLARE @text varchar(max)
- SELECT @ContentID = ContentID,@text = Text FROM ContentAudits WHERE AuditID = @ContentAuditID
- DECLARE @index1 int
- DECLARE @index2 int
- DECLARE @tid varchar(max)
- DECLARE @trid int
- WHILE (LEN(@text) > 0)
- BEGIN
- SET @index1 = CHARINDEX('#Link:ReferencedObject' , @text)
- IF (@index1 > 0)
- BEGIN
- SET @text = RIGHT(@text, (LEN(@text) - (22 + @index1)))
- SET @index1 = CHARINDEX(' ', @text)
- SET @tid = LTRIM(LEFT(@text, @index1))
- SET @trid = CAST(@tid AS INT)
- IF EXISTS (SELECT ROUsageID FROM tblROUsages WHERE ROUsageID = @trid AND DeleteStatus < 0)
- INSERT INTO @IDs VALUES (@trid, 'ADD')
- ELSE
- INSERT INTO @IDs VALUES (@trid, NULL)
- END
- ELSE
- SET @text = ''
- END
- INSERT INTO @IDs SELECT tt.ROUsageID,'DEL' FROM tblROUsages tt LEFT JOIN @IDs ti ON tt.ROUsageID = ti.ROUsageID WHERE tt.ContentID = @ContentID
- AND ti.ROUsageID IS NULL
- DELETE FROM @IDs WHERE ROUsageAction IS NULL
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindROUsageIDs Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindROUsageIDs Error on Creation'
-GO
-/****** Object: TableFunction [vefn_GetVersionFormatItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionFormatItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionFormatItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionFormatItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int,
- ParentFormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID], [ParentFormatID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID],
- isnull(C.[FormatID],isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))),
- isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID]
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join folders F on DV2.[FolderID] = F.[FolderID]
- join folders P on P.[FolderID] = F.[ParentID]
- join Contents C on I.ContentID = C.ContentID
-
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[FormatID]), Z.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[ParentFormatID]), Z.[ParentFormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID], [ParentFormatID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionFormatItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionFormatItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDRoUsagesByROIDsAndVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDRoUsagesByROIDsAndVersions];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDRoUsagesByROIDsAndVersions]
-(
- @ROIDs nvarchar(MAX),
- @Versions nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [DRoUsages].RODBID = SS.[RODBID] and [DRoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- Where [Documents].[DocID] in
- (Select Distinct [DocID] from [ENTRIES]
- JOIN [VEFN_GetVersionItems](@Versions) VV ON [Entries].ContentID = VV.ContentID)
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDRoUsagesByROIDsAndVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getDRoUsagesByROIDsAndVersions Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesByROIDsAndVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesByROIDsAndVersions];
-GO
-
-CREATE PROCEDURE [dbo].[getRoUsagesByROIDsAndVersions]
-(
- @ROIDs nvarchar(MAX),
- @Versions nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [RoUsages].RODBID = SS.[RODBID] and [RoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- JOIN [VEFN_GetVersionItems](@Versions) VV ON [Contents].ContentID = VV.ContentID
- RETURN
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesByROIDsAndVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesByROIDsAndVersions Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetROTokens] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetROTokens]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetROTokens];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetROTokens](@text varchar(MAX))
-RETURNS @Tokens TABLE
-(
- Token varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-SET @index = -1
-DECLARE @indexb int
-DECLARE @indexc int
-DECLARE @indexd int
-DECLARE @indexNext int
-DECLARE @indexReturn int
-WHILE (LEN(@text) > 0)
- BEGIN
- SET @index = PATINDEX('%<[A-Z]-%' , @text)
- SET @indexb = PATINDEX('%<[A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexb>0) or (@indexb > 0 and @index > @indexb))
- SET @index = @indexb
- SET @indexc = PATINDEX('%<[A-Z][A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexc>0) or (@indexc > 0 and @index > @indexc))
- SET @index = @indexc
- SET @indexd = PATINDEX('%<[A-Z][A-Z][A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexd>0) or (@indexd > 0 and @index > @indexd))
- SET @index = @indexd
- IF @index = 0
- BREAK
- SET @indexNext = @index + CHARINDEX('<' , substring(@text,@index+1,len(@text)))
- IF @IndexNext=@index
- SET @IndexNext = len(@text)+ 3
- SET @indexReturn = @index + CHARINDEX(char(13) , substring(@text,@index+1,len(@text)))
- IF @IndexReturn=@index
- SET @IndexReturn = len(@text)+3
- DECLARE @index2 int
- SET @index2 = @index + CHARINDEX('>' , substring(@text,@index,len(@text)))
- if @index2 = @index
- BREAK
- if(@index2 > @indexNext or @index2 > @indexReturn)
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- else
- BEGIN
- INSERT INTO @Tokens VALUES (substring(@text, @index,@index2-@index))
- if(len(@text) > @index2)
- SET @text = substring(@text, @index2 , len(@text))
- else
- SET @Text = ''
- END
- END
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetROTokens Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetROTokens Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetVersionNames] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionNames]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionNames];
-GO
-
---
--- select * from vefn_GetVersionNames()
---
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetVersionNames]()
-RETURNS @Versions TABLE
-(
- VersionID int primary Key,
- GrandParentName nvarchar(100),
- ParentName nvarchar(100),
- FolderName nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @Versions
- select versionid,gf.name GrandParentName, pf.name ParentName, ff.name FolderName
- from docversions dv
- Join folders ff on ff.FolderID = DV.FolderID
- Join folders pf on pf.FolderID = ff.parentID
- Join folders gf on gf.FolderID = pf.parentid
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionNames Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionNames Error on Creation'
-GO
-
-
-
-
--- =========================================== End of Functions and Procedures
-
--- Turn off Auto Close and Auto Shrink
-declare @CMD varchar(max)
-set @CMD = 'ALTER DATABASE [' + db_name() +'] SET AUTO_CLOSE OFF'
-exec(@CMD)
-GO
-declare @CMD varchar(max)
-set @CMD = 'ALTER DATABASE [' + db_name() +'] SET AUTO_SHRINK OFF'
-exec(@CMD)
-GO
-
---added by JCB for Security and MultiUser support
---ALTER TABLE Sessions add MachineName and ProcessID columns if they do not exist
-IF COL_LENGTH('Sessions','MachineName') IS NULL
- ALTER TABLE Sessions ADD [MachineName] [nvarchar](100) NOT NULL,[ProcessID] [int] NOT NULL;
-GO
---ALTER TABLE Sessions change DTSActivity column to not null
-ALTER TABLE sessions ALTER COLUMN [DTSActivity] [datetime] NOT NULL
-GO
---ALTER TABLE Sessions set DTSActivity column default value to getdate()
-IF OBJECT_ID('DF_Sessions_DTSActivity', 'D') IS NULL
- ALTER TABLE sessions ADD CONSTRAINT [DF_Sessions_DTSActivity] DEFAULT (getdate()) for [DTSActivity];
-GO
-
-/****** Object: StoredProcedure [purgeData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[purgeData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [purgeData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[purgeData]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- delete from [AnnotationAudits]
- dbcc checkident([AnnotationAudits],reseed,0)
- delete from [Applicabilities]
- dbcc checkident([Applicabilities],reseed,0)
- delete from [ApplicableStructures]
- delete from [Assignments]
- dbcc checkident([Assignments],reseed,0)
- delete from [Associations]
- dbcc checkident([Associations],reseed,0)
- delete from [Checks]
- dbcc checkident([Checks],reseed,0)
- delete from [ContentAudits]
- dbcc checkident([ContentAudits],reseed,0)
- delete from [DeleteLog]
- dbcc checkident([DeleteLog],reseed,0)
- delete from [Details]
- dbcc checkident([Details],reseed,0)
- delete from [DocumentAudits]
- dbcc checkident([DocumentAudits],reseed,0)
- delete from [DocVersions]
- dbcc checkident([DocVersions],reseed,0)
- delete from [DROUsages]
- dbcc checkident([DROUsages],reseed,0)
- delete from [EntryAudits]
- dbcc checkident([EntryAudits],reseed,0)
- delete from [Figures]
- dbcc checkident([Figures],reseed,0)
- delete from [Folders]
- dbcc checkident([Folders],reseed,0)
- delete from [GridAudits]
- dbcc checkident([GridAudits],reseed,0)
- delete from [ImageAudits]
- dbcc checkident([ImageAudits],reseed,0)
- delete from [ItemAudits]
- dbcc checkident([ItemAudits],reseed,0)
- delete from [Memberships]
- dbcc checkident([Memberships],reseed,0)
- delete from [PartAudits]
- dbcc checkident([PartAudits],reseed,0)
- delete from [Pdfs]
- delete from [Permissions]
- dbcc checkident([Permissions],reseed,0)
- delete from [ROFsts]
- dbcc checkident([ROFsts],reseed,0)
- delete from [ROImages]
- dbcc checkident([ROImages],reseed,0)
- delete from [Roles]
- dbcc checkident([Roles],reseed,0)
- delete from [ROUsageAudits]
- dbcc checkident([ROUsageAudits],reseed,0)
- delete from [tblAnnotations]
- dbcc checkident([tblAnnotations],reseed,0)
- delete from [tblEntries]
- delete from [tblGrids]
- delete from [tblImages]
- delete from [tblParts]
- delete from [tblROUsages]
- dbcc checkident([tblROUsages],reseed,0)
- delete from [TransitionAudits]
- dbcc checkident([TransitionAudits],reseed,0)
- delete from [Users]
- dbcc checkident([Users],reseed,0)
- delete from [Versions]
- dbcc checkident([Versions],reseed,0)
- delete from [ZContents]
- delete from [ZTransitions]
- delete from [AnnotationTypes]
- dbcc checkident([AnnotationTypes],reseed,0)
- delete from [Connections]
- dbcc checkident([Connections],reseed,0)
- delete from [Groups]
- dbcc checkident([Groups],reseed,0)
- delete from [Revisions]
- dbcc checkident([Revisions],reseed,0)
- delete from [RODbs]
- dbcc checkident([RODbs],reseed,0)
- delete from [Stages]
- dbcc checkident([Stages],reseed,0)
- delete from [tblDocuments]
- dbcc checkident([tblDocuments],reseed,0)
- delete from [tblTransitions]
- dbcc checkident([tblTransitions],reseed,0)
- delete from [tblItems]
- dbcc checkident([tblItems],reseed,0)
- delete from [tblContents]
- dbcc checkident([tblContents],reseed,0)
- delete from [Formats]
- dbcc checkident([Formats],reseed,0)
- delete from [Sessions]
- dbcc checkident([Sessions],reseed,0)
- delete from [Owners]
- dbcc checkident([Owners],reseed,0)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: purgeData Succeeded'
-ELSE PRINT 'Procedure Creation: purgeData Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getSessions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getSessions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getSessions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getSessions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getSessions Succeeded'
-ELSE PRINT 'Procedure Creation: getSessions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateSession]
-
-(
- @SessionID int,
- @UserID nvarchar(100),
- @DTSDtart datetime,
- @DTSEnd datetime=null,
- @DTSActivity datetime,
- @LastChanged timestamp,
- @MachineName nvarchar(100),
- @ProcessID int,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Sessions]
- SET
- [UserID]=@UserID,
- [DTSDtart]=@DTSDtart,
- [DTSEnd]=@DTSEnd,
- [DTSActivity]=@DTSActivity,
- [MachineName]=@MachineName,
- [ProcessID]=@ProcessID
- WHERE [SessionID]=@SessionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Sessions] WHERE [SessionID]=@SessionID)
- RAISERROR('Session record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Session has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Sessions] WHERE [SessionID]=@SessionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateSession Succeeded'
-ELSE PRINT 'Procedure Creation: updateSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addSession]
-
-(
- @UserID nvarchar(100),
- @DTSDtart datetime,
- @DTSEnd datetime=null,
- @DTSActivity datetime,
- @MachineName nvarchar(100),
- @ProcessID int,
- @newSessionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Sessions]
- (
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [MachineName],
- [ProcessID]
- )
- VALUES
- (
- @UserID,
- @DTSDtart,
- @DTSEnd,
- @DTSActivity,
- @MachineName,
- @ProcessID
- )
- SELECT @newSessionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Sessions] WHERE [SessionID]=@newSessionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addSession Succeeded'
-ELSE PRINT 'Procedure Creation: addSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Sessions]
- WHERE [SessionID] = @SessionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteSession Succeeded'
-ELSE PRINT 'Procedure Creation: deleteSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE [SessionID]=@SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getSession Succeeded'
-ELSE PRINT 'Procedure Creation: getSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Sessions] WHERE [SessionID]=@SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsSession Succeeded'
-ELSE PRINT 'Procedure Creation: existsSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCleanup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionBegin]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionBegin];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionBegin]
-
-(
- @UserID nvarchar(100),
- @MachineName nvarchar(100),
- @ProcessID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- Cleanup Old Records before checking for Owner Records
- --delete old closed sessions
- DELETE FROM Sessions WHERE UserID = @UserID and DTSEnd is not null
- --delete old owners from inactive sessions
- DELETE FROM Owners WHERE SessionID in (SELECT SessionID FROM Sessions WHERE UserID = @UserID and DTSEnd is null and DTSActivity < DATEADD(minute, -5, getdate()))
- DELETE FROM Owners WHERE SessionID in (SELECT SessionID FROM Sessions WHERE DTSEnd is null and DTSActivity < DATEADD(minute, -15, getdate()))
- --delete inactive sessions where last activity is before 15 minutes ago
- DELETE FROM Sessions WHERE UserID = @UserID and DTSEnd is null and DTSActivity < DATEADD(minute, -5, getdate())
- DELETE FROM Sessions WHERE DTSEnd is null and DTSActivity < DATEADD(minute, -15, getdate())
- DELETE FROM Owners WHERE SessionID not in (SELECT SessionID FROM Sessions)
- DECLARE @oCount int
- SELECT @oCount = count(*) FROM Owners WHERE OwnerType = 4
- IF @oCount > 0 BEGIN
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE [SessionID]=0
- END
- ELSE BEGIN
- INSERT INTO [Sessions]([UserID],[MachineName],[ProcessID])
- VALUES (@UserID, @MachineName, @ProcessID)
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE [SessionID]=SCOPE_IDENTITY()
- IF( @@TRANCOUNT > 0 ) COMMIT
- END
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionBegin Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionBegin Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionPing] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionPing]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionPing];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionPing]
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --update active session dtsactivity value
- UPDATE Sessions SET DTSActivity = getdate() WHERE SessionID = @SessionID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionPing Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionPing Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionPing] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionEnd]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionEnd];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionEnd]
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --delete unclosed owners for session being closed
- DELETE FROM Owners WHERE SessionID = @SessionID
- --update active session dtsend value
- UPDATE Sessions SET DTSEnd = getdate() WHERE SessionID = @SessionID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionEnd Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionEnd Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwners] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwners]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwners];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwners]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwners Succeeded'
-ELSE PRINT 'Procedure Creation: getOwners Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnersBySessionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnersBySessionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnersBySessionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnersBySessionID]
-(
- @SessionID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [SessionID] = @SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnersBySessionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnersBySessionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateOwner]
-
-(
- @OwnerID int,
- @SessionID int,
- @OwnerType tinyint,
- @OwnerItemID int,
- @DTSStart datetime,
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Owners]
- SET
- [SessionID]=@SessionID,
- [OwnerType]=@OwnerType,
- [OwnerItemID]=@OwnerItemID,
- [DTSStart]=@DTSStart
- WHERE [OwnerID]=@OwnerID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Owners] WHERE [OwnerID]=@OwnerID)
- RAISERROR('Owner record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Owner has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Owners] WHERE [OwnerID]=@OwnerID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateOwner Succeeded'
-ELSE PRINT 'Procedure Creation: updateOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addOwner]
-
-(
- @SessionID int,
- @OwnerType tinyint,
- @OwnerItemID int,
- @DTSStart datetime,
- @newOwnerID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Owners]
- (
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart]
- )
- VALUES
- (
- @SessionID,
- @OwnerType,
- @OwnerItemID,
- @DTSStart
- )
- SELECT @newOwnerID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Owners] WHERE [OwnerID]=@newOwnerID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addOwner Succeeded'
-ELSE PRINT 'Procedure Creation: addOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Owners]
- WHERE [OwnerID] = @OwnerID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteOwner Succeeded'
-ELSE PRINT 'Procedure Creation: deleteOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [OwnerID]=@OwnerID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwner Succeeded'
-ELSE PRINT 'Procedure Creation: getOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Owners] WHERE [OwnerID]=@OwnerID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsOwner Succeeded'
-ELSE PRINT 'Procedure Creation: existsOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCanCheckOutItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCanCheckOutItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCanCheckOutItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-exec dbo.vesp_SessionCanCheckOutItem 17012,0
-exec dbo.vesp_SessionCanCheckOutItem 17066,0
-exec dbo.vesp_SessionCanCheckOutItem 17119,0
-exec dbo.vesp_SessionCanCheckOutItem 554,1
-exec dbo.vesp_SessionCanCheckOutItem 13,2
-exec dbo.vesp_SessionCanCheckOutItem 8,2
-exec dbo.vesp_SessionCanCheckOutItem 2,2
-exec dbo.vesp_SessionCanCheckOutItem 9,3
-*/
-CREATE PROCEDURE [dbo].[vesp_SessionCanCheckOutItem]
-(
- @ObjectID int,
- @ObjectType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @CheckOuts TABLE
- (
- SessionID int
- )
- --look to see if anyone else has a session. if they do, then cannot check out
- DECLARE @sCount int
- SELECT @sCount = count(*) FROM Sessions
- IF @ObjectType = 4 BEGIN
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE DTSEnd IS NULL
- END
- ELSE
- BEGIN
- DECLARE @ObjectAndEnhancedIDs Table
- (
- ObjectID int
- )
- IF @ObjectType = 0 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select ItemID from vefn_GetEnhancedProcedures(@ObjectID)
- END
- ELSE IF @ObjectType = 2 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select VersionID from vefn_GetEnhancedDocVersions(@ObjectID)
- END
- ELSE IF @ObjectType = 3 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select FolderID from vefn_GetEnhancedFolders(@ObjectID)
- END
- ELSE BEGIN
- INSERT INTO @ObjectAndEnhancedIDs select @ObjectID
- END
- INSERT INTO @CheckOuts SELECT DISTINCT SessionID FROM Owners
- WHERE OwnerItemID in (select ObjectID from @ObjectAndEnhancedIDs) AND OwnerType = @ObjectType
- IF @ObjectType = 2
- BEGIN
- with ItemZ (VersionID,ItemID,PreviousID,SessionID)
- as(
- --> Procedure Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Items II on OO.OwnerItemID= II.ItemID
- Where OO.OwnerType=0
- UNION ALL --> Document Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Entries EE ON OO.OwnerItemID = EE.DocID
- Join Items II on EE.ContentID= II.ContentID
- Where OO.OwnerType=1
- UNION ALL --> Previous Owners
- Select null, ii.ItemID, ii.PreviousID,ZZ.SessionID From ItemZ ZZ
- Join Items II ON II.ItemID = ZZ.PreviousID
- Where ZZ.VersionID IS NULL and ZZ.PreviousID IS NOT NULL
- UNION ALL -- Parts Owners
- Select null, II.ItemID, II.PreviousID, ZZ.SessionID
- from ItemZ ZZ
- Join Parts PP ON PP.ItemID = ZZ.ItemID
- Join Items II ON II.ContentID = PP.ContentID
- Where ZZ.VersionID IS NULL
- UNION ALL -- Version Owners
- Select DV.VersionID,null,null,ZZ.SessionID From ItemZ ZZ
- Join DocVersions DV ON ZZ.ItemID = DV.ItemID
- Where ZZ.VersionID IS NULL AND ZZ.PreviousID IS NULL
- )
- --Select Distinct 'Phase 2b' Result, * from Itemz
- INSERT INTO @CheckOuts
- Select DIstinct SessionID from ItemZ
- where VersionID in(select ObjectID FROM @ObjectAndEnhancedIDs)
- OPTION (MAXRECURSION 10000) -- B2017-144 Crash on Maximum Recursion
- END
- --look to see if object type is folder that no part of folder passed is checked out
- IF @ObjectType = 3 BEGIN
- with ItemZ (VersionID,ItemID,PreviousID,SessionID)
- as(
- --> Procedure Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Items II on OO.OwnerItemID= II.ItemID
- Where OO.OwnerType=0
- UNION ALL --> Document Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Entries EE ON OO.OwnerItemID = EE.DocID
- Join Items II on EE.ContentID= II.ContentID
- Where OO.OwnerType=1
- UNION ALL --> Previous Owners
- Select null, ii.ItemID, ii.PreviousID,ZZ.SessionID From ItemZ ZZ
- Join Items II ON II.ItemID = ZZ.PreviousID
- Where ZZ.VersionID IS NULL and ZZ.PreviousID IS NOT NULL
- UNION ALL -- Parts Owners
- Select null, II.ItemID, II.PreviousID, ZZ.SessionID
- from ItemZ ZZ
- Join Parts PP ON PP.ItemID = ZZ.ItemID
- Join Items II ON II.ContentID = PP.ContentID
- Where ZZ.VersionID IS NULL
- UNION ALL -- Version Owners
- Select DV.VersionID,null,null,ZZ.SessionID From ItemZ ZZ
- Join DocVersions DV ON ZZ.ItemID = DV.ItemID
- Where ZZ.VersionID IS NULL AND ZZ.PreviousID IS NULL
- )
- --Select Distinct 'Phase 2b' Result, * from Itemz
- INSERT INTO @CheckOuts
- Select DIstinct SessionID from ItemZ
- where VersionID in(select ObjectID FROM @ObjectAndEnhancedIDs)
- OPTION (MAXRECURSION 10000) -- B2017-144 Crash on Maximum Recursion
- END
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE [SessionID] IN (SELECT SessionID FROM @CheckOuts)
- END
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCanCheckOutItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCanCheckOutItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCheckOutItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCheckOutItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCheckOutItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionCheckOutItem]
-(
- @SessionID int,
- @ItemID int,
- @ItemType int,
- @OwnerID int OUTPUT
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO Owners (SessionID, OwnerItemID, OwnerType) VALUES (@SessionID, @ItemID, @ItemType)
- SELECT @OwnerID = SCOPE_IDENTITY()
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCheckOutItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCheckOutItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCheckInItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCheckInItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCheckInItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionCheckInItem]
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DELETE FROM Owners WHERE OwnerID = @OwnerID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCheckInItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCheckInItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnerByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnerByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnerByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnerByItemID]
-
-(
- @ItemID int,
- @ItemType int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [OwnerItemID]=@ItemID AND [OwnerType]=@ItemType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnerByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnerByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnerBySessionIDandVersionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnerBySessionIDandVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnerBySessionIDandVersionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnerBySessionIDandVersionID]
-
-(
- @SessionID int,
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners] oo
- INNER JOIN
- (
- SELECT 0 ObjectType,ItemID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID)
- UNION
- SELECT 1 ObjectType,ee.DocID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Entries ee ON vi.ContentID = ee.ContentID
- UNION
- SELECT 2 ObjectType, @VersionID ObjectID
- ) tt ON oo.OwnerType = tt.ObjectType and oo.OwnerItemID = tt.ObjectID
- WHERE [SessionID] = @SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnerBySessionIDandVersionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnerBySessionIDandVersionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getUserByUserID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getUserByUserID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getUserByUserID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getUserByUserID]
-
-(
- @UserID varchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UID],
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[UID]=[Users].[UID]) [MembershipCount]
- FROM [Users]
- WHERE [UserID]=@UserID
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Memberships]
- JOIN [Groups] ON
- [Groups].[GID]=[Memberships].[GID]
- JOIN [Users] ON [Memberships].[UID] = [Users].[UID]
- WHERE
- [Users].[UserID]=@UserID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getUserByUserID Succeeded'
-ELSE PRINT 'Procedure Creation: getUserByUserID Error on Creation'
-GO
-
---need to check to see if security is already defined. if not then do this stuff
-declare @aCount int
-select @aCount = count(*) from assignments
-if @aCount = 0
-begin
---clean up security related tables
- EXEC sp_executesql N'
- delete from [Assignments]'
- EXEC sp_executesql N'
- dbcc checkident([Assignments],reseed,0)'
- EXEC sp_executesql N'
- delete from [Memberships]'
- EXEC sp_executesql N'
- dbcc checkident([Memberships],reseed,0)'
- EXEC sp_executesql N'
- delete from [Permissions]'
- EXEC sp_executesql N'
- dbcc checkident([Permissions],reseed,0)'
- EXEC sp_executesql N'
- delete from [Roles]'
- EXEC sp_executesql N'
- dbcc checkident([Roles],reseed,0)'
- EXEC sp_executesql N'
- delete from [Users]'
- EXEC sp_executesql N'
- dbcc checkident([Users],reseed,0)'
- EXEC sp_executesql N'
- delete from [Groups]'
- EXEC sp_executesql N'
- dbcc checkident([Groups],reseed,0)'
-
- --define Roles
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Administrator'',''Manage Generic Data;Manage Security;Edit RO Values,Create FST,Update RO Values;Update Formats;PROMS Settings;Create/Update/Delete Folders,DocVersions,Procedures,Sections,Steps,All Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Set Administrator'',''Edit RO Values,Create FST,Update RO Values;Create/Update/Delete Folders,DocVersions,Procedures,Sections,Steps,All Set Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Writer'',''Create/Update/Delete Procedures,Sections,Steps,All Set Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Reviewer'',''Create/Update/Delete User Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''RO Editor'',''Edit RO Values,Create FST'',getdate(),''VEPROMS'')'
-
- --define Permissions for Roles
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Administrator'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,1,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Set Administrator'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,2,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Writer'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,4,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Reviewer'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,7,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''RO Editor'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,3,3,15,0,getdate(),getdate(),''VEPROMS'')'
-
- --define adminstrator Group
- EXEC sp_executesql N'
- insert into groups (groupname,dts,usrid)
- select name + ''s'',getdate(),''VEPROMS'' from roles where name = ''Administrator'''
-
- --define administrator Assignment
- EXEC sp_executesql N'
- insert into assignments (gid,rid,folderid,startdate,dts,usrid)
- select gg.gid,rr.rid,1,getdate(),getdate(),''VEPROMS'' from roles rr inner join groups gg on rr.name + ''s'' = gg.groupname'
- EXEC sp_executesql N'
- print ''MultiUser and Security Created'''
-end
-else begin
- EXEC sp_executesql N'
- print ''MultiUser and Security Exists'''
-end
-GO
-
---added jcb 1st round fixes multiuser and security testting
---ALTER TABLE Groups change GroupName column to 100 characters
-ALTER TABLE groups ALTER COLUMN [GroupName] [nvarchar](100) NOT NULL
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetSecurity]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetSecurity];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetSecurity]
-AS
-BEGIN
- DELETE FROM [Memberships]
- DELETE FROM [Assignments] WHERE [AID] != 1
- DELETE FROM [Groups] WHERE [GID] != 1
- DELETE FROM [Users]
- DECLARE @gid VARCHAR(10)
- SELECT @gid = x1.value('@Group','varchar(10)')
- FROM
- (
- SELECT folderid,CAST(config as xml) xconfig FROM folders ff WHERE ff.folderid = 1
- ) ah
- CROSS APPLY xconfig.nodes('//Security') t1(x1)
- UPDATE folders SET config = replace(config,'Security Group="' + @gid + '"','Security Group="1"') WHERE folderid = 1
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetSecurity Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetSecurity Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevisionsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevisionsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevisionsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionsByItemID]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [ItemID] = @ItemID
-and (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) > 0
- ORDER BY [RevisionID] DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevisionsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getRevisionsByItemID Error on Creation'
-GO
-/****** Object: StoredProcedure [getRoUsagesForDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesForDocVersion]') AND OBJECTPROPERTY
-
-(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesForDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsagesForDocVersion]
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROUsageID],
- rr.[ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [RoUsages] rr
- INNER JOIN vefn_getversionitems(@VersionID) vi on rr.contentid = vi.contentid
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesForDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesForDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListTables3] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListTables3]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListTables3];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_ListTables3]
-WITH EXECUTE AS OWNER
-AS
-begin
-select o.name TableName,c.name ColumnName,
-case c.system_type_id
- when 56 then 'int'
- when 231 then 'nvarchar'
- when 165 then 'varbinary'
- when 167 then 'varchar'
- when 239 then 'nchar'
- when 175 then 'char'
- when 61 then 'datetime'
- when 104 then 'bit'
- when 48 then 'TinyInt'
- when 127 then 'BigInt'
- when 241 then 'Xml'
- when 62 then 'float'
- when 189 then 'timestamp'
- else '???' + cast(c.system_type_id as varchar(10)) end ItemType,
-case c.system_type_id
- when 56 then '0'
- when 231 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 165 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 167 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 239 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 175 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 61 then '0'
- when 104 then '0'
- when 48 then '0'
- when 189 then '0'
- else '0' end ItemSize,
-
- case when c.is_nullable=1 then 'Yes' else '' end AllowNulls,
- case when c.is_identity=1 then 'Identity' else dc.definition end DefaultValue,
- x.value Description
-from sys.objects o
-join sys.columns c on o.object_id=c.object_id
-left join sysconstraints cn on o.object_id=cn.id and c.column_id=cn.colid
-left join sys.default_constraints dc on dc.object_id = cn.constid
-left join sys.extended_properties x on x.major_id = o.OBJECT_ID AND x.minor_id=c.column_id AND x.Name='MS_Description'
-where o.type='U'
-order by o.name,c.column_id
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListTables3 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListTables3 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnersByVersionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnersByVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnersByVersionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnersByVersionID]
-(
- @VersionID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- JOIN vefn_GetVersionItems(@VersionID) vi ON oo.OwnerItemID = vi.ItemID
- WHERE oo.OwnerType = 0
- UNION
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- JOIN [Entries] ee on oo.OwnerItemID = ee.DocID
- JOIN vefn_GetVersionItems(@VersionID) vi on ee.ContentID = vi.ContentID
- WHERE oo.OwnerType = 1
- UNION
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- WHERE oo.OwnerType = 2
- AND oo.OwnerItemID = @VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnersByVersionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnersByVersionID Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CompareROIDs]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CompareROIDs];
-/****** Object: UserDefinedFunction [dbo].[vefn_CompareROIDs] Script Date: 07/21/2014 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create function [DBO].[vefn_CompareROIDs] (@roid1 varchar(16), @roid2 varchar(16))
-returns int
-as begin
- declare @len1 int
- declare @len2 int
- if @roid1 = @roid2
- return 1
- set @len1 = len(@roid1)
- set @len2 = len(@roid2)
- if @len1 = @len2
- begin
- if @len1 = 16 and substring(@roid1,13,4) = '0000' and substring(@roid2,13,4) = '0041'
- return 2
- if @len1 = 16 and substring(@roid2,13,4) = '0000' and substring(@roid1,13,4) = '0041'
- return 3
- return 0
- end
- if substring(@roid1,1,12) = substring(@roid2,1,12)
- return 4
- return 0
-end
-GO
--- Display the status of ScalarFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_CompareROIDs Succeeded'
-ELSE PRINT 'Function: vefn_CompareROIDs Error on Creation'
-GO
-
-/****** Object: Index [IX_tblContentsForCopy] Script Date: 8/26/2014 8:55:16 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblContentsForCopy')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblContentsForCopy] ON [dbo].[tblContents]
-(
- [DTS] ASC,
- [UserID] ASC,
- [Type] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: Index [IX_tblItemsForCopy1] Script Date: 8/27/2014 5:26:31 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblItemsForCopy1')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblItemsForCopy1] ON [dbo].[tblItems]
-(
- [ContentID] ASC,
- [DTS] ASC,
- [UserID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: Index [IX_tblItemsForCopy2] Script Date: 8/27/2014 5:26:37 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblItemsForCopy2')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblItemsForCopy2] ON [dbo].[tblItems]
-(
- [PreviousID] ASC,
- [DTS] ASC,
- [UserID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: Index [IX_contentsLastChanged] Script Date: 3/21/2017 11:24:00 AM ******/
-IF EXISTS (SELECT * FROM dbo.sysIndexes WHERE name like 'IX_contentsLastChanged')
- DROP INDEX [IX_ContentsLastChanged] ON [dbo].[tblContents];
-GO
-CREATE NONCLUSTERED INDEX [IX_contentsLastChanged] ON [dbo].[tblContents]
-(
- [DeleteStatus] ASC,
- [LastChanged] DESC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-PRINT 'Added IX_contentsLastChanged Index. Speeds up session queries'
-GO
-
-/****** Object: StoredProcedure [CopyItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[CopyItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [CopyItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[CopyItemAndChildren]
-(
- @StartItemID INT,
- @DestFormatID INT,
- @UserID NVARCHAR(100),
- @NewStartItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
-
---+-----------------------------------------------------------------+
---& BEGIN TRANSACTION to make these changes temporary &
---+-----------------------------------------------------------------+
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @StartItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This step has been deleted',16,1)
- RETURN
- END
-DECLARE @Children AS TABLE
-(
- ItemID INT PRIMARY KEY,
- NewItemID INT,
- ContentID INT,
- NewContentID INT,
- FormatID INT,
- NewFormatID INT
-)
-DECLARE @NewDocuments AS TABLE
-(
- DocID INT PRIMARY KEY,
- NewDocID INT
-)
--- Locals
-DECLARE @DTS DATETIME -- DTS of all New Items
-DECLARE @StartContentID INT
-Select @StartContentID = ContentID from Items where ItemID = @StartItemID
-SET @DTS = GETDATE() -- Get the current Date and Time
--- Get a list of all of the Items to be copied based upon StartItemID and EndItemID
--- If the StartItemID = EndItemID then it is a single item and it's children
-INSERT INTO @Children SELECT ItemID,ItemID,ContentID,ContentID,FormatID,FormatID FROM vefn_ChildItemsRange(@StartItemID,@StartItemID,null)
--- <<< Copy Contents >>>
--- Create new content rows to match the existing rows. Set the type to the Current ContentID temporarily
--- so that the new content rows can be associated with the existing content rows.
-INSERT INTO Contents
- ([Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID])
- select CASE when [ContentID] = @StartContentID and [Type]<20000 then 'Copy Of ' + [Number] else [Number] end,
- [Text],[ContentID],[FormatID],[Config],@DTS,@UserID
- from Contents where ContentID in(Select ContentID from @Children)
--- Update the @Children with the NewConentIDs
---print 'A ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN set NN.NewContentID = CC.ContentID
-From Contents CC
-Join @Children NN on NN.ContentID = CC.Type AND CC.DTS = @DTS and CC.UserID = @UserID
--- Reset the Type column in the Contents table with the Type column from the original Records.
---print 'B ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-DECLARE @SourceType INT
-Select @SourceType = Type from Contents where ContentID = @StartContentID
-if @SourceType = 0
- BEGIN
- UPDATE CC set CC.Type = CC2.Type, CC.DTS = CC2.DTS, CC.UserID = CC2.UserID
- From Contents CC
- Join @Children NN on NN.NewContentID = CC.ContentID
- Join Contents CC2 on NN.ContentID = CC2.ContentID
- END
-else
- BEGIN
-UPDATE CC set CC.Type = CC2.Type
-From Contents CC
-Join @Children NN on NN.NewContentID = CC.ContentID
-Join Contents CC2 on NN.ContentID = CC2.ContentID
- END
---print 'B1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Contents are done
- -- SELECT * From Contents where DTS = @DTS and UserID = @UserID
--- <<< Copy Grids >>>
-INSERT INTO [Grids]([ContentID],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[Data],[Config],@DTS,@UserID
- FROM [Grids] GG Join @Children NN on GG.ContentID = NN.ContentID
--- <<< Copy Images >>>
---print 'B2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-INSERT INTO [Images]([ContentID],[ImageType],[FileName],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[ImageType],[FileName],[Data],[Config],@DTS,@UserID
- FROM [Images] II Join @Children NN on II.ContentID = NN.ContentID
--- Create new item rows based upon the current item rows and the @Children table, with the NewContentIDs
---print 'B3 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-INSERT INTO [Items] ([PreviousID],[ContentID],[DTS],[UserID])
- SELECT II.[PreviousID], -- Leave the PreviousID as is for now
- NN.NewContentID, @DTS, @UserID
- from @Children NN
- join Items II on II.ContentID = NN.ContentID
--- Update the @Children with the NewItemIDs
---print 'B4 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN set NN.NewItemID = II.ItemID
-From Items II
-Join @Children NN on NN.NewContentID = II.ContentID AND II.DTS = @DTS and II.UserID = @UserID
-DECLARE @NewItemID int
-SELECT @NewItemID = NewItemID
- FROM @Children
- WHERE ItemID = @StartItemID
---print 'B5 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN SET NN.[NewFormatID] = CC.[FormatID]
- FROM @Children NN
- Join vefn_ChildItemsRange(@NewItemID,@NewItemID,@DestFormatID) CC
- ON NN.NewItemID = CC.ItemID
--- The @Children table is now complete
- --SELECT * From @Children
--- Update the PreviousID in the new Item rows, to the new ItemIDs based upon the old ItemIDs
---print 'B6 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-Update II Set II.[PreviousID] = NN.NewItemID
-from Items II
-Join @Children NN on NN.ItemID = II.PreviousID AND II.DTS = @DTS and II.UserID = @UserID
--- Get the new ItemIDs based upon the old ItemIDs
-SELECT @NewStartItemID = NewItemID from @Children where ItemID = @StartItemID
---SELECT @NewEndItemID = NewItemID from @Children where ItemID = @EndItemID
--- Set the PreviousID for the starting Item to null temporarily.
--- This will be adjusted based upon where the step is inserted.
---print 'B7 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-Update Items Set PreviousID = null where ItemID = @NewStartItemID
-if @SourceType = 0
- BEGIN
- UPDATE II SET II.DTS = II2.DTS, II.UserID = II2.UserID
- From Items II
- Join @Children NN on NN.NewItemID = II.ItemID
- Join Items II2 on NN.ItemID = II2.ItemID
- WHERE NN.ItemID = @StartItemID
- END
---print 'C ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Items are done
- --SELECT * From Items where DTS = @DTS and UserID = @UserID
--- <<< Copy Parts >>>
-INSERT INTO [Parts] ([ContentID],[FromType],[ItemID],[DTS],[UserID])
-Select NNF.NewContentID,[FromType],NNT.NewItemID, @DTS, @UserID from Parts PP
-JOIN @Children NNF on PP.ContentID = NNF.ContentID
-JOIN @Children NNT on PP.ItemID = NNT.ItemID
---print 'D ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Parts are done
- -- SELECT * From Parts where DTS = @DTS and UserID = @UserID
--- <<< Copy Annotations >>>
-INSERT INTO [Annotations] ([ItemID],[TypeID],[RtfText],[SearchText],[Config],[DTS],[UserID])
- Select NewItemID, TypeID, RtfText, SearchText, Config, @DTS, @UserID
- from Annotations AA Join @Children NN on AA.ItemID = NN.ItemID
---print 'E ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Annotations are done
- -- SELECT * From Annotations where DTS = @DTS and UserID = @UserID
--- <<< Copy Documents and Entries>>>
--- logic to create Entries for Library Documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],EE.[DocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') <> ''
--- Logic to create new documents for any documents used that do not have libtitles
-INSERT INTO [Documents] ([LibTitle],[DocContent],[DocAscii],[Config],[DTS],[UserID],[FileExtension])
- OUTPUT CAST(INSERTED.[LibTitle] as INT),INSERTED.[DocID] INTO @NewDocuments
- SELECT str(DD.[DocID]),[DocContent],[DocAscii],[Config],@DTS,@UserID,[FileExtension]
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') = ''
-UPDATE DD SET LibTitle = ''
- FROM Documents DD JOIN @NewDocuments ND on DD.[DocID] = ND.[NewDocID]
- where DTS = @DTS and UserID = @UserID
---print 'F ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Documents are Done
- -- SELECT * From Documents where DTS = @DTS and UserID = @UserID
--- Logic to create entries for these newly created documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],ND.[NewDocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN @NewDocuments ND on EE.[DocID] = ND.[DocID]
--- Logic to Create DROUsages for these newly created documents
-INSERT INTO [DROUsages] ([DocID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT ND.[NewDocID],[ROID],[Config],@DTS,@UserID,[RODbID]
- FROM [DROUsages] RR
- JOIN @NewDocuments ND on RR.[DocID] = ND.[DocID]
-
---print 'G ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Entries are done
- -- SELECT * From Entries EE JOIN Documents DD on ee.DocID = DD.DocID where EE.DTS = @DTS and EE.UserID = @UserID
--- <<< Copy RoUsages >>>
-INSERT INTO [RoUsages] ([ContentID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT NN.[NewContentID],CAST([ROUsageID] as nvarchar(16)),[Config],@DTS,@UserID,[RODbID]
- FROM [RoUsages] RR Join @Children NN on RR.ContentID = NN.ContentID
--- Update content records for newly copied records to use correct RO usage ids in the RO tags
-DECLARE @RowsAffected int
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixROText(C1.Text, CAST([ROID] as int), [ROUsageID]) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID where Len([ROID]) < 12) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
--- Update grid records for newly copied records to use correct RO usage ids in the RO tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE GG SET [Data] = G2.NewData
- FROM GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixROData(G1.Data, CAST([ROID] as int), [ROUsageID]) NewData
- FROM GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID where Len([ROID]) < 12) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([Data] as nvarchar(max)) <> cast(G2.NewData as nvarchar(max))
- SET @RowsAffected = @@RowCount
-END
-UPDATE RON SET [ROID] = ROO.[ROID]
- FROM RoUsages RON
- JOIN @Children NN on RON.ContentID = NN.NewContentID
- JOIN RoUsages ROO on CAST(RON.ROID as int) = ROO.RoUsageID
- where Len(RON.[ROID]) < 12
---print 'H ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- RoUsages are done
- -- SELECT * From RoUsages where DTS = @DTS and UserID = @UserID
-
--- <<< Copy Transtions >>>
--- Note that the inserted record has the 'TranType' field set to old transitionid. This is done
--- so that the next step can replace the old transitionid with the new transitionid in the
--- content record's transition tokens. The TranType gets reset after the content records are
--- updated.
--- Also note that the 'toid/rangeid' may need converted to newly copied ids or may not. If it's
--- not a range, then it always is converted to new, if there is a new. If it's a range, both
--- the toid & the rangeid must be new in order for the conversion to be correct. You cannot
--- have part of the range pointing to the new and part of the range pointing to the original
--- locations.
-
-INSERT INTO .[dbo].[Transitions] ([FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID])
- SELECT NNF.[NewContentID],
- -- if both toid & range are null, use the original toid & rangeid
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [ToID] ELSE NNT.[NewItemID] END,
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [RangeID] ELSE NNR.[NewItemID] END,
- [IsRange],[TransitionID],[Config],@DTS,@UserID
- FROM .[dbo].[Transitions] TT
- JOIN @Children NNF on TT.[FromID] = NNF.[ContentID]
- LEFT JOIN @Children NNT on TT.[ToID] = NNT.[ItemID]
- LEFT JOIN @Children NNR on TT.[RangeID] = NNR.[ItemID]
---print 'H1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- -- Update content records for newly copied records to use correct TransitionIDs in the Transition tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixTransitionTextForCopy(C1.Text, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
---print 'H2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---set nocount off
--- -- Update grid records for newly copied records to use correct TransitionIDs in the Transition tags
-declare @grids table
-(
-contentid int primary key,
-data xml
-)
-insert into @grids select gg.contentid,gg.data from GRIDS GG
- where gg.contentid in (select nn.newcontentid from
- @Children NN
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID)
---print 'H2.1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---select * from @grids
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE GG SET [DATA] = G2.NewData
- FROM @GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixTransitionDataForCopy(G1.Data, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewData
- FROM @GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([DATA] as nvarchar(max)) <> CAST(G2.NewData as nvarchar(max))
- SET @RowsAffected = @@RowCount
-END
---print 'H2.2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-update GG set data = g1.data from Grids gg join @grids g1 on gg.contentid = g1.contentid
---print 'H3 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---set nocount on
--- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition whose transition format changes
-INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT NN.NewItemID, @typeID,'Verify Transition Format',@UserID
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
- WHERE .dbo.vefn_CompareTranFormat(NN.FormatID, NN.NewFormatID, TRO.TranType) <> 0
---print 'H4 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE TR SET TR.[TranType] = .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
---print 'H5 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Transitions are done
- -- SELECT * From Transitions where DTS = @DTS and UserID = @UserID
---print 'Z ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---foldouts fixing code
-if exists (select * from contents where contentid in (select newcontentid from @children) and config like '%FloatingFoldout%')
-begin
- --insert into #mytemp
- select cc.contentid,xsteps.value('@FloatingFoldout','int') oldfoldoutid,(select newitemid
- from @children
- where itemid = xsteps.value('@FloatingFoldout','int')) newfoldoutid,xconfig
- into #mytemp
- from (select *,cast(config as xml) xconfig from contents where contentid in (select newcontentid from @children)) cc
- cross apply xconfig.nodes('Config/Step') tsteps(xsteps)
- --build @cmd string
- declare @cmd nvarchar(max)
- declare cmds cursor for
- select distinct 'update #mytemp set xconfig.modify(''replace value of (Config/Step/@FloatingFoldout)[1] with "'
- + cast(newfoldoutid as varchar(10))
- + '"'') where xconfig.value(''(Config/Step/@FloatingFoldout)[1]'',''int'') = '
- + cast(oldfoldoutid as varchar(10))
- from #mytemp
- --execute cursor over rows
- open cmds
- fetch next from cmds into @cmd
- while @@fetch_status = 0
- begin
- exec sp_executesql @cmd
- fetch next from cmds into @cmd
- end
- close cmds
- deallocate cmds
- --actually update contents
- update cc set config = cast(xconfig as varchar(max)) from contents cc join #mytemp mt on cc.contentid = mt.contentid
- --get rid of #mytemp
- drop table #mytemp
-end
---end foldouts fixing code
---section start
-DECLARE @NewContentID int
-Select @NewContentID = NewContentID from @Children where ItemID = @StartItemID
-DECLARE @Config varchar(max)
-DECLARE @XConfig xml
-select @Config = config from contents where contentid = @NewContentID
-select @XConfig = cast(@Config as xml)
-if @Config like '%SectionStart%' begin
- DECLARE @SectionStart int
- select @SectionStart = xproc.value('@SectionStart','int') from @xconfig.nodes('Config/Procedure') tproc(xproc)
- DECLARE @NewSectionStart int
- select @NewSectionStart = newitemid from @children where itemid = @SectionStart
- DECLARE @cmd2 nvarchar(max)
- set @cmd2 = '
- declare @XConfig xml;
- set @XConfig = cast(''' + @Config + ''' as xml);
- set @XConfig.modify(''replace value of (Config/Procedure/@SectionStart)[1] with "' + cast(@NewSectionStart as nvarchar(10)) + '"'');
- update contents set config = cast(@XConfig as varchar(max)) where contentid = ' + cast(@NewContentID as nvarchar(10)) + ';'
- exec sp_executesql @cmd2
-end
---end section start
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: CopyItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: CopyItemAndChildren Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_removeUnUsedFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_removeUnUsedFormat];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2021 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_removeUnUsedFormat]
-(
- @Name nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @tbl Table(
- removeid int)
- declare @baseid int
- insert into @tbl select formatid from formats where name like @name
-
- -- get the format id of the base format
- select @baseid = formatid from formats where name = 'base'
-
- -- assign deleted format with the base format
- update folders set FormatID = @baseid where FormatID in (select removeid from @tbl)
- update DocVersions set FormatID = @baseid where FormatID in (select removeid from @tbl)
- update tblContents set FormatID = @baseid where FormatID in (select removeid from @tbl)
- -- delete the contentAudits records that use the deleted format
- delete ContentAudits where FormatID in (select removeid from @tbl)
- -- delete the record out of formats
- delete Formats where FormatID in (select removeid from @tbl)
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of remove format
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_removeUnUsedFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_removeUnUsedFormat] Error on Creation'
-go
-
-
--- remove un-used formats
-exec vesp_removeUnUsedFormat 'WPS%'
-exec vesp_removeUnUsedFormat 'WPB%'
-exec vesp_removeUnUsedFormat 'VCBEPP%'
-exec vesp_removeUnUsedFormat 'BNPPdev%'
-exec vesp_removeUnUsedFormat 'BNPPgop%'
-exec vesp_removeUnUsedFormat 'BNPPckl%'
-
-PRINT 'Kewaunee, Point Beach, un-used Summer, Barakah Deviation, Barakah GOP (sample), Barakah Checklist formats removed'
-GO
-
-/****** Object: StoredProcedure [CopyItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DeleteItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [DeleteItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[DeleteItemAndChildren]
-(
- @ItemID int,
- @UserID AS VARCHAR(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @DeleteID int
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @ItemType AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID) where rangeid = toid or toid = @ItemID
- IF @ExternalCount > 0 AND @NextItemID is null
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- IF @ExternalCount > 0 AND @ItemType < 10000
- BEGIN
- RAISERROR ('###Cannot Delete Item###Procedure %d has External Transitions to Procedure - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SELECT @ItemType = Type FROM Contents Where ContentID = @ContentID
- -- Check to see if External Transitions point to the current item
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- --deletelog
- INSERT INTO DeleteLog (UserID) values (@UserID)
- Select @DeleteID = SCOPE_IDENTITY()
- --end deletelog
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- UPDATE PreviousID in Items WHERE ItemID = @NextItemID
- UPDATE Items SET PreviousID = @PreviousItemID WHERE ItemID=@NextItemID
- -- UPDATE DocVersion
- UPDATE DocVersions SET ItemID=@NextItemID where ItemID = @ItemID
- -- UPDATE Parts
- IF @NextItemID is not NULL -- Remove Part Record
- BEGIN
- UPDATE PARTS SET ItemID = @NextItemID where ItemID=@ItemID
- END
- ELSE
- BEGIN
- DELETE FROM Parts WHERE ItemID=@ItemID
- END
- -- Get external transitions that point to the specified Item
- -- These will need to be adjusted to point to the next Item.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID);
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that point to different step
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NextItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@PreviousItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NextItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @PreviousItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- Remove Previously deleted transitions
- DELETE from tblTransitions where deletestatus = -1 and FromID in(SELECT ContentID FROM @Children)
- -- Remove Previously deleted rousages
- DELETE from tblrousages where deletestatus = -1 and contentID in(SELECT ContentID FROM @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
- --purge deletelog
- DELETE from DeleteLog where DeleteID = @DeleteID
- --end purge deletelog
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: DeleteItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: DeleteItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixTransitionDataForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixTransitionDataForCopy]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixTransitionDataForCopy];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixTransitionDataForCopy]
-(@data XML,@TransitionID int,@TranType int,@OldToID int,@OldRangeID int, @NewID int, @NewToID int, @NewRangeID int, @NewTranType int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- -- Build Search String and Replace String
- DECLARE @offset int
- DECLARE @lookFor nvarchar(MAX)
- DECLARE @replaceWith nvarchar(MAX)
- DECLARE @text nvarchar(MAX)
- SET @text = Cast(@data as nvarchar(max))
- SET @lookFor = '#Link:Transition:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- if(@offset = 0)
- BEGIN
-
- SET @lookFor = '#Link:TransitionRange:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- SET @replaceWith = '#Link:TransitionRange:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID)) + ' ' + ltrim(str(@NewRangeID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID)) + ' ' + ltrim(str(@OldRangeID))
- END
- ELSE
- BEGIN
- SET @replaceWith = '#Link:Transition:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID))
- END
- return Cast(replace(@text,@lookFor,@replaceWith) as XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixROData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixROData]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixROData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_FixROData]
-(@data XML,@ROUsageID int,@NewROUsageID int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- Build Search String and Replace String
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:ReferencedObject:' + ltrim(str(@ROUsageID)) + ' '
- SET @replaceWith = '#Link:ReferencedObject:' + ltrim(str(@NewROUsageID)) + ' '
- return CAST(replace(CAST(@data AS NVarChar(max)),@lookFor,@replaceWith) AS XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixROData Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixROData Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionProcedureItems] Script Date: 1/5/2015 3:58:49 PM ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionProcedureItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionProcedureItems];
-GO
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-Select * from vefn_GetVersionProcedureItems('') where procid = 63589
-Select * from vefn_GetVersionProcedureItems('1') where procid = 63589
-Select * from vefn_GetVersionProcedureItems('4') where procid = 63589
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionProcedureItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ProcID int,
- ItemID int primary key,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], ProcID, [ItemID], [ContentID]) as
- (Select DV.VersionID, DV.ItemID ProcID, [I].[ItemID], [I].[ContentID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
- -- Children
- select Z.VersionID, Z.ProcID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select Z.VersionID, case when z.ProcID = z.ItemID then I.ItemID else Z.ProcID end ProcID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- )
- insert into @VersionItems
- select VersionID, ProcID, [ItemID], [ContentID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction vefn_GetVersionProcedureItems Succeeded'
-ELSE PRINT 'TableFunction vefn_GetVersionProcedureItems Error on Creation'
-
-/****** Object: StoredProcedure [getTransitionSearchResults] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_SearchTransitions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_SearchTransitions] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-exec vesp_searchtransitions '1,2,4,6,7,11,12',6,''
-*/
-
-CREATE PROCEDURE [dbo].[vesp_SearchTransitions]
-(
- @DocVersionList varchar(max),
- @TranType int,
- @TranCategory varchar(20),
- -- added stepTypeList to fix bug B2015-055 - allows transition search in specified step elements
- @StepTypeList varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- Declare @Delim char(1)
- Set @Delim=char(7)
- Declare @DelimNumber char(1)
- Set @DelimNumber=char(17)
- Declare @DelimStep char(1)
- Set @DelimStep='.'
- declare @itmp table
- (
- vid int,
- pid int,
- iid int primary key,
- cid int
- )
- declare @ctmp table
- (
- vid int,
- pid int,
- iid int,
- cid int primary key
- )
- declare @ttmp table
- (
- itemid int,
- dvpath varchar(max),
- UnitPrefix varchar(MAX)
- )
- insert into @itmp select * from vefn_getversionprocedureitems(@DocVersionList)
- insert into @ctmp select * from @itmp
- if @TranType = -1 and @TranCategory = '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath,dv.UnitPrefix
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- end else if @TranType > -1 and @TranCategory = '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath,dv.UnitPrefix
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- where tt.TranType = @TranType
- end else if @TranType = -1 and @TranCategory != '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath,dv.UnitPrefix
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- join @itmp it on tt.ToID = it.iid
- where case when it.vid = ct.vid then case when it.pid = ct.pid then 'Internal' else 'External' end else 'Outside' end = @TranCategory
- end else begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath,dv.UnitPrefix
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- join @itmp it on tt.ToID = it.iid
- where tt.TranType = @TranType and case when it.vid = ct.vid then case when it.pid = ct.pid then 'Internal' else 'External' end else 'Outside' end = @TranCategory
- end
- BEGIN
- with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
- Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- )
- SELECT
- tt.dvpath,Z.Path,
- I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- FROM Itemz Z
- join [Items] I on Z.ItemID = I.ItemID
- join @ttmp tt on I.ItemID = tt.itemid
- join Contents C on C.ContentID = I.ContentID
- left join Parts P on i.ItemID = P.ItemID
- -- Where clase added for bug fix B2015-055 to allow transition search within selected step elements
- Where
- ((isnull(@StepTypeList,'') = '' /*and dbo.vefn_AllSections(C.Type)>=10000*/)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- OPTION (MAXRECURSION 10000)
- RETURN
- END
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchTransitions Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetVersionFormatSections] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionFormatSections]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionFormatSections];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionFormatSections](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID], [ParentFormatID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID],
- isnull(C.[FormatID],isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))),
- isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID]
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join folders F on DV2.[FolderID] = F.[FolderID]
- join folders P on P.[FolderID] = F.[ParentID]
- join Contents C on I.ContentID = C.ContentID
-
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[FormatID]), Z.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- where c.Type < 20000
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[ParentFormatID]), Z.[ParentFormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionFormatSections Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionFormatSections Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetFormatVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetFormatVersions] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE PROCEDURE [dbo].[vesp_GetFormatVersions]
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- select ff.Name + ' - ' + ff.Description Title,vfi.FormatID,vn.VersionID
- from vefn_GetVersionNames() vn
- join vefn_GetVersionFormatSections('') vfi on vn.VersionID = vfi.VersionID
- join Formats ff on vfi.FormatID = ff.FormatID
- group by ff.Name + ' - ' + ff.Description,vfi.formatid,vn.VersionID
- return
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatVersions Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetTranTypesByFormatID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetTranTypesByFormatID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetTranTypesByFormatID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetTranTypesByFormatID] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-vesp_GetTranTypesByFormatID 102
-*/
-CREATE PROCEDURE [dbo].[vesp_GetTranTypesByFormatID]
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @t1 table
- (
- formatid int,
- transindex int,
- transmenu varchar(max)
- )
- declare @t2 table
- (
- transindex int,
- formatid int
- )
- insert into @t1
- select ff.formatid,r1.value('@Index','int') transindex, r1.value('@TransMenu','varchar(max)') transmenu
- from Formats ff
- cross apply ff.Data.nodes('//TransTypes') t1(r1)
- where ff.FormatID = @FormatID
- union
- select ff.formatid,r1.value('@Index','int') transindex, r1.value('@TransMenu','varchar(max)') transmenu
- from Formats ff
- cross apply ff.Data.nodes('//TransTypes') t1(r1)
- where ff.FormatID = 1
- insert into @t2
- select transindex,max(formatid) formatid from @t1 group by transindex
- select t1.transindex,t1.transmenu
- from @t1 t1
- join @t2 t2 on t1.formatid = t2.formatid and t1.transindex = t2.transindex
- order by t1.transindex
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetTranTypesByFormatID Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetTranTypesByFormatID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetTransitionReportData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetTransitionReportData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetTransitionReportData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetTransitionReportData] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-vesp_GetTransitionReportData 5, 6078
-*/
-CREATE PROCEDURE [dbo].[vesp_GetTransitionReportData]
-(
- @VersionID int,
- @ProcedureID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @itmp table
- (
- vid int,
- pid int,
- iid int primary key,
- cid int
- )
- declare @ctmp table
- (
- vid int,
- pid int,
- iid int,
- cid int primary key
- )
- declare @ttmp table
- (
- tid int primary key
- )
- insert into @itmp select * from vefn_getversionprocedureitems('')
- insert into @ctmp select * from @itmp
- insert into @ttmp
- select tt.TransitionID from Transitions tt join @ctmp ct on tt.FromID = ct.cid join @itmp it on tt.ToID = it.iid
- where ct.pid = @ProcedureID or it.pid = @ProcedureID
- --internal
- select 1 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.vid = it.vid and ct.pid = @ProcedureID and it.pid = @ProcedureID
- --external from
- union
- select 2 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.vid = it.vid and ct.pid = @ProcedureID and it.pid != @ProcedureID
- --external to
- union
- select 3 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.vid = it.vid and ct.pid != @ProcedureID and it.pid = @ProcedureID
- --outside from
- union
- select 4 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.vid != it.vid and ct.pid = @ProcedureID-- and ii.ItemID not in (select iid from @itmp)
- --outside to
- union
- select 5 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @itmp it on tt.ToID = it.iid
- join @ctmp ct on tt.FromID = ct.cid
- where ct.vid != it.vid and it.pid = @ProcedureID --and ii.ContentID not in (select cid from @ctmp)
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetTransitionReportData Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetTransitionReportData Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [PasteItemChild] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemChild];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2015 - Volian Enterprises, Inc. All rights reserved.
-
-Copies & Pastes into a level above the copied item, for example copied item is step pasted into a section.
-
-Example test:
-
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteItemChild 1493,484,20041,2,@dts,'KATHY',@NewItemID output
-
-*****************************************************************************/
-
-CREATE PROCEDURE [dbo].[PasteItemChild]
-(
- @ItemID int=null, @StartItemID int=null, -- ItemID is destination, StartItemID is top of copy
- @Type int=null, @FromType int=null, @DTS datetime, @UserID nvarchar(100), -- Type is step/section type for content record, fromtype is for parts
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- print 'testing PasteItemChild 1 ' + cast(dbo.ve_GetTransitionErrorCount() as varchar(20))
- DECLARE @ChildID int, @ContentID int, @ParentContentID int, @LastChanged timestamp
- , @newLastChanged timestamp, @Error int, @Rowcount int, @ChildDeleted int
- SELECT @ChildID = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [PARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID
- IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tblParts]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- BEGIN
- SELECT @ChildDeleted = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [tblPARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID and pp.DeleteStatus > 0
- END
- -- No existing child - Add Parts record. Note that don't need to update any transition records if no existing children
- IF @ChildID is null
- BEGIN
- IF @ChildDeleted is not null
- DELETE FROM [tblParts] WHERE ItemID = @ChildDeleted
- EXECUTE AddPart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @newLastChanged output
- END
- ELSE -- Children exist: Update existing Parts record and adjust transition records that may have pointed to 1st child.
- BEGIN
- EXECUTE UpdatePart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @LastChanged, @newLastChanged output
- UPDATE [Items] SET [PreviousID]=@newItemID WHERE [ItemID]=@ChildID
-
- -- Update content records for the transitions, this only fixes the link portion. Code fixes the text.
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ChildID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ChildID OR TT.RangeID = @ChildID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ChildID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ChildID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ChildID OR RangeID = @ChildID
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- -- I don't expect to see any transitions that point to @ChildID. They should have changed in
- -- the update above to point to @newItemID. This is here for consistency with the other insert
- -- stored procedures
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ChildID,@newItemID) OR RangeID IN(@ChildID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
- delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
- delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemChild Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemChild Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [PasteDocVersionChild] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteDocVersionChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteDocVersionChild];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2014 - Volian Enterprises, Inc. All rights reserved.
-
-Copies & Pastes into a docversion that does NOT have any existing procedures.
-
-Example test:
-
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteDocVersionChild 5,30,@dts,'KATHY',@NewItemID output
-
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteDocVersionChild]
-(
- @VersionID int=null, @StartItemID int=null, -- VersionID is destination (docversion), StartItemID is top of copy (i.e. procedure)
- @DTS datetime, @UserID nvarchar(100),
- @ThisVersionID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if not exists (select * from DocVersions where versionid = @VersionID)
- BEGIN
- RAISERROR ('###Cannot Paste Procedure###This document version has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID (Procedure)
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @NewItemID int
- DECLARE @DestFormatID int
- SET @ThisVersionID = @VersionID
- SET @DestFormatID = .dbo.vefn_GetDocVersionInheritedFormat(@VersionID)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- UPDATE [DOCVERSIONS] SET [ItemID] = @NewItemID where [VersionID]=@VersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetDocVersion @ThisVersionID
- delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
- delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteDocVersionChild Succeeded'
-ELSE PRINT 'Procedure Creation: PasteDocVersionChild Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_GetDocVersionInheritedFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetDocVersionInheritedFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetDocVersionInheritedFormat];
-GO
-
-CREATE FUNCTION [dbo].[vefn_GetDocVersionInheritedFormat] (@VersionID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @FormatID as int
- -- First get format for the input doc version
- begin
- with Itemz([Level], [VersionID], [FolderID], [ParentID], [FormatID]) as (
- -- DocVersion From Item
- select 0 [Level], DV.VersionID, DV.FolderID, null, DV.FormatID
- from DocVersions DV
- where [VersionID] = @VersionID
- Union All
- -- Folders
- select [Level] + 1, null, FF.ParentID, FF.FolderID, FF.FormatID
- from Itemz Z
- join Folders FF on FF.FolderID = Z.ParentID and FF.ParentID <> FF.FolderID
- where Z.FormatID is null
- )
- Select @FormatID = FormatID from Itemz ZZ Where FormatID is not null
- OPTION (MAXRECURSION 10000)
- END
- RETURN @FormatID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetDocVersionInheritedFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetDocVersionInheritedFormat Error on Creation'
-GO
-
-/*********the following funcion is for debugging copy/paste where transition text in content records does not get updated */
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetTransitionErrorCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetTransitionErrorCount];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.ve_GetTransitionErrorCount ()
-print 'testing ' + cast(dbo.ve_GetTransitionErrorCount() as varchar(20))
-*/
-
-CREATE FUNCTION [dbo].[ve_GetTransitionErrorCount] () RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @Count int
-select @Count = count(*) from (
-select dbo.ve_GetShortPathFromContentId(contentid) location, * from (
-select contentid, text, tt.*,
-case when text like '%'+ case when tt.toid = tt.rangeid and tt.IsRange = 0
-then
-'#Link:Transition:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + '%'
-else
-'#Link:TransitionRange:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + ' ' + cast(RangeID as nvarchar(10))+ '%'
-end then 'matches' else 'different' end ContentMatchesTrans,
-case when text like '%'+
-'#Link:TransitionRange:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + ' ' + cast(RangeID as nvarchar(10))+ '%'
-then 'matches' else 'different' end ContentMatchesRangeTrans
-from Contents cc
-join transitions tt on tt.fromid = cc.contentid) mm
-where ContentMatchesTrans = 'different') mm
-return @Count
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetTransitionErrorCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetTransitionErrorCount Error on Creation'
-GO
-
---added by JCB for storing procedure xml for approved version
---ALTER TABLE Versions add ApprovedXML if it does not exist
-IF COL_LENGTH('Versions','ApprovedXML') IS NULL
- ALTER TABLE Versions ADD [ApprovedXML] [NVARCHAR](MAX) NULL;
-GO
-
-/****** Object: StoredProcedure [addVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addVersion]
-
-(
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @ApprovedXML nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @newVersionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Versions]
- (
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RevisionID,
- @StageID,
- @PDF,
- @SummaryPDF,
- @ApprovedXML,
- @DTS,
- @UserID
- )
- SELECT @newVersionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@newVersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addVersion Succeeded'
-ELSE PRINT 'Procedure Creation: addVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- WHERE [VersionID]=@VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByRevisionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByRevisionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByRevisionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByRevisionID]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[ApprovedXML],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByRevisionID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByRevisionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByStageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByStageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByStageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByStageID]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[ApprovedXML],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Versions]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Versions].[RevisionID]
- WHERE
- [Versions].[StageID]=@StageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByStageID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByStageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateVersion]
-
-(
- @VersionID int,
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @ApprovedXML nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Versions]
- SET
- [RevisionID]=@RevisionID,
- [StageID]=@StageID,
- [PDF]=@PDF,
- [SummaryPDF]=@SummaryPDF,
- [ApprovedXML]=@ApprovedXML,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [VersionID]=@VersionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Versions] WHERE [VersionID]=@VersionID)
- RAISERROR('Version record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Version has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@VersionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateVersion Succeeded'
-ELSE PRINT 'Procedure Creation: updateVersion Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetDisconnectedItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetDisconnectedItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetDisconnectedItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_GetDisconnectedItems()
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetDisconnectedItems]()
-RETURNS @DiscItems TABLE
-(
- ItemID int primary Key,
- ContentID int,
- UNIQUE (ContentID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @UsedItems Table
- ( itemid int primary key, contentid int)
- insert into @UsedItems
- Select ItemID, ContentID from vefn_GetVersiontblItems('')
- insert into @DiscItems
- select itemid,ii.contentid from (
- Select ItemID,ii.ContentID from tblItems II
- where ItemID not in(select ItemID from @UsedItems)) ii
- Join Contents CC ON CC.ContentID = II.ContentID
- And CC.Type is not null
- UNION
- Select ItemId, ContentID from vefn_GetZeroFromType()
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetDisconnectedItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetDisconnectedItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_TransitionsToDisconnected]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_TransitionsToDisconnected];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_TransitionsToDisconnected] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_TransitionsToDisconnected('1')
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.vefn_TransitionsToDisconnected(@DocVersionList nvarchar(MAX))
-RETURNS @Transitions TABLE
-(
- [TransitionID] int primary key
- ,[FromID] int
- ,[ToID] int
- ,[RangeID] int
- ,[IsRange] int
- ,[TranType] int
- ,[Config] nvarchar(max)
- ,[DTS] datetime
- ,[UserID] nvarchar(100)
- ,UNIQUE(FromID,TransitionID)
- ,UNIQUE(ToID,TransitionID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Transitions
- select [TransitionID],[FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID]
- from Transitions tt
- join vefn_GetVersionItems(@DocVersionList) vi on tt.FromID = vi.ContentID
- join vefn_GetDisconnectedItems() di on tt.ToID = di.ItemID
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_TransitionsToDisconnected] Succeeded'
-ELSE PRINT 'TableFunction [vefn_TransitionsToDisconnected] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsToDisconnected] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsToDisconnected]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsToDisconnected];
-GO
-
-/*
-exec getTransitionsToDisconnected
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsToDisconnected]
-(
- @DocVersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- from transitions tt
- join vefn_TransitionsToDisconnected(@DocVersionList) td on tt.TransitionID = td.TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsToDisconnected Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsToDisconnected Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetNonEditableItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetNonEditableItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetNonEditableItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_GetNonEditableItems()
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [DBO].[vefn_GetNonEditableItems]()
-RETURNS @NonEditItems TABLE
-(
- ItemID int primary Key,
- ContentID int,
- UNIQUE (ContentID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @NonEditItems
- select ii.ItemID,ah.ContentID
- from
- (
- select cast(Config as xml) xconfig,ContentID from Contents where ContentID in
- (
- select p1.ContentID from Parts p1
- join Parts p2 on p1.ContentID = p2.ContentID
- where p1.FromType = 2 and p2.FromType = 6
- )
- and Config like '%edit%'
- ) ah
- cross apply xconfig.nodes('//SubSection') tSubsection(xSubsection)
- join Items ii on ah.ContentID = ii.ContentID
- where isnull(xSubsection.value('@Edit','varchar(1)'),'N') = 'N'
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetNonEditableItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetNonEditableItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_TransitionsToNonEditable]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_TransitionsToNonEditable];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_TransitionsToNonEditable] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_TransitionsToNonEditable('1')
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.vefn_TransitionsToNonEditable(@DocVersionList nvarchar(MAX))
-RETURNS @Transitions TABLE
-(
- [TransitionID] int primary key
- ,[FromID] int
- ,[ToID] int
- ,[RangeID] int
- ,[IsRange] int
- ,[TranType] int
- ,[Config] nvarchar(max)
- ,[DTS] datetime
- ,[UserID] nvarchar(100)
- ,UNIQUE(FromID,TransitionID)
- ,UNIQUE(ToID,TransitionID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Transitions
- select [TransitionID],[FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID]
- from Transitions tt
- join vefn_GetVersionItems(@DocVersionList) vi on tt.FromID = vi.ContentID
- join vefn_GetNonEditableItems() di on tt.ToID in (select ItemID from vefn_StepChildItems(di.ItemID))
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_TransitionsToNonEditable] Succeeded'
-ELSE PRINT 'TableFunction [vefn_TransitionsToNonEditable] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsToNonEditable] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsToNonEditable]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsToNonEditable];
-GO
-
-/*
-exec getTransitionsToNonEditable '8'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsToNonEditable]
-(
- @DocVersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- from transitions tt
- join vefn_TransitionsToNonEditable(@DocVersionList) td on tt.TransitionID = td.TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsToNonEditable Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsToNonEditable Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_StepChildItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_StepChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_StepChildItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_StepChildItems](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID and (Z.Level > 0 or p.FromType = 6)
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_StepChildItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_StepChildItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getJustStage];
-GO
-/****** Object: StoredProcedure [dbo].[getJustStage] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create PROCEDURE [dbo].[getJustStage]
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [StageID],
- [Name],
- [Description],
- [IsApproved],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[StageID]=[Stages].[StageID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[StageID]=[Stages].[StageID]) [VersionCount]
- FROM [Stages]
- WHERE [StageID]=@StageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustStage Succeeded'
-ELSE PRINT 'Procedure Creation: getJustStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_DeletePDFs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_DeletePDFs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_DeletePDFs];
-GO
-
-/*
-exec vesp_DeletePDFs
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_DeletePDFs]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE FROM [Pdfs]
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_DeletePDFs Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_DeletePDFs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getROImageByRODbID_FileName] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getROImagesByRODbID_FileName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getROImagesByRODbID_FileName];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getROImagesByRODbID_FileName]
-(
- @RODbID int,
- @FileName nvarchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE [RODbID]=@RODbID AND [FileName]=@FileName Order By [DTS]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getROImagesByRODbID_FileName Succeeded'
-ELSE PRINT 'Procedure Creation: getROImagesByRODbID_FileName Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetDisconnectedItemsCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetDisconnectedItemsCount]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetDisconnectedItemsCount];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetDisconnectedItemsCount]
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*) HowMany FROM vefn_GetDisconnectedItems()
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetDisconnectedItemsCount Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetDisconnectedItemsCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetNonEditableItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetNonEditableItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_GetNonEditableItems;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetNonEditableItems]
-WITH EXECUTE AS OWNER
-AS
- SELECT
- I.[ItemID],
- I.[PreviousID],
- I.[ContentID],
- I.[DTS],
- I.[UserID],
- I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount]
- FROM [Items] I
- JOIN vefn_GetNonEditableItems() NE on I.ItemID = NE.ItemID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetNonEditableItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetNonEditableItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetDatabaseSessions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetDatabaseSessions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_GetDatabaseSessions;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetDatabaseSessions]
-WITH EXECUTE AS OWNER
-AS
- select t1.SessionID,t1.UserID,t1.MachineName,t1.OwnerTypeName,t1.HowMany,t1.Status,
- t2.FolderName,t2.GrandParentName,t2.ParentName,t2.ItemPath,t2.DTSStart from
- (
- select ss.SessionID,UserID,MachineName,ISNULL(OwnerType,0) OwnerType,ISNULL(OwnerTypeName,'Nothing') OwnerTypeName,ISNULL(HowMany,0) HowMany,
- case when DATEDIFF(SECOND,DTSActivity,GETDATE()) > 60 then 'IN-ACTIVE (' + CAST(DATEDIFF(SECOND,DTSActivity,GETDATE()) as varchar(10)) + ' Seconds)' else 'Active' end Status
- from Sessions ss
- left join
- (select SessionID,OwnerType,case OwnerType when 0 then 'Procedure' when 1 then 'Document' when 2 then 'Working Draft' else 'Database' end OwnerTypeName,count(*) HowMany from Owners group by SessionID,OwnerType) oo on ss.SessionID = oo.SessionID
- where ss.DTSEnd is null
- ) t1
- left join
- (
- select oo.SessionID,oo.OwnerID,oo.DTSStart,oo.OwnerType,
- dbo.ve_GetShortPath(oo.OwnerItemID) ItemPath,
- vn.FolderName,vn.GrandParentName,vn.ParentName
- from Owners oo
- join vefn_GetVersionItems('') vi on oo.OwnerItemID = vi.ItemID
- join vefn_GetVersionNames() vn on vi.VersionID = vn.VersionID
- where oo.OwnerType = 0
- union
- select distinct oo.SessionID,oo.OwnerID,oo.DTSStart,oo.OwnerType,
- case when isnull(LibTitle,'') = '' then dbo.ve_getshortpathfromcontentid(ee.contentid) else 'Library Document: ' + LibTitle end ItemPath,
- vn.FolderName,vn.GrandParentName,vn.ParentName
- from Owners oo
- join Documents dd on oo.OwnerItemID = dd.DocID
- join Entries ee on oo.OwnerItemID = ee.DocID
- join vefn_GetVersionItems('') vi on ee.ContentID = vi.ContentID
- join vefn_GetVersionNames() vn on vi.VersionID = vn.VersionID
- where oo.OwnerType = 1
- union
- select oo.SessionID,oo.OwnerID,oo.DTSStart,oo.OwnerType,
- dv.Name ItemPath,vn.FolderName,vn.GrandParentName,vn.ParentName
- from Owners oo
- join DocVersions dv on oo.OwnerItemID = dv.VersionID
- join vefn_GetVersionNames() vn on dv.VersionID = vn.VersionID
- where oo.OwnerType = 2
- ) t2 on t1.SessionID = t2.SessionID and t1.OwnerType = t2.OwnerType
- order by t1.SessionID,t1.OwnerType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetDatabaseSessions Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetDatabaseSessions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentsAfterLastChanged] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentsAfterLastChanged]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_ListContentsAfterLastChanged;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListContentsAfterLastChanged]
-(
- @LastChanged timestamp
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- SELECT
- cc.[ContentID],
- cc.[Number],
- cc.[Text],
- cc.[Type],
- cc.[FormatID],
- cc.[Config],
- cc.[DTS],
- cc.[UserID],
- cc.[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=cc.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=cc.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=cc.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=cc.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=cc.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=cc.[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=cc.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=cc.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=cc.[ContentID]) [ZContentCount]
- FROM [Contents] cc
- WHERE cc.LastChanged > @LastChanged
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentsAfterLastChanged Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentsAfterLastChanged Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentsAfterLastChanged2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentsAfterLastChanged2]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_ListContentsAfterLastChanged2;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListContentsAfterLastChanged2]
-(
- @LastChanged bigint,
- @UserID nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- SELECT
- cc.[ContentID],
- CONVERT(bigint,cc.[LastChanged]) LastContentChange
- FROM [Contents] cc
- WHERE CONVERT(bigint,cc.LastChanged) > @LastChanged
--- AND cc.UserID != @UserID
- ORDER BY LastChanged
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentsAfterLastChanged2 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentsAfterLastChanged2 Error on Creation'
-GO
-
-/****** Object: StoredProcedure[getOwnerBySessionIDandFolderID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnerBySessionIDandFolderID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE getOwnerBySessionIDandFolderID;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2015 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnerBySessionIDandFolderID]
-(
- @SessionID int,
- @FolderID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @VersionID int
- SELECT @VersionID = VersionID from DocVersions WHERE FolderID = @FolderID
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners] oo
- INNER JOIN
- (
- -- 0 is procedures
- SELECT 0 ObjectType,ItemID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID)
- UNION
- -- 1 is documents
- SELECT 1 ObjectType,ee.DocID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Entries ee ON vi.ContentID = ee.ContentID
- UNION
- -- 2 is DocVersions
- SELECT 2 ObjectType, @VersionID ObjectID
- UNION
- -- 3 is Folders
- SELECT 3 ObjectType, @FolderID ObjectID
- ) tt ON oo.OwnerType = tt.ObjectType and oo.OwnerItemID = tt.ObjectID
- WHERE [SessionID] = @SessionID
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnerBySessionIDandFolderID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnerBySessionIDandFolderID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemsAfterLastChanged] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsAfterLastChanged]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_ListItemsAfterLastChanged;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsAfterLastChanged]
-(
- @LastChanged bigint,
- @UserID nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- SELECT
- isnull(dbo.ve_GetParentItem(ii.[ItemID]),0) ParentID,MAX(CONVERT(bigint,ii.[LastChanged])) LastItemChange
- FROM [Items] ii
- WHERE CONVERT(bigint,ii.LastChanged) > @LastChanged
--- AND cc.UserID != @UserID
- GROUP BY dbo.ve_GetParentItem(ii.[ItemID])
- ORDER BY MAX(CONVERT(bigint,ii.[LastChanged]))
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsAfterLastChanged Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsAfterLastChanged Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetShortPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetShortPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetShortPath];
-GO
-
-/*
-select ItemID, CC.Type, dbo.ve_GetPath(ItemID)
-from Items II join Contents CC on II.ContentID = CC.ContentID
-where ItemID in(111,265,266,267)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetShortPath] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Itemz(ItemCount,ItemID,PreviousID,FromType,CType,Number,Text,PPath, Path) as (
- Select 1,ItemID,PreviousID,0,C.Type/10000,C.Number,C.Text,
- Cast(Case when C.Type < 20000 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) else '' end as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) else '1' end as nvarchar(max)) Path
- from Items I
- join Contents C on I.ContentID = C.ContentID
- where ItemID=@ItemID
- Union All
--- siblings
- Select ItemCount+1,I.PreviousID,II.PreviousID,0,C.Type/10000,Z.Number,Z.Text,PPath,cast(ItemCount + 1 as nvarchar(4)) + PPath
- from Items I
- join Contents C on I.ContentID = C.ContentID
- Join Items II on II.ItemID = I.PreviousID
- Join Itemz Z on I.ItemID=Z.ItemID
- where I.PreviousID != 0
- Union All
--- children
- select 1,I.ItemID,I.PreviousID,P.FromType,C.Type/10000,C.Number,C.Text,
- case C.Type/10000
- when 0 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text)
- when 1 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) +'`' + cast(ItemCount + 0 as varchar(4))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(4))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(4))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(4))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(4))
- when 5 then '`RNO`'
- when 7 then '`Table`'
- when 8 then '`SupInfo`'
- else '`' + cast(ItemCount + 0 as varchar(4))
- end end + PPath PPath,
- --'1' +
- case C.Type/10000
- when 0 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text)
- when 1 then '`' + [dbo].[ve_GetShortPart](C.Number,C.Text) +'`' + cast(ItemCount + 0 as varchar(4))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(4))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(4))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(4))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(4))
- when 5 then '`RNO'
- when 7 then '`Table'
- when 8 then '`SupInfo'
- else '`' + cast(ItemCount + 0 as varchar(4))
- end end + PPath Path
-
- from Parts P
- join Items I on I.ContentID = P.ContentID
- join Contents C on I.ContentID = C.ContentID
- join Itemz Z on P.ItemID=Z.ItemID
-)
-select @Path = path From Itemz where ItemCount=1 and CType=0
-OPTION (MAXRECURSION 10000)
-return REPLACE(REPLACE(@Path,'\u8209?','-'),'u9586?','\\')
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetShortPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetShortPath Error on Creation'
-GO
-/****** Object: StoredProcedure [addROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE addROImage;
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addROImage]
-
-(
- @RODbID int,
- @FileName nvarchar(255),
- @Content varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newImageID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- IF exists(select * from ROImages where @rodbid = rodbid and @FileName=FileName and @DTS = DTS)
- BEGIN
- select @newImageID = ImageID from ROImages where @rodbid = rodbid and @FileName=FileName and @DTS = DTS
- END
- ELSE
- BEGIN
- INSERT INTO [ROImages]
- (
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RODbID,
- @FileName,
- @Content,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newImageID= SCOPE_IDENTITY()
- END
- SELECT @newLastChanged=[LastChanged]
- FROM [ROImages] WHERE [ImageID]=@newImageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-IF (@@Error = 0) PRINT 'Procedure Creation: addROImage Succeeded'
-ELSE PRINT 'Procedure Creation: addROImage Error on Creation'
-GO
-PRINT '20150808 Improved performance for delete procedure'
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetEnhancedFolders] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedFolders]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedFolders];
-GO
-
-/*
-select * from vefn_GetEnhancedFolders(11)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.[vefn_GetEnhancedFolders](@FolderID as int)
-RETURNS @AllValues TABLE
-(
- FolderID int PRIMARY KEY,
- [Type] int,
- [Name] varchar(100),
- VersionID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
-INSERT INTO @AllValues
-select DISTINCT ddenh.folderid, xxEnhanced.value('@Type', 'int') xxType, xxEnhanced.value('@Name', 'varchar(20)') xxName,
- xxEnhanced.value('@VersionID', 'int') xxVersionID from
- (select *, cast(config as xml) xconfig from docversions) dv
- cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- join (select *, cast(config as xml) xconfig from docversions)
- denh on xEnhanced.value('@VersionID', 'int') = denh.VersionID
- cross apply denh.xconfig.nodes('//Enhanced') ttEnhanced(xxEnhanced)
- join (select *, cast(config as xml) xconfig from docversions)
- ddenh on xxEnhanced.value('@VersionID', 'int') = ddenh.VersionID
- where denh.FolderID = @FolderID or dv.folderid = @FolderID
-
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetEnhancedFolders Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetEnhancedFolders Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetEnhancedDocVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedDocVersions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedDocVersions];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select * from vefn_GetEnhancedDocVersions(6)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.[vefn_GetEnhancedDocVersions](@VersionID as int)
-RETURNS @AllValues TABLE
-(
- VersionID int PRIMARY KEY,
- [Type] int,
- [Name] varchar(100),
- FolderID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
-INSERT INTO @AllValues
-select DISTINCT xxEnhanced.value('@VersionID', 'int') xxVersionID, xxEnhanced.value('@Type', 'int') xxType,
- xxEnhanced.value('@Name', 'varchar(20)') xxName, ddenh.folderid from
- (select *, cast(config as xml) xconfig from docversions) dv
- cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- join (select *, cast(config as xml) xconfig from docversions)
- denh on xEnhanced.value('@VersionID', 'int') = denh.VersionID
- cross apply denh.xconfig.nodes('//Enhanced') ttEnhanced(xxEnhanced)
- join (select *, cast(config as xml) xconfig from docversions)
- ddenh on xxEnhanced.value('@VersionID', 'int') = ddenh.VersionID
- where denh.VersionID = @VersionID or dv.VersionID = @VersionID
-
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetEnhancedDocVersions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetEnhancedDocVersions Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetEnhancedProcedures] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedProcedures]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION vefn_GetEnhancedProcedures;
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.[vefn_GetEnhancedProcedures](@ItemID int)
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int primary key,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- with ItemZ(ItemId, EnhID, Level) as
- (Select ItemID,xEnhanced.value('@ItemID','int') EnhID, 0 from Items II Join (Select ContentID, cast(config as xml) xconfig From Contents)
- CC On CC.ContentID = II.ContentID outer apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced) Where ItemID = @ItemID
- Union ALL
- Select II.ItemID,xEnhanced.value('@ItemID','int') EnhID, ZZ.Level+1 from Items II Join ItemZ ZZ on ZZ.EnhID = II.ItemID
- Join (Select ContentID, cast(config as xml) xconfig From Contents) CC On CC.ContentID = II.ContentID
- outer apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced) Where zz.Level < 2)
- INSERT INTO @VersionItems
- Select distinct dbo.vefn_GetVersionIDByItemID(ZZ.ItemID) VersionID, ZZ.ItemID, II.ContentID from ItemZ ZZ Join Items II on II.ItemID = ZZ.ItemID
- OPTION (MAXRECURSION 10000)
- RETURN
-END
-GO
-
--- Display the status
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetEnhancedProcedures Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetEnhancedProcedures Error on Creation'
-GO
-
-PRINT '20160106 Enhanced Documents'
-
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionTblItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionTblItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionTblItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Select * from vefn_GetVersionTblItems('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionTblItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID]
- FROM [tblItems] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join tblParts P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join tblItems I on I.PreviousID = Z.ItemID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetVersionTblItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetVersionTblItems] Error on Creation'
-
-GO
-/****** Object: StoredProcedure [addROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_PurgeDisconnectedData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_PurgeDisconnectedData;
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_PurgeDisconnectedData]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- delete from tblParts where FromType=0
- declare @UsedItems Table
- ( itemid int primary key, contentID int )
- insert into @UsedItems
- Select ItemID, ContentID from vefn_GetVersiontblItems('')
-
- select 'Working Drafts' Query, FolderName,Dv.* from DocVersions DV
- JOIN VEFN_GetVersionNames() VN ON DV.VersionID = VN.VersionID
-
- declare @DiscItems Table
- ( itemid int primary key, ContentID int)
- insert into @DiscItems
- Select ItemID, II.ContentID from tblItems II
- Join tblContents CC ON CC.ContentID = II.ContentID
- where ItemID not in(select ItemID from @UsedItems)
- And CC.Type is not null
-
- delete from [Checks] where RevisionID in (select RevisionID from Revisions where ItemID in (select itemid from @DiscItems))
- delete from [Versions] where RevisionID in (select RevisionID from Revisions where ItemID in (select itemid from @DiscItems))
- delete from [Revisions] where ItemID in (select itemid from @DiscItems)
- delete from [AnnotationAudits] where ItemID in (select itemid from @DiscItems)
- delete from [ItemAudits] where ItemID in (select itemid from @DiscItems)
- delete from [tblParts] where ItemID in (select itemid from @DiscItems)
- delete from [DocVersions] where ItemID in (select itemid from @DiscItems)
- delete from [PartAudits] where ItemID in (select itemid from @DiscItems)
- delete from [tblAnnotations] where ItemID in (select itemid from @DiscItems)
-
- delete from [Details] where contentID in (select contentid from @DiscItems)
- delete from [ZContents] where contentID in (select contentid from @DiscItems)
- delete from [tblGrids] where contentID in (select contentid from @DiscItems)
- delete from [tblImages] where contentID in (select contentid from @DiscItems)
- delete from [ContentAudits] where contentID in (select contentid from @DiscItems)
- delete from [tblROUsages] where contentID in (select contentid from @DiscItems)
- delete from [EntryAudits] where contentID in (select contentid from @DiscItems)
- delete from [tblEntries] where contentID in (select contentid from @DiscItems)
- delete from [GridAudits] where contentID in (select contentid from @DiscItems)
- delete from [ImageAudits] where contentID in (select contentid from @DiscItems)
- delete from [ItemAudits] where contentID in (select contentid from @DiscItems)
- delete from [tblParts] where contentID in (select contentid from @DiscItems)
- delete from [PartAudits] where contentID in (select contentid from @DiscItems)
- delete from [ROUsageAudits] where contentID in (select contentid from @DiscItems)
- delete from [ztransitions] where transitionid in(select transitionid from [tblTransitions] where fromid in (select contentid from @DiscItems))
- delete from [ztransitions] where transitionid in(select transitionid from [tblTransitions] where toid in (select itemid from @DiscItems))
- delete from [ztransitions] where transitionid in(select transitionid from [tblTransitions] where rangeid in (select itemid from @DiscItems))
- delete from [tblTransitions] where fromid in (select contentid from @DiscItems)
- delete from [tblTransitions] where toid in (select itemid from @DiscItems)
- delete from [tblTransitions] where rangeid in (select itemid from @DiscItems)
- delete from [tblItems] where PreviousID in (select itemid from @DiscItems)
- delete from [tblItems] where ItemID in (select itemid from @DiscItems)
- delete from [tblItems] where contentID in (select contentid from @DiscItems)
- delete from [tblContents] where contentID in (select contentid from @DiscItems)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_PurgeDisconnectedData Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_PurgeDisconnectedData Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'ClearCBOverrideForProcedure') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE ClearCBOverrideForProcedure;
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE PROCEDURE [dbo].ClearCBOverrideForProcedure
-(
- @ItemID int=null
-)
-WITH EXECUTE AS OWNER
-AS
-begin
-DECLARE @CBConfigs TABLE
-(
-[ContentID] int,
-xConfig xml
-)
-insert into @CBConfigs select ContentID, cast(Config as xml) xConfig
-from Contents where config like '%CBOverride%' and contentid in (select icontentid from vefn_tblchilditems(@ItemID,@ItemID,0))
-
-Update @CBConfigs Set xConfig.modify('delete //@CBOverride') From @CBConfigs
-Update @CBConfigs Set xConfig.modify('delete //Step[not(node())and not(./@*)]') From @CBConfigs
-
-UPDATE CC SET config = cast(xconfig as varchar(max))
-FROM CONTENTS CC
-Join @CBConfigs CB on cc.contentid = cb.contentid
-where cc.contentid in (select contentid from @CBConfigs)
-
-SELECT
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents]
- where contentid in (select contentid from @CBConfigs)
-end
-go
-
--- Display the status of ClearCBOverrideForProcedure
-IF (@@Error = 0) PRINT 'StoredProcedure [ClearCBOverrideForProcedure] Succeeded'
-ELSE PRINT 'StoredProcedure [ClearCBOverrideForProcedure] Error on Creation'
-go
-PRINT '20160126 Improved performance for checkouts'
-PRINT '20160226 11:00 SQL Code Version '
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_PurgeEnhanced]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_PurgeEnhanced];
-GO
-/*
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_PurgeEnhanced]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @Enh TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh
- SELECT VersionID,xConfig FROM (Select cast(config as xml) xconfig,* from DocVersions) t1
- Cross Apply xconfig.nodes('//Enhanced[1]') tEnhanced(xEnhanced)
-
- Update @Enh Set xConfig.modify('delete //Enhanced') From @Enh
- Update DV Set Config = cast(xconfig as varchar(max)) From Docversions DV
- Join @Enh EE ON EE.ID = DV.VersionID
-
- --select * from @Enh
-
- delete from @enh
-
- insert into @enh
- SELECT ContentID,xConfig FROM (Select cast(config as xml) xconfig,* from Contents) t1
- Cross Apply xconfig.nodes('//Enhanced[1]') tEnhanced(xEnhanced)
-
- Update @Enh Set xConfig.modify('delete //Enhanced') From @Enh
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC
- Join @Enh EE ON EE.ID = CC.ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_PurgeEnhanced] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_PurgeEnhanced] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ConvertEnhancedDocVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ConvertEnhancedDocVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ConvertEnhancedDocVersions]
-(
- @svid int,
- @enhvid int,
- @enhid int,
- @enhttl varchar(255),
- @enhx int,
- @enhtok varchar(1)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
---print 'BGDV-1'
-update docversions set config = replace(config,'>',
- '>')
- where VersionID =@svid
---print 'BGDV-2'
-update docversions set config = replace(config,'>',
- '>')
- where VersionID =@enhvid
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ConvertEnhancedDocVersions] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ConvertEnhancedDocVersions] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ConvertEnhancedItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ConvertEnhancedItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ConvertEnhancedItems]
-(
- @svid int,
- @bvid int,
- @dvid int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-declare @EnhItems TABLE
-(
- ItemID int,
- ContentID int,
- SrcConfig1 varchar(255),
- SrcConfig2 varchar(255),
- ProcName varchar(8),
- RecID varchar(8),
- BGItemID int,
- BGContentID int,
- BGConfig varchar(255),
- DVItemID int,
- DVContentID int,
- DVConfig varchar(255)
-)
--- Procedures
-Insert into @EnhItems
-select VI.ItemID, VI.ContentID
- ,case when vibg.itemid is null then '' else '' end
- ,case when vidv.itemid is null then '' else '' end
- , VI.ProcName,null RecID
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID, case when vibg.itemid is null then '' else '' end
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID, case when vidv.itemid is null then '' else '' end
-from vefn_GetOldEnhancedProcs(@svid) VI
-Left Join vefn_GetOldEnhancedProcs(@bvid) VIBG ON VI.ProcName = VIBG.ProcName
-Left Join vefn_GetOldEnhancedProcs(@dvid) VIDV ON VI.ProcName = VIDV.ProcName
-WHERE VIBG.ItemID is not null or VIDV.ItemID is not null
---Sections and Steps
-Insert into @EnhItems
-select VI.ItemID, VI.ContentID
- ,case when vibg.itemid is null then '' else '' end
- ,case when vidv.itemid is null then '' else '' end
- , VI.ProcName,VI.RecID
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID, case when vibg.itemid is null then '' else '' end
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID, case when vidv.itemid is null then '' else '' end
-from vefn_GetOldEnhancedItems(@svid) VI
-Left Join vefn_GetOldEnhancedItems(@bvid) VIBG ON VI.ProcName = VIBG.ProcName AND '0L' + substring(VI.RecID,3,6) = VIBG.RecID
-Left Join vefn_GetOldEnhancedItems(@dvid) VIDV ON VI.ProcName = VIDV.ProcName AND '0L' + substring(VI.RecID,3,6) = VIDV.RecID
-WHERE VIBG.ItemID is not null or VIDV.ItemID is not null
-
---select * from @EnhItems
-
-Declare @EnhEach Table
-(
- ContentID int primary key,
- Change1 varchar(255),
- Change2 varchar(255)
-)
-insert into @EnhEach
-Select EI.ContentID,EI.SrcConfig1,EI.srcConfig2
-from @EnhItems EI
-Join Contents CC ON CC.ContentID = EI.ContentID
-
-insert into @EnhEach
-Select EI.bgContentID,EI.BGConfig,null
-from @EnhItems EI
-Join Contents CC ON CC.ContentID = EI.bgContentID
-
-insert into @EnhEach
-Select EI.dvContentID,EI.DVConfig,null
-from @EnhItems EI
-Join Contents CC ON CC.ContentID = EI.dvContentID
-
-Update CC
-Set Config = cast(cast(Replace(Replace(Config,'>' + Change1 +'' + isnull(Change2,'') +' 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ConvertEnhancedItems] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ConvertEnhancedItems] Error on Creation'
-go
-
-
--- ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedLinks]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedLinks];
-GO
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetEnhancedLinks]()
-RETURNS @Enhanced TABLE
-(
- svid int,
- bvid int,
- dvid int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @tbl table
-(
- FolderName varchar(255),
- VersionID int,
- ItemID int,
- ContentID int,
- ProcName varchar(10),
- LinkType varchar(4),
- RecID int,
- ShortName varchar(20)
-)
-
-
-insert into @tbl
-select vn.FolderName,VI.VersionID, VI.ItemID, t1.ContentID, ProcName, case substring(RecIDText,2,1) when '0' then 'None' when 'L' then 'Link' else substring(RecIDText,2,1) end LinkType
-, cast(substring(RecIDText,3,6) as int) RecID, ff.ShortName
-from (select cc.Contentid
-
-, xHistory.value('@ProcName','varchar(20)') ProcName, xHistory.value('@RecID','varchar(20)') RecIDText
-from (select *, cast(config as xml) xconfig from contents) cc
-cross apply xconfig.nodes('//History') tHistory(xHistory)) t1
-Join vefn_getversionItems('') vi on t1.contentID = vi.contentID
-JOIN VEFN_GetVersionNames() VN ON VI.VersionID = VN.VersionID
-JOIN DocVersions DV ON VI.VersionID = DV.VersionID
-Join Folders FF ON FF.FolderID = DV.FolderID
-
-
-
-DECLARE @LinkCounts TABLE
-(
- EnhancedID int,
- LinkFolder varchar(255),
- LinkShortName varchar(20),
- SourceID int,
- SourceFolder varchar(255),
- SourceShortName varchar(20),
- HowMany int,
- AllLinks int
-)
-insert into @LinkCounts
-select t3.*,t4.HowMany AllLinks from (select t1.versionID EnhancedID, t1.FolderName LinkFolder, t1.ShortName LinkShortName, t2.VersionID SourceID, t2.FolderName SourceFolder, T2.ShortName SourceShortName, Count(*) HowMany from
-(select * from @tbl where LinkType = 'Link') t1
-join (select * from @tbl where LinkType != 'Link') t2 on t1.ProcName = t2.ProcName and T1.RecID = T2.RecID
-group by t1.versionID, t1.FolderName, T1.ShortName, t2.versionID, t2.FolderName, t2.ShortName) t3
-Join
-(select FolderName LinkFolder, 'All' SourceFolder, count(*) HowMany from @tbl where LinkType = 'Link'
-group by FolderName) t4 on t3.LinkFolder = t4.linkfolder
-Order By LinkFolder, T3.HowMany Desc
-
---print '---3---'
---select * from @LinkCounts
-declare @LinkSummary TABLE
-(
- EnhancedID int,
- LinkFolder varchar(255),
- LinkShortName varchar(25),
- SourceID int,
- SourceFolder varchar(255),
- SourceShortName varchar(25),
- HowMany int,
- AllLinks int,
- RowNo int
-)
-begin
-WITH TOP3 AS (
- SELECT *, ROW_NUMBER()
- over (
- PARTITION BY [EnhancedID]
- order by [HowMany] DESC
- ) AS RowNo
- FROM @LinkCounts
-)
-insert into @linkSummary
-SELECT * FROM TOP3 WHERE RowNo <= 1
-end
-
-declare @myXML xml
-set @myXML=cast('
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-' as xml)
-declare @linktbl TABLE
-(
-Plant VARCHAR(25),
-LinkType VARCHAR(25),
-FolderFrom VARCHAR(25),
-FolderTo VARCHAR(25)
-)
-insert into @linktbl
-select
-xLink.value('@Plant','varchar(25)') Plant
-,xLink.value('@Type','varchar(25)') LinkType
-,xLink.value('@From','varchar(25)') FolderFrom
-,xLink.value('@To','varchar(25)') FolderTo
-from @myxml.nodes('//Link') tLink(xLink)
-
-declare @LnkPaths table
-(
- Plant VarChar(20),
- FolderFrom Varchar(20),
- Background Varchar(20),
- Deviation Varchar(20)
-)
-Insert into @LnkPaths
-select distinct plant,FolderFrom
-, (select min(FolderTo) from @linktbl lt1
- where lt1.plant=lt.plant and lt1.folderfrom = lt.folderfrom
- and lt1.linktype='bck.lnk') Background
-, (select min(FolderTo) from @linktbl lt1
-where lt1.plant=lt.plant and lt1.folderfrom = lt.folderfrom and lt1.linktype='dvt.lnk') Deviation
- from @linktbl lt
-where LinkType in('BCK.LNK','DVT.LNK')
-
-insert into @Enhanced
-select isnull(SourceID,0) svid,isnull(BackgroundID,0) bvid,isnull(DeviationID,0) dvid from (select Plant
-,T1.SourceID,FolderFrom
-,isnull(BackgroundID,LS1.EnhancedID) BackgroundID,BackGround
-,isnull(DeviationID, LS2.EnhancedID) DeviationID, Deviation
- from (select distinct Plant,
-(select Min(VersionID) from DocVersions dv Join Folders ff on dv.folderid = ff.folderid where ShortName = FolderFrom and ff.title like '%' + plant + '%') SourceID,
-FolderFrom,
-(select Min(VersionID) from DocVersions dv Join Folders ff on dv.folderid = ff.folderid where ShortName = Background and ff.title like '%' + plant + '%') BackgroundID,
-Background,
-(select Min(VersionID) from DocVersions dv Join Folders ff on dv.folderid = ff.folderid where ShortName = Deviation and ff.title like '%' + plant + '%') DeviationID,
-Deviation
- from
- @LnkPaths where Plant IN(Select Distinct Plant from @LnkPaths LP
-Join Folders FF ON FF.Title Like '%' + Plant + '%')) T1
-left Join @LinkSummary LS1 ON T1.SourceID = LS1.SourceID AND LS1.LinkShortName like '%.BCK'
-left Join @LinkSummary LS2 ON T1.SourceID = LS2.SourceID AND LS2.LinkShortName like '%.DVT'
-Where T1.SourceID is not null) T2
-where BackgroundID is not null or DeviationID is not null
-Return
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetEnhancedLinks] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetEnhancedLinks] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetOldEnhancedProcs]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetOldEnhancedProcs];
-GO
-/*
-
--- Byron
-USE VEPROMS_BYR
-select VI.ItemID, VI.ContentID, VI.ProcName
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID
-from vefn_GetOldEnhancedProcs(6) VI
-Left Join vefn_GetOldEnhancedProcs(8) VIBG ON VI.ProcName = VIBG.ProcName
-Left Join vefn_GetOldEnhancedProcs(9) VIDV ON VI.ProcName = VIDV.ProcName
-USE MASTER
-
--- Catawba
-USE VEPROMS_CNS
-select VI.ItemID, VI.ContentID, VI.ProcName
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID
-from vefn_GetOldEnhancedProcs(7) VI
-Left Join vefn_GetOldEnhancedProcs(12) VIBG ON VI.ProcName = VIBG.ProcName
-Left Join vefn_GetOldEnhancedProcs(0) VIDV ON VI.ProcName = VIDV.ProcName
-USE MASTER
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetOldEnhancedProcs](@VersionID as int)
-RETURNS @Enhanced TABLE
-(
- ItemID int,
- ContentID int,
- ProcName varchar(8)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Enhanced
- select ItemID,ContentID,ProcName From (
- select ItemID,CC.ContentID
- ,xHistory.value('@ProcName','varchar(8)') ProcName
- ,row_Number() over(partition by xHistory.value('@ProcName','varchar(8)') order by ItemID) RowOrder
- from (select ContentID, cast(config as xml) xConfig from Contents where Type = 0 ) CC
- Cross Apply xConfig.nodes('//History') tHistory(xHistory)
- JOIN VEFN_GETVERSIONITEMS(cast(@VersionID as varchar(12))) VI ON VI.CONTENTID = CC.CONTENTID
- --JOIN VEFN_GetVersionNames() VN ON VI.VersionID = VN.VersionID
- )T1 Where rowOrder = 1
-Return
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetOldEnhancedProcs] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetOldEnhancedProcs] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetOldEnhancedItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetOldEnhancedItems];
-GO
-/*
-
-select count(*) from vefn_GetOldEnhancedItems(6)
-select count(*) from vefn_GetOldEnhancedItems(8) where RecID like '0l%'
-select count(*) from vefn_GetOldEnhancedItems(9) where RecID like '0l%'
-
-
--- Byron
-USE VEPROMS_BYR
-select VI.ItemID, VI.ContentID, VI.ProcName,VI.RecID
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID
-from vefn_GetOldEnhancedItems(6) VI
-Left Join vefn_GetOldEnhancedItems(8) VIBG ON VI.ProcName = VIBG.ProcName AND '0L' + substring(VI.RecID,3,6) = VIBG.RecID
-Left Join vefn_GetOldEnhancedItems(9) VIDV ON VI.ProcName = VIDV.ProcName AND '0L' + substring(VI.RecID,3,6) = VIDV.RecID
-WHERE VIBG.ItemID is not null or VIDV.ItemID is not null
-USE MASTER
-
--- Catawba
-USE VEPROMS_CNS
-select VI.ItemID, VI.ContentID, VI.ProcName, VI.RecID
-, VIBG.ItemID BGItemID, VIBG.ContentID BGContentID
-, VIDV.ItemID DVItemID, VIDV.ContentID DVContentID
-from vefn_GetOldEnhancedItems(7) VI
-Left Join vefn_GetOldEnhancedItems(12) VIBG ON VI.ProcName = VIBG.ProcName AND '0L' + substring(VI.RecID,3,6) = VIBG.RecID
-Left Join vefn_GetOldEnhancedItems(0) VIDV ON VI.ProcName = VIDV.ProcName AND '0L' + substring(VI.RecID,3,6) = VIDV.RecID
-WHERE VIBG.ItemID is not null --or VIDV.ItemID is not null
-USE MASTER
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetOldEnhancedItems](@VersionID as int)
-RETURNS @Enhanced TABLE
-(
- ItemID int,
- ContentID int,
- ProcName varchar(8),
- RecID varchar(8),
- Primary Key (ProcName,RecID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Enhanced
- select ItemID, ContentID,ProcName,RecID From (
- select VI.ItemID, CC.ContentID
- ,xHistory.value('@ProcName','varchar(8)') ProcName
- ,xHistory.value('@RecID','varchar(8)') RecID
- ,row_Number() over(partition by xHistory.value('@ProcName','varchar(8)'), xHistory.value('@RecID','varchar(8)') order by VI.ItemID) RowOrder
- from (select ContentID, cast(config as xml) xConfig from Contents where Type != 0 ) CC
- Cross Apply xConfig.nodes('//History') tHistory(xHistory)
- JOIN VEFN_GETVERSIONPROCEDUREITEMS(cast(@VersionID as varchar(12))) VI ON VI.CONTENTID = CC.CONTENTID
- --Where ProcID in(select ItemID from vefn_GetOldEnhancedProcs(@VersionID))
- JOIN vefn_GetOldEnhancedProcs(@VersionID) vep on vi.ProcID = VEP.ItemID AND xHistory.value('@ProcName','varchar(8)')= vep.ProcName
- --JOIN VEFN_GetVersionNames() VN ON VI.VersionID = VN.VersionID
- )T1 Where rowOrder = 1
-Return
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetOldEnhancedItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetOldEnhancedItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ConvertEnhanced]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ConvertEnhanced];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ConvertEnhanced]
-(
- @svid int,
- @bvid int,
- @dvid int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- IF( @svid != 0 AND @bvid != 0) -- Background DocVersions
- exec vesp_ConvertEnhancedDocVersions @svid,@bvid,1,'Background',6,'B'
- IF( @svid != 0 AND @dvid != 0) -- Deviation DocVersions
- exec vesp_ConvertEnhancedDocVersions @svid,@dvid,2,'Deviation',20,'D'
- IF( @svid != 0 AND ( @bvid != 0 OR @dvid != 0)) -- Enhanced Items
- exec vesp_ConvertEnhancedItems @svid, @bvid, @dvid
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ConvertEnhanced] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ConvertEnhanced] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ConvertAllEnhanced]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ConvertAllEnhanced];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ConvertAllEnhanced]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @svid int
- declare @bvid int
- declare @dvid int
- declare @source varchar(255)
- declare @background varchar(255)
- declare @deviation varchar(255)
- Exec vesp_PurgeEnhanced
- Print 'Purge Enhanced'
- declare enh cursor for select * from vefn_GetEnhancedLinks()
- open enh
- fetch next from enh into @svid,@bvid,@dvid
- while @@fetch_status = 0
- begin
- SELECT @SOURCE = FOLDERNAME FROM vefn_GetVersionNames() where VersionID = @svid
- SELECT @Background = FOLDERNAME FROM vefn_GetVersionNames() where VersionID = @bvid
- SELECT @Deviation = FOLDERNAME FROM vefn_GetVersionNames() where VersionID = @dvid
- Print 'Converting ' + @Source + ' => ' + isnull(@Background,'N/A') + ' => ' + isnull(@Deviation, 'N/A')
- Exec vesp_ConvertEnhanced @svid,@bvid,@dvid
- fetch next from enh into @svid,@bvid,@dvid
- end
- close enh
- deallocate enh
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ConvertAllEnhanced] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ConvertAllEnhanced] Error on Creation'
-go
-PRINT 'Added Enhanced Document Conversion Code'
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetNewEnhancedData]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetNewEnhancedData];
-GO
-/*
-select * from vefn_GetNewEnhancedData(28825)
-*/
-/****** Object: Table Function [vefn_GetNewEnhancedData] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetNewEnhancedData]( @ItemID int, @EnhType int)
-RETURNS @OldEnhancedData TABLE
-(
- ItemID int,
- ContentID int,
- EItemID int,
- EType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @OldEnhancedData
-select ii.ItemId,cc.ContentID
- , xEnhanced.value('@ItemID','int') EItemID
- , xEnhanced.value('@Type','int') EType from (Select *, cast(config as xml) xConfig from contents) CC
-Join Items II ON II.ContentID = CC.ContentID
-cross Apply xConfig.nodes('//Enhanced[@Type=sql:variable("@EnhType")]') tEnhanced(xEnhanced)
-where ItemID = @ItemID
-return
-END
-GO
-
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetNewEnhancedData] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetNewEnhancedData] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetOldEnhancedData]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetOldEnhancedData];
-GO
-/*
-select * from vefn_GetOldEnhancedData(28825)
-*/
-/****** Object: Table Function [vefn_GetOldEnhancedData] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetOldEnhancedData]( @ItemID int)
-RETURNS @OldEnhancedData TABLE
-(
- ItemID int,
- ContentID int,
- ProcName nvarchar(10),
- RecID nvarchar(10)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @OldEnhancedData
-select ii.ItemId,cc.ContentID
- , xHistory.value('@ProcName','nvarchar(10)') ProcName
- , xHistory.value('@RecID','nvarchar(10)') RecID from (Select *, cast(config as xml) xConfig from contents) CC
-Join Items II ON II.ContentID = CC.ContentID
-cross Apply xConfig.nodes('//History') tHistory(xHistory)
-where ItemID = @ItemID
-return
-END
-GO
-
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetOldEnhancedData] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetOldEnhancedData] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedItemsAndChildren]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedItemsAndChildren];
-GO
-/****** Object: Table Function [vefn_GetEnhancedItemsAndChildren] *****/
-/*
-select * from vefn_GetEnhancedItemsAndChildren(17013,1)
-select * from vefn_GetEnhancedItemsAndChildren(17067,0)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetEnhancedItemsAndChildren](@ProcID int,@EnhType int)
-RETURNS @VersionItems TABLE
-(
- [Level] int,
- [FromType] int,
- [Ordinal] int,
- [ParentID] int,
- [ItemID] int primary key,
- [PreviousID] int,
- [ContentID] int,
- [Number] varchar(250),
- [Text] NVARCHAR(MAX),
- [Type] INT,
- [FormatID] int,
- [EItemID] int,
- [EType] int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ProcID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- --join (select * from Items where ContentID Not in(Select ContentID from entries)) I on I.ItemID = P.ItemID
- where p.fromtype in(2,3,4) -- Sections, Cautions, Notes
- or (z.FromType = 2 and p.FromType=6) -- High Level Step
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @versionitems
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID], C.[Number],C.[Text],C.[Type]
-, C.[FormatID]
-, xEnhanced.value('@ItemID','int') EItemID
-, xEnhanced.value('@Type','int') EType from ItemZ I
- join (select * , cast(config as xml) xConfig from Contents) C on C.ContentID = I.ContentID
- -- sql:variable("@EnhType") allows a variable to be used in a xPath query to limit
- -- the results to Enhanced Nodes that have type =
- outer apply xConfig.nodes('//Enhanced[@Type=sql:variable("@EnhType")]') tEnhanced(xEnhanced)
- where I.ContentID not in (select contentid from entries)
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetEnhancedItemsAndChildren] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetEnhancedItemsAndChildren] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedIssues]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedIssues];
-GO
-/****** Object: Table Function [vefn_GetEnhancedIssues] ******/
-/*
-select * from vefn_getEnhancedIssues1(17066)
-select * from vefn_getEnhancedIssues1(17067)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetEnhancedIssues]( @EnhancedID int)
-RETURNS @EnhancedIssues TABLE
-(
- SourceID int,
- [sNumber] varchar(250),
- [sText] NVARCHAR(MAX),
- [sType] INT,
- [sProcName] NVARCHAR(10),
- [sRecID] NVARCHAR(10),
- EnhanceID int,
- [eNumber] varchar(250),
- [eeText] NVARCHAR(MAX),
- [eType] INT,
- [eProcName] NVARCHAR(10),
- [eRecID] NVARCHAR(10),
- Status varchar(10)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @SourceID as int
- select @SourceID = xEnhanced.value('@ItemID','int') from (select cast(config as xml) xConfig from contents
- where contentID in(select ContentID from Items where ItemID = @EnhancedID)) CC
- cross apply xConfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- declare @Type int
- select @Type = xEnhanced.value('@Type','int') from (select cast(config as xml) xConfig from contents
- where contentID in(select ContentID from Items where ItemID = @SourceID)) CC
- cross apply xConfig.nodes('//Enhanced') tEnhanced(xEnhanced) where xEnhanced.value('@ItemID','int') = @EnhancedID
- Insert into @EnhancedIssues
- select vcs.ItemID SourceID, vcs.[Number] sNumber, vcs.[Text] sText, vcs.[Type] sType,sod.ProcName sProcName,sod.RecID sRecID
- , vce.ItemID EnhancedID, vce.[Number] eNumber, vce.[Text] eText, vce.[Type] eType,eod.ProcName sProcName ,eod.RecID eRecID
- , case
- when ISNULL(eod.RecID,'00') like '0L%' and vcs.itemid is null then 'Delete'
- when vcs.itemid is null then 'Unlinked'
- when vce.itemid is null then 'Insert'
- when ISNULL(vcs.text,'') != isnull(vce.Text,'') then 'Different'
- else 'Same' end Status
- from vefn_GetEnhancedItemsAndChildren(@SourceID,@Type) vcs
- full Join vefn_GetEnhancedItemsAndChildren(@EnhancedID,0) vce on vcs.EItemID = vce.ItemID
- outer apply vefn_GetOldEnhancedData(vcs.ItemID) sod
- outer apply vefn_GetOldEnhancedData(vce.ItemID) eod
- RETURN
-END
-GO
-
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetEnhancedIssues] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetEnhancedIssues] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedIssueCount]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedIssueCount];
-GO
-/****** Object: Table Function [vefn_GetEnhancedIssueCount] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetEnhancedIssueCount]( @EnhancedID int)
-RETURNS @EnhancedIssueCount TABLE
-(
- Deleted int,
- Inserted int,
- Changed int,
- Same int,
- Unlinked int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @EnhancedIssueCount
- select sum(case Status when 'Delete' then 1 else 0 end) Deleted
- , sum(case Status when 'Insert' then 1 else 0 end) Inserted
- , sum(case Status when 'Different' then 1 else 0 end) Changed
- , sum(case Status when 'Same' then 1 else 0 end) Same
- , sum(case Status when 'Unlinked' then 1 else 0 end) Unlinked
- from vefn_GetEnhancedIssues(@EnhancedID)
- RETURN
-END
-GO
-
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetEnhancedIssueCount] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetEnhancedIssueCount] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetEnhancedDocuments]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetEnhancedDocuments];
-GO
-/****** Object: Table Function [vefn_GetEnhancedDocuments] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-
-CREATE FUNCTION [dbo].[vefn_GetEnhancedDocuments]()
-RETURNS @EnhancedDocuments TABLE
-(
- VersionID int,
- FolderName varchar(250),
- ItemID int,
- ProcNum varchar(250),
- ProcName varchar(1000),
- EnhType int,
- EnhItemID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-insert into @EnhancedDocuments
-select VN.VersionID,VN.FolderName, VI.ItemID
-, replace(cc.Number,'\u8209?','-') ProcNum, replace(cc.Text,'\u8209?','-') ProcName
---, replace(replace(cc.Number,'\u8209?','-'),'\u9586?','\') ProcNum, replace(replace(cc.Text,'\u8209?','-'),'\u9586?','\') ProcName
-, xEnhanced.value('@Type','int') EnhType, xenhanced.value('@ItemID','int') EnhItemID
---, xEnhanced.query('.') qEnhanced
-from (select *, cast(config as xml) xconfig from Contents Where config like '%Enhanced%' and Type =0) CC
-JOIN VEFN_GetVersionItems('') VI ON VI.ContentID = CC.ContentID
-JOIN VEFN_GetVersionNames() VN ON VI.VersionID = VN.VersionID
-cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
-where xEnhanced.value('@Type','int') > 0
-return
-END
-GO
-
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetEnhancedDocuments] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetEnhancedDocuments] Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListUnlinkedItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListUnlinkedItems];
-GO
-/* Sample
-vesp_ListUnlinkedItems 28825,1
-vesp_ListUnlinkedItems 28827,1
-vesp_ListUnlinkedItems 29245,1
-vesp_ListUnlinkedItems 12217,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListUnlinkedItems]
-(
- @ItemID int,
- @EnhType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @EItemID int
- set @EItemID = (select top 1 VIS.EItemID from vefn_AllSiblingItems(@ItemID)--Find All Siblings
- outer apply vefn_GetNewEnhancedData(ItemID,@EnhType) VIS -- That are Linked
- where EitemID is not null)
-
- if @EItemID is null
- BEGIN
- select @EItemID = epp.ItemID
- from (select * from Parts where ItemID in(select itemID from vefn_AllSiblingItems(@ItemID)))SPP -- FindParent
- JOIN ITEMS SII ON sPP.ContentID = sII.ContentID -- Get Parent Content ID
- outer apply vefn_GetNewEnhancedData(SII.ItemID,@EnhType) VIS -- Get Enhanced ID for Parent
- JOIN ITEMS EII ON VIS.EItemID = EII.ItemID -- Get Enhanced Parent Content ID
- JOIN PARTS EPP ON EPP.ContentID = EII.ContentID and SPP.FromType = epp.FromType -- Get first Child
- END
- if @EItemID is null
- BEGIN
- select @EItemID = DV2.ItemID from (select *,cast(config as xml) xconfig from DocVersions
- where ItemID in(select itemID from vefn_AllSiblingItems(@ItemID))) SDV -- Source DocVersion
- cross apply (select * from vefn_GetEnhancedDocVersions(SDV.VersionID) where @EnhType = Type) EDV -- Enhanced DocVersion
- Join DocVersions DV2 ON DV2.VersionID = EDV.VersionID -- First Procedure
- END
- Select ItemID,PreviousID,II.ContentID,II.[DTS],II.[UserID],II.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[II].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[II].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[II].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[II].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[II].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[II].[ItemID]) [Transition_ToIDCount]
- from Items II
- Left Join Entries EE ON II.ContentID = EE.ContentID
- where ItemID In (select SIB.ItemID from vefn_AllSiblingItems(@EItemID) SIB
- outer apply vefn_GetNewEnhancedData(ItemID,0) VIE
- Where VIE.EItemID is null)
- and EE.ContentID is null
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ListUnlinkedItems] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ListUnlinkedItems] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsToRefresh]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsToRefresh];
-GO
-/* Sample
-vesp_ListItemsToRefresh 17078
-vesp_ListItemsToRefresh 17066
-vesp_ListItemsToRefresh 17083
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsToRefresh]
-(
- @ProcID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[II].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[II].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[II].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[II].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[II].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[II].[ItemID]) [Transition_ToIDCount]
- from Items II where ItemID In (select EnhanceID from vefn_GetEnhancedIssues(@ProcID)
- where Status ='Different')
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_ListItemsToRefresh] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_ListItemsToRefresh] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_PurgeEnhancedItemsAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_PurgeEnhancedItemsAndChildren];
-GO
-/*
-vesp_PurgeEnhancedItemsAndChildren 43092 -- caution
-vesp_PurgeEnhancedItemsAndChildren 43090 -- step/caution
-vesp_PurgeEnhancedItemsAndChildren 43089 -- section
-vesp_PurgeEnhancedItemsAndChildren 17067 -- procedure
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_PurgeEnhancedItemsAndChildren](@EnhanceID int)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @SourceID int
- select @SourceID=EItemID from VEFN_GetNewEnhancedData(@EnhanceID,0)
- DECLARE @EnhType int
- select @EnhType = xEnhanced.value('@Type','int')
- from (select *, cast(config as xml) xConfig from Contents where ContentID in (Select ContentID from ITEMS where ItemID = @SourceID)) CC
- cross apply xconfig.nodes('//Enhanced[@ItemID=sql:variable("@EnhanceID")]') tEnhanced(xEnhanced)
- declare @Enh1 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh1
- select CC.ContentID, CC.xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN vefn_ChildItems(@SourceID) VCI ON VCI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VCI.itemid,@EnhType) VEN
-
- Update @Enh1 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh1
-
-
- declare @Enh2 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh2
- select CC.ContentID, CC.xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN vefn_ChildItems(@EnhanceID) VCI ON VCI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VCI.itemid,0) VEN
- set @EnhType=0
- Update @Enh2 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh2
-
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC
- Join @Enh1 EE ON EE.ID = CC.ContentID
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC
- Join @Enh2 EE ON EE.ID = CC.ContentID
-
- SELECT [ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents] where ContentID in (Select ID From @Enh1 UNION Select ID From @Enh2)
-
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_PurgeEnhancedItemsAndChildren] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_PurgeEnhancedItemsAndChildren] Error on Creation'
-go
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetNonEnhancedDocVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetNonEnhancedDocVersions];
-GO
-CREATE PROCEDURE [dbo].[vesp_GetNonEnhancedDocVersions]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-SELECT
- [VersionID],
- [FolderID],
- [VersionType],
- [Name],
- [Title],
- [ItemID],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Associations] WHERE [Associations].[VersionID]=dv.[VersionID]) [AssociationCount]
- FROM (select *, cast(config as xml) xconfig from [DocVersions] ) dv
- outer apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- Where xEnhanced is null
-return
-END
-GO
-
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_GetNonEnhancedDocVersions] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_GetNonEnhancedDocVersions] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_PurgeEnhancedDocVersionsAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_PurgeEnhancedDocVersionsAndChildren];
-GO
-/*
-vesp_PurgeEnhancedDocVersionsAndChildren 8 -- Background
-vesp_PurgeEnhancedDocVersionsAndChildren 9 -- Deviation
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_PurgeEnhancedDocVersionsAndChildren](@EnhanceID int) -- @EnhanceID -- Enhanced VersionID
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @SourceID int -- Source VersionID
- select @SourceID = xEnhanced.value('@VersionID','int') from (select *, cast(config as xml) xconfig from DocVersions) DV
- cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- where VersionID = @EnhanceID
- DECLARE @EnhType int
- select @EnhType = xEnhanced.value('@Type','int')
- from (select *, cast(config as xml) xConfig from DocVersions where VersionID = @SourceID) DV
- cross apply xconfig.nodes('//Enhanced[@VersionID=sql:variable("@EnhanceID")]') tEnhanced(xEnhanced)
- -- Fix DocVersion Records
- declare @Enh TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh
- select DV.VersionID,DV.xConfig
- from (select *, cast(config as xml) xConfig from DocVersions where VersionID in(@SourceID,@EnhanceID)) DV
- Update @Enh Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh
- Update @Enh Set xConfig.modify('delete //Enhanced[@Type="0"]') From @Enh
- declare @Enh1 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh1 -- Links to Enhanced from Source
- select CC.ContentID, xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN VEFN_GetVersionItems(cast(@SourceID as varchar(25))) VI ON VI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VI.itemid,@EnhType) VEN
- Update @Enh1 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh1
-
- declare @Enh2 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh2 -- Links to Enhanced from Source
- select CC.ContentID, xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN VEFN_GetVersionItems(cast(@EnhanceID as varchar(25))) VI ON VI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VI.itemid,0) VEN
- set @EnhType=0
- Update @Enh2 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh2
-
- Update DV Set Config = cast(xConfig as varchar(max)) From DocVersions DV -- Remove Links from DocVersions
- Join @Enh EE ON EE.ID = DV.VersionID
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC -- Remove Links from Source
- Join @Enh1 EE ON EE.ID = CC.ContentID
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC -- Remove Links from Enhanced
- Join @Enh2 EE ON EE.ID = CC.ContentID
-
- SELECT [ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents] where ContentID in (Select ID From @Enh1 UNION Select ID From @Enh2)
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_PurgeEnhancedDocVersionsAndChildren] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_PurgeEnhancedDocVersionsAndChildren] Error on Creation'
-go
-
--- AddToPromsFixes_Convert16to32
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetOldEnhancedProcItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetOldEnhancedProcItems];
-GO
-/*
-
-select * from vefn_GetOldEnhancedProcItems(17012)
-select * from vefn_GetOldEnhancedProcItems(17066)
-
-select * from vefn_GetOldEnhancedProcItems(17012) VE
-join vefn_GetOldEnhancedProcItems(17066) VS on ve.Procname = vs.ProcName and substring(VE.RecID,3,8) = substring(VS.RecID,3,8)
-
-select * from vefn_GetOldEnhancedProcItems(17014)
-select * from vefn_GetOldEnhancedProcItems(17015)
-select * from vefn_GetOldEnhancedProcItems(17029)
-select * from vefn_GetOldEnhancedProcItems(17033)
-select * from vefn_GetOldEnhancedProcItems(17045)
-select * from vefn_GetOldEnhancedProcItems(99043)
-
-
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetOldEnhancedProcItems](@ItemID as int)
-RETURNS @Enhanced TABLE
-(
- ItemID int,
- ContentID int,
- ProcName varchar(255),
- RecID varchar(10)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @ProcNum varchar(255)
- select @ProcNum = replace(Number,'\u8209?','-') from contents CC
- --select @ProcNum = replace(replace(Number,'\u8209?','-'),'\u9586?','\') from contents CC
- join Items II on II.ContentID = CC.ContentID
- Where ItemID = @ItemID
- Begin
- with Itemz([FromType], [Level], [ItemID], [ContentID]) as (
- Select 1 [FromType], 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
- Union All -- Children
- select P.FromType, [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- where Z.FromType <= 2
- or P.FromType in (3,4)
- Union All -- Siblings
- select Z.FromType, [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
- )
- Insert into @Enhanced
- select ItemID,ContentID,ProcName,RecID from ( select II.ItemID,II.ContentID
- , isnull(xHistory.value('@ProcName','varchar(255)'),@ProcNum) ProcName
- , xHistory.value('@RecID','varchar(255)') RecID
- , Row_Number() over (partition by isnull(xHistory.value('@ProcName','varchar(255)'),@ProcNum)
- , xHistory.value('@RecID','varchar(255)') order by ItemID) RowOrder
- from Itemz II
- Join (select *, Cast(config as xml) xConfig from Contents) CC ON CC.ContentID = II.ContentID
- Cross Apply xConfig.nodes('//History') tHistory(xHistory)
- ) T1
- where RowOrder = 1
- OPTION (MAXRECURSION 10000)
- END
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetOldEnhancedProcItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetOldEnhancedProcItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_Get16to32EnhancedProcItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_Get16to32EnhancedProcItems];
-GO
-/*
-
-select * from vefn_Get16to32EnhancedProcItems(17012,17066,1)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_Get16to32EnhancedProcItems](@SourceID int, @EnhanceID int, @EnhType int)
-RETURNS @EnhItems TABLE
-(
- SrcItemID int,
- SrcContentID int,
- SrcConfig varchar(255),
- ProcName varchar(255),
- RecID varchar(8),
- EnhItemID int,
- EnhContentID int,
- EnhConfig varchar(255),
- EnhProcName varchar(255),
- EnhRecID varchar(8)
-)
-BEGIN
-Insert into @EnhItems-- Procedures
-select @SourceID SrcItemID, (select ContentID from Items Where ItemID = @SourceID) SrcContentID
- ,'' SrcConfig
- ,isnull(VSO.ProcName,replace(CCS.Number,'\u8209?','-')) SrcProcName, null SrcRecID
- --,isnull(VSO.ProcName,replace(replace(CCS.Number,'\u8209?','-'),'\u9586?','\')) SrcProcName, null SrcRecID
- ,@EnhanceID EnhItemID, (select ContentID from Items Where ItemID = @EnhanceID) EnhContentID
- ,'' EnhConfig
- ,isnull(VEO.ProcName ,replace(CCE.Number,'\u8209?','-')) EnhProcNam, null EnhRecID
- --,isnull(VEO.ProcName ,replace(replace(CCE.Number,'\u8209?','-'),'\u9586?','\')) EnhProcNam, null EnhRecID
-From vefn_GetOldEnhancedData(@SourceID) VSO
-cross apply vefn_GetOldEnhancedData(@EnhanceID) VEO
-JOIN Contents CCS ON VSO.ContentID = CCs.ContentID
-JOIN Contents CCE ON VEO.ContentID = CCE.ContentID
-
-Insert into @EnhItems--Sections and Steps
-select VS.ItemID, VS.ContentID
- ,'' SrcConfig
- ,VS.ProcName SrcProcName, VS.RecID RecID
- ,VE.ItemID EnhItemID, VE.ContentID EnhContentID
- ,'' EnhConfig
- ,VE.ProcName EnhProcName, VE.RecID EnhRecID
- from vefn_GetOldEnhancedProcItems(@SourceID) VS
-join vefn_GetOldEnhancedProcItems(@EnhanceID) VE on ve.Procname = vs.ProcName and substring(VE.RecID,2,8) = 'L' + substring(VS.RecID,3,8)
---select * from @EnhItems
-RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_Get16to32EnhancedProcItem] Succeeded'
-ELSE PRINT 'TableFunction [vefn_Get16to32EnhancedProcItem] Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_Get16BitEnhancedContents]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_Get16BitEnhancedContents];
-GO
-/*
-
-vesp_Get16BitEnhancedContents 17012,17066,1
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_Get16BitEnhancedContents](@SourceID int, @EnhanceID int, @EnhType int) -- @EnhanceID -- Enhanced VersionID
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @EnhItems TABLE
- (
- SrcItemID int,
- SrcContentID int,
- SrcConfig varchar(255),
- ProcName varchar(255),
- RecID varchar(8),
- EnhItemID int,
- EnhContentID int,
- EnhConfig varchar(255),
- EnhProcName varchar(255),
- EnhRecID varchar(8)
- )
- Insert into @EnhItems
- select * from vefn_Get16to32EnhancedProcItems(@SourceID,@EnhanceID,@EnhType)
-
- SELECT [ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents] where ContentID in (Select SrcContentID from @EnhItems union Select EnhContentID from @EnhItems)
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_Get16BitEnhancedContents] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_Get16BitEnhancedContents] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_Convert16to32EnhancedContents]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_Convert16to32EnhancedContents];
-GO
-/*
-
-vesp_Convert16to32EnhancedContents 17012,17066,1
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_Convert16to32EnhancedContents](@SourceID int, @EnhanceID int, @EnhType int) -- @EnhanceID -- Enhanced VersionID
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @EnhItems TABLE
- (
- SrcItemID int,
- SrcContentID int,
- SrcConfig varchar(255),
- ProcName varchar(255),
- RecID varchar(8),
- EnhItemID int,
- EnhContentID int,
- EnhConfig varchar(255),
- EnhProcName varchar(255),
- EnhRecID varchar(8)
- )
- Insert into @EnhItems
- select * from vefn_Get16to32EnhancedProcItems(@SourceID,@EnhanceID,@EnhType)
-
- Update CC
- Set Config = cast(cast(Replace(Config,'>' + SrcConfig +'' + EnhConfig +' 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_Convert16to32EnhancedContents] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_Convert16to32EnhancedContents] Error on Creation'
-go
-
-PRINT 'Enhanced Document Synchronization code.'
-
-/****** Object: StoredProcedure [vesp_GetUnusedRoFstsCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetUnusedRoFstsCount]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetUnusedRoFstsCount];
-GO
-
-/*
-exec vesp_GetUnusedRoFstsCount
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetUnusedRoFstsCount]
-WITH EXECUTE AS OWNER
-AS
- Select COUNT(*) HowMany From ROFSTS where ROFstID not in(Select ROFSTID from Associations)
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetUnusedRoFstsCount Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetUnusedRoFstsCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetUnusedRoFstsCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetUnusedFiguresCount]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetUnusedFiguresCount];
-GO
-
-/*
-exec vesp_GetUnusedFiguresCount
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetUnusedFiguresCount]
-WITH EXECUTE AS OWNER
-AS
- Select COUNT(*) HowMany from Figures where ROFstID not in(Select ROFSTID from Associations)
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetUnusedFiguresCount Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetUnusedFiguresCount Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_RemoveUnusedRoFstsAndFigures]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_RemoveUnusedRoFstsAndFigures];
-GO
-/*
-vesp_RemoveUnusedRoFstsAndFigures
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_RemoveUnusedRoFstsAndFigures]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- Delete From Figures where ROFstID not in(Select ROFSTID from Associations)
- Delete From ROFSTS where ROFstID not in(Select ROFSTID from Associations)
- IF (@@TRANCOUNT > 0) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_RemoveUnusedRoFstsAndFigures] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_RemoveUnusedRoFstsAndFigures] Error on Creation'
-go
-
-
-/****** Object: StoredProcedure [vesp_GetUnusedROAssociationsCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetUnusedROAssociationsCount]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetUnusedROAssociationsCount];
-GO
-
-/*
-exec vesp_GetUnusedROAssociationsCount
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetUnusedROAssociationsCount]
-WITH EXECUTE AS OWNER
-AS
- --SELECT COUNT(*) HowMany FROM vefn_GetDisconnectedItems()
-begin
- with cte as (
- Select *, Row_Number() over (partition by VersionID order by associationID ) MyRank from Associations
- )
- select count(*) HowMany from CTE where MyRank > 1
-end
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetUnusedROAssociationsCount Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetUnusedROAssociationsCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_CleanUpROAssociations] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CleanUpROAssociations]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CleanUpROAssociations];
-GO
-/*
-vesp_CleanUpROAssociations
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2016 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_CleanUpROAssociations]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- BEGIN
- with cte as (
- Select *, Row_Number() over (partition by VersionID order by associationID ) MyRank from Associations
- )
- delete CTE where MyRank > 1
- END
-IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_CleanUpROAssociations] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_CleanUpROAssociations] Error on Creation'
-go
-
-/****** Object: StoredProcedure [addPdf] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addPdf]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addPdf];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addPdf]
-
-(
- @DocID int,
- @DebugStatus int,
- @TopRow int,
- @PageLength int,
- @LeftMargin int,
- @PageWidth int,
- @PageCount float,
- @DocPdf varbinary(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- IF not exists(select * FROM [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth)
- BEGIN
- INSERT INTO [Pdfs]
- (
- [DocID],
- [DebugStatus],
- [TopRow],
- [PageLength],
- [LeftMargin],
- [PageWidth],
- [PageCount],
- [DocPdf],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @DocID,
- @DebugStatus,
- @TopRow,
- @PageLength,
- @LeftMargin,
- @PageWidth,
- @PageCount,
- @DocPdf,
- @DTS,
- @UserID
- )
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Pdfs] WHERE [DocID]=@DocID AND [DebugStatus]=@DebugStatus AND [TopRow]=@TopRow AND [PageLength]=@PageLength AND [LeftMargin]=@LeftMargin AND [PageWidth]=@PageWidth
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addPdf Succeeded'
-ELSE PRINT 'Procedure Creation: addPdf Error on Creation'
-GO
-/****** Object: Index [IX_itemsLastChanged] Script Date: 3/21/2017 11:24:00 AM ******/
-IF EXISTS (SELECT * FROM dbo.sysIndexes WHERE name like 'IX_ItemsLastChanged')
- DROP INDEX [IX_ItemsLastChanged] ON [dbo].[tblItems];
-GO
-CREATE NONCLUSTERED INDEX [IX_ItemsLastChanged] ON [dbo].[tblItems]
-(
- [DeleteStatus] ASC,
- [LastChanged] DESC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-PRINT 'Added IX_ItemsLastChanged Index. Speeds up session queries'
-GO
-
-/****** Object: StoredProcedure [getJustROImage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustROImage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustROImage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE PROCEDURE [dbo].[getJustROImage]
-
-(
- @ImageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE [ImageID]=@ImageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustROImage Succeeded'
-ELSE PRINT 'Procedure Creation: getJustROImage Error on Creation'
-GO
-/****** Object: StoredProcedure [deleteAllDocVersionPdfs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAllDocVersionPdfs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAllDocVersionPdfs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAllDocVersionPdfs]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Pdfs]
- WHERE [DocID] IN(select EE.DocID from vefn_GetVersionItems(cast(@VersionID as varchar(20))) VI
- Join Entries EE ON EE.ContentID= VI.ContentID)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAllDocVersionPdfs Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAllDocVersionPdfs Error on Creation'
-GO
-/****** Object: StoredProcedure [addFiguresByROFstIDandImageIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFiguresByROFstIDandImageIDs]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFiguresByROFstIDandImageIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addFiguresByROFstIDandImageIDs]
-(
- @ROFstID int,
- @ImageIDs varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Figures]
- ( [ROFstID]
- ,[ImageID]
- ,[Config]
- ,[DTS]
- ,[UserID]
- )
- select distinct FF.ROFstID, II.ID ImageID, '' Config, FF.DTS, FF.UserID from ROFsts FF
- , vefn_SplitInt(@ImageIDs,',') II
- where ROFstID=@ROFstID and II.ID not in (select ImageID from Figures where ROFstID = @ROFstID)
-
- SELECT [FigureID]
- ,[ROFstID]
- ,[ImageID]
- ,[Config]
- ,[DTS]
- ,[UserID]
- ,[LastChanged]
- FROM [Figures]
- WHERE [ROFstID]=@ROFstID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addFiguresByROFstIDandImageIDs Succeeded'
-ELSE PRINT 'Procedure Creation: addFiguresByROFstIDandImageIDs Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vesp_FixHyphens] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_FixHyphens]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_FixHyphens];
-GO
-
-/*
-exec vesp_DeletePDFs
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_FixHyphens]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- Update Contents set Text = Replace(Replace(Replace(Replace(Replace(Replace(Replace(Text,'\emdash','\u8209?'),'\endash','\u8209?'),'\u8213?','\u8209?'),'\u8212?','\u8209?'),'\u8211?','\u8209?'),'\u8210?','\u8209?'),'\u8208?','\u8209?')
- where Text Like '%\u8208?%' or Text Like '%\u8210?%' or Text Like '%\u8211?%' or Text Like '%\u8212?%' or Text Like '%\u8213?%' or Text Like '%\endash%' or Text Like '%\emdash%'
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_FixHyphens Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_FixHyphens Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getUsers] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getUsers]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getUsers];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getUsers]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UID],
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[UID]=[Users].[UID]) [MembershipCount]
- FROM [Users] ORDER BY UserID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getUsers Succeeded'
-ELSE PRINT 'Procedure Creation: getUsers Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetZeroFromType]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetZeroFromType];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetZeroFromType] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Select * from vefn_GetZeroFromType()
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetZeroFromType]()
-RETURNS @DiscItems TABLE
-(
- ItemID int primary Key,
- ContentID int,
- UNIQUE (ContentID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with ItemZ (BaseID, ItemID, ContentID) as
-(Select PP.ContentID BaseID, II.ItemID, II.ContentID from Items II
-Join Parts PP ON PP.ItemID = II.ItemID
-where FromType = 0
-Union All
- -- Children
- select z.BaseID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select z.BaseID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- )
- --select *, dbo.ve_GetShortPath(ItemID) Location from ItemZ
- insert into @DiscItems
- Select ItemID, ContentID from ItemZ
- RETURN
-END
-
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetZeroFromType] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetZeroFromType] Error on Creation'
-
-GO
-
--- B2017-227 Added code to support Export/Import of Enhanced Documents
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: Trigger [tr_tblContents_Update] ******/
-ALTER trigger [dbo].[tr_tblContents_Update] on [dbo].[tblContents] for update as
- begin
- if exists (select * from inserted)
- begin
- if update(Number) or update(Text) or update(Type) or update(FormatID) or update(DeleteStatus)
- begin
- insert into ContentAudits(ContentID,Number,Text,Type,FormatID,Config,DTS,UserID,DeleteStatus,ActionDTS)
- select dd.ContentID,dd.Number,dd.Text,dd.Type,dd.FormatID,dd.Config,dd.DTS,dd.UserID,dd.DeleteStatus,dd.ActionDTS
- from deleted dd
- inner join inserted ii on dd.ContentID = ii.ContentID
- where dd.Text not like '%'
--- Insert Export Node into the Source and Enhanced DocVersion records
-Update DV set Config = Replace(Cast(xConfig as nvarchar(max)),'',@ExportNode + '')
-from DocVersions DV
-Join @DV DV2 on DV2.VersionID = DV.VersionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_BuildDocVersionExport] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_BuildDocVersionExport] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'vesp_BuildContentsExport') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_BuildContentsExport];
-GO
-/*
-select Count(*) AuditsBefore from ContentAudits
-select top 5 CC.ContentID, xExport.query('.') qExport from (select *, Cast(config as xml) xconfig from Contents) CC
-cross apply xconfig.nodes('//Export') tExport(xExport)
-EXEC [vesp_BuildContentsExport] 13
-select Count(*) AuditsAfter from ContentAudits
-select top 5 CC.ContentID, xExport.query('.') qExport from (select *, Cast(config as xml) xconfig from Contents) CC
-cross apply xconfig.nodes('//Export') tExport(xExport)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
--- Add Unique IDs for Each Enhanced Link in the Contents records
-
-CREATE PROCEDURE [dbo].[vesp_BuildContentsExport](@SourceID int)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- Update the DocVersion Records as the Content records are being saved with the Export node
- Exec vesp_BuildDocVersionExport @SourceID
- -- Create a list of Source and Enhanced VersionIDs
- declare @VersionList varchar(max)
-select @VersionList = Coalesce(@VersionList+',','') + cast(VersionId as varchar(10)) from (
-select VersionID from DocVersions DV
-where VersionID = @SourceID
-Union
-select VersionID from (Select *, Cast(config as xml) xConfig from DocVersions) DV
-cross apply xConfig.nodes('//Enhanced[@VersionID=sql:variable("@SourceID")]') tEnhanced(xEnhanced)) T1
--- Temporary table of ContentID and config as XML for record in the Specified DocVersion VersionIDs that have Export Nodes
-Declare @Config TABLE
-(
- ContentID int,
- xConfig xml
-)
--- Build the temporary table
-Insert into @Config
-select CC.ContentID, xconfig from (select *, cast(config as xml) xConfig from Contents) CC
-JOIN VEFN_GetVersionItems(@VersionList) VI ON VI.ContentID = CC.ContentID
-cross Apply xConfig.nodes('//Export') tExport(xExport)
--- Delete the existing Export nodes so that the new nodes can be added.
-update @Config Set xConfig.modify('delete //Export') From @Config
--- Update the Config field in the Content records with the old Export node removed.
-update CC set Config = cast(xConfig as NVarchar(max)) from Contents CC
-join @Config C1 ON C1.ContentID = CC.ContentID
--- Temporary table with new link nodes
-Declare @NewLinkData TABLE
-(
- ContentID int,
- EContentID int,
- ItemLink int,
- LinkNode nvarchar(250)
-)
--- The following code build the Export node based upon Dense_Rank() which is similar to a record count
--- only it is based upon the Source ItemID and returns a unique integer value
-insert into @NewLinkData
-select distinct t1.ContentID, II.ContentID EContentID
-, DENSE_RANK() Over (Order by t1.ItemID) ItemLink
-, '' LinkNode
-From (
-select ItemID, vi.VersionID, VI.ContentID, xEnhanced.query('.') qEnhanced
-,xEnhanced.value('@Type','int') EType
-,xEnhanced.value('@ItemID','int') EItemID
-from (Select *, cast(config as xml) xconfig from Contents where config Like '%Enhanced%') CC
-JOIN VEFN_GetVersionItems(cast(@SourceID as nvarchar(10))) VI ON VI.ContentID = CC.ContentID
-cross Apply xConfig.nodes('//Enhanced') tEnhanced(xEnhanced)) T1
-JOIN Items II ON II.ItemID = EItemID
-Where EType!=0
--- Add the Export Node created in the temprorary table for the Source document
-Update CC
-set Config = Replace(Config,'',LinkNode + '')
-From tblContents CC
-Join @NewLinkData LD ON LD.ContentID = CC.ContentID
--- Add the Export Node created in the tempoary table for the Enhanced document
-Update CC
-set Config = Replace(Config,'',LinkNode + '')
-From tblContents CC
-Join @NewLinkData LD ON LD.EContentID = CC.ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_BuildContentsExport] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_BuildContentsExport] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'vesp_BuildContentsEnhanced') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_BuildContentsEnhanced];
-GO
-/*
-select Count(*) AuditsBefore from ContentAudits
-select top 5 CC.ContentID, xEnhanced.query('.') qEnhanced from (select *, Cast(config as xml) xconfig from Contents) CC
-cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
-EXEC [vesp_BuildContentsEnhanced] 17
-select Count(*) AuditsAfter from ContentAudits
-select top 5 CC.ContentID, xEnhanced.query('.') qEnhanced from (select *, Cast(config as xml) xconfig from Contents) CC
-cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2017 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
--- Create Enahnced Nodes for an Enahnced document and its related Source document
-
-CREATE PROCEDURE [dbo].[vesp_BuildContentsEnhanced](@EnhancedID int)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @SourceID int -- Source VersionID
- -- Get SourceID from EnhancedID
- select @SourceID = xEnhanced.value('@VersionID','int') from (select *, cast(config as xml) xconfig from DocVersions) DV
- cross apply xconfig.nodes('//Enhanced') tEnhanced(xEnhanced)
- where VersionID = @EnhancedID
-
- DECLARE @EnhType int
- -- Get the Enhanced Type from the DocVersion record
- select @EnhType = xEnhanced.value('@Type','int')
- from (select *, cast(config as xml) xConfig from DocVersions where VersionID = @SourceID) DV
- cross apply xconfig.nodes('//Enhanced[@VersionID=sql:variable("@EnhancedID")]') tEnhanced(xEnhanced)
- -- Fix DocVersion Records
- -- Temporary Table used to delete old Enhanced Nodes in the source document
- declare @Enh1 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh1 -- Links to Enhanced from Source
- select CC.ContentID, xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN VEFN_GetVersionItems(cast(@SourceID as varchar(25))) VI ON VI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VI.itemid,@EnhType) VEN
- -- delete the Enhanced node from the config
- Update @Enh1 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh1
- -- Update the content record removing the Enhanced node from config
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC -- Remove Links from Source
- Join @Enh1 EE ON EE.ID = CC.ContentID
- -- Temporary Table used to delete old Enhanced Nodes in the enhanced document
- declare @Enh2 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh2 -- Links to Source from Enhanced
- select CC.ContentID, xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN VEFN_GetVersionItems(cast(@EnhancedID as varchar(25))) VI ON VI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VI.itemid,0) VEN
- --set @EnhType=0
- -- delete the Enhanced node from the config
- Update @Enh2 Set xConfig.modify('delete //Enhanced[@Type=0]') From @Enh2
- -- Update the content record removing the Enhanced node from config
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC -- Remove Links from Enhanced
- Join @Enh2 EE ON EE.ID = CC.ContentID
--- Temporary Table used to store the Export LinkID with the ContentID and the ItemID for the Source Document
-declare @Source TABLE
-(
-Type int,
-ContentID int,
-ItemID int,
-LinkID int primary Key
-)
--- Build the table based upon the Export Nodes in the Source document
-insert into @Source
-Select @EnhType dvType, CC.ContentID, vi.ItemID, xExport.value('@LinkID','int') LinkID
-from (select *, cast(config as xml) xConfig from Contents) CC
-JOIN VEFN_GetVersionItems(cast(@SourceID as varchar(10))) VI ON VI.ContentID = CC.ContentID
-Join (select *, cast(config as xml)xdvConfig from DocVersions) DV ON VI.VersionID= DV.VersionID
-cross apply xConfig.nodes('//Export') tExport(xExport)
---cross apply xDVConfig.nodes('//Enhanced') tdvEnhanced(xdvEnhanced)
--- Temporary Table used to store the Export LinkID with the ContentID and the ItemID for the Enhanced Document
-declare @Enhanced TABLE
-(
-Type int,
-ContentID int,
-ItemID int,
-LinkID int primary key
-)
--- Build the table based upon the Export Nodes in the Enhanced document
-insert into @Enhanced
-Select xdvEnhanced.value('@Type','int') dvType, CC.ContentID, vi.ItemID, xExport.value('@LinkID','int') LinkID
-from (select *, cast(config as xml) xConfig from Contents) CC
-JOIN VEFN_GetVersionItems(cast(@EnhancedID as varchar(10))) VI ON VI.ContentID = CC.ContentID
-Join (select *, cast(config as xml)xdvConfig from DocVersions) DV ON VI.VersionID= DV.VersionID
-cross apply xConfig.nodes('//Export') tExport(xExport)
-cross apply xDVConfig.nodes('//Enhanced') tdvEnhanced(xdvEnhanced)
--- Temporary Table of ContentIDs and New Enhanced Node Text
-declare @Links TABLE
-(
-ContentID int primary key,
-LinkText nvarchar(250)
-)
---Build the temporary table with the new enhanced Nodes
-insert into @links
-select SS.ContentID, '' EnhancedNode from @Source SS
-join @Enhanced EE on EE.LinkID = SS.LinkID
-UNION
-select EE.ContentID, '' EnhancedNode from @Source SS
-join @Enhanced EE on EE.LinkID = SS.LinkID
--- Update content records insering the Enhanced Nodes from the temporary table.
-Update CC
-set Config = Replace(Config,'',LinkText + '')
-From Contents CC
-Join @Links LD ON LD.ContentID = CC.ContentID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_BuildContentsEnhanced] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_BuildContentsEnhanced] Error on Creation'
-go
-
----The following Formats/Config column was added for User Control of Format (UCF), but needed to be added before existing procedures.
---- Added for additional config column on formats to store UCF data. Also modified existing queries to get UCF Data for Formats
---- Note that vefn_GetVersionFormatItems was also modified as part of this work to return the parentformatId
-IF NOT EXISTS(SELECT *
- FROM INFORMATION_SCHEMA.COLUMNS
- WHERE TABLE_NAME = 'Formats'
- AND COLUMN_NAME = 'Config')
-ALTER TABLE Formats ADD Config nvarchar(MAX) NULL;
-go
--- Display the status
-IF (@@Error = 0) PRINT 'Altered table [Formats] Succeeded'
-ELSE PRINT 'Altered table [Formats] Error on Alter'
-go
-
-/****** Object: StoredProcedure [getChildFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChildFormats]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChildFormats];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChildFormats]
-
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select * from (
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz) T1
- WHERE [ParentID]=@ParentID AND [FormatID]<>@ParentID AND (Description not like '%(Unused)%' or (ContentCount + DocVersionCount + FolderCount + ChildCount > 0))
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChildFormats Succeeded'
-ELSE PRINT 'Procedure Creation: getChildFormats Error on Creation'
-GO
-/****** Object: StoredProcedure [getFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormats]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormats];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getFormats]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select * from (
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz) t1
- where Description not like '%(Unused)%' or (ContentCount + DocVersionCount + FolderCount + ChildCount > 0)
-END
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getFormats Succeeded'
-ELSE PRINT 'Procedure Creation: getFormats Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAllFormats] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAllFormats]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAllFormats];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAllFormats]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT * From (SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [Config],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats] ) T1
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAllFormats Succeeded'
-ELSE PRINT 'Procedure Creation: getAllFormats Error on Creation'
-GO
------
-/****** Object: StoredProcedure [vesp_SearchSepcifiedApplicability] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchSepcifiedApplicability]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchSepcifiedApplicability];
-GO
-
-/*
-exec vesp_SearchSepcifiedApplicability '16','','',0,0,0,0,'','3'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchSepcifiedApplicability] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX), @ApplicSetting varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-select ZZ.DvPath, ZZ.Path, ZZ.[Level],ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,II.[LastChanged]
- ,CC.[Number],CC.[Text],CC.[Type],CC.[FormatID],CC.[Config],CC.[DTS] [cDTS],CC.[UserID] [cUserID]
- ,CC.[LastChanged] [cLastChanged],
- PP.[ContentID] [pContentID], PP.[DTS] [pDTS],PP.[UserID] [pUserID], PP.[LastChanged] [pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=CC.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=CC.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=CC.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=CC.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=CC.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=CC.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=CC.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=CC.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=CC.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItems(@DocVersionList, @UnitPrefix) ZZ
- Join Items II on ZZ.ItemID=II.ItemID
- Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- Join Contents CC on CC.ContentID=ZZ.ContentID
-where ZZ.ContentID in (select ContentID from vefn_FindSpecificApplicUsage(@DocVersionList, @ApplicSetting))
- order by DvPath,OrdinalPath
- GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchSepcifiedApplicability Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchSepcifiedApplicability Error on Creation'
-GO
------
-/****** Object: StoredProcedure [vefn_FindSpecificApplicUsage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindSpecificApplicUsage]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindSpecificApplicUsage];
-GO
-
-/*
-exec vefn_FindSpecificApplicUsage '16','3'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindSpecificApplicUsage](
-@DocVersionList nvarchar(MAX)
-,@ApplicSetting varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @FoundContents
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join
- items ii
- on ii.ContentID = C.ContentID
- where ','+ dbo.ve_GetItemAppliedApplicability(ii.ItemID ) + ',' like '%,' + @ApplicSetting + ',%'
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vefn_FindSpecificApplicUsage Succeeded'
-ELSE PRINT 'Procedure Creation: vefn_FindSpecificApplicUsage Error on Creation'
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2018 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
----- ************************* UCF Changes *************************************
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addFormat];
-GO
-CREATE PROCEDURE [dbo].[addFormat]
-
-(
- @ParentID int,
- @Name nvarchar(100),
- @Description nvarchar(250)=null,
- @Data xml,
- @Config nvarchar(MAX)=null,
- @GenMac xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newFormatID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Formats]
- (
- [ParentID],
- [Name],
- [Description],
- [Data],
- [Config],
- [GenMac],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ParentID,
- @Name,
- @Description,
- @Data,
- @Config,
- @GenMac,
- @DTS,
- @UserID
- )
- SELECT @newFormatID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Formats] WHERE [FormatID]=@newFormatID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [addFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [addFormat] Error on Creation'
-go
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateFormat];
-GO
-CREATE PROCEDURE [dbo].[updateFormat]
-
-(
- @FormatID int,
- @ParentID int,
- @Name nvarchar(100),
- @Description nvarchar(250)=null,
- @Data xml,
- @Config nvarchar(MAX),
- @GenMac xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Formats]
- SET
- [ParentID]=@ParentID,
- [Name]=@Name,
- [Description]=@Description,
- [Data]=@Data,
- [Config]=@Config,
- [GenMac]=@GenMac,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [FormatID]=@FormatID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Formats] WHERE [FormatID]=@FormatID)
- RAISERROR('Format record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Format has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Formats] WHERE [FormatID]=@FormatID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [updateFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [updateFormat] Error on Creation'
-go
-
-ALTER TABLE Formats ALTER COLUMN Data Xml NULL
-IF (@@Error = 0) PRINT 'Alter Table Formats Succeeded'
-ELSE PRINT 'Alter Table Formats Error on Alter'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatListUsed]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatListUsed];
-GO
-CREATE PROCEDURE [dbo].[getFormatListUsed]
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with formatz([FormatID], [ParentID],[Name],[Description],[Data],[GenMac],[DTS],[UserID],[Config]) as
-(select [FormatID], [ParentID],[Name],[Description],[Data],[GenMac],[DTS],[UserID],[Config]
-FROM [dbo].[Formats] where formatid in
-((select formatid from folders union
-select formatid from docversions union
-select formatid from contents)
-) and name != 'base' --and DATALENGTH(Data) > 5
-union all -- Child formats
-select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[Config]
-from formats fs
-join formatz fz on fz.FormatID = fs.ParentID
---where fs.Data is null)
-where fs.Data is not null and DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
-select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount] from Formats
- where formatid in (select distinct formatid from formatz)
-END
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getFormatListUsed] Succeeded'
-ELSE PRINT 'StoredProcedure [getFormatListUsed] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormat];
-GO
-CREATE PROCEDURE [dbo].[getFormat]
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz
- WHERE [FormatID]=@FormatID
-END
-
- SELECT
- [Contents].[ContentID],
- [Contents].[Number],
- [Contents].[Text],
- [Contents].[Type],
- [Contents].[FormatID],
- [Contents].[Config],
- [Contents].[DTS],
- [Contents].[UserID],
- [Contents].[LastChanged]
- FROM [Contents]
- WHERE
- [Contents].[FormatID]=@FormatID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[FormatID]=@FormatID
-
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- [Connections].[Name] [Connection_Name],
- [Connections].[Title] [Connection_Title],
- [Connections].[ConnectionString] [Connection_ConnectionString],
- [Connections].[ServerType] [Connection_ServerType],
- [Connections].[Config] [Connection_Config],
- [Connections].[DTS] [Connection_DTS],
- [Connections].[UsrID] [Connection_UsrID]
- FROM [Folders]
- JOIN [Connections] ON
- [Connections].[DBID]=[Folders].[DBID]
- WHERE
- [Folders].[FormatID]=@FormatID
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [getFormat] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatByName]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatByName];
-GO
-CREATE PROCEDURE [dbo].[getFormatByName]
-(
- @Name varchar(255)
-)
-WITH EXECUTE AS OWNER
-AS
- DECLARE @FormatID INT
- Set @FormatID = (select FormatID from Formats where Name = @Name)
- BEGIN
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz
- WHERE [FormatID]=@FormatID
- END
-
- SELECT
- [Contents].[ContentID],
- [Contents].[Number],
- [Contents].[Text],
- [Contents].[Type],
- [Contents].[FormatID],
- [Contents].[Config],
- [Contents].[DTS],
- [Contents].[UserID],
- [Contents].[LastChanged]
- FROM [Contents]
- WHERE
- [Contents].[FormatID]=@FormatID
-
-
- SELECT
- [DocVersions].[VersionID],
- [DocVersions].[FolderID],
- [DocVersions].[VersionType],
- [DocVersions].[Name],
- [DocVersions].[Title],
- [DocVersions].[ItemID],
- [DocVersions].[FormatID],
- [DocVersions].[Config],
- [DocVersions].[DTS],
- [DocVersions].[UserID],
- [DocVersions].[LastChanged],
- [Folders].[ParentID] [Folder_ParentID],
- [Folders].[DBID] [Folder_DBID],
- [Folders].[Name] [Folder_Name],
- [Folders].[Title] [Folder_Title],
- [Folders].[ShortName] [Folder_ShortName],
- [Folders].[FormatID] [Folder_FormatID],
- [Folders].[ManualOrder] [Folder_ManualOrder],
- [Folders].[Config] [Folder_Config],
- [Folders].[DTS] [Folder_DTS],
- [Folders].[UsrID] [Folder_UsrID]
- FROM [DocVersions]
- JOIN [Folders] ON
- [Folders].[FolderID]=[DocVersions].[FolderID]
- WHERE
- [DocVersions].[FormatID]=@FormatID
-
-
- SELECT
- [Folders].[FolderID],
- [Folders].[ParentID],
- [Folders].[DBID],
- [Folders].[Name],
- [Folders].[Title],
- [Folders].[ShortName],
- [Folders].[FormatID],
- [Folders].[ManualOrder],
- [Folders].[Config],
- [Folders].[DTS],
- [Folders].[UsrID],
- [Folders].[LastChanged],
- [Connections].[Name] [Connection_Name],
- [Connections].[Title] [Connection_Title],
- [Connections].[ConnectionString] [Connection_ConnectionString],
- [Connections].[ServerType] [Connection_ServerType],
- [Connections].[Config] [Connection_Config],
- [Connections].[DTS] [Connection_DTS],
- [Connections].[UsrID] [Connection_UsrID]
- FROM [Folders]
- JOIN [Connections] ON
- [Connections].[DBID]=[Folders].[DBID]
- WHERE
- [Folders].[FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getFormatByName] Succeeded'
-ELSE PRINT 'StoredProcedure [getFormatByName] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatByParentID_Name]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatByParentID_Name];
-GO
-CREATE PROCEDURE [dbo].[getFormatByParentID_Name]
-(
- @ParentID int,
- @Name nvarchar(20)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz
- WHERE [ParentID]=@ParentID AND [Name]=@Name
- END
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getFormatByParentID_Name] Succeeded'
-ELSE PRINT 'StoredProcedure [getFormatByParentID_Name] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getParentFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getParentFormat];
-GO
-CREATE PROCEDURE [dbo].[getParentFormat]
-(
- @ParentID int
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz
- WHERE [FormatID]=@ParentID
- END
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getParentFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [getParentFormat] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustFormat];
-GO
-CREATE PROCEDURE [dbo].[getJustFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- with formatz([FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]) as
- (select [FormatID], [ParentID],[Name],[Description],[Data],[Config],[GenMac],[DTS],[UserID],[LastChanged]
- FROM [dbo].[Formats] fs where DATALENGTH(fs.Data) > 5
- union all -- Child formats
- select fs.[FormatID], fs.[ParentID], fs.[Name], fs.[Description], fz.[Data], fs.[Config], fz.[GenMac], fs.[DTS], fs.[UserID], fs.[LastChanged]
- from formats fs
- join formatz fz on fz.FormatID = fs.ParentID
- where DATALENGTH(fs.Data) = 5) -- the DATALENGTH(fs.Data) = 5 is how to check for empty xml (Data's type is xml)
- select *,
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formatz].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formatz].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formatz].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formatz].[FormatID]) [ChildCount] from Formatz
- WHERE [FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getJustFormat] Succeeded'
-ELSE PRINT 'StoredProcedure [getJustFormat] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getFormatNoUCF]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getFormatNoUCF];
-GO
-CREATE PROCEDURE [dbo].[getFormatNoUCF]
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [Config],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getFormatNoUCF] Succeeded'
-ELSE PRINT 'StoredProcedure [getFormatNoUCF] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetItemsMatchingFormatItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetItemsMatchingFormatItems];
-GO
-CREATE FUNCTION [dbo].[vefn_GetItemsMatchingFormatItems](@ItemID int, @OldFormatID int, @NewFormatID int)
-RETURNS @Items TABLE
-(
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- -- recursive, walk through content, items and parts table to find children
- -- ('with' makes it recursive, which is called cte, common table expressions, in sql)
- with Itemz([ItemID], [ContentID], [FormatID], [Level]) as
- (Select [I].[ItemID], [I].[ContentID],
- C.[FormatID], 0
- FROM [Items] I
- join Contents C on I.ContentID = C.ContentID
- where I.ItemID = @ItemID and (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID)
- Union All
- -- Children : get sections off procedures and subsections off sections
- select I.[ItemID], I.[ContentID], C.[FormatID], Z.[Level]+1
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000 and (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID) and (Z.[FormatID] is null or Z.[FormatID] = @OldFormatID or Z.FormatID = @NewFormatID)
- Union All
- -- Siblings : get remaining items (procedure and section)
- select I.[ItemID], I.[ContentID], C.[FormatID], Z.[Level]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000 and Z.[Level] > 0
- )
- insert into @Items
- select [ItemID], [ContentID], [FormatID]
- from ItemZ I
- where ([FormatID] = @OldFormatID or [FormatID] = @NewFormatID) and [ItemID] != @ItemID
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vefn_GetItemsMatchingFormatItems] Succeeded'
-ELSE PRINT 'StoredProcedure [vefn_GetItemsMatchingFormatItems] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionMatchingFormatItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionMatchingFormatItems];
-GO
-CREATE FUNCTION [dbo].[vefn_GetVersionMatchingFormatItems](@DocVersionList varchar(MAX), @OldFormatID int, @NewFormatID int)
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- -- recursive, walk through content, items and parts table to find children
- -- ('with' makes it recursive, which is called cte, common table expressions, in sql)
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID], C.[FormatID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID] -- get first procedure for each doc version in list
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join Contents C on I.ContentID = C.ContentID
- where (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID)
- Union All
- -- Children : get sections off procedures and subsections off sections
- select Z.VersionID, I.[ItemID], I.[ContentID], C.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000 and (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID) and (Z.[FormatID] is null or Z.[FormatID] = @OldFormatID or Z.FormatID = @NewFormatID)
- Union All
- -- Siblings : get remaining items (procedure and section)
- select Z.VersionID, I.[ItemID], I.[ContentID], C.[FormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID]
- from ItemZ I
- where [FormatID] = @OldFormatID or [FormatID] = @NewFormatID
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vefn_GetVersionMatchingFormatItems] Succeeded'
-ELSE PRINT 'StoredProcedure [vefn_GetVersionMatchingFormatItems] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFolderMatchingFormatItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetFolderMatchingFormatItems];
-GO
-CREATE FUNCTION [dbo].[vefn_GetFolderMatchingFormatItems](@FolderID int, @OldFormatID int, @NewFormatID int)
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @DocVersionList NVARCHAR(MAX) -- get list of docversions for a folder:
- BEGIN
- With Folderz([FolderID]) as
- (
- select FF.FolderID from Folders FF
- Where FF.FolderID = @FolderID
- UNION ALL
- select FF.FolderID from Folders FF
- Join Folderz ZZ on FF.ParentID = ZZ.FolderID
- Where FF.FolderID != @FolderID and (FF.FormatID is null or FF.FormatID = @OldFormatID or FF.FormatID = @NewFormatID)
- )
- select @DocVersionList = coalesce(@DocVersionList+',','')+cast(VersionId as varchar(255))
- from Folderz ZZ
- Left Join DocVersions DV ON DV.FolderID = ZZ.FolderID
- where VersionID is not null and (DV.FormatID is null or DV.FormatID = @OldFormatID or DV.FormatID = @NewFormatID)
- order by versionID
- OPTION (MAXRECURSION 10000)
-END
- BEGIN
- -- recursive, walk through content, items and parts table to find children
- -- ('with' makes it recursive, which is called cte, common table expressions, in sql)
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID]) as
- (
- Select DV.VersionID, [I].[ItemID], [I].[ContentID], C.[FormatID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID] -- get first procedure for each doc version in list
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join Contents C on I.ContentID = C.ContentID
- where (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID)
- Union All
- -- Children : get sections off procedures and subsections off sections
- select Z.VersionID, I.[ItemID], I.[ContentID], C.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000 and (C.FormatID is null or C.FormatID = @OldFormatID or C.FormatID = @NewFormatID) and (Z.[FormatID] is null or Z.[FormatID] = @OldFormatID or Z.FormatID = @NewFormatID)
- Union All
- -- Siblings : get remaining items (procedure and section)
- select Z.VersionID, I.[ItemID], I.[ContentID], C.[FormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- where C.Type < 20000
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID]
- from ItemZ I
- where [FormatID] = @OldFormatID or [FormatID] = @NewFormatID
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vefn_GetFolderMatchingFormatItems] Succeeded'
-ELSE PRINT 'StoredProcedure [vefn_GetFolderMatchingFormatItems] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ClearOverrideFormatsByFolder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ClearOverrideFormatsByFolder];
-GO
-CREATE PROCEDURE [dbo].[vesp_ClearOverrideFormatsByFolder](@FolderID int, @FormatID int, @NewFormatID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ClearedContents TABLE
-(
- ContentID int
-)
-DECLARE @ClearedFolders TABLE
-(
- FolderID int
-)
-DECLARE @ClearedDocVersions TABLE
-(
- VersionID int
-)
-
-insert into @ClearedContents
-select cc.ContentID from (select contentid from contents where formatid is not null) cc
-join vefn_GetFolderMatchingFormatItems(@FolderID, @FormatID, @NewFormatID) vi on vi.ContentID = cc.ContentID
-
--- update any folders & docversions that are using that formatid to clear them, i.e. so they inherit. To do this
--- get lists of folders & docversions that have non-null format ids that should be null.
-
-BEGIN
-With Folderz([FolderID], [FormatID]) as
- (
- select FF.FolderID, FF.FormatID from Folders FF
- Where FF.FolderID = @FolderID
- UNION ALL
- select FF.FolderID, FF.FormatID from Folders FF
- Join Folderz ZZ on FF.ParentID = ZZ.FolderID
- Where FF.FolderID != @FolderID and (FF.FormatID is null or FF.FormatID = @FormatID or FF.FormatID = @NewFormatID)
- )
- insert into @ClearedFolders
- select ZZ.FolderID
- from Folderz ZZ
- where ZZ.FormatID is not null and ZZ.FolderID != @FolderID -- don't include folder passed in, only do children (folder is done in code)
- OPTION (MAXRECURSION 10000)
-END
-
-BEGIN
-With Folderz([FolderID]) as
- (
- select FF.FolderID from Folders FF
- Where FF.FolderID = @FolderID
- UNION ALL
- select FF.FolderID from Folders FF
- Join Folderz ZZ on FF.ParentID = ZZ.FolderID
- Where FF.FolderID != @FolderID and (FF.FormatID is null or FF.FormatID = @FormatID or FF.FormatID = @NewFormatID)
- )
- insert into @ClearedDocVersions
- select DV.VersionID
- from Folderz ZZ
- Left Join DocVersions DV ON DV.FolderID = ZZ.FolderID
- where VersionID is not null and DV.FormatID is not null and (DV.FormatID = @FormatID or DV.FormatID = @NewFormatID)
- OPTION (MAXRECURSION 10000)
-END
-update Folders set formatid = null where FolderID in (select FolderID from @ClearedFolders)
-update DocVersions set formatid = null where VersionID in (select VersionID from @ClearedDocVersions)
-
--- now update all of the contents that were found
-update contents set formatid = null where contentID in (select contentid from @ClearedContents)
-
-select [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM contents where contentid in (select ContentID from @ClearedContents)
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByFolder Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByFolder Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ClearOverrideFormatsByDocVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ClearOverrideFormatsByDocVersion];
-GO
-CREATE PROCEDURE [dbo].[vesp_ClearOverrideFormatsByDocVersion](@DocVersionList varchar(MAX), @FormatID int, @NewFormatID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ClearedContents TABLE
-(
- ContentID int
-)
-insert into @ClearedContents
-select cc.ContentID from (select contentid from contents where formatid is not null) cc
-join vefn_GetVersionMatchingFormatItems(@DocVersionList, @FormatID, @NewFormatID) vi on vi.ContentID = cc.ContentID
---where vi.FormatID = @FormatID --and vi.ParentFormatID = @FormatID
-update contents set formatid = null where contentID in (select contentid from @ClearedContents)
-
-select [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM contents where contentid in (select ContentID from @ClearedContents)
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByDocVersion Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ClearOverrideFormatsByItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ClearOverrideFormatsByItem];
-GO
-CREATE PROCEDURE [dbo].[vesp_ClearOverrideFormatsByItem](@ItemID int, @FormatID int, @NewFormatID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ClearedContents TABLE
-(
- ContentID int
-
-)
--- to test with the Ginna database:
--- vesp_ClearOverrideFormatsByItem 36421, 205
-insert into @ClearedContents
-select cc.ContentID from (select contentid, FormatID from contents where formatid is not null) cc
-join vefn_GetItemsMatchingFormatItems(@ItemID, @FormatID, @NewFormatID) ci on ci.ContentID = cc.ContentID
-update contents set formatid = null where contentID in (select contentid from @ClearedContents)
-
-select [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM contents where contentid in (select ContentID from @ClearedContents)
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ClearOverrideFormatsByItem Error on Creation'
-GO
-
-IF COL_LENGTH('Formats','Name') = 40
-ALTER TABLE [Formats] ALTER COLUMN [Name] [NVARCHAR](100) NOT NULL
-IF (@@Error = 0) PRINT 'Alter Table Formats Succeeded'
-ELSE PRINT 'Alter Table Formats Error on Alter'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_UpdateVersionFormatForUCF]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE vesp_UpdateVersionFormatForUCF;
-GO
-CREATE PROCEDURE [dbo].vesp_UpdateVersionFormatForUCF
-(
- @VersionList nvarchar(MAX),
- @OldFormatID int,
- @NewFormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ClearedContents TABLE
-(
- ContentID int
-)
--- save the content ids that will have there format changed so that these can be returned to the application
--- for a refresh.
-insert into @ClearedContents
-select contentid from contents where formatID=@OldFormatID and ContentID in (select distinct ContentID from vefn_GetVersionItems(@VersionList) )
-
--- reset the oldformat to the newformat. This is used when during an import of procedure(s) in the case where
--- all procedures in a set that use the oldformat should be set to the newformat (UCF formats)
-UPDATE [Contents]
- SET FormatID=@NewFormatID
- WHERE FormatID=@OldFormatID AND ContentID in (select distinct ContentID from vefn_GetVersionItems(@VersionList) )
-
-select [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM contents where contentid in (select ContentID from @ClearedContents)
-END
-RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_UpdateVersionFormatForUCF Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_UpdateVersionFormatForUCF Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_SiblingAndChildrenItemsNew] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingAndChildrenItemsNew]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingAndChildrenItemsNew];
-GO
-/*
-select * from vefn_SiblingAndChildrenItemsNew('37','3-', '%rcp%','%rcp%','') where Text like '%rcp%'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2019 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_SiblingAndChildrenItemsNew](@DocVersionList varchar(MAX),@UnitPrefix varchar(MAX),@SearchString varchar(MAX),@SearchStringx varchar(MAX), @StepTypeList varchar(MAX))
-RETURNS @SiblingAndChildren TABLE
-(
- [ILastChanged] varbinary(8)
- , [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
- , Text nvarchar(max)
- , DocAscii nvarchar(max)
- , Number nvarchar(256)
- , CType int
- , CFormatID int
- , CConfig nvarchar(max)
- , CDTS datetime
- , CUserID nvarchar(100)
- , CLastChanged varbinary(8)
- , PLastChanged varbinary(8)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ILastChanged], [ItemID], VersionID,[Path], [FromType],[Ordinal], [ParentID], [PreviousID], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],[IsRNO], Text, Number, PPath, CType, CFormatID, CConfig, CDTS, CUserID, CLastChanged, PLastChanged) as (
- Select Cast(I.LastChanged as varbinary(8)) ILastChanged,[I].[ItemID], VersionID,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path]
- , 0 [FromType], 0 [Ordinal], 0 [ParentID], [PreviousID],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],0 IsRNO, C.Text, C.Number,
- Cast('' as nvarchar(max)) [PPath], C.Type CType, C.FormatID CFormatID, C.Config CConfig, C.Dts CDTS,C.UserID CUSERID,
- Cast(C.LastChanged as varbinary(8)) CLastChanged, Cast(0 as varbinary(8)) PLastChanged
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select Cast(I.LastChanged as varbinary(8)) ILastChanged,I.[ItemID], VersionID,
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Procedure
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Section
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(4))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(4))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(4))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(4))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep + cast(1 as varchar(4))
- when 8 then @DelimStep +'SupInfo' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(4))
- end end Path,
- P.[FromType],0 [Ordinal], Z.ItemID [ParentID],I.[PreviousID], I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- C.Text,c.Number,
- Path + case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- when 8 then @DelimStep + 'SupInfo'
- else '' end
- else '' end [PPath], C.Type CType, C.FormatID CFormatID, C.Config CConfig, C.Dts CDTS,C.UserID CUSERID,
- Cast(C.LastChanged as varbinary(8)) CLastChanged, Cast(P.LastChanged as varbinary(8)) PLastChanged
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
- Union All
--- Siblings
- select Cast(I.LastChanged as varbinary(8)) ILastChanged,I.[ItemID], VersionID, PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Procedure
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Section
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(4))
- end Path,
- [FromType],Z.[Ordinal] +1,Z.[ParentID], I.[PreviousID], I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- 0 IsRNO,
- C.Text, C.Number,
- PPath, C.Type CType, C.FormatID CFormatID, C.Config CConfig, C.Dts CDTS,C.UserID CUSERID,
- Cast(C.LastChanged as varbinary(8)) CLastChanged, Cast(0 as varbinary(8)) PLastChanged
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-
-insert into @SiblingAndChildren
-select ZZ.ILastChanged,ZZ.[ItemID], dvpath, [Path],[FromType],[Ordinal], [ParentID], [PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO],Text,DocAscii, Number, CType, CFormatID, CConfig, CDTS, CUserID, CLastChanged, PLastChanged
- From Itemz ZZ
- join vefn_DocVersionSplit(@DocVersionList) DV ON DV.VersionID=zz.VersionID
- Left Join Entries EE ON EE.ContentID=ZZ.ContentID
- Left Join Documents DD ON DD.DocID = ee.DocID
- where (text like @SearchString OR Replace(DD.DocAscii,nchar(176),'\''B0') like @SearchString or text like @SearchStringx OR
- Replace(DD.DocAscii,nchar(176),'\''B0') like @SearchStringx )
- and (isnull(@StepTypeList,'') = '' or (dbo.vefn_AllSections(CType) in (Select ID from vefn_SplitInt(@StepTypeList,','))))
- OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsNew Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsNew Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemChild];
-GO
-CREATE PROCEDURE [dbo].[addItemChild]
-(
- @ItemID int=null, @Number nvarchar(256)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @FromType int=null, @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ChildID int, @ContentID int, @ParentContentID int, @LastChanged timestamp
- , @newLastChanged timestamp, @Error int, @Rowcount int, @ChildDeleted int
- SELECT @ChildID = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [PARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID
- IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tblParts]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- BEGIN
- SELECT @ChildDeleted = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [tblPARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID and pp.DeleteStatus > 0
- END
- EXECUTE AddContent @Number, @Text, @Type, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem null, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- IF @ChildID is null -- No existing child - Add Parts record
- BEGIN
- IF @ChildDeleted is not null
- BEGIN
--- INSERT INTO [PartAudits] ([ContentID],[FromType],[ItemID],[DTS],[UserID],[DeleteStatus])
--- SELECT [ContentID],[FromType],[ItemID],[DTS],[UserID],[DeleteStatus] FROM [tblParts]
--- WHERE ItemID = @ChildDeleted
- DELETE FROM [tblParts] WHERE ItemID = @ChildDeleted
- END
- EXECUTE AddPart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @newLastChanged output
- END
- ELSE -- Update existing Parts record
- BEGIN
- EXECUTE UpdatePart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @LastChanged, @newLastChanged output
- UPDATE [Items] SET [PreviousID]=@newItemID WHERE [ItemID]=@ChildID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ChildID OR TT.RangeID = @ChildID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ChildID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ChildID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ChildID OR RangeID = @ChildID
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- -- I don't expect to see any transitions that point to @ChildID. They should have changed in
- -- the update above to point to @newItemID. This is here for consistency with the other insert
- -- stored procedures
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ChildID,@newItemID) OR RangeID IN(@ChildID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- END
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemChild Succeeded'
-ELSE PRINT 'Procedure Creation: addItemChild Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemSiblingAfter]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemSiblingAfter];
-GO
-CREATE PROCEDURE [dbo].[addItemSiblingAfter]
-(
- @ItemID int=null, @Number nvarchar(256)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @NextID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II JOIN [CONTENTS] CC ON II.[ContentID]=CC.[ContentID]
- WHERE [ItemID]=@ItemID
- SELECT @NextID = [ItemID]
- FROM [ITEMS]
- WHERE [PreviousID]=@ItemID
- EXECUTE AddContent @Number, @Text, @NewType, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem @ItemID, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- UPDATE [ITEMS] SET [PreviousID]=@newItemID, [DTS]=@DTS, [UserID]=@UserID where [ItemID]=@NextID -- Should be UpdateItem
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@NextID,@ItemID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @NextID THEN @newItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @NextID THEN @newItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@NextID,@newItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Next Step Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@newItemID) OR RangeID IN(@newItemID))
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@NextID) OR RangeID IN(@NextID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemSiblingAfter Succeeded'
-ELSE PRINT 'Procedure Creation: addItemSiblingAfter Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addItemSiblingBefore]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addItemSiblingBefore];
-GO
-CREATE PROCEDURE [dbo].[addItemSiblingBefore]
-(
- @ItemID int=null, @Number nvarchar(256)=null, @Text nvarchar(MAX)=null, @FormatID int=null, @Config nvarchar(MAX)=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100), @newItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @PreviousID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @PreviousID = [PreviousID], @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II
- JOIN [CONTENTS] CC ON CC.[ContentID]=II.[CONTENTID]
- WHERE [ItemID]=@ItemID
- EXECUTE AddContent @Number, @Text, @NewType, @FormatID, @Config, @DTS, @UserID, @ContentID output, @newLastChanged output
- EXECUTE AddItem @PreviousID, @ContentID, @DTS, @UserID , @newItemID output, @newLastChanged output
- UPDATE [ITEMS] SET [PreviousID]=@newItemID where [ItemID]=@ItemID -- Should be UpdateItem
- UPDATE [PARTS] SET [ItemID]=@newItemID where [ItemID]=@ItemID -- Should be UpdatePart
- IF @PreviousID is null -- The step is replacing the first step
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ItemID OR TT.RangeID = @ItemID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ItemID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ItemID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ItemID OR RangeID = @ItemID
- END
- ELSE -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@ItemID,@PreviousID)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @ItemID THEN @newItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @ItemID THEN @newItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@ItemID,@newItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ItemID,@newItemID) OR RangeID IN(@ItemID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Sibling Added Before ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addItemSiblingBefore Succeeded'
-ELSE PRINT 'Procedure Creation: addItemSiblingBefore Error on Creation'
-GO
-
-/*************** May 2020 - Modifications to search queries to allow for 'ByWord'. To do this a sql prefix and suffix were added
-* If search string's adjacent character is text '[^a-zA-Z]' (for example 'red' prefix is next to 'r', suffix is next to 'd')
-* If search string's adjacent character is numeric '[^0-9a-zA-Z.vbpi:\\-]' (for example 10%, prefix is next to '1')
-*/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixSearchStringByWord]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
-DROP FUNCTION [vefn_FixSearchStringByWord];
-GO
-
-/*
-select .dbo.vefn_FixSearchStringByWord('0%', '[^0-9A-Z.vbpi:\\-]', '')
-select .dbo.vefn_FixSearchStringByWord('step 25', '[^a-z]', '[^0-9A-Z.vbpi:\\-]')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixSearchStringByWord](@SearchString nvarchar(MAX), @Prefix nvarchar(64), @Suffix nvarchar(64))
-RETURNS nvarchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- This code adds % at the beginning and end if the beginning and end
- -- of the search string if it does not have % at the beginning or end
- Set @SearchString = replace(@SearchString,'[','[[]')
- Set @SearchString = replace(@SearchString,'_','[_]')
- Set @SearchString = replace(@SearchString,'%','[%]')
- Set @SearchString = replace(@SearchString,'*','%')
- Set @SearchString = replace(@SearchString,'?','_')
- Set @SearchString = replace(@SearchString,'\%','*')
- Set @SearchString = replace(@SearchString,'\_','?')
- Set @SearchString = replace(@SearchString,'-','\u8209?')
- Set @SearchString = replace(@SearchString,'\''A9','\u169?') -- copyright symbol
- Set @SearchString = replace(@SearchString,'\''AE','\u174?') -- Register symbol
- Set @SearchString = replace(@SearchString,'\\line ','\line ') -- newline
- Set @SearchString = replace(@SearchString,'\\','\u9586?') -- use a double backslash to search for a backslash
- IF(@SearchString like '[%]%') RETURN '%' + @Prefix + SubString(@SearchString,2,len(@SearchString)) -- beginning of text
- IF(@SearchString like '%[%]') RETURN SubString(@SearchString, 0, len(@SearchString)-1) + @Suffix + '%' -- end of text
- Set @SearchString = replace('%' + @Prefix + @SearchString + @Suffix + '%','%%','%')
- RETURN @SearchString
-END
-GO
--- Display the status
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_FixSearchStringByWord] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_FixSearchStringByWord] Error on Creation'
-go
-
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_SearchItemAndChildrenNewByWord]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP Procedure [dbo].[vesp_SearchItemAndChildrenNewByWord];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Rich Mark
- Create Date: 01/01/2020
- Description: Returns all items mathcing the specified search critera, filtered by a list of specified Document Versions and Step Types
- 08/20/2021 Jake Ropar: Add with (NoLock) and Option (Recompile) statements to eliminate UI locking and improve performace, also changed all
- Select (*) statements to Select (1) for performace reasons
-
- Parameters: @DocVersionList Comma delimited list of document version IDs used to filter search results (pass '' or null to include all versions)
- @StepTypeList Comma delimited list of of step types used to filter search results (pass '' or null to include all step type sections)
- @SearchString Search string criteria
- @CaseSensitive Indicator for Case Sensitive Search (0 = False, 1 = True)
- @IncludeLinks Indicator to include Links in results (0 = False, 1 = True)
- @IncludeRtfFormatting Indicator to include RTF Formatting in results (0 = False, 1 = True)
- @IncludeSpecialCharacters Indicator to include Special Characters in results (0 = False, 1 = True)
- @UnitPrefix Specified Unit Prefix if any
- @ByWordPrefix Word Prefix for the specified search string criteria
- @ByWordSuffix Word Suffix for the specified search string criteria
-
-
- Examples: exec vesp_SearchItemAndChildrenNewByWord '194','','red',0,0,0,0,'','[^a-z]','[^a-z]';
- exec vesp_SearchItemAndChildrenNewByWord '194','','0%',0,0,0,0,'','[^0-9A-Z.vbpi:\\-]','';
- exec vesp_SearchItemAndChildrenNewByWord '194','','10%',0,0,0,0,'','[^0-9A-Z.vbpi:\\-]','';
- exec vesp_SearchItemAndChildrenNewByWord '194','','25%',0,0,0,0,'','[^0-9A-Z.vbpi:\\-]','[^0-9A-Z.vbpi:\\-]';
- exec vesp_SearchItemAndChildrenNewByWord '194','','25%',0,0,0,0,'','','[^0-9A-Z.vbpi:\\-]';
- exec vesp_SearchItemAndChildrenNewByWord '194','','25%',0,0,0,0,'','[^0-9A-Z.vbpi:\\-]','';
- exec vesp_SearchItemAndChildrenNewByWord '194','','step 25',0,0,0,1,'','[^a-zA-Z]','[^0-9a-zA-Z.vbpi:\\-]';
- exec vesp_SearchItemAndChildrenNewByWord '194','','25',0,0,0,0,'','','';
-==========================================================================================================
- */
-Create Procedure [dbo].[vesp_SearchItemAndChildrenNewByWord] (@DocVersionList VarChar(Max), @StepTypeList VarChar(Max), @SearchString VarChar(Max), @CaseSensitive Int,
- @IncludeLinks Int, @IncludeRtfFormatting Int, @IncludeSpecialCharacters Int, @UnitPrefix VarChar(Max),
- @ByWordPrefix VarChar(64), @ByWordSuffix VarChar(64))
-With Execute As Owner
-As
-Begin
-
- Set NoCount On;
-
- -- Declare Local Variables
- Declare @TextPrefix nVarChar(1);
- Declare @TextSuffix nVarChar(1);
- Declare @SearchStringx nVarChar(200);
-
- -- Set Default Values
- Set @TextPrefix = '';
- Set @TextSuffix = '';
-
- Set @SearchString = dbo.vefn_FixSearchStringByWord(@SearchString, @ByWordPrefix, @ByWordSuffix);
- If (@SearchString like '[%]%') Set @TextPrefix = '~';
- If (@SearchString like '%[%]') Set @TextSuffix = '~';
- Set @SearchStringx = Replace(@SearchString,'\u8209?','-') -- [John Jenko] B2016-209: not finding dashes in Word sections (FixSearchString converts '-' to '\u8209?')
-
-
- If (@IncludeLinks + @IncludeRtfFormatting + @IncludeSpecialCharacters = 0)
- Begin
-
- If (@CaseSensitive = 0)
- Begin
-
- --Select 'Case #1: No Links/RtfFormatting/SpecialCharacters & Not Case Sensitive';
-
- Select z.DvPath as 'DvPath',
- z.[Path] as 'Path',
- z.FromType as 'FromType',
- z.Ordinal as 'Ordinal',
- z.ParentID as 'ParentID',
- z.ItemID as 'ItemID',
- z.PreviousID as 'PreviousID',
- z.ContentID as 'ContentID',
- z.DTS as 'DTS',
- z.UserID as 'UserID',
- z.ILastChanged as 'ILastChanged',
- z.Number as 'Number',
- z.[Text] as 'Text',
- z.CType as 'Type',
- z.CFormatID as 'FormatID',
- z.CConfig as 'Config',
- z.CDTS as 'CDTS',
- z.CUserID as 'CUserID',
- z.CLastChanged as 'cLastChanged',
- z.pContentID as 'pContentID',
- z.pDTS as 'pDTS',
- z.pUserID as 'pUserID',
- z.PLastChanged as 'pLastChanged',
- (Select Count(1) From Annotations a with (NoLock) Where a.ItemID = z.ItemID) as 'AnnotationCount',
- (Select Count(1) From DocVersions dv with (NoLock) Where dv.ItemID = z.ItemID) as 'DocVersionCount',
- (Select Count(1) From Items i with (NoLock) Where i.PreviousID = z.ItemID) as 'NextCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ItemID = z.ItemID) as 'PartCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.RangeID = z.ItemID) as 'Transition_RangeIDCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.ToID = z.ItemID) as 'Transition_ToIDCount',
- (Select Count(1) From Details d with (NoLock) Where d.ContentID = z.ContentID) as 'DetailCount',
- (Select Count(1) From Entries e with (NoLock) Where e.ContentID = z.ContentID) as 'EntryCount',
- (Select Count(1) From Grids g with (NoLock) Where g.ContentID = z.ContentID) as 'GridCount',
- (Select Count(1) From Images i with (NoLock) Where i.ContentID = z.ContentID) as 'ImageCount',
- (Select Count(1) From Items i with (NoLock) Where i.ContentID = z.ContentID) as 'ItemCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ContentID = z.ContentID) as 'cPartCount',
- (Select Count(1) From RoUsages ru with (NoLock) Where ru.ContentID = z.ContentID) as 'RoUsageCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.FromID = z.ContentID) as 'TransitionCount',
- (Select Count(1) From ZContents zc with (NoLock) Where zc.ContentID = z.ContentID) as 'ZContentCount'
- From dbo.vefn_SiblingAndChildrenItemsNewByWord(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx, @StepTypeList, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters) z
- Order By z.DvPath Asc
- Option (Recompile);
-
- End
- Else
- Begin
-
- --Select 'Case #2: No Links/RtfFormatting/SpecialCharacters & Case Sensitive';
-
- Select z.DvPath as 'DvPath',
- z.[Path] as 'Path',
- z.FromType as 'FromType',
- z.Ordinal as 'Ordinal',
- z.ParentID as 'ParentID',
- z.ItemID as 'ItemID',
- z.PreviousID as 'PreviousID',
- z.ContentID as 'ContentID',
- z.DTS as 'DTS',
- z.UserID as 'UserID',
- z.ILastChanged as 'ILastChanged',
- z.Number as 'Number',
- z.[Text] as 'Text',
- z.CType as 'Type',
- z.CFormatID as 'FormatID',
- z.CConfig as 'Config',
- z.CDTS as 'CDTS',
- z.CUserID as 'CUserID',
- z.CLastChanged as 'cLastChanged',
- z.pContentID as 'pContentID',
- z.pDTS as 'pDTS',
- z.pUserID as 'pUserID',
- z.PLastChanged as 'pLastChanged',
- (Select Count(1) From Annotations a with (NoLock) Where a.ItemID = z.ItemID) as 'AnnotationCount',
- (Select Count(1) From DocVersions dv with (NoLock) Where dv.ItemID = z.ItemID) as 'DocVersionCount',
- (Select Count(1) From Items i with (NoLock) Where i.PreviousID = z.ItemID) as 'NextCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ItemID = z.ItemID) as 'PartCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.RangeID = z.ItemID) as 'Transition_RangeIDCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.ToID = z.ItemID) as 'Transition_ToIDCount',
- (Select Count(1) From Details d with (NoLock) Where d.ContentID = z.ContentID) as 'DetailCount',
- (Select Count(1) From Entries e with (NoLock) Where e.ContentID = z.ContentID) as 'EntryCount',
- (Select Count(1) From Grids g with (NoLock) Where g.ContentID = z.ContentID) as 'GridCount',
- (Select Count(1) From Images i with (NoLock) Where i.ContentID = z.ContentID) as 'ImageCount',
- (Select Count(1) From Items i with (NoLock) Where i.ContentID = z.ContentID) as 'ItemCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ContentID = z.ContentID) as 'cPartCount',
- (Select Count(1) From RoUsages ru with (NoLock) Where ru.ContentID = z.ContentID) as 'RoUsageCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.FromID = z.ContentID) as 'TransitionCount',
- (Select Count(1) From ZContents zc with (NoLock) Where zc.ContentID = z.ContentID) as 'ZContentCount'
- From dbo.vefn_SiblingAndChildrenItemsNewByWord(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx, @StepTypeList, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters) z
- Where (@TextPrefix + z.Text + @TextSuffix Collate SQL_Latin1_General_CP1_CS_AS like @SearchString
- or @TextPrefix + z.Text + @TextSuffix Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx
- or Replace(z.DocAscii,nChar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchString
- or Replace(z.DocAscii,nChar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx)
- Order By z.DvPath Asc
- Option (Recompile);
-
- End
-
- End -- no links
-
- Else
-
- Begin -- include linked text
-
- If (@CaseSensitive = 0)
- Begin
-
- --Select 'Case #3: Include Links/RtfFormatting/SpecialCharacters & Not Case Sensitive';
-
- Select z.DvPath as 'DvPath',
- z.[Path] as 'Path',
- z.FromType as 'FromType',
- z.Ordinal as 'Ordinal',
- z.ParentID as 'ParentID',
- z.ItemID as 'ItemID',
- z.PreviousID as 'PreviousID',
- z.ContentID as 'ContentID',
- z.DTS as 'DTS',
- z.UserID as 'UserID',
- z.ILastChanged as 'ILastChanged',
- z.Number as 'Number',
- z.[Text] as 'Text',
- z.CType as 'Type',
- z.CFormatID as 'FormatID',
- z.CConfig as 'Config',
- z.CDTS as 'CDTS',
- z.CUserID as 'CUserID',
- z.CLastChanged as 'cLastChanged',
- z.pContentID as 'pContentID',
- z.pDTS as 'pDTS',
- z.pUserID as 'pUserID',
- z.PLastChanged as 'pLastChanged',
- (Select Count(1) From Annotations a with (NoLock) Where a.ItemID = z.ItemID) as 'AnnotationCount',
- (Select Count(1) From DocVersions dv with (NoLock) Where dv.ItemID = z.ItemID) as 'DocVersionCount',
- (Select Count(1) From Items i with (NoLock) Where i.PreviousID = z.ItemID) as 'NextCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ItemID = z.ItemID) as 'PartCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.RangeID = z.ItemID) as 'Transition_RangeIDCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.ToID = z.ItemID) as 'Transition_ToIDCount',
- (Select Count(1) From Details d with (NoLock) Where d.ContentID = z.ContentID) as 'DetailCount',
- (Select Count(1) From Entries e with (NoLock) Where e.ContentID = z.ContentID) as 'EntryCount',
- (Select Count(1) From Grids g with (NoLock) Where g.ContentID = z.ContentID) as 'GridCount',
- (Select Count(1) From Images i with (NoLock) Where i.ContentID = z.ContentID) as 'ImageCount',
- (Select Count(1) From Items i with (NoLock) Where i.ContentID = z.ContentID) as 'ItemCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ContentID = z.ContentID) as 'cPartCount',
- (Select Count(1) From RoUsages ru with (NoLock) Where ru.ContentID = z.ContentID) as 'RoUsageCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.FromID = z.ContentID) as 'TransitionCount',
- (Select Count(1) From ZContents zc with (NoLock) Where zc.ContentID = z.ContentID) as 'ZContentCount'
- From dbo.vefn_SiblingAndChildrenItemsNewByWord(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx, @StepTypeList, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters) z
- Where (dbo.vefn_RemoveExtraText(@TextPrefix + z.Text + @TextSuffix, @IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CI_AS like @SearchString
- Or dbo.vefn_RemoveExtraText(@TextPrefix + z.Text + @TextSuffix, @IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CI_AS like @SearchStringx
- Or Replace(z.DocAscii, nChar(176), '\''B0') Collate SQL_Latin1_General_CP1_CI_AS like @SearchString
- Or Replace(z.DocAscii, nChar(176), '\''B0') Collate SQL_Latin1_General_CP1_CI_AS like @SearchStringx)
- Order By z.DvPath Asc
- Option (Recompile);
-
- End
-
- Else -- case sensitive
-
- Begin
-
- --Select 'Case #4: Include Links/RtfFormatting/SpecialCharacters & Case Sensitive';
-
- Select z.DvPath as 'DvPath',
- z.[Path] as 'Path',
- z.FromType as 'FromType',
- z.Ordinal as 'Ordinal',
- z.ParentID as 'ParentID',
- z.ItemID as 'ItemID',
- z.PreviousID as 'PreviousID',
- z.ContentID as 'ContentID',
- z.DTS as 'DTS',
- z.UserID as 'UserID',
- z.ILastChanged as 'ILastChanged',
- z.Number as 'Number',
- z.[Text] as 'Text',
- z.CType as 'Type',
- z.CFormatID as 'FormatID',
- z.CConfig as 'Config',
- z.CDTS as 'CDTS',
- z.CUserID as 'CUserID',
- z.CLastChanged as 'cLastChanged',
- z.pContentID as 'pContentID',
- z.pDTS as 'pDTS',
- z.pUserID as 'pUserID',
- z.PLastChanged as 'pLastChanged',
- (Select Count(1) From Annotations a with (NoLock) Where a.ItemID = z.ItemID) as 'AnnotationCount',
- (Select Count(1) From DocVersions dv with (NoLock) Where dv.ItemID = z.ItemID) as 'DocVersionCount',
- (Select Count(1) From Items i with (NoLock) Where i.PreviousID = z.ItemID) as 'NextCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ItemID = z.ItemID) as 'PartCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.RangeID = z.ItemID) as 'Transition_RangeIDCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.ToID = z.ItemID) as 'Transition_ToIDCount',
- (Select Count(1) From Details d with (NoLock) Where d.ContentID = z.ContentID) as 'DetailCount',
- (Select Count(1) From Entries e with (NoLock) Where e.ContentID = z.ContentID) as 'EntryCount',
- (Select Count(1) From Grids g with (NoLock) Where g.ContentID = z.ContentID) as 'GridCount',
- (Select Count(1) From Images i with (NoLock) Where i.ContentID = z.ContentID) as 'ImageCount',
- (Select Count(1) From Items i with (NoLock) Where i.ContentID = z.ContentID) as 'ItemCount',
- (Select Count(1) From Parts p with (NoLock) Where p.ContentID = z.ContentID) as 'cPartCount',
- (Select Count(1) From RoUsages ru with (NoLock) Where ru.ContentID = z.ContentID) as 'RoUsageCount',
- (Select Count(1) From Transitions t with (NoLock) Where t.FromID = z.ContentID) as 'TransitionCount',
- (Select Count(1) From ZContents zc with (NoLock) Where zc.ContentID = z.ContentID) as 'ZContentCount'
- From dbo.vefn_SiblingAndChildrenItemsNewByWord(@DocVersionList, @UnitPrefix, @SearchString, @SearchStringx, @StepTypeList, @includeLinks, @includeRtfFormatting, @includeSpecialCharacters) z
- Where (dbo.vefn_RemoveExtraText(Replace(@TextPrefix + z.Text + @TextSuffix,'\''b0', '\''B0'), @IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like Replace(@SearchString,'\''b0', '\''B0')
- Or dbo.vefn_RemoveExtraText(Replace(@TextPrefix + z.Text + @TextSuffix,'\''b0', '\''B0'), @IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) Collate SQL_Latin1_General_CP1_CS_AS like Replace(@SearchStringx,'\''b0', '\''B0')
- Or Replace(z.DocAscii,nChar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchString
- Or Replace(z.DocAscii,nChar(176),'\''B0') Collate SQL_Latin1_General_CP1_CS_AS like @SearchStringx)
- Order By z.DvPath Asc
- Option (Recompile);
-
- End
-
- End -- include links
-
-End
-Go
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNewByWord Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNewByWord Error on Creation'
-GO
-
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DeleteItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [DeleteItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[DeleteItemAndChildren]
-(
- @ItemID int,
- @UserID AS VARCHAR(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @DeleteID int
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @ItemType AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- SELECT @ItemType = Type FROM Contents Where ContentID = @ContentID
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID) where rangeid = toid or toid = @ItemID
- IF @ExternalCount > 0 AND @NextItemID is null
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- IF @ExternalCount > 0 AND @ItemType < 10000
- BEGIN
- RAISERROR ('###Cannot Delete Item###Procedure %d has External Transitions to Procedure - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- IF @ExternalCount > 0 AND @ItemType < 20000 -- B2020-091 (was not checking for sections)
- BEGIN
- RAISERROR ('###Cannot Delete Item###Procedure %d has External Transitions to Section - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
-
- -- Check to see if External Transitions point to the current item
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- --deletelog
- INSERT INTO DeleteLog (UserID) values (@UserID)
- Select @DeleteID = SCOPE_IDENTITY()
- --end deletelog
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- UPDATE PreviousID in Items WHERE ItemID = @NextItemID
- UPDATE Items SET PreviousID = @PreviousItemID WHERE ItemID=@NextItemID
- -- UPDATE DocVersion
- UPDATE DocVersions SET ItemID=@NextItemID where ItemID = @ItemID
- -- UPDATE Parts
- IF @NextItemID is not NULL -- Remove Part Record
- BEGIN
- UPDATE PARTS SET ItemID = @NextItemID where ItemID=@ItemID
- END
- ELSE
- BEGIN
- DELETE FROM Parts WHERE ItemID=@ItemID
- END
- -- Get external transitions that point to the specified Item
- -- These will need to be adjusted to point to the next Item.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID);
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that point to different step
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NextItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@PreviousItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NextItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @PreviousItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- Remove Previously deleted transitions
- DELETE from tblTransitions where deletestatus = -1 and FromID in(SELECT ContentID FROM @Children)
- -- Remove Previously deleted rousages
- DELETE from tblrousages where deletestatus = -1 and contentID in(SELECT ContentID FROM @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
- --purge deletelog
- DELETE from DeleteLog where DeleteID = @DeleteID
- --end purge deletelog
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
- GO
-IF (@@Error = 0) PRINT 'Procedure Creation: [DeleteItemAndChildren] Succeeded'
-ELSE PRINT 'Procedure Creation: [DeleteItemAndChildren] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCanCheckOutItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SessionCanCheckOutItem];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-exec dbo.vesp_SessionCanCheckOutItem 1,2
-exec dbo.vesp_SessionCanCheckOutItem 21,3
-*/
-CREATE PROCEDURE [dbo].[vesp_SessionCanCheckOutItem]
-(
- @ObjectID int,
- @ObjectType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @CheckOuts TABLE
- (
- SessionID int
- )
- --look to see if anyone else has a session. if they do, then cannot check out
- DECLARE @sCount int
- SELECT @sCount = count(*) FROM Sessions
- IF @ObjectType = 4 BEGIN
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE DTSEnd IS NULL
- END
- ELSE
- BEGIN
- DECLARE @ObjectAndEnhancedIDs Table
- (
- ObjectID int
- )
- IF @ObjectType = 0 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select ItemID from vefn_GetEnhancedProcedures(@ObjectID)
- END
- ELSE IF @ObjectType = 2 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select VersionID from vefn_GetEnhancedDocVersions(@ObjectID)
- INSERT INTO @ObjectAndEnhancedIDs -- B2020-094: Check current docversion
- select VersionID from DocVersions where VersionId = @ObjectID
- END
- ELSE IF @ObjectType = 3 BEGIN
- INSERT INTO @ObjectAndEnhancedIDs
- select FolderID from vefn_GetEnhancedFolders(@ObjectID)
- INSERT INTO @ObjectAndEnhancedIDs -- B2020-094: Check current folder
- select FolderID from Folders where FolderID = @ObjectID
- END
- ELSE BEGIN
- INSERT INTO @ObjectAndEnhancedIDs select @ObjectID
- END
- INSERT INTO @CheckOuts SELECT DISTINCT SessionID FROM Owners
- WHERE OwnerItemID in (select ObjectID from @ObjectAndEnhancedIDs) AND OwnerType = @ObjectType
- IF @ObjectType = 2
- BEGIN
- with ItemZ (VersionID,ItemID,PreviousID,SessionID)
- as(
- --> Procedure Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Items II on OO.OwnerItemID= II.ItemID
- Where OO.OwnerType=0
- UNION ALL --> Document Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Entries EE ON OO.OwnerItemID = EE.DocID
- Join Items II on EE.ContentID= II.ContentID
- Where OO.OwnerType=1
- UNION ALL --> Previous Owners
- Select null, ii.ItemID, ii.PreviousID,ZZ.SessionID From ItemZ ZZ
- Join Items II ON II.ItemID = ZZ.PreviousID
- Where ZZ.VersionID IS NULL and ZZ.PreviousID IS NOT NULL
- UNION ALL -- Parts Owners
- Select null, II.ItemID, II.PreviousID, ZZ.SessionID
- from ItemZ ZZ
- Join Parts PP ON PP.ItemID = ZZ.ItemID
- Join Items II ON II.ContentID = PP.ContentID
- Where ZZ.VersionID IS NULL
- UNION ALL -- Version Owners
- Select DV.VersionID,null,null,ZZ.SessionID From ItemZ ZZ
- Join DocVersions DV ON ZZ.ItemID = DV.ItemID
- Where ZZ.VersionID IS NULL AND ZZ.PreviousID IS NULL
- )
- --Select Distinct 'Phase 2b' Result, * from Itemz
- INSERT INTO @CheckOuts
- Select DIstinct SessionID from ItemZ
- where VersionID in(select ObjectID FROM @ObjectAndEnhancedIDs)
- OPTION (MAXRECURSION 10000) -- B2017-144 Crash on Maximum Recursion
- END
- --look to see if object type is folder that no part of folder passed is checked out
- IF @ObjectType = 3 BEGIN
- with ItemZ (VersionID,ItemID,PreviousID,SessionID)
- as(
- --> Procedure Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Items II on OO.OwnerItemID= II.ItemID
- Where OO.OwnerType=0
- UNION ALL --> Document Owners
- select null,II.ItemID, PreviousID, SessionID
- from Owners OO
- Join Entries EE ON OO.OwnerItemID = EE.DocID
- Join Items II on EE.ContentID= II.ContentID
- Where OO.OwnerType=1
- UNION ALL --> Previous Owners
- Select null, ii.ItemID, ii.PreviousID,ZZ.SessionID From ItemZ ZZ
- Join Items II ON II.ItemID = ZZ.PreviousID
- Where ZZ.VersionID IS NULL and ZZ.PreviousID IS NOT NULL
- UNION ALL -- Parts Owners
- Select null, II.ItemID, II.PreviousID, ZZ.SessionID
- from ItemZ ZZ
- Join Parts PP ON PP.ItemID = ZZ.ItemID
- Join Items II ON II.ContentID = PP.ContentID
- Where ZZ.VersionID IS NULL
- UNION ALL -- Version Owners
- Select DV.VersionID,null,null,ZZ.SessionID From ItemZ ZZ
- Join DocVersions DV ON ZZ.ItemID = DV.ItemID
- Where ZZ.VersionID IS NULL AND ZZ.PreviousID IS NULL
- )
- --Select Distinct 'Phase 2b' Result, * from Itemz
- INSERT INTO @CheckOuts
- Select DIstinct SessionID from ItemZ
- where VersionID in(select ObjectID FROM @ObjectAndEnhancedIDs)
- OPTION (MAXRECURSION 10000) -- B2017-144 Crash on Maximum Recursion
- END
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID],
- (select convert(bigint,max(lastchanged)) from contents) LastContentChange
- FROM [Sessions]
- WHERE [SessionID] IN (SELECT SessionID FROM @CheckOuts)
- END
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_SessionCanCheckOutItem] Succeeded'
-ELSE PRINT 'Procedure Creation: [vesp_SessionCanCheckOutItem] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CheckAllXML]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
-DROP FUNCTION [vefn_CheckAllXML];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2021 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_CheckAllXML](@DocVersionID int)
-returns xml
-begin
---temp table for sibling itemid
- declare @tItems table (ItemID int)
- insert into @tItems
- select itemid from vefn_siblingitems((select itemid from docversions where versionid = @docversionid),0)
---temp table for max checkid
- declare @tChecks table (CheckID int)
- insert into @tChecks
- select max(cc.checkid) checkid from checks cc
- inner join stages ss on cc.stageid = ss.stageid
- inner join revisions rr on cc.revisionid = rr.revisionid
- inner join @tItems ii on rr.itemid = ii.itemid -- B2021-025: get only items in procedures in this docversion
- where ss.isapproved = 1 group by rr.itemid
---temp table for multi valued roids
- declare @mvROIDS table (ROID varchar(max))
- insert into @mvROIDS
- select roid from (select distinct r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue
- from checks cc join @tchecks tc on cc.checkid = tc.checkid cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)) t1 group by roid having count(*) > 1
---temp table for multi valued transitionids
- declare @mvTransitions table (TransitionID int)
- insert into @mvTransitions
- select transitionid from (select distinct r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue
- from checks cc cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)) t1 group by transitionid having count(*) > 1
---temp table for multi valued docids
- declare @mvLibDocs table (DocID int)
- insert into @mvLibDocs
- select docid from (select distinct r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate
- from checks cc cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)) t1 group by docid having count(*) > 1
---temp table for roids
- declare @tROIDS table (ItemID int,ROID varchar(max),ROValue varchar(max),CheckID int)
- insert into @tROIDS
- select rr.itemid,r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue, cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)
---temp table for transitions
- declare @tTransitions table (ItemID int,TransitionID int,TransitionValue varchar(max),CheckID int)
- insert into @tTransitions
- select rr.itemid,r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)
---temp table for libdocs
- declare @tLibDocs table (ItemID int, DocID int, DocDate datetime,CheckID int)
- insert into @tLibDocs
- select rr.itemid,r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)
-
---get all inconsitencies accross set
- declare @ChkXML xml
- set @ChkXML =
- (
- select
- (--ro inconsistencies accross set
- select ROCheck.ItemID,ROCheck.ROID,ROCheck.ROValue from @tROIDS ROCheck
- inner join @tChecks tc on ROCheck.checkid = tc.checkid
- inner join @tItems ti on ROCheck.itemid = ti.itemid
- inner join @mvROIDS mv on ROCheck.roid = mv.roid
- order by ROCheck.itemid
- for xml auto,root('ROChecks'),type
- ),
- (--transition inconsistencies accross set
- select TransitionCheck.ItemID,TransitionCheck.TransitionID,TransitionCheck.TransitionValue from @tTransitions TransitionCheck
- inner join @tChecks tc on TransitionCheck.checkid = tc.checkid
- inner join @tItems ti on TransitionCheck.itemid = ti.itemid
- inner join @mvTransitions mv on TransitionCheck.TransitionID = mv.TransitionID
- order by TransitionCheck.itemid
- for xml auto,root('TransitionChecks'),type
- ),
- (--libdoc inconsistencies accross set
- select LibDocCheck.ItemID,LibDocCheck.DocID,LibDocCheck.DocDate from @tLibDocs LibDocCheck
- inner join @tChecks tc on LibDocCheck.checkid = tc.checkid
- inner join @tItems ti on LibDocCheck.itemid = ti.itemid
- inner join @mvLibDocs mv on LibDocCheck.docid = mv.docid
- order by LibDocCheck.itemid
- for xml auto,root('LibDocChecks'),type
- )
- for xml path(''),ROOT ('ConsistencyChecks'),type
- )
- return @ChkXML
-end
-GO
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: [vefn_CheckAllXML] Succeeded'
-ELSE PRINT 'ScalarFunction Creation: [vefn_CheckAllXML] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getContentAuditsChronologyByItemID];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2021 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
- order by OrdinalPath, contentid,auditid -- B2021-031: Grouping/ordering in Chronology Report not always correct
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: [getContentAuditsChronologyByItemID] Succeeded'
-ELSE PRINT 'Procedure Creation: [getContentAuditsChronologyByItemID] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChronologyReport]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChronologyReport];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2021 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_ChronologyReport](@ProcItemID int, @DTS datetime)
-returns @Report table
-(
-src int,
-AuditID bigint,
-ContentID int,
-Number nvarchar(512),
-Text nvarchar(max),
-Type int,
-FormatID int,
-Config nvarchar(max),
-DTS datetime,
-UserID nvarchar(200),
-DeleteStatus int,
-ActionDTS datetime,
-ItemDTS datetime,
-LastAuditID int,
-DeletedAuditID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
---added rhm/jcb 20121218i
-declare @tmpTable table
-(
- icontentid int primary key
-)
-insert into @tmpTable select icontentid from vefn_tblchilditems(@ProcItemID,@ProcItemID,1)
---added jcb 20111122
---declare @dts datetime
---set @dts = (select dts from items where itemid = @ProcItemID )
---set @dts = (SELECT .[dbo].[vefn_GetPreviousRevisionDTSByItemID] (@ProcItemID))
---end added jcb 20111122
- insert into @Report
- SELECT
-1 src,
- [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- where Number is not null
---added jcb 20111028_1827
-and ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > @dts)
---and ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.dts > @dts
---end added jcb 20111122
--- UNION
--- SELECT
---2 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
----- (select max(auditid) + 1 from contentaudits) [AuditID]
----- 0 [AuditID]
--- ,ca.[ContentID]
--- ,[Number]
--- ,[Text]
--- ,[Type]
--- ,[FormatID]
--- ,[Config]
--- ,ca.[DTS] cadts
--- ,ca.[UserID]
--- ,ca.[DeleteStatus]
--- ,ActionDTS
--- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
--- FROM tblContents ca
----- inner join tblitems ti on ca.contentid = ti.contentid
---WHERE ca.DeleteStatus = 0 AND
-----added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) and
-----end added jcb 20111028_1827
-----ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-----added jcb 20111122
-----ca.ContentID in (SELECT [ContentID] FROM Contents where dts > (select dts from items where itemid = @ProcItemID ))
---ca.ContentID in (SELECT [ContentID] FROM Contents where dts > @dts)
-----end added jcb 20111122
-----order by ca.DTS,ActionDTS
- UNION
- SELECT
-3 src,
- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
--- 0 [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM tblContents ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus = 0 --AND
---added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) -- B2020-156: Procedure not listed in change reports
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
- UNION
- SELECT distinct
-5 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
- ca.[AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus > 0
---added jcb 20111028_1827
- --ca.contentid != (select contentid from items where itemid = @procitemid) and
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.contentid in (select icontentid from @tmpTable)
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
-order by ca.DTS,ActionDTS
-
- insert into @Report
- SELECT
-4 src,
- ca.[AuditID]
- ,ca.[ContentID]
- ,ca.[Number]
- ,ca.[Text]
- ,ca.[Type]
- ,ca.[FormatID]
- ,ca.[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ca.ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- inner join @Report rpt on ca.contentid = rpt.contentid and ca.auditid = rpt.lastauditid
-where ca.auditid not in (select auditid from @report)
-and rpt.lastauditid is not null
-and ca.contentid in (select icontentid from @tmpTable)
- return
-end
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_ChronologyReport] Succeeded'
-ELSE PRINT 'TableFunction [vefn_ChronologyReport] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CheckAllXML]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
-DROP FUNCTION [vefn_CheckAllXML];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2021 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_CheckAllXML](@DocVersionID int)
-returns xml
-begin
---temp table for sibling itemid
- declare @tItems table (ItemID int)
- insert into @tItems
- select itemid from vefn_siblingitems((select itemid from docversions where versionid = @docversionid),0)
---temp table for max checkid
- declare @tChecks table (CheckID int)
- insert into @tChecks
- select max(cc.checkid) checkid from checks cc
- inner join stages ss on cc.stageid = ss.stageid
- inner join revisions rr on cc.revisionid = rr.revisionid
- inner join @tItems ii on rr.itemid = ii.itemid -- B2021-025: get only items in procedures in this docversion
- where ss.isapproved = 1 group by rr.itemid
---temp table for multi valued roids
- declare @mvROIDS table (ROID varchar(max))
- insert into @mvROIDS
- select roid from (select distinct r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue
- from checks cc join @tchecks tc on cc.checkid = tc.checkid cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)) t1 group by roid having count(*) > 1
---temp table for multi valued transitionids
- declare @mvTransitions table (TransitionID int)
- insert into @mvTransitions
- select transitionid from (select distinct r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue
- from checks cc cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)
- join @tChecks tc on tc.CheckID=cc.CheckID -- B2021-037 transition part of approval inconsistencies report
- ) t1 group by transitionid having count(*) > 1
---temp table for multi valued docids
- declare @mvLibDocs table (DocID int)
- insert into @mvLibDocs
- select docid from (select distinct r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate
- from checks cc cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)) t1 group by docid having count(*) > 1
---temp table for roids
- declare @tROIDS table (ItemID int,ROID varchar(max),ROValue varchar(max),CheckID int)
- insert into @tROIDS
- select rr.itemid,r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue, cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)
---temp table for transitions
- declare @tTransitions table (ItemID int,TransitionID int,TransitionValue varchar(max),CheckID int)
- insert into @tTransitions
- select rr.itemid,r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)
---temp table for libdocs
- declare @tLibDocs table (ItemID int, DocID int, DocDate datetime,CheckID int)
- insert into @tLibDocs
- select rr.itemid,r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)
-
---get all inconsitencies accross set
- declare @ChkXML xml
- set @ChkXML =
- (
- select
- (--ro inconsistencies accross set
- select ROCheck.ItemID,ROCheck.ROID,ROCheck.ROValue from @tROIDS ROCheck
- inner join @tChecks tc on ROCheck.checkid = tc.checkid
- inner join @tItems ti on ROCheck.itemid = ti.itemid
- inner join @mvROIDS mv on ROCheck.roid = mv.roid
- order by ROCheck.itemid
- for xml auto,root('ROChecks'),type
- ),
- (--transition inconsistencies accross set
- select TransitionCheck.ItemID,TransitionCheck.TransitionID,TransitionCheck.TransitionValue from @tTransitions TransitionCheck
- inner join @tChecks tc on TransitionCheck.checkid = tc.checkid
- inner join @tItems ti on TransitionCheck.itemid = ti.itemid
- inner join @mvTransitions mv on TransitionCheck.TransitionID = mv.TransitionID
- order by TransitionCheck.itemid
- for xml auto,root('TransitionChecks'),type
- ),
- (--libdoc inconsistencies accross set
- select LibDocCheck.ItemID,LibDocCheck.DocID,LibDocCheck.DocDate from @tLibDocs LibDocCheck
- inner join @tChecks tc on LibDocCheck.checkid = tc.checkid
- inner join @tItems ti on LibDocCheck.itemid = ti.itemid
- inner join @mvLibDocs mv on LibDocCheck.docid = mv.docid
- order by LibDocCheck.itemid
- for xml auto,root('LibDocChecks'),type
- )
- for xml path(''),ROOT ('ConsistencyChecks'),type
- )
- return @ChkXML
-end
-GO
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: [vefn_CheckAllXML] Succeeded'
-ELSE PRINT 'ScalarFunction Creation: [vefn_CheckAllXML] Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAssociationsByVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getAssociationsByVersionID];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2022 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAssociationsByVersionID]
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
-begin
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged]
- -- B2022-010
- -- the following was slowing down getting associations
- -- which slowed down opening Search and any other time we got this information
- -- note that the ROFst information is not needed
- --,
- --[ROFsts].[RODbID] [ROFst_RODbID],
- --[ROFsts].[ROLookup] [ROFst_ROLookup],
- --[ROFsts].[Config] [ROFst_Config],
- --[ROFsts].[DTS] [ROFst_DTS],
- --[ROFsts].[UserID] [ROFst_UserID]
- FROM [Associations]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Associations].[ROFstID]
- WHERE
- [Associations].[VersionID]=@VersionID
-
- RETURN
-end
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: [getAssociationsByVersionID] Succeeded'
-ELSE PRINT 'Procedure Creation: [getAssociationsByVersionID] Error on Creation'
-GO
-
-
-
-
-If Exists(Select * From sys.views Where Name = N'vwSysInfo_IndexFragmentation')
- Drop View [dbo].[vwSysInfo_IndexFragmentation];
-Go
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 08/23/2021
- Description: (System Info) Master View for Table Index Fragmentation
-==========================================================================================================
-*/
-Create View [dbo].[vwSysInfo_IndexFragmentation]
-As
-
- Select s.[name] as 'SchemaName',
- t.[name] as 'TableName',
- i.[name] as 'IndexName',
- i.is_primary_key as 'IsPrimaryKey',
- i.fill_factor as 'FillFactor',
- ips.[avg_fragmentation_in_percent] as 'AvgFragmentation',
- ips.[page_count] as 'PageCount',
- ips.index_level as 'IndexLevel',
- ips.index_depth as 'IndexDepth',
- Case When (ips.[avg_fragmentation_in_percent] > 30) Then 'Rebuild'
- When (ips.[avg_fragmentation_in_percent] > 5) Then 'Reorganize'
- Else 'None'
- End as 'SuggestedAction'
- From sys.[dm_db_index_physical_stats] (DB_ID(), NULL, NULL, NULL, NULL) as ips
- inner join sys.[tables] t With (NoLock) on t.[object_id] = ips.[object_id]
- inner join sys.[schemas] s With (NoLock) on t.[schema_id] = s.[schema_id]
- inner join sys.[indexes] i With (NoLock) on i.[object_id] = ips.[object_id] And i.[index_id] = ips.[index_id]
- Where ips.[database_id] = DB_ID()
- and not i.[name] is null;
-
-Go
-
-IF (@@Error = 0) PRINT 'View Creation: [vwSysInfo_IndexFragmentation] Succeeded'
-ELSE PRINT 'View Creation: [vwSysInfo_IndexFragmentation] Error on Creation'
-GO
-
-
-
-If Exists(Select * From sys.views Where Name = N'vwSysInfo_UserTables')
- Drop View [dbo].[vwSysInfo_UserTables];
-Go
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 08/23/2021
- Description: (System Info) Master View for User Tables with Columns
-==========================================================================================================
-*/
-Create View [dbo].[vwSysInfo_UserTables]
-As
-
- Select OBJECT_SCHEMA_NAME(t.[object_id],DB_ID()) as 'SchemaName',
- t.[name] as 'TableName',
- ac.[name] as 'ColumnName',
- ac.[column_id]as 'ColumnOrder',
- ty.[name] as 'DataType',
- ac.[max_length] as 'MaxLength',
- ac.[precision] as 'Precision',
- ac.[scale] as 'Scale',
- ac.[is_nullable] as 'IsNullable',
- ac.[is_ansi_padded] as 'IsAnsiPadded',
- ac.[is_identity] as 'IsIdentity',
- object_definition(ac.[default_object_id]) as 'DefaultValue'
- From sys.[tables] t With (NoLock)
- inner join sys.[all_columns] ac With (NoLock) on t.[object_id] = ac.[object_id]
- inner join sys.[types] ty With (NoLock) on ac.[system_type_id] = ty.[system_type_id] and ac.[user_type_id] = ty.[user_type_id]
- Where t.[is_ms_shipped] = 0; -- Indicates if table is from Microsoft or User Created
-
-GO
-
-IF (@@Error = 0) PRINT 'View Creation: [vwSysInfo_UserTables] Succeeded'
-ELSE PRINT 'View Creation: [vwSysInfo_UserTables] Error on Creation'
-GO
-
-
-
-
-IF EXISTS (Select * From dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_UtilityCheckIndexes]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP Procedure [dbo].[vesp_UtilityCheckIndexes];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 08/23/2021
- Description: Rebuild / Reorganize all Indexes in the database based on their current average fragmentation
- Note** @LowerFragCutoff value should always be less than the @UpperFragCutoff value,
- if not then @@LowerFragCutoff value witll be automatically set to the @UpperFragCutoff value
-
- Parameters: @UpperFragCutoff Fragmentation Cutoff Value for Rebuild vs Reorganize (30.0 Recommended)
- @LowerFragCutoff Average Fragmentation Cutoff Value for Initial Index Selection (10.0 Recommended)
- @IsPrint Print the Commands Indicator (1 = Print Commands, 0 = Dont Print Commands)
- @IsExecute Execute the Commands Indicator (1 = Execute Commands, 0 = Dont Execute Commands)
-
-Examples: exec [dbo].[vesp_UtilityCheckIndexes] null, null, null, null; -- Use default values and only execute the commands
- exec [dbo].[vesp_UtilityCheckIndexes] null, null, 1, 0; -- Use the Upper Cutoff and Lower Cutoff default values and only print the commands
- exec [dbo].[vesp_UtilityCheckIndexes] null, null, 0, 1; -- Use the Upper Cutoff and Lower Cutoff default values and only execute the commands
- exec [dbo].[vesp_UtilityCheckIndexes] 30.0, null, 1, 0; -- Override Upper Cutoff, use the Lower Cutoff default value and print and execute the commands
-==========================================================================================================
- */
-Create Procedure [dbo].[vesp_UtilityCheckIndexes] (@UpperFragCutoff float = null, @LowerFragCutoff float = null,
- @IsPrint Bit = null, @IsExecute Bit = null)
-With Execute As Owner
-As
-Begin
-
- Set NoCount On;
-
- -- Declare Local Variables
- Declare @ObjectID int;
- Declare @IndexID int;
- Declare @PartitionCount bigint;
- Declare @SchemaName nvarchar(130);
- Declare @ObjectName nvarchar(130);
- Declare @IndexName nvarchar(130);
- Declare @PartitionNum bigint;
- Declare @IndexAvgFrag float;
- Declare @Command nvarchar(4000);
-
- -- Set Default Values
- If (@UpperFragCutoff is null) Set @UpperFragCutoff = 10.0;
- If (@LowerFragCutoff is null) Set @LowerFragCutoff = 2.0;
- If (@IsPrint is null) Set @IsPrint = 0;
- If (@IsExecute is null) Set @IsExecute = 1;
-
- -- Check if Lower Cutoff is greater than Upper Cutoff
- If (@LowerFragCutoff > @UpperFragCutoff) Set @LowerFragCutoff = @UpperFragCutoff;
-
-
- -- Conditionally select tables and indexes from the sys.dm_db_index_physical_stats function
- -- and convert object and index IDs to names.
-
- Select object_id as 'ObjectID',
- index_id as 'IndexID',
- partition_number as 'PartitionNum',
- avg_fragmentation_in_percent as 'AvgFrag'
- Into #work_to_do
- From sys.dm_db_index_physical_stats (DB_ID(), NULL, NULL , NULL, 'LIMITED')
- Where avg_fragmentation_in_percent > @LowerFragCutoff AND index_id > 0;
-
- -- Declare the cursor for the list of partitions to be processed.
- Declare cursor_Partitions Cursor For
- Select ObjectID, IndexID, PartitionNum, AvgFrag
- From #work_to_do;
-
- -- Open the cursor.
- Open cursor_Partitions;
-
- -- Loop through the partitions.
- While (1=1)
-
- Begin;
-
- Fetch Next From cursor_Partitions Into @ObjectID, @IndexID, @PartitionNum, @IndexAvgFrag;
-
- IF (@@FETCH_STATUS < 0) Break;
-
- Select @ObjectName = QUOTENAME(o.name), @SchemaName = QUOTENAME(s.name)
- From sys.objects as o
- join sys.schemas as s on s.schema_id = o.schema_id
- Where o.object_id = @ObjectID;
-
- Select @IndexName = QUOTENAME(name)
- From sys.indexes
- Where object_id = @ObjectID AND index_id = @IndexID;
-
- Select @PartitionCount = Count(*)
- From sys.partitions
- Where object_id = @ObjectID AND index_id = @IndexID;
-
- Set @Command = '';
-
- -- Determine whether to rebuild or reorganize
- IF (@IndexAvgFrag < @UpperFragCutoff)
- Set @Command = N'ALTER INDEX ' + @IndexName + N' ON ' + @SchemaName + N'.' + @ObjectName + N' REORGANIZE;';
-
- IF (@IndexAvgFrag >= @UpperFragCutoff)
- Set @Command = N'ALTER INDEX ' + @IndexName + N' ON ' + @SchemaName + N'.' + @ObjectName + N' REBUILD;';
-
- IF (@PartitionCount > 1)
- Set @Command = @Command + N' PARTITION=' + Cast(@PartitionNum AS nvarchar(10));
-
- -- Print command if enabled
- If (@IsPrint = 1) Print @Command;
-
- -- Execute command if enabled
- If (@IsExecute = 1) Exec (@Command);
-
- End;
-
- -- Close and deallocate the cursor
- Close cursor_Partitions;
- Deallocate cursor_Partitions;
-
- -- Drop the temporary table
- Drop Table #work_to_do;
-
- Return;
-End
-Go
-
-IF (@@Error = 0) PRINT 'StoredProcedure Creation: [vesp_UtilityCheckIndexes] Succeeded'
-ELSE PRINT 'StoredProcedure Creation: [vesp_UtilityCheckIndexes] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblEntriesDeleteStatusDocID')
- Drop Index [IX_tblEntriesDeleteStatusDocID] on [dbo].[tblEntries]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblEntriesDeleteStatusDocID]
-ON [dbo].[tblEntries] ([DeleteStatus] ASC)
-INCLUDE ([DocID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblEntriesDeleteStatusDocID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblEntriesDeleteStatusDocID] Error on Creation'
-GO
-
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblAnnotationsDeleteStatusAnnotationID')
- Drop Index [IX_tblAnnotationsDeleteStatusAnnotationID] on [dbo].[tblAnnotations]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblAnnotationsDeleteStatusAnnotationID]
-ON [dbo].[tblAnnotations] ([DeleteStatus] ASC)
-INCLUDE ([AnnotationID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblAnnotationsDeleteStatusAnnotationID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblAnnotationsDeleteStatusAnnotationID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblContentsDeleteStatusContentID')
- Drop Index [IX_tblContentsDeleteStatusContentID] on [dbo].[tblContents]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblContentsDeleteStatusContentID]
-ON [dbo].[tblContents] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblContentsDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblContentsDeleteStatusContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblDocumentsDeleteStatusDocID')
- Drop Index [IX_tblDocumentsDeleteStatusDocID] on [dbo].[tblDocuments]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblDocumentsDeleteStatusDocID]
-ON [dbo].[tblDocuments] ([DeleteStatus] ASC)
-INCLUDE ([DocID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblDocumentsDeleteStatusDocID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblDocumentsDeleteStatusDocID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblGridsDeleteStatusContentID')
- Drop Index [IX_tblGridsDeleteStatusContentID] on [dbo].[tblGrids]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblGridsDeleteStatusContentID]
-ON [dbo].[tblGrids] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblGridsDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblGridsDeleteStatusContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblImagesDeleteStatusContentID')
- Drop Index [IX_tblImagesDeleteStatusContentID] on [dbo].[tblImages]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblImagesDeleteStatusContentID]
-ON [dbo].[tblImages] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblImagesDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblImagesDeleteStatusContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblItemsDeleteStatusItemID')
- Drop Index [IX_tblItemsDeleteStatusItemID] on [dbo].[tblItems]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblItemsDeleteStatusItemID]
-ON [dbo].[tblItems] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblItemsDeleteStatusItemID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblItemsDeleteStatusItemID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblPartsDeleteStatusItemIDContentID')
- Drop Index [IX_tblPartsDeleteStatusItemIDContentID] on [dbo].[tblParts]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblPartsDeleteStatusItemIDContentID]
-ON [dbo].[tblParts] ([DeleteStatus] ASC)
-INCLUDE ([ItemID], [ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblPartsDeleteStatusItemIDContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblPartsDeleteStatusItemIDContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblPartsDeleteStatusItemID')
- Drop Index [IX_tblPartsDeleteStatusItemID] on [dbo].[tblParts]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblPartsDeleteStatusItemID]
-ON [dbo].[tblParts] ([DeleteStatus] ASC)
-INCLUDE ([ItemID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblPartsDeleteStatusItemID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblPartsDeleteStatusItemID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblPartsDeleteStatusContentID')
- Drop Index [IX_tblPartsDeleteStatusContentID] on [dbo].[tblParts]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblPartsDeleteStatusContentID]
-ON [dbo].[tblParts] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblPartsDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblPartsDeleteStatusContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblROUsagesDeleteStatusContentID')
- Drop Index [IX_tblROUsagesDeleteStatusContentID] on [dbo].[tblROUsages]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblROUsagesDeleteStatusContentID]
-ON [dbo].[tblROUsages] ([DeleteStatus] ASC)
-INCLUDE ([ContentID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblROUsagesDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblROUsagesDeleteStatusContentID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblROUsagesDeleteStatusRODbID')
- Drop Index [IX_tblROUsagesDeleteStatusRODbID] on [dbo].[tblROUsages]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblROUsagesDeleteStatusRODbID]
-ON [dbo].[tblROUsages] ([DeleteStatus] ASC)
-INCLUDE (RODbID)
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblROUsagesDeleteStatusRODbID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblROUsagesDeleteStatusRODbID] Error on Creation'
-GO
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblTransitionsDeleteStatusTransitionID')
- Drop Index [IX_tblTransitionsDeleteStatusTransitionID] on [dbo].[tblTransitions]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblTransitionsDeleteStatusTransitionID]
-ON [dbo].[tblTransitions] ([DeleteStatus] ASC)
-INCLUDE (TransitionID)
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblTransitionsDeleteStatusTransitionID] Succeeded'
-ELSE PRINT 'Index Creation:[IX_tblTransitionsDeleteStatusTransitionID] Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridIds]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getGridIds];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2022 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridIds]
-WITH EXECUTE AS OWNER
-AS
-begin
- SELECT
- [ContentID]
- FROM [Grids]
- RETURN
-end
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: [getGridIds] Succeeded'
-ELSE PRINT 'Procedure Creation: [getGridIds] Error on Creation'
-GO
-
-
-
-/*
-==========================================================================================================
- Begin: B2022-026 RO Memory reduction coding (Jakes Merge) [Version 2.0]
- Notes** If you need to rollback to the previous version for some reason and undo the changes
- for v2.0 then run the corresponding "PROMSRollback (v2.0).sql" file
-==========================================================================================================
-*/
- /*
- ----------------------------------------------------------------------------------
- Tables:
- ----------------------------------------------------------------------------------
- [RofstHeader]
- [RofstDatabase]
- [RofstChild]
- [RofstDefaultValue]
-
- ----------------------------------------------------------------------------------
- Indexes:
- ----------------------------------------------------------------------------------
- [IX_RofstID_Roid] on [dbo].[RofstChild]
- [IX_RofstID_DbiID_ParentID] on [dbo].[RofstChild]
-
- */
-
- -- If RofstHeader and other tables already exist then don't drop and recreate them
- IF Not Exists(SELECT * FROM sys.objects Where name = 'RofstHeader' AND type in (N'U'))
- Begin -- Rofst Tables
-
- SET ANSI_NULLS ON
- SET QUOTED_IDENTIFIER ON
-
- /****** Object: Table [dbo].[RofstChild] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE TABLE [dbo].[RofstChild](
- [RofstChildID] [int] IDENTITY(1,1) NOT NULL,
- [RofstID] [int] NOT NULL,
- [dbiID] [int] NOT NULL,
- [ID] [int] NOT NULL,
- [ParentID] [int] NOT NULL,
- [type] [int] NOT NULL,
- [title] [varchar](max) NOT NULL,
- [roid] [varchar](50) NOT NULL,
- [appid] [varchar](max) NULL,
- [value] [varchar](max) NULL,
- CONSTRAINT [PK_RofstChild] PRIMARY KEY CLUSTERED
- (
- [RofstChildID] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Table Creation: [RofstChild] Succeeded'
- ELSE PRINT 'Table Creation: [RofstChild] Error on Creation'
-
-
- /****** Object: Table [dbo].[RofstDatabase] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE TABLE [dbo].[RofstDatabase](
- [RofstID] [int] NOT NULL,
- [dbiID] [int] NOT NULL,
- [dbiType] [int] NOT NULL,
- [dbiAW] [int] NOT NULL,
- [dbiTitle] [varchar](max) NOT NULL,
- [dbiAP] [varchar](max) NOT NULL,
- [ID] [int] NOT NULL,
- [ParentID] [int] NOT NULL,
- CONSTRAINT [PK_RofstDatabase_1] PRIMARY KEY CLUSTERED
- (
- [RofstID] ASC,
- [dbiID] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Table Creation: [RofstDatabase] Succeeded'
- ELSE PRINT 'Table Creation: [RofstDatabase] Error on Creation'
-
-
- /****** Object: Table [dbo].[RofstDefaultValue] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE TABLE [dbo].[RofstDefaultValue](
- [RofstID] [int] NOT NULL,
- [roid] [varchar](50) NOT NULL,
- [value] [varchar](max) NOT NULL,
- [AccPageID] [varchar](max) NULL,
- CONSTRAINT [PK_RofstDefaultValue] PRIMARY KEY CLUSTERED
- (
- [RofstID] ASC,
- [roid] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Table Creation: [RofstDefaultValue] Succeeded'
- ELSE PRINT 'Table Creation: [RofstDefaultValue] Error on Creation'
-
-
- /****** Object: Table [dbo].[RofstHeader] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE TABLE [dbo].[RofstHeader](
- [RofstID] [int] NOT NULL,
- [hSize] [int] NOT NULL,
- [hMonth] [int] NOT NULL,
- [hDay] [int] NOT NULL,
- [hcYear] [int] NOT NULL,
- [hcMonth] [int] NOT NULL,
- [hcDay] [int] NOT NULL,
- [hcHour] [int] NOT NULL,
- [hcMin] [int] NOT NULL,
- [hcSec] [int] NOT NULL,
- [hcHund] [int] NOT NULL,
- [CreateUserID] [varchar](50) NOT NULL,
- [CreateDate] [datetime] NOT NULL,
- [LoadedDate] [datetime] NULL,
- CONSTRAINT [PK_RofstHeader] PRIMARY KEY CLUSTERED
- (
- [RofstID] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- ) ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Table Creation: [RofstHeader] Succeeded'
- ELSE PRINT 'Table Creation: [RofstHeader] Error on Creation'
-
-
- /****** Object: Index [IX_RofstID_DbiID_ParentID] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE NONCLUSTERED INDEX [IX_RofstID_DbiID_ParentID] ON [dbo].[RofstChild]
- (
- [RofstID] ASC,
- [dbiID] ASC,
- [ParentID] ASC
- )
- INCLUDE([ID],[type],[title],[roid],[appid],[value]) WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Index Creation: [IX_RofstID_DbiID_ParentID] Succeeded'
- ELSE PRINT 'Index Creation: [IX_RofstID_DbiID_ParentID] Error on Creation'
-
-
- /****** Object: Index [IX_RofstID_Roid] Script Date: 6/6/2022 11:18:32 AM ******/
- CREATE NONCLUSTERED INDEX [IX_RofstID_Roid] ON [dbo].[RofstChild]
- (
- [RofstID] ASC,
- [roid] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Index Creation: [IX_RofstID_Roid] Succeeded'
- ELSE PRINT 'Index Creation: [IX_RofstID_Roid] Error on Creation'
-
-
- ALTER TABLE [dbo].[RofstDatabase] ADD CONSTRAINT [DF_RofstDatabase_ParentID] DEFAULT ((0)) FOR [ParentID]
-
- ALTER TABLE [dbo].[RofstHeader] ADD CONSTRAINT [DF_RofstHeader_CreateUserID] DEFAULT ('SYSTEM') FOR [CreateUserID]
-
- ALTER TABLE [dbo].[RofstHeader] ADD CONSTRAINT [DF_RofstHeader_CreateDate] DEFAULT (getdate()) FOR [CreateDate]
-
- ALTER TABLE [dbo].[RofstChild] WITH CHECK ADD CONSTRAINT [FK_RofstChild_RofstDatabase] FOREIGN KEY([RofstID], [dbiID])
- REFERENCES [dbo].[RofstDatabase] ([RofstID], [dbiID])
- ON DELETE CASCADE
-
- ALTER TABLE [dbo].[RofstChild] CHECK CONSTRAINT [FK_RofstChild_RofstDatabase]
-
- ALTER TABLE [dbo].[RofstDatabase] WITH CHECK ADD CONSTRAINT [FK_RofstDatabase_RofstHeader] FOREIGN KEY([RofstID])
- REFERENCES [dbo].[RofstHeader] ([RofstID])
- ON DELETE CASCADE
-
- ALTER TABLE [dbo].[RofstDatabase] CHECK CONSTRAINT [FK_RofstDatabase_RofstHeader]
-
- ALTER TABLE [dbo].[RofstDefaultValue] WITH CHECK ADD CONSTRAINT [FK_RofstDefaultValue_RofstHeader] FOREIGN KEY([RofstID])
- REFERENCES [dbo].[RofstHeader] ([RofstID])
- ON DELETE CASCADE
-
- ALTER TABLE [dbo].[RofstDefaultValue] CHECK CONSTRAINT [FK_RofstDefaultValue_RofstHeader]
-
- ALTER TABLE [dbo].[RofstHeader] WITH CHECK ADD CONSTRAINT [FK_RofstHeader_ROFsts] FOREIGN KEY([RofstID])
- REFERENCES [dbo].[ROFsts] ([ROFstID])
- ON DELETE CASCADE
-
- ALTER TABLE [dbo].[RofstHeader] CHECK CONSTRAINT [FK_RofstHeader_ROFsts]
-
- IF (@@Error = 0) PRINT 'Table/FK Constraints: Succeeded'
- ELSE PRINT 'Table/FK Constraints: Error on Creation'
-
- End -- Rofst Tables
- Go
-
-
- /*
- ----------------------------------------------------------------------------------
- Functions:
- ----------------------------------------------------------------------------------
- [dbo].[vefn_Clean]
- [dbo].[vefn_ParseStringListToTable]
- [dbo].[vefn_NumOfOccurrences]
- [dbo].[vefn_RofstDataReplaceVars]
- [dbo].[vefn_RofstDataReplaceApplTagsWithDefaults]
- [dbo].[vefn_RofstDataGetLoadStatus]
- */
-
- /****** Object: UserDefinedFunction [dbo].[vefn_Clean] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_Clean' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_Clean]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 4/21/2022
- -- Description: Cleans (Trim) the string value passed
- -- Optional: Truncate is string is passed a specified max length
- -- Optional: Convert any null values to an empty string or leave as null
- -- ==========================================================================================
-
- Create Function [dbo].[vefn_Clean] ( @Value VarChar(Max), @ConvertNulls bit = 0, @MaxLength Int = null )
- Returns VarChar(Max)
- As
- Begin
-
- Declare @RetVal VarChar(Max);
-
- If (Len(IsNull(@Value,'')) > 0)
- Begin
-
- Set @RetVal = LTrim(RTrim(@Value));
- If (Not @MaxLength is null And Len(@RetVal) > @MaxLength) Set @RetVal = Left(@RetVal, @MaxLength);
-
- End
-
- If (@ConvertNulls = 1)
- Set @RetVal = IsNull(@RetVal, '');
-
- Return @RetVal;
-
- End
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_Clean] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_Clean] Error on Creation'
- GO
-
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_ParseStringListToTable] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_ParseStringListToTable' AND type in (N'TF'))
- DROP FUNCTION [dbo].[vefn_ParseStringListToTable]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/26/2018
- -- Description: Splits a delimited list of strings into a table of string values
- -- ==========================================================================================
-
- Create Function [dbo].[vefn_ParseStringListToTable] ( @List VarChar(Max), @Delimeter VarChar(1) = null )
- Returns @RetVal Table (ListPosition Int Identity(1,1) Not Null, ListValue VarChar(Max) Not Null)
- With Execute As Owner
- As
- Begin
-
- Declare @Position Int;
- Declare @TextPosition Int;
- Declare @Length smallint;
- Declare @String VarChar(Max);
- Declare @TempString VarChar(Max);
- Declare @LeftOver VarChar(Max);
-
- Set @TextPosition = 1;
- Set @LeftOver = '';
- Set @Delimeter = IsNull(@Delimeter, ',');
-
- If (DataLength(@List) = 1)
- Insert @RetVal (ListValue) Values (Cast(@List as VarChar(Max)));
- Else
- Begin
- While (@TextPosition <= DataLength(@List) / 2)
- Begin
-
- Set @Length = (4000 - DataLength(@LeftOver) / 2);
- Set @TempString = LTrim(@LeftOver + Substring(@List, @TextPosition, @Length));
- Set @TextPosition = @TextPosition + @Length;
- Set @Position = CharIndex(@Delimeter, @TempString);
-
- While (@Position > 0)
- Begin
-
- Set @String = Substring(@TempString, 1, @Position - 1);
-
- Insert @RetVal (ListValue) Values (Cast(@String as VarChar(Max)));
-
- Set @TempString = LTrim(Substring(@TempString, @Position + 1, Len(@TempString)));
- Set @Position = CharIndex(@Delimeter, @TempString);
-
- End
-
- Set @LeftOver = @TempString;
- End
- End
-
- If (LTrim(RTrim(@LeftOver)) <> '')
- Insert @RetVal (ListValue) Values (Cast(@LeftOver as VarChar(Max)));
-
- Return;
- End
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_ParseStringListToTable] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_ParseStringListToTable] Error on Creation'
- GO
-
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_NumOfOccurrences] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_NumOfOccurrences' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_NumOfOccurrences]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/1/2022
- -- Description: Returns the number of occurences of a specific value in a specified string
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_NumOfOccurrences](@Text VarChar(Max), @Value VarChar(Max)) Returns Int
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @ValueCount Int;
-
- If (Len(@Value) = 0)
- Set @ValueCount = 0;
- Else
- Set @ValueCount = (Len(@Text) - Len(Replace(@Text, @Value, ''))) / Len(@Value);
-
- Return @ValueCount;
-
- END
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_NumOfOccurrences] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_NumOfOccurrences] Error on Creation'
- GO
-
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataReplaceVars] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceVars' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataReplaceVars]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/25/2022
- -- Description: Replaces Any Variables and returns the rest of the value string
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataReplaceVars](@Values VarChar(Max)) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @EqualsIndex Int;
- Declare @EndIndex Int;
- Declare @NameValPairStartIndex Int;
- Declare @NameValPairEndIndex Int;
-
- Declare @VarPair VarChar(Max);
- Declare @VarName VarChar(Max);
- Declare @VarValue VarChar(Max);
-
- -- Replace Any "" Tags with the Default Value first
- Select @RetVal = dbo.vefn_RofstDataReplaceApplTagsWithDefaults(@Values);
-
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- While(@NameValPairStartIndex > 0 And @NameValPairStartIndex < @EndIndex)
- Begin
-
- -- Get Name Value Pair [ex. {EGS=1214}]
- Set @VarPair = SubString(@RetVal, @NameValPairStartIndex, (@NameValPairEndIndex - @NameValPairStartIndex) + 1);
-
- -- Remove Name Value Pair From Return Val
- Set @RetVal = Replace(@RetVal, @VarPair, '');
-
- -- Get Variable Name and Value
- Set @EqualsIndex = PatIndex('%=%', @VarPair);
-
- If (@EqualsIndex > 0)
- Begin
- Set @VarName = SubString(@VarPair, 2, @EqualsIndex - 2);
- Set @VarValue = SubString(@VarPair, @EqualsIndex + 1, Len(@VarPair) - @EqualsIndex - 1);
- Set @VarName = Concat('{', @VarName, '}');
-
- -- Replace All Occurences
- Set @RetVal = Replace(@RetVal, @VarName, @VarValue);
- End
-
- -- Get Updated Index Values
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- End -- End While(@ReplaceVarEndTagIndex > 0)
-
- Return @RetVal;
-
- END
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Error on Creation'
- GO
-
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataReplaceApplTagsWithDefaults] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceApplTagsWithDefaults' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataReplaceApplTagsWithDefaults]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/25/2022
- -- Description: Replaces any "" tags with the default value
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataReplaceApplTagsWithDefaults](@Values VarChar(Max)) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @DefaultValue VarChar(Max) = '';
-
- Declare @StartTagIndex Int;
- Declare @EndTagIndex Int;
- Declare @StartTagValue VarChar(Max);
-
- Set @RetVal = @Values;
- Set @StartTagIndex = PatIndex('%%', @RetVal);
-
- While (@StartTagIndex > 0)
- Begin
-
- Set @StartTagValue = SubString(@RetVal, @StartTagIndex, (@EndTagIndex - @StartTagIndex) + 5);
- Set @DefaultValue = Replace(@StartTagValue, '%', @DefaultValue);
-
- Set @DefaultValue = RTrim(SubString(@DefaultValue, 0, @EndTagIndex));
- Set @RetVal = Replace(@RetVal, @StartTagValue, @DefaultValue);
-
- Set @StartTagIndex = PatIndex('%%', @RetVal);
-
- End -- While (@StartTagIndex > 0)
-
- Return @RetVal;
-
- END
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceApplTagsWithDefaults] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceApplTagsWithDefaults] Error on Creation'
- GO
-
-
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataGetLoadStatus] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataGetLoadStatus' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataGetLoadStatus]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 05/20/2022
- -- Description: Gets the current load status for a Rofst Binary
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataGetLoadStatus](@RofstID Int) Returns Int
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RofstHeaderStatusID Int;
- Declare @NumOfRecordsStart Int;
- Declare @NumOfRecordsEnd Int;
- Declare @CreateDate DateTime;
- Declare @LoadedDate DateTime;
-
- -- Set Default Values
- Set @RofstHeaderStatusID = 0; -- [Unknown]
- Set @NumOfRecordsStart = -1;
- Set @NumOfRecordsEnd = -1;
-
- -- Get RofstHeader Data
- Select @CreateDate = CreateDate, @LoadedDate = LoadedDate
- From RofstHeader with (NoLock)
- Where RofstID = @RofstID;
-
- -- Check Current Status of RofstHeader/Data
- If (@CreateDate is null)
- Begin
- Set @RofstHeaderStatusID = 1; -- [Not Loaded]
- End
- Else If (Not @LoadedDate is null)
- Begin
- Set @RofstHeaderStatusID = 3; -- [Load Complete]
- End
- Else If (@LoadedDate is null)
- Begin
-
- -- Check if the record count for Rofst Default Values is still increasing
- --Declare @cnt Int = 4000000;
- Declare @cnt Int = 2000000;
-
- Select @NumOfRecordsStart = Count(1) From vwRofstData_RofstDefaultValues Where RofstID = @RofstID;
-
- While (@cnt > 0)
- Set @cnt = @Cnt -1;
-
- Select @NumOfRecordsEnd = Count(1) From vwRofstData_RofstDefaultValues Where RofstID = @RofstID;
-
- If (@NumOfRecordsStart < @NumOfRecordsEnd)
- Set @RofstHeaderStatusID = 2; -- [In Progress]
- Else
- Set @RofstHeaderStatusID = 4; -- [Load Failed]
- End
- Else
- Begin
- Set @RofstHeaderStatusID = 0; -- [Unknown]
- End
-
-
- Return @RofstHeaderStatusID;
-
- END
- GO
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataGetLoadStatus] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataGetLoadStatus] Error on Creation'
- GO
-
-
- /*
- ----------------------------------------------------------------------------------
- Views:
- ----------------------------------------------------------------------------------
- [dbo].[vwRofstData_RofstChildren]
- [dbo].[vwRofstData_RofstDatabases]
- [dbo].[vwRofstData_RofstDefaultValues]
- [dbo].[vwRofstData_RofstHeaders]
- [dbo].[vwRofstData_RofstHeaderStatuses]
- */
-
- /****** Object: View [dbo].[vwRofstData_RofstChildren] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstChildren' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstChildren]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for RofstChildren (RoChild & Groups)
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstChildren]
- As
-
- Select rc.RofstChildID as 'RofstChildID',
- rd.RofstID as 'RofstID',
- -- RoDatabase Info
- rd.dbiID as 'dbiID',
- rd.dbiType as 'dbiType',
- rd.dbiAW as 'dbiAW',
- rd.dbiTitle as 'dbiTitle',
- rd.dbiAP as 'dbiAP',
- -- RoChild Info
- rc.ID as 'ID',
- rc.ParentID as 'ParentID',
- rc.[type] as 'type',
- Case When (rc.[type] = 1) Then 'Single Line Text' -- Fixed Length Text
- When (rc.[type] = 2) Then 'Table'
- When (rc.[type] = 3) Then 'Multiple Line Text'
- When (rc.[type] = 4) Then 'X/Y Plot'
- When (rc.[type] = 8) Then 'Image'
- Else 'Unknown' End as 'TypeDescription',
- rc.title as 'title',
- rc.roid as 'roid',
- rc.appid as 'appid',
- rc.[value] as 'value',
- Case When (Not rc.[value] is null) Then rd.dbiAP + '-' + rc.appid Else null End as 'AccPageID'
- From RofstChild rc With (NoLock)
- inner join RofstDatabase rd With (NoLock) on rc.RofstID = rd.RofstID and rc.dbiID = rd.dbiID;
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstChildren] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstChildren] Error on Creation'
- GO
-
-
- /****** Object: View [dbo].[vwRofstData_RofstDatabases] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstDatabases' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstDatabases]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for RofstDatabases
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstDatabases]
- As
-
- Select rd.RofstID as 'RofstID',
- rd.dbiID as 'dbiID',
- rd.dbiType as 'dbiType',
- rd.dbiAW as 'dbiAW',
- rd.dbiTitle as 'dbiTitle',
- rd.dbiAP as 'dbiAP',
- rd.ID as 'ID',
- rd.ParentID as 'ParentID'
- From RofstDatabase rd With (NoLock)
-
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstDatabases] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstDatabases] Error on Creation'
- GO
-
-
- /****** Object: View [dbo].[vwRofstData_RofstDefaultValues] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstDefaultValues' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstDefaultValues]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for Rofst Roid Default Values
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstDefaultValues]
- As
-
- Select rdv.RofstID as 'RofstID',
- rdv.roid as 'roid',
- rdv.[value] as 'value',
- rdv.AccPageID as 'AccPageID'
- From RofstDefaultValue rdv With (NoLock)
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstDefaultValues] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstDefaultValues] Error on Creation'
- GO
-
- /****** Object: View [dbo].[vwRofstData_RofstHeaderStatuses] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstHeaderStatuses' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstHeaderStatuses]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 05/20/2022
- Description: (RofstData) Master View for RofstHeader Statuses
- (0) Unknown (1) Not Loaded (2) In Progress (3) Load Complete (4) Load Failed
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstHeaderStatuses]
- As
-
- Select '0' as 'RofstHeaderStatusID', 'Unknown' as 'RofstHeaderStatus'
- Union All
- Select '1' as 'RofstHeaderStatusID', 'Not Loaded' as 'RofstHeaderStatus'
- Union All
- Select '2' as 'RofstHeaderStatusID', 'In Progress' as 'RofstHeaderStatus'
- Union All
- Select '3' as 'RofstHeaderStatusID', 'Load Complete' as 'RofstHeaderStatus'
- Union All
- Select '4' as 'RofstHeaderStatusID', 'Load Failed' as 'RofstHeaderStatus'
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstHeaderStatuses] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstHeaderStatuses] Error on Creation'
- GO
-
-
- /****** Object: View [dbo].[vwRofstData_RofstHeaders] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstHeaders' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstHeaders]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for RofstHeaders
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstHeaders]
- As
-
- Select rh.RofstID as 'RofstID',
- hs.RofstHeaderStatusID as 'RofstHeaderStatusID',
- hs.RofstHeaderStatus as 'RofstHeaderStatus',
- rh.hSize as 'hSize',
- rh.hMonth as 'hMonth',
- rh.hDay as 'hDay',
- rh.hcYear as 'hcYear',
- rh.hcMonth as 'hcMonth',
- rh.hcDay as 'hcDay',
- rh.hcHour as 'hcHour',
- rh.hcMin as 'hcMin',
- rh.hcSec as 'hcSec',
- rh.hcHund as 'hcHund',
- rh.LoadedDate as 'LoadedDate',
- rh.CreateUserID as 'CreateUserID',
- rh.CreateDate as 'CreateDate'
- From RofstHeader rh With (NoLock)
- inner join vwRofstData_RofstHeaderStatuses hs on hs.RofstHeaderStatusID = dbo.vefn_RofstDataGetLoadStatus(rh.RofstID)
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstHeaders] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstHeaders] Error on Creation'
- GO
-
-
-
-
-
- /*
- ----------------------------------------------------------------------------------
- Stored Procs: (Update Existing)
- ----------------------------------------------------------------------------------
- [dbo].[updateROFst]
- [dbo].[getROImage]
- [dbo].[getROFstsByRODbID]
- [dbo].[getROFsts]
- [dbo].[getRoFstBySize]
- [dbo].[getROFstByRODbID_DTS]
- [dbo].[getROFst]
- [dbo].[getRODb]
- [dbo].[getJustROFst]
- [dbo].[getFiguresByImageID]
- [dbo].[getDocVersion]
- */
-
-
- /****** Object: StoredProcedure [dbo].[updateROFst] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'updateROFst' AND type in (N'P'))
- DROP PROCEDURE [dbo].[updateROFst]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[updateROFst]
- (
- @ROFstID int,
- @RODbID int,
- @ROLookup varbinary(MAX),
- @Config nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
- )
- WITH EXECUTE AS OWNER
- AS
- BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [ROFsts]
- SET
- [RODbID]=@RODbID,
- --[ROLookup]=@ROLookup,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [ROFstID]=@ROFstID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [ROFsts] WHERE [ROFstID]=@ROFstID)
- RAISERROR('ROFst record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('ROFst has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [ROFsts] WHERE [ROFstID]=@ROFstID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
- END TRY
- BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
- END CATCH
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [updateROFst] Succeeded'
- ELSE PRINT 'Procedure Creation: [updateROFst] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getROImage] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getROImage' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getROImage]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getROImage]
- (
- @ImageID int
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [ImageID],
- [RODbID],
- [FileName],
- [Content],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(1) FROM [Figures] WHERE [Figures].[ImageID]=[ROImages].[ImageID]) [FigureCount]
- FROM [ROImages]
- WHERE [ImageID]=@ImageID
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- --[ROFsts].[ROLookup] [ROFst_ROLookup],
- null as [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Figures]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Figures].[ROFstID]
- WHERE
- [Figures].[ImageID]=@ImageID
-
- RETURN
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getROImage] Succeeded'
- ELSE PRINT 'Procedure Creation: [getROImage] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getROFstsByRODbID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getROFstsByRODbID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getROFstsByRODbID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getROFstsByRODbID]
- (
- @RODbID int
- )
- WITH EXECUTE AS OWNER
- AS
-
- SELECT
- [ROFsts].[ROFstID],
- [ROFsts].[RODbID],
- --[ROFsts].[ROLookup],
- null as [ROLookup],
- [ROFsts].[Config],
- [ROFsts].[DTS],
- [ROFsts].[UserID],
- [ROFsts].[LastChanged],
- (SELECT COUNT(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT COUNT(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE
- [ROFsts].[RODbID]=@RODbID
-
- RETURN
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getROFstsByRODbID] Succeeded'
- ELSE PRINT 'Procedure Creation: [getROFstsByRODbID] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getROFsts] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getROFsts' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getROFsts]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getROFsts]
-
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [ROFstID],
- [RODbID],
- --[ROLookup],
- null as [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT Count(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
-
- RETURN
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getROFsts] Succeeded'
- ELSE PRINT 'Procedure Creation: [getROFsts] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[getRoFstBySize] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getRoFstBySize' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getRoFstBySize]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- Create PROCEDURE [dbo].[getRoFstBySize]
- (
- @RODbID int,
- @Len int
- )
- WITH EXECUTE AS OWNER
- AS
-
- select [ROFstID],
- [RODbID],
- --[ROLookup],
- null as [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT Count(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- from [ROFsts]
- where len(rolookup) = @len and [RODbID] = @RODbID
-
- RETURN
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getRoFstBySize] Succeeded'
- ELSE PRINT 'Procedure Creation: [getRoFstBySize] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getROFstByRODbID_DTS] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getROFstByRODbID_DTS' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getROFstByRODbID_DTS]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getROFstByRODbID_DTS]
- (
- @RODbID int,
- @DTS datetime
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [ROFstID],
- [RODbID],
- --[ROLookup],
- null as [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT Count(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [RODbID]=@RODbID AND [DTS]=@DTS
-
- RETURN
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getROFstByRODbID_DTS] Succeeded'
- ELSE PRINT 'Procedure Creation: [getROFstByRODbID_DTS] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getROFst] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getROFst' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getROFst]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getROFst]
-
- (
- @ROFstID int
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [ROFstID],
- [RODbID],
- -- [ROLookup],
- null as [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT Count(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [ROFstID]=@ROFstID
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [DocVersions].[FolderID] [DocVersion_FolderID],
- [DocVersions].[VersionType] [DocVersion_VersionType],
- [DocVersions].[Name] [DocVersion_Name],
- [DocVersions].[Title] [DocVersion_Title],
- [DocVersions].[ItemID] [DocVersion_ItemID],
- [DocVersions].[FormatID] [DocVersion_FormatID],
- [DocVersions].[Config] [DocVersion_Config],
- [DocVersions].[DTS] [DocVersion_DTS],
- [DocVersions].[UserID] [DocVersion_UserID]
- FROM [Associations]
- JOIN [DocVersions] ON
- [DocVersions].[VersionID]=[Associations].[VersionID]
- WHERE
- [Associations].[ROFstID]=@ROFstID
-
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROImages].[RODbID] [ROImage_RODbID],
- [ROImages].[FileName] [ROImage_FileName],
- [ROImages].[Content] [ROImage_Content],
- [ROImages].[Config] [ROImage_Config],
- [ROImages].[DTS] [ROImage_DTS],
- [ROImages].[UserID] [ROImage_UserID]
- FROM [Figures]
- JOIN [ROImages] ON
- [ROImages].[ImageID]=[Figures].[ImageID]
- WHERE
- [Figures].[ROFstID]=@ROFstID
-
- RETURN
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getROFst] Succeeded'
- ELSE PRINT 'Procedure Creation: [getROFst] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getRODb] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getRODb' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getRODb]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getRODb]
- (
- @RODbID int
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [RODbID],
- [ROName],
- [FolderPath],
- [DBConnectionString],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- (SELECT Count(1) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- (SELECT Count(1) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- (SELECT Count(1) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [RODbs]
- WHERE [RODbID]=@RODbID
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DROUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DROUsages].[RODbID]=@RODbID
-
-
- SELECT
- [ROFsts].[ROFstID],
- [ROFsts].[RODbID],
- --[ROFsts].[ROLookup],
- null as [ROLookup],
- [ROFsts].[Config],
- [ROFsts].[DTS],
- [ROFsts].[UserID],
- [ROFsts].[LastChanged]
- FROM [ROFsts]
- WHERE
- [ROFsts].[RODbID]=@RODbID
-
-
- SELECT
- [ROImages].[ImageID],
- [ROImages].[RODbID],
- [ROImages].[FileName],
- [ROImages].[Content],
- [ROImages].[Config],
- [ROImages].[DTS],
- [ROImages].[UserID],
- [ROImages].[LastChanged]
- FROM [ROImages]
- WHERE
- [ROImages].[RODbID]=@RODbID
-
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID
-
- RETURN
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getRODb] Succeeded'
- ELSE PRINT 'Procedure Creation: [getRODb] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getJustROFst] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getJustROFst' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getJustROFst]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getJustROFst]
- (
- @ROFstID int
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [ROFstID],
- [RODbID],
- --[ROLookup],
- null as [ROLookup],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT Count(1) FROM [Associations] WHERE [Associations].[ROFstID]=[ROFsts].[ROFstID]) [AssociationCount],
- (SELECT Count(1) FROM [Figures] WHERE [Figures].[ROFstID]=[ROFsts].[ROFstID]) [FigureCount]
- FROM [ROFsts]
- WHERE [ROFstID]=@ROFstID
-
- RETURN
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getJustROFst] Succeeded'
- ELSE PRINT 'Procedure Creation: [getJustROFst] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getFiguresByImageID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getFiguresByImageID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getFiguresByImageID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getFiguresByImageID]
- (
- @ImageID int
- )
- WITH EXECUTE AS OWNER
- AS
-
- SELECT
- [Figures].[FigureID],
- [Figures].[ROFstID],
- [Figures].[ImageID],
- [Figures].[Config],
- [Figures].[DTS],
- [Figures].[UserID],
- [Figures].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- --[ROFsts].[ROLookup] [ROFst_ROLookup],
- null as [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Figures]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Figures].[ROFstID]
- WHERE
- [Figures].[ImageID]=@ImageID
-
- RETURN
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getFiguresByImageID] Succeeded'
- ELSE PRINT 'Procedure Creation: [getFiguresByImageID] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[getDocVersion] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'getDocVersion' AND type in (N'P'))
- DROP PROCEDURE [dbo].[getDocVersion]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author:
- Create Date:
- Description:
- ==========================================================================================================
- */
- CREATE PROCEDURE [dbo].[getDocVersion]
- (
- @VersionID int
- )
- WITH EXECUTE AS OWNER
- AS
- SELECT
- [VersionID],
- [FolderID],
- [VersionType],
- [Name],
- [Title],
- [ItemID],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(1) FROM [Associations] WHERE [Associations].[VersionID]=[DocVersions].[VersionID]) [AssociationCount]
- FROM [DocVersions]
- WHERE [VersionID]=@VersionID
-
- SELECT
- [Associations].[AssociationID],
- [Associations].[VersionID],
- [Associations].[ROFstID],
- [Associations].[Config],
- [Associations].[DTS],
- [Associations].[UserID],
- [Associations].[LastChanged],
- [ROFsts].[RODbID] [ROFst_RODbID],
- --[ROFsts].[ROLookup] [ROFst_ROLookup],
- null as [ROFst_ROLookup],
- [ROFsts].[Config] [ROFst_Config],
- [ROFsts].[DTS] [ROFst_DTS],
- [ROFsts].[UserID] [ROFst_UserID]
- FROM [Associations]
- JOIN [ROFsts] ON
- [ROFsts].[ROFstID]=[Associations].[ROFstID]
- WHERE
- [Associations].[VersionID]=@VersionID
-
- RETURN
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [getDocVersion] Succeeded'
- ELSE PRINT 'Procedure Creation: [getDocVersion] Error on Creation'
- GO
-
-
-
- /*
- ----------------------------------------------------------------------------------
- Stored Procs: (Create New)
- ----------------------------------------------------------------------------------
- [dbo].[vesp_RofstHeaderInsert]
- [dbo].[vesp_RofstHeaderFinalizeLoad]
- [dbo].[vesp_RofstDataSearch]
- [dbo].[vesp_RofstDataGetValueDifferences]
- [dbo].[vesp_RofstDataGetRofstByID]
- [dbo].[vesp_RofstDataGetHeaderRofstByID]
- [dbo].[vesp_RofstDataGetDatabases]
- [dbo].[vesp_RofstDataGetDatabaseByID]
- [dbo].[vesp_RofstDataGetChildrenByType]
- [dbo].[vesp_RofstDataGetChildrenByRoid]
- [dbo].[vesp_RofstDataGetChildrenByRofstID]
- [dbo].[vesp_RofstDataGetChildrenByID]
- [dbo].[vesp_RofstDataGetChildByRoid]
- [dbo].[vesp_RofstDataGetChildByID]
- [dbo].[vesp_RofstDataGetChildByAccPageID]
- [dbo].[vesp_RofstDatabaseInsert]
- [dbo].[vesp_RofstChildInsert]
- */
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstHeaderInsert] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstHeaderInsert' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstHeaderInsert]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Inserts New Rofst Header Record
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstHeaderInsert]
- (
- @RofstID Int,
- @hSize Int,
- @hMonth Int,
- @hDay Int,
- @hcYear Int,
- @hcMonth Int,
- @hcDay Int,
- @hcHour Int,
- @hcMin Int,
- @hcSec Int,
- @hcHund Int,
- @UserID VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- -- Clear Existing Values (If Any)
- Delete From RofstHeader Where RofstID = @RofstID;
-
- -- Create RofstHeader records and Set LoadedDate to null
- Insert Into RofstHeader (RofstID, hSize, hMonth, hDay, hcYear, hcMonth, hcDay, hcHour, hcMin, hcSec, hcHund, LoadedDate, CreateUserID, CreateDate)
- Values (@RofstID, @hSize, @hMonth, @hDay, @hcYear, @hcMonth, @hcDay, @hcHour, @hcMin, @hcSec, @hcHund, null, @UserID, GetDate());
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstHeaderInsert] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstHeaderInsert] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstHeaderFinalizeLoad] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstHeaderFinalizeLoad' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstHeaderFinalizeLoad]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Finalizes Rofst Header Record / Updates LoadedDate if Success
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstHeaderFinalizeLoad]
- (
- @RofstID Int
- )
- With Execute as Owner
- As
- Begin
-
- -- Set LoadedDate on RofstHeader
- Update RofstHeader
- Set LoadedDate = GetDate()
- Where RofstID = @RofstID;
-
- -- Rebuild/Reorganize Indexes
- Exec [dbo].[vesp_UtilityCheckIndexes] 20.0, 5.0, 0, 1;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstHeaderFinalizeLoad] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstHeaderFinalizeLoad] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataSearch] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataSearch' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataSearch]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: RO Default Value Search
-
- @SearchTypeID => (1) Starts With (2) Ends With (3) Contains (4) Exact Match
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataSearch]
- (
- @RofstID int,
- @Value VarChar(Max) = null,
- @SearchTypeID Int = 1, -- Starts With
- @MaxNumOfRecords Int = null
- )
- With Execute as Owner
- As
- Begin
-
- -- Remove any leading/trailing white spaces
- Set @Value = dbo.vefn_Clean( @Value, 0, null );
-
- -- Escape any % signs in the search value
- Set @Value = Replace( @Value, '%', '[%]' );
-
- -- Format search value
- If (Len(@Value) = 0) Set @Value = null;
-
- -- Create Temp Results Table
- Create Table #SearchResults
- (roid VarChar(50) Not Null, [value] VarChar(Max), RowNum Int Not Null Primary Key);
-
- -- Select roids/values based on search criteria
- Insert Into #SearchResults (roid, [value], RowNum)
- Select rdv.roid,
- rdv.[value],
- Row_Number() Over (Order By rdv.[value] Asc, rdv.roid Asc) as 'RowNum'
- From vwRofstData_RofstDefaultValues rdv
- Where rdv.RofstID = @RofstID
- And ((@Value is null)
- Or (@SearchTypeID = 1 And rdv.[value] like @Value + '%') -- Starts With
- Or (@SearchTypeID = 2 And rdv.[value] like '%' + @Value) -- Ends With
- Or (@SearchTypeID = 3 And rdv.[value] like '%' + @Value + '%') -- Contains
- Or (@SearchTypeID = 4 And rdv.[value] = @Value)) -- Exact Match
- Order By rdv.[value] Asc, rdv.roid Asc
- Option (Recompile);
-
- -- Return the specified number of results
- Select sr.roid, sr.[value]
- From #SearchResults sr
- Where (@MaxNumOfRecords is null Or sr.RowNum <= @MaxNumOfRecords)
- Order By sr.RowNum Asc;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataSearch] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataSearch] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetValueDifferences] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetValueDifferences' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetValueDifferences]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Value Differences between (2) Rofst (Ro.fst) Files
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetValueDifferences]
- (
- @OriginalRofstID Int,
- @CurrentRofstID Int
- )
- With Execute as Owner
- As
- Begin
-
- Declare @Differences Table (OriginalRoid VarChar(25), OriginalValue VarChar(Max),
- CurrentRoid VarChar(25), CurrentValue VarChar(Max));
-
-
- With OriginalRofst as
- (
- Select rc.roid, rc.[value]
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @OriginalRofstID
- And Not rc.[value] is null
-
- ), CurrentRofst as (
-
- Select rc.roid, rc.[value]
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @CurrentRofstID
- And Not rc.[value] is null
- )
- Insert Into @Differences (OriginalRoid, OriginalValue, CurrentRoid, CurrentValue)
- Select o.roid, o.[value], c.roid, c.[value]
- From OriginalRofst o
- left outer join CurrentRofst c on c.roid = o.roid
- Where o.[value] <> c.[value];
-
-
- Select OriginalRoid as 'Roid',
- Case When (CurrentValue is null) Then 1 Else 0 End as 'IsDeleted',
- Case When (Not CurrentValue is null) Then 1 Else 0 End as 'IsModified'
- From @Differences;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetValueDifferences] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetValueDifferences] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetRofstByID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetRofstByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetRofstByID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofsts Info by ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetRofstByID]
- (
- @RofstID int,
- @IncludeRoLookup Bit
- )
- With Execute as Owner
- As
- Begin
-
- Select r.ROFstID,
- r.RODbID,
- Case (@IncludeRoLookup) When 1 Then r.ROLookup Else null End as 'ROLookup',
- r.DTS,
- r.UserID,
- r.LastChanged
- From ROFsts r with (NoLock)
- Where r.RofstID = @RofstID;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetRofstByID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetRofstByID] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetHeaderRofstByID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetHeaderRofstByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetHeaderRofstByID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Header Info by ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetHeaderRofstByID]
- (
- @RofstID int
- )
- With Execute as Owner
- As
- Begin
-
- Select rh.RofstID as 'RofstID',
- rh.RofstHeaderStatusID as 'RofstHeaderStatusID',
- rh.RofstHeaderStatus as 'RofstHeaderStatus',
- rh.hSize as 'hSize',
- rh.hMonth as 'hMonth',
- rh.hDay as 'hDay',
- rh.hcYear as 'hcYear',
- rh.hcMonth as 'hcMonth',
- rh.hcDay as 'hcDay',
- rh.hcHour as 'hcHour',
- rh.hcMin as 'hcMin',
- rh.hcSec as 'hcSec',
- rh.hcHund as 'hcHund',
- rh.LoadedDate as 'LoadedDate',
- rh.CreateUserID as 'CreateUserID',
- rh.CreateDate as 'CreateDate'
- From vwRofstData_RofstHeaders rh
- Where rh.RofstID = @RofstID;
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetHeaderRofstByID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetHeaderRofstByID] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetDatabases] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetDatabases' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetDatabases]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets all Rofst Databases for a specified Rofst File
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetDatabases]
- (
- @RofstID int
- )
- With Execute as Owner
- As
- Begin
-
- Select rd.RofstID,
- rd.dbiID,
- rd.dbiType,
- rd.dbiAW,
- rd.dbiTitle,
- rd.dbiAP,
- rd.ID,
- rd.ParentID
- From vwRofstData_RofstDatabases rd
- Where rd.RofstID = @RofstID
- Order By rd.dbiID Asc;
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetDatabases] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetDatabases] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetDatabaseByID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetDatabaseByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetDatabaseByID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Database Info by ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetDatabaseByID]
- (
- @RofstID int,
- @dbiID int
- )
- With Execute as Owner
- As
- Begin
-
- Select rd.RofstID,
- rd.dbiID,
- rd.dbiType,
- rd.dbiAW,
- rd.dbiTitle,
- rd.dbiAP,
- rd.ID,
- rd.ParentID
- From vwRofstData_RofstDatabases rd
- Where rd.RofstID = @RofstID
- And rd.dbiID = @dbiID;
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetDatabaseByID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetDatabaseByID] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildrenByType] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildrenByType' AND type in (N'P'))
- DROP PROCEDURE[dbo].[vesp_RofstDataGetChildrenByType]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Children Info by Type
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildrenByType]
- (
- @RofstID int,
- @ValueTypes VarChar(Max)
- )
- With Execute as Owner
- As
- Begin
-
- -- Remove any leading/trailing white spaces
- Set @ValueTypes = dbo.vefn_Clean( @ValueTypes, 0, null );
-
- -- Format search value
- If (Len(@ValueTypes) = 0) Set @ValueTypes = null;
-
- With ValueTypes as
- (
- Select Cast(x.ListValue as Int) as 'ListValue'
- From dbo.vefn_ParseStringListToTable(@ValueTypes, ',') as x
- )
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Left outer join ValueTypes vt on vt.ListValue = rc.[type]
- Where rc.RofstID = @RofstID
- And Not rc.[value] is null
- And (@ValueTypes is null Or Not vt.ListValue is null)
- Option (Recompile);
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByType] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByType] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildrenByRoid] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildrenByRoid' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildrenByRoid]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Children (RoChild) Info by Roid
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildrenByRoid]
- (
- @RofstID int,
- @Roid VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- With RoParent as
- (
- Select RofstID, dbiID, ID, [type], title, roid
- From vwRofstData_RofstChildren
- Where RofstID = @RofstID And roid = @Roid
- )
- Select rc.RofstID,
- rc.dbiID,
- -- Ro Parent Info
- rp.[type] as 'ParentType',
- rp.title as 'ParentTitle',
- rp.roid as 'ParentRoid',
- -- Ro Child Info
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From RoParent rp
- inner join vwRofstData_RofstChildren rc on rc.RofstID = rp.RofstID and rc.dbiID = rp.dbiID and rc.ParentID = rp.ID
- Order By rc.ID Asc;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByRoid] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByRoid] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildrenByRofstID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildrenByRofstID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildrenByRofstID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets All Rofst Children Info by Rofst ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildrenByRofstID]
- (
- @RofstID int
- )
- With Execute as Owner
- As
- Begin
-
- Select rc.RofstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And Not rc.[value] is null
- Order By rc.dbiID Asc, rc.[type] Asc, rc.roid Asc;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByRofstID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByRofstID] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildrenByID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildrenByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildrenByID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Children Info by DbiID and Object ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildrenByID]
- (
- @RofstID int,
- @DbiID int,
- @ID Int
- )
- With Execute as Owner
- As
- Begin
-
-
- Select rc.RofstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.dbiID = @DbiID
- And rc.ParentID = @ID
- Order By rc.ID Asc;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildrenByID] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildByRoid] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByRoid' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByRoid]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Child Info by Roid
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildByRoid]
- (
- @RofstID int,
- @Roid VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.roid = @Roid;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByRoid] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByRoid] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildByID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Child Info by dbiID and Object ID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildByID]
- (
- @RofstID int,
- @DbiID int,
- @ID Int
- )
- With Execute as Owner
- As
- Begin
-
- Select rc.RofstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.dbiID = @DbiID
- And rc.ID = @ID;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByID] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildByAccPageID] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByAccPageID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByAccPageID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Gets Rofst Child Info by AccPageID
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildByAccPageID]
- (
- @RofstID int,
- @AccPageID VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.AccPageID = @AccPageID;
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDatabaseInsert] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDatabaseInsert' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDatabaseInsert]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Inserts New Rofst Database Record
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDatabaseInsert]
- (
- @RofstID Int,
- @dbiID Int,
- @dbiType Int,
- @dbiAW Int,
- @dbiTitle VarChar(Max),
- @dbiAP VarChar(Max),
- @ID Int,
- @ParentID Int
- )
- With Execute as Owner
- As
- Begin
-
-
- Insert Into RofstDatabase (RofstID, dbiID, dbiType, dbiAW, dbiTitle, dbiAP, ID, ParentID)
- Values (@RofstID, @dbiID, @dbiType, @dbiAW, @dbiTitle, @dbiAP, @ID, @ParentID );
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDatabaseInsert] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDatabaseInsert] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstChildInsert] Script Date: 06/23/2022 ******/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstChildInsert' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstChildInsert]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/23/2022
- Description: Inserts New Rofst Child Record / Default Values
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstChildInsert]
- (
- @RofstID Int,
- @ID Int,
- @ParentID Int,
- @dbiID Int,
- @type Int,
- @title VarChar(Max),
- @roid VarChar(50),
- @appid VarChar(Max) = null,
- @value VarChar(Max) = null
- )
- With Execute as Owner
- As
- Begin
-
- Declare @AccPageID VarChar(Max) = null;
- Declare @DefaultValues VarChar(Max);
-
-
- -- Create Rofst Child/Group Record
- Insert Into RofstChild (RofstID, ID, ParentID, dbiID, [type], title, roid, appid, [value])
- Values (@RofstID, @ID, @ParentID, @dbiID, @type, @title, @roid, @appid, @value);
-
-
- -- Check for appid, if exists, then insert the default value for each return type if multi-value
- If (Len(@appid) > 0)
- Begin
-
- -- Get Accessory Page ID
- Select @AccPageID = Concat(d.dbiAP, '-', @appid)
- From RofstDatabase d with (NoLock)
- Where d.RofstID = @RofstID And d.dbiID = @dbiID;
-
- -- Insert Rofst Default Value (Parent RoChild) [roid = 12]
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Values (@RofstID, @roid, Replace(@title, '\u160?', ' '), @AccPageID);
-
- -- Insert Rofst Default Value(s) (Children RoChild) [roid = 16] (Do Not Insert Duplicates)
- Select @DefaultValues = Replace(dbo.vefn_RofstDataReplaceVars(@value), '{', '');
-
- With ChildrenValues as
- (
- Select (x.ListPosition + 40) as 'OffsetIndex',
- Case When (PatIndex('%=%', x.ListValue) > 0) Then Right(x.ListValue, Len(x.ListValue)-PatIndex('%=%', x.ListValue)) Else x.ListValue End as 'DefaultValue'
- From [dbo].[vefn_ParseStringListToTable](@DefaultValues, '}') x
- Where Len(x.ListValue) > 0
- )
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, Cast(Format(Min(OffsetIndex), 'D4') as VarChar(4))) as 'roid',
- DefaultValue as 'value',
- null as 'AccPageID'
- From ChildrenValues
- Group By DefaultValue
- Order By Min(OffsetIndex) Asc
-
- End -- (Len(@appid) > 0)
-
-
- Return;
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstChildInsert] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstChildInsert] Error on Creation'
- GO
-
-
-/*
-==========================================================================================================
- End: B2022-026 RO Memory reduction coding (Jakes Merge) [Version 2.0]
-==========================================================================================================
-*/
-
-/*
-==========================================================================================================
- Start: B2022-083: Support Conditional RO Values (v2.1)
-==========================================================================================================
-*/
-
-/*
- ----------------------------------------------------------------------------------
- Tables:
- ----------------------------------------------------------------------------------
- [RofstExtension] [Created]
- */
-
- -- If RofstExtension table already exists then don't drop and recreate it
- IF Not Exists(SELECT * FROM sys.objects Where name = 'RofstExtension' AND type in (N'U'))
- Begin
-
- SET ANSI_NULLS ON
- SET QUOTED_IDENTIFIER ON
-
- CREATE TABLE [dbo].[RofstExtension](
- [Offset] [int] NOT NULL,
- [RoidExt] [varchar](4) NOT NULL,
- [AccPageExt] [varchar](5) NOT NULL,
- CONSTRAINT [PK_RofstExtension] PRIMARY KEY CLUSTERED
- (
- [Offset] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- ) ON [PRIMARY]
-
- IF (@@Error = 0) PRINT 'Table Creation: [RofstExtension] Succeeded'
- ELSE PRINT 'Table Creation: [RofstExtension] Error on Creation'
-
- IF (@@Error = 0)
- Begin
-
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (1,'0041','A');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (2,'0042','B');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (3,'0043','C');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (4,'0044','D');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (5,'0045','E');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (6,'0046','F');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (7,'0047','G');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (8,'0048','H');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (9,'0049','I');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (10,'004A','J');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (11,'004B','K');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (12,'004C','L');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (13,'004D','M');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (14,'004E','N');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (15,'004F','O');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (16,'0050','P');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (17,'0051','Q');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (18,'0052','R');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (19,'0053','S');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (20,'0054','T');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (21,'0055','U');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (22,'0056','V');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (23,'0057','W');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (24,'0058','X');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (25,'0059','Y');
- Insert Into RofstExtension (Offset, RoidExt, AccPageExt) Values (26,'005A','Z');
-
- End
-
- End
- Go
-
-
-
- /*
- ----------------------------------------------------------------------------------
- Functions:
- ----------------------------------------------------------------------------------
- [dbo].[vefn_RofstDataCleanUnitInfoTags] [Created]
- [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults] [Created]
- [dbo].[vefn_RofstDataReplaceVars] [Modified]
- */
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataCleanUnitInfoTags] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataCleanUnitInfoTags' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataCleanUnitInfoTags]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 06/21/2022
- -- Description: Removes any legacy legacy unit info variables and fixes older applicability tags
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataCleanUnitInfoTags](@Values VarChar(Max), @RemoveUnitInfoVars bit = 0) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
-
- Set @RetVal = dbo.vefn_Clean(@Values, 1, null);
-
- If (Len(@RetVal) > 0)
- Begin
-
- -- Make Sure all tag/var instances are upper case & Remove any internal spaces
- Set @RetVal = Replace(@RetVal, 'U-OTHER TEXT', 'U-OTHERTEXT');
- Set @RetVal = Replace(@RetVal, 'U-OTHER NUMBER', 'U-OTHERNUMBER');
- Set @RetVal = Replace(@RetVal, 'U-OTHER NAME', 'U-OTHERNAME');
- Set @RetVal = Replace(@RetVal, 'U-OTHER ID', 'U-OTHERID');
- Set @RetVal = Replace(@RetVal, '', '');
-
- If (@RemoveUnitInfoVars > 0)
- Begin
-
- -- Remove any Unit Info Variables
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
-
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
-
- End
-
- End
-
- Return @RetVal;
-
- END
- Go
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataCleanUnitInfoTags] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataCleanUnitInfoTags] Error on Creation'
- GO
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceLegacyTagsWithDefaults' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 06/21/2022
- -- Description: Replaces any legacy applicability tags with the default value
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults](@Values VarChar(Max)) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @DefaultValue VarChar(Max) = '';
-
- Declare @StartTagIndex Int;
- Declare @EndTagIndex Int;
- Declare @StartTagValue VarChar(Max);
- Declare @StartValIndex Int;
- Declare @EndValIndex Int;
-
- Declare @TagName VarChar(Max);
- Declare @LegacyTagNames VarChar(Max) = 'U-ID,U-NUMBER,U-NAME,U-TEXT,U-OTHERID,U-OTHERNUMBER,U-OTHERNAME,U-OTHERTEXT';
-
- -- Make Sure all tag instances are upper case & Remove any internal spaces
- Set @RetVal = dbo.vefn_RofstDataCleanUnitInfoTags(@Values, 0);
-
-
- Declare LegacyTags_Cursor Cursor Fast_Forward For
- Select '{' + x.ListValue + '{' as 'TagName'
- From [dbo].[vefn_ParseStringListToTable](@LegacyTagNames, ',') x
-
- Open LegacyTags_Cursor
-
- Fetch Next From LegacyTags_Cursor Into @TagName
-
- While (@@FETCH_STATUS = 0)
- Begin
-
- -- Get Start/End Index of Tag
- Set @StartTagIndex = PatIndex('%' + @TagName + '%', @RetVal);
- Set @EndTagIndex = PatIndex('%}}%', @RetVal);
-
- While (@StartTagIndex > 0)
- Begin
-
- Set @StartTagValue = SubString(@RetVal, @StartTagIndex, (@EndTagIndex - @StartTagIndex) + 2);
-
- Set @StartValIndex = PatIndex('%=%', @StartTagValue);
- Set @EndValIndex = PatIndex('%}%', @StartTagValue);
-
- Set @DefaultValue = SubString(@StartTagValue, @StartValIndex + 1, (@EndValIndex - @StartValIndex) - 1);
- Set @RetVal = Replace(@RetVal, @StartTagValue, @DefaultValue);
-
- Set @StartTagIndex = PatIndex('%' + @TagName + '%', @RetVal);
- Set @EndTagIndex = PatIndex('%}}%', @RetVal);
-
- End -- While (@StartTagIndex > 0)
-
-
- Fetch Next From LegacyTags_Cursor Into @TagName
- End
-
- Close LegacyTags_Cursor;
- Deallocate LegacyTags_Cursor;
-
-
- Return @RetVal;
-
- END
- Go
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceLegacyTagsWithDefaults] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceLegacyTagsWithDefaults] Error on Creation'
- GO
-
-
- /****** Object: UserDefinedFunction [dbo].[vefn_RofstDataReplaceVars] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceVars' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataReplaceVars]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/25/2022
- -- Description: Replaces Any Variables and returns the rest of the value string
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataReplaceVars](@Values VarChar(Max)) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @EqualsIndex Int;
- Declare @EndIndex Int;
- Declare @NameValPairStartIndex Int;
- Declare @NameValPairEndIndex Int;
-
- Declare @VarPair VarChar(Max);
- Declare @VarName VarChar(Max);
- Declare @VarValue VarChar(Max);
-
- -- Replace Any "" Tags with the Default Value first
- Select @RetVal = dbo.vefn_RofstDataReplaceApplTagsWithDefaults(@Values);
-
- -- Replace Any Legacy Applicability Tags with the Default Value second
- Select @RetVal = dbo.vefn_RofstDataReplaceLegacyTagsWithDefaults(@RetVal);
-
-
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- While(@NameValPairStartIndex > 0 And @NameValPairStartIndex < @EndIndex)
- Begin
-
- -- Get Name Value Pair [ex. {EGS=1214}]
- Set @VarPair = SubString(@RetVal, @NameValPairStartIndex, (@NameValPairEndIndex - @NameValPairStartIndex) + 1);
-
- -- Remove Name Value Pair From Return Val
- Set @RetVal = Replace(@RetVal, @VarPair, '');
-
- -- Get Variable Name and Value
- Set @EqualsIndex = PatIndex('%=%', @VarPair);
-
- If (@EqualsIndex > 0)
- Begin
- Set @VarName = SubString(@VarPair, 2, @EqualsIndex - 2);
- Set @VarValue = SubString(@VarPair, @EqualsIndex + 1, Len(@VarPair) - @EqualsIndex - 1);
- Set @VarName = Concat('{', @VarName, '}');
-
- -- Replace All Occurences
- Set @RetVal = Replace(@RetVal, @VarName, @VarValue);
- End
-
- -- Get Updated Index Values
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- End -- End While(@ReplaceVarEndTagIndex > 0)
-
- Return @RetVal;
-
- END
- Go
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Error on Creation'
- GO
-
-
-
- /*
- ----------------------------------------------------------------------------------
- Views:
- ----------------------------------------------------------------------------------
- [dbo].[vwRofstData_RofstExtensions] [Created]
- [dbo].[vwRofstData_RofstValueTypes] [Created]
- [dbo].[vwRofstData_RofstBaseRoids] [Created]
- [dbo].[vwRofstData_RofstChildren] [Modified]
- */
-
- /****** Object: View [dbo].[vwRofstData_RofstExtensions] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstExtensions' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstExtensions]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/21/2024
- Description: (RofstData) Master View for RofstExtensions
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstExtensions]
- As
-
- Select re.Offset as 'Offset',
- re.RoidExt as 'RoidExt',
- re.AccPageExt as 'AccPageExt'
- From RofstExtension re With (NoLock)
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstExtensions] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstExtensions] Error on Creation'
- GO
-
-
-
- /****** Object: View [dbo].[vwRofstData_RofstValueTypes] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstValueTypes' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstValueTypes]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/21/2022
- Description: (RofstData) Master View for Rofst Value Types
- (0) Unknown (1) Single Line Text (2) Table (3) Multiple Line Text (4) X/Y Plot (8) Image
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstValueTypes]
- As
-
- Select '0' as 'TypeID', 'Unknown' as 'TypeDescription'
-
- Union All
-
- Select '1' as 'TypeID', 'Single Line Text' as 'TypeDescription' -- Fixed Length Text
-
- Union All
-
- Select '2' as 'TypeID', 'Table' as 'TypeDescription'
-
- Union All
-
- Select '3' as 'TypeID', 'Multiple Line Text' as 'TypeDescription'
-
- Union All
-
- Select '4' as 'TypeID', 'X/Y Plot' as 'TypeDescription'
-
- Union All
-
- Select '8' as 'TypeID', 'Image' as 'TypeDescription'
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstValueTypes] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstValueTypes] Error on Creation'
- GO
-
-
-
- /****** Object: View [dbo].[vwRofstData_RofstBaseRoids] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstBaseRoids' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstBaseRoids]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for Rofst Base Roid / AccPageID Values
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstBaseRoids]
- As
-
- Select RofstID as 'RofstID',
- Left(roid, 12) as 'BaseRoid',
- Left(AccPageID, (Len(AccPageID)-2)) as 'BaseAccPageID'
- From vwRofstData_RofstDefaultValues
- Where AccPageID like '%.A';
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstBaseRoids] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstBaseRoids] Error on Creation'
- GO
-
-
- /****** Object: View [dbo].[vwRofstData_RofstChildren] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vwRofstData_RofstChildren' AND type in (N'V'))
- DROP VIEW [dbo].[vwRofstData_RofstChildren]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2024
- Description: (RofstData) Master View for RofstChildren (RoChild & Groups)
- ==========================================================================================================
- */
- Create View [dbo].[vwRofstData_RofstChildren]
- As
-
- Select rc.RofstChildID as 'RofstChildID',
- rd.RofstID as 'RofstID',
- -- RoDatabase Info
- rd.dbiID as 'dbiID',
- rd.dbiType as 'dbiType',
- rd.dbiAW as 'dbiAW',
- rd.dbiTitle as 'dbiTitle',
- rd.dbiAP as 'dbiAP',
- -- RoChild Info
- rc.ID as 'ID',
- rc.ParentID as 'ParentID',
- rc.[type] as 'type',
- IsNull(vt.TypeDescription, 'Unknown') as 'TypeDescription',
- rc.title as 'title',
- rc.roid as 'roid',
- rc.appid as 'appid',
- rc.[value] as 'value',
- Case When (Not rc.[value] is null) Then rd.dbiAP + '-' + rc.appid Else null End as 'AccPageID'
- From RofstChild rc With (NoLock)
- inner join RofstDatabase rd With (NoLock) on rc.RofstID = rd.RofstID and rc.dbiID = rd.dbiID
- left outer join vwRofstData_RofstValueTypes vt on vt.TypeID = rc.[type];
-
- GO
-
- IF (@@Error = 0) PRINT 'View Creation: [vwRofstData_RofstChildren] Succeeded'
- ELSE PRINT 'View Creation: [vwRofstData_RofstChildren] Error on Creation'
- GO
-
-
-
- /*
- ----------------------------------------------------------------------------------
- Stored Procs:
- ----------------------------------------------------------------------------------
- [dbo].[vesp_RofstDataGetChildByID] [Deleted]
- [dbo].[vesp_RofstDataGetExtensions] [Created]
- [dbo].[vesp_RofstChildInsert] [Modified]
- [dbo].[vesp_RofstDataSearch] [Modified]
- [dbo].[vesp_RofstDataGetChildByAccPageID] [Modified]
- [dbo].[vesp_RofstDataGetChildByRoid] [Modified]
- */
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstHeaderInsert] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByID]
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Deletion: [vesp_RofstDataGetChildByID] Succeeded'
- ELSE PRINT 'Procedure Deletion: [vesp_RofstDataGetChildByID] Error on Creation'
- GO
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetExtensions] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetExtensions' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetExtensions]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 06/21/2022
- Description: Gets the Ro Lookup Extensions
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetExtensions]
- With Execute as Owner
- As
- Begin
-
- Select re.Offset,
- re.RoidExt,
- re.AccPageExt
- From vwRofstData_RofstExtensions re
- Order By re.Offset Asc;
-
-
- Return;
- End
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetExtensions] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetExtensions] Error on Creation'
- GO
-
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstChildInsert] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstChildInsert' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstChildInsert]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description:
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstChildInsert]
- (
- @RofstID Int,
- @ID Int,
- @ParentID Int,
- @dbiID Int,
- @type Int,
- @title VarChar(Max),
- @roid VarChar(50),
- @appid VarChar(Max) = null,
- @value VarChar(Max) = null
- )
- With Execute as Owner
- As
- Begin
-
- Declare @BaseAccPageID VarChar(Max) = null;
- Declare @DefaultValues VarChar(Max);
-
-
- -- Create Rofst Child/Group Record --> [Roid = (12) Digits]
- Insert Into RofstChild (RofstID, ID, ParentID, dbiID, [type], title, roid, appid, [value])
- Values (@RofstID, @ID, @ParentID, @dbiID, @type, @title, @roid, @appid, @value);
-
-
- -- Check for appid, if exists, then insert the default value for each return type if multi-value
- If (Len(@appid) > 0)
- Begin
-
- -- Get Accessory Page ID
- Select @BaseAccPageID = dbo.vefn_RofstDataCleanUnitInfoTags(Concat(d.dbiAP, '-', @appid), 1)
- From RofstDatabase d with (NoLock)
- Where d.RofstID = @RofstID And d.dbiID = @dbiID;
-
- -- Insert Rofst Default Value(s) (Children RoChild) --> [Roid = (16) Digits]
- Select @DefaultValues = Replace(dbo.vefn_RofstDataReplaceVars(@value), '{', '');
-
- With ChildrenValues as
- (
- Select x.ListPosition as 'OffsetIndex',
- Case When (PatIndex('%=%', x.ListValue) > 0) Then Right(x.ListValue, Len(x.ListValue)-PatIndex('%=%', x.ListValue)) Else x.ListValue End as 'DefaultValue'
- From [dbo].[vefn_ParseStringListToTable](@DefaultValues, '}') x
- Where Len(x.ListValue) > 0
- )
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, re.RoidExt) as 'roid',
- Case When (Len(RTrim(LTrim(cv.DefaultValue))) > 0 ) Then dbo.vefn_RofstDataCleanUnitInfoTags(cv.DefaultValue, 0) Else '[TBD]' End as 'value',
- Concat(@BaseAccPageID, '.', re.AccPageExt) as 'AccPageID'
- From ChildrenValues cv
- inner join vwRofstData_RofstExtensions re on re.Offset = cv.OffsetIndex
- Order By cv.OffsetIndex Asc
-
-
- End -- (Len(@appid) > 0)
-
-
- Return;
-
- End
- Go
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstChildInsert] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstChildInsert] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataSearch] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataSearch' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataSearch]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: RO Default Value Search
-
- @SearchTypeID => (1) Starts With (2) Ends With (3) Contains (4) Exact Match
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataSearch]
- (
- @RofstID int,
- @Value VarChar(Max) = null,
- @SearchTypeID Int = 1, -- Starts With
- @OnlyRoid16 Bit = 1, -- Return Only Roid16 Records
- @MaxNumOfRecords Int = null
- )
- With Execute as Owner
- As
- Begin
-
- -- Remove any leading/trailing white spaces
- Set @Value = dbo.vefn_Clean( @Value, 0, null );
-
- -- Escape any % signs in the search value
- Set @Value = Replace( @Value, '%', '[%]' );
-
- -- Format search value
- If (Len(@Value) = 0) Set @Value = null;
-
- -- Create Temp Results Table
- Create Table #SearchResults (roid VarChar(50) Not Null, [value] VarChar(Max), RowNum Int Not Null Primary Key);
-
- -- Select roids/values based on search criteria
- Insert Into #SearchResults (roid, [value], RowNum)
- Select rdv.roid,
- rdv.[value],
- Row_Number() Over (Order By rdv.[value] Asc, rdv.roid Asc) as 'RowNum'
- From vwRofstData_RofstDefaultValues rdv
- Where rdv.RofstID = @RofstID
- And (@OnlyRoid16 = 0 Or Len(rdv.roid) = 16)
- And ((@Value is null)
- Or (@SearchTypeID = 1 And rdv.[value] like @Value + '%') -- Starts With
- Or (@SearchTypeID = 2 And rdv.[value] like '%' + @Value) -- Ends With
- Or (@SearchTypeID = 3 And rdv.[value] like '%' + @Value + '%') -- Contains
- Or (@SearchTypeID = 4 And rdv.[value] = @Value)) -- Exact Match
- Order By rdv.[value] Asc, rdv.roid Asc
- Option (Recompile);
-
- -- Return the specified number of results
- Select sr.roid, sr.[value]
- From #SearchResults sr
- Where (@MaxNumOfRecords is null Or sr.RowNum <= @MaxNumOfRecords)
- Order By sr.RowNum Asc;
-
- Return;
- End
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataSearch] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataSearch] Error on Creation'
- GO
-
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildByAccPageID] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByAccPageID' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByAccPageID]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: Check if the AccPageID passed in has a specific Return Value Type Extension (.A, .B, .C, etc.)
- If so, then strip off the return value specific extension to get the BaseAccPageID for the lookup.
- Use the BaseAccPageID to lookup the BaseRoid, then use the Roid to lookup the Ro Child Object
-
- Note** Using the AccPageID to first lookup the roid, then using the roid to lookup the data is
- significantly faster than directly looking up the data using the AccPageID because of the indexes
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildByAccPageID]
- (
- @RofstID int,
- @AccPageID VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- Declare @BaseAccPageID VarChar(Max);
- Declare @Roid VarChar(Max);
-
- If (PatIndex('%.[A-Z]', @AccPageID) > 0)
- Set @BaseAccPageID = Left(@AccPageID, Len(@AccPageID)-2);
- Else
- Set @BaseAccPageID = @AccPageID;
-
- -- First use the AccPageID to get the BaseRoid
- Select @Roid = rb.BaseRoid
- From vwRofstData_RofstBaseRoids rb
- Where rb.RofstID = @RofstID
- And rb.BaseAccPageID = @BaseAccPageID;
-
- -- Then use the Roid to lookup the Ro Child Object
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.roid = @Roid;
-
- Return;
- End
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Error on Creation'
- GO
-
-
- /****** Object: StoredProcedure [dbo].[vesp_RofstDataGetChildByRoid] ***********************/
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstDataGetChildByRoid' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstDataGetChildByRoid]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: The data in the Rofst Children table currently only goes down to the (12) digit roid level.
- To look up a specific return type value (16) digit roid for a RO object, you first have to
- load the base RO object by its (12) digit roid in code, and then look for the specific
- return value in the RO objects children collection because the values for any
- multiple/variable return type formats can vary at runtime, based on your current selected
- DocVersion and the Selected Slave (Unit) / OtherChild Override.
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstDataGetChildByRoid]
- (
- @RofstID int,
- @Roid VarChar(50)
- )
- With Execute as Owner
- As
- Begin
-
- -- Only use the first (12) characters to lookup an RoChild by its roid
- -- If its a (16) digit roid, then use its last (4) characters [roidExt ==> specific to a return type value]
- -- to select the specified return value format type in the code once all of the children Ro Return types have
- -- been loaded into memory in the code
-
- Set @Roid = Left(@Roid + '00000000', 12);
-
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.roid = @Roid;
-
- Return;
- End
-
- GO
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByRoid] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByRoid] Error on Creation'
- GO
-
-
-
- -- Delete All Existing Rofst Table Data
- Delete From RofstHeader;
-
-
-/*
-==========================================================================================================
- End: B2022-083: Support Conditional RO Values (v2.1)
-==========================================================================================================
-*/
-
-/*
-==========================================================================================================
- Start: B2022-049 Unlink single procedure for enhanced (if data got corrupted)
-==========================================================================================================
-*/
-If Exists(SELECT * FROM sys.objects Where name = 'vesp_PurgeProcLinkedItemsAndChildren' AND type in (N'P'))
-DROP PROCEDURE [dbo].[vesp_PurgeProcLinkedItemsAndChildren]
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2022 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-Create PROCEDURE [dbo].[vesp_PurgeProcLinkedItemsAndChildren](@EnhanceID int, @EnhType int)
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- Only unlink for the input procedure number & its children. Do not follow the links, i.e. source or enhanced. This
- -- can be used for removing link information if the links between the 2, source & enhanced, get corrupted.
- declare @Enh1 TABLE
- (
- ID int,
- xConfig xml
- )
- insert into @Enh1
- select CC.ContentID, CC.xConfig from (select *, cast(config as xml) xConfig from Contents) CC
- JOIN vefn_ChildItems(@EnhanceID) VCI ON VCI.ContentID = CC.ContentID
- cross apply VEFN_GetNewEnhancedData(VCI.itemid,@EnhType) VEN
-
- Update @Enh1 Set xConfig.modify('delete //Enhanced[@Type=sql:variable("@EnhType")]') From @Enh1
-
- Update CC Set Config = cast(xconfig as varchar(max)) From Contents CC
- Join @Enh1 EE ON EE.ID = CC.ContentID
-
-
- SELECT [ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[LastChanged],
- (SELECT COUNT(1) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(1) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(1) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(1) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(1) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(1) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(1) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(1) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(1) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents] where ContentID in (Select ID From @Enh1)
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_PurgeProcLinkedItemsAndChildren] Succeeded'
-ELSE PRINT 'Procedure Creation: [vesp_PurgeProcLinkedItemsAndChildren] Error on Creation'
-GO
-
-/*
-==========================================================================================================
- End: B2022-049 Unlink single procedure for enhanced (if data got corrupted) [Version 2.xx]
-==========================================================================================================
-*/
-
-
-/*
-==========================================================================================================
- Start: B2022-088: [JPR] Find Doc Ro button not working in Word Sections
- B2022-098: [JPR] ROs not being resolved in Word Sections
-==========================================================================================================
-*/
-
-IF EXISTS (Select * From dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_RofstDataGetChildByAccPageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP Procedure [dbo].[vesp_RofstDataGetChildByAccPageID];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: Check if the AccPageID passed in has a specific Return Value Type Extension (.A, .B, .C, etc.)
- If so, then strip off the return value specific extension to get the BaseAccPageID for the lookup.
- Use the BaseAccPageID to lookup the BaseRoid, then use the Roid to lookup the Ro Child Object
-
- Note** Using the AccPageID to first lookup the roid, then using the roid to lookup the data is
- significantly faster than directly looking up the data using the AccPageID because of the indexes
-==========================================================================================================
- */
-Create Procedure [dbo].[vesp_RofstDataGetChildByAccPageID]
-(
- @RofstID int,
- @AccPageID VarChar(50)
-)
-With Execute as Owner
-As
-Begin
-
- Declare @BaseAccPageID VarChar(Max);
- Declare @BaseRoid VarChar(Max);
-
- -- Check if AccPageID has a valid extension
- If ((PatIndex('%.[A-Z]', @AccPageID) > 0) And ((Select Count(1) From vwRofstData_RofstBaseRoids Where BaseAccPageID = @AccPageID) <= 0))
- Set @BaseAccPageID = Left(@AccPageID, Len(@AccPageID)-2);
- Else
- Set @BaseAccPageID = @AccPageID;
-
- -- Use the AccPageID to get the BaseRoid
- Select @BaseRoid = rb.BaseRoid
- From vwRofstData_RofstBaseRoids rb
- Where rb.RofstID = @RofstID
- And rb.BaseAccPageID = @BaseAccPageID;
-
- -- Then use the BaseRoid to lookup the Ro Child Object
- Select rc.ROFstID,
- rc.dbiID,
- rc.ID,
- rc.ParentID,
- rc.[type],
- rc.title,
- rc.roid,
- rc.appid,
- rc.[value],
- rc.AccPageID
- From vwRofstData_RofstChildren rc
- Where rc.RofstID = @RofstID
- And rc.roid = @BaseRoid;
-
- Return;
-End
-GO
-
-
-IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Succeeded'
-ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetChildByAccPageID] Error on Creation'
-GO
-
-
-
-
-IF EXISTS (Select * From dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_RofstDataGetBaseAccPageKeys]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP Procedure [dbo].[vesp_RofstDataGetBaseAccPageKeys];
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************?
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 08/11/2022
- Description: Gets all the Base AccPageKeys that end with a "." period followed by an Alpha Character (A through Z)
-==========================================================================================================
- */
-Create Procedure [dbo].[vesp_RofstDataGetBaseAccPageKeys]
-(
- @RofstID int
-)
-With Execute as Owner
-As
-Begin
-
- Select BaseAccPageID
- From vwRofstData_RofstBaseRoids
- Where BaseAccPageID like '%.[A-Z]';
-
- Return;
-End
-GO
-
-
-IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstDataGetBaseAccPageKeys] Succeeded'
-ELSE PRINT 'Procedure Creation: [vesp_RofstDataGetBaseAccPageKeys] Error on Creation'
-GO
-
-
-
-
-
-If Exists(Select * From sys.objects Where type = 'FN' And object_id = OBJECT_ID('[dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults]'))
- Drop Function [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults];
-
-
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- ==========================================================================================
--- Author: Jake Ropar
--- Create Date: 06/21/2022
--- Description: Replaces any legacy applicability tags with the default value
--- ==========================================================================================
-
-CREATE FUNCTION [dbo].[vefn_RofstDataReplaceLegacyTagsWithDefaults](@Values VarChar(Max)) Returns VarChar(Max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @DefaultValue VarChar(Max) = '';
-
- Declare @StartTagIndex Int;
- Declare @EndTagIndex Int;
- Declare @StartTagValue VarChar(Max);
- Declare @StartValIndex Int;
- Declare @EndValIndex Int;
-
- Declare @TagName VarChar(Max);
- Declare @LegacyTagNames VarChar(Max) = 'U-ID,U-NUMBER,U-NAME,U-TEXT,U-OTHERID,U-OTHERNUMBER,U-OTHERNAME,U-OTHERTEXT';
-
- -- Make Sure all tag instances are upper case & Remove any internal spaces
- Set @RetVal = dbo.vefn_RofstDataCleanUnitInfoTags(@Values, 0);
-
- -- Remove any instances of double "}" that have a spaces between them ex: "} }"
- Set @RetVal = Replace(@RetVal, '} }', '}}');
-
- Declare LegacyTags_Cursor Cursor Fast_Forward For
- Select '{' + x.ListValue + '{' as 'TagName'
- From [dbo].[vefn_ParseStringListToTable](@LegacyTagNames, ',') x
-
- Open LegacyTags_Cursor
-
- Fetch Next From LegacyTags_Cursor Into @TagName
-
- While (@@FETCH_STATUS = 0)
- Begin
-
- -- Get Start/End Index of Tag
- Set @StartTagIndex = PatIndex('%' + @TagName + '%', @RetVal);
- Set @EndTagIndex = PatIndex('%}}%', @RetVal);
-
- While (@StartTagIndex > 0)
- Begin
-
- Set @StartTagValue = SubString(@RetVal, @StartTagIndex, (@EndTagIndex - @StartTagIndex) + 2);
-
- Set @StartValIndex = PatIndex('%=%', @StartTagValue);
- Set @EndValIndex = PatIndex('%}%', @StartTagValue);
-
- Set @DefaultValue = SubString(@StartTagValue, @StartValIndex + 1, (@EndValIndex - @StartValIndex) - 1);
- Set @RetVal = Replace(@RetVal, @StartTagValue, @DefaultValue);
-
- Set @StartTagIndex = PatIndex('%' + @TagName + '%', @RetVal);
- Set @EndTagIndex = PatIndex('%}}%', @RetVal);
-
- End -- While (@StartTagIndex > 0)
-
-
- Fetch Next From LegacyTags_Cursor Into @TagName
- End
-
- Close LegacyTags_Cursor;
- Deallocate LegacyTags_Cursor;
-
-
- Return @RetVal;
-
-END
-Go
-
-
-IF (@@Error = 0) PRINT 'Procedure Creation: [vefn_RofstDataReplaceLegacyTagsWithDefaults] Succeeded'
-ELSE PRINT 'Procedure Creation: [vefn_RofstDataReplaceLegacyTagsWithDefaults] Error on Creation'
-GO
-
-
-
-/*
-==========================================================================================================
- End: B2022-088: [JPR] Find Doc Ro button not working in Word Sections
- B2022-098: [JPR] ROs not being resolved in Word Sections
-==========================================================================================================
-*/
-
-/*
-==========================================================================================================
- Start: B2022-104: SearchReferenced Objects in PROMS is not finding any results
-==========================================================================================================
-*/
-
-
-If Exists (Select * From sys.Indexes Where Name = N'IX_tblROUsagesRODbIDDeleteStatusContentID')
- Drop Index [IX_tblROUsagesRODbIDDeleteStatusContentID] on [dbo].[tblROUsages]
-Go
-
-CREATE NONCLUSTERED INDEX [IX_tblROUsagesRODbIDDeleteStatusContentID]
-ON [dbo].[tblROUsages] ([RODbID],[DeleteStatus])
-INCLUDE ([ContentID],[ROID])
-WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
-
-
-IF (@@Error = 0) PRINT 'Index Creation: [IX_tblROUsagesRODbIDDeleteStatusContentID] Succeeded'
-ELSE PRINT 'Index Creation: [IX_tblROUsagesRODbIDDeleteStatusContentID] Error on Creation'
-GO
-
-
-
-
-If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataFormatRoidKey' AND type in (N'FN'))
-DROP FUNCTION [dbo].[vefn_RofstDataFormatRoidKey]
-GO
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
--- ==========================================================================================
--- Author: Jake Ropar
--- Create Date: 08/19/2022
--- Description: Cleans/Formats the specified roid key, with its return value ext if applicable
--- ==========================================================================================
-
-Create Function [dbo].[vefn_RofstDataFormatRoidKey](@Roid VarChar(25), @Check16Digits bit = 0) Returns VarChar(Max)
-With Execute As Owner
-Begin
-
- Declare @RoidKey VarChar(Max) = '';
-
- -- Trim Start/End and Replace Any Nulls with Empty Spaces ('')
- Set @RoidKey = dbo.vefn_Clean(@Roid, 1, null);
-
- -- Check if Roid is Null/Empty
- If (Len(@RoidKey) > 0)
- Begin
-
- -- Roid Cleanup / Consistency Checks
- Set @RoidKey = Upper(@RoidKey); -- Force Upper Case
- Set @RoidKey = Replace(@RoidKey, '', ''); -- Replace Any Abbreviated Unit Info Tags
- Set @RoidKey = Replace(@RoidKey, ' ', ''); -- Remove Any Internal Spaces
-
- -- Check if Roid is a Unit Info Tag or RO Child
- If (Not @RoidKey like '= 1) Set @RoidKey = Left(@RoidKey, 12) + '0041';
-
- -- Check Roid Extension (If Any) and Fix Default Extension ifusing the old format "0000"
- If (Len(@RoidKey) = 16 And Right(@RoidKey, 4) = '0000') Set @RoidKey = Left(@RoidKey, 12) + '0041';
-
- End
-
- End
-
- Return @RoidKey;
-
-End
-Go
-
-
-IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataFormatRoidKey] Succeeded'
-ELSE PRINT 'Function Creation: [vefn_RofstDataFormatRoidKey] Error on Creation'
-GO
-
-
-
-
-If Exists(Select * From sys.objects Where type = 'TF' And object_id = OBJECT_ID('[dbo].[FindRoUsages]'))
-Drop Function [dbo].[FindRoUsages];
-Go
-
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
--- ==========================================================================================
--- Author: Rich Mark
--- Create Date: 01/01/2018
--- Description: Returns the ContentIDs for any Procedure/WordSections that are currently
--- using any RO values in the @ROSearchString
---
--- Modified: [2022.08.19 - Jake Ropar]
--- Moved the logic for the Roid case statements into a new function [dbo].[vefn_RofstDataFormatRoidKey].
--- This standard roid formatting logic can now be utilized by any other objects in the database
--- like (Views/Procs/FUnctions/etc.) to ensure consistency when comparing roids.
--- I also added additional logic to support any (16) digit roids that are still using the older default
--- roid ext of "0000" instead of the new standard format "0041".
---
--- Examples: 1) Declare @ROSearchString VarChar(Max) = '1:000200000089'; Select * From FindRoUsages(ROSearchString);
--- 2) Select * From FindRoUsages('1:000200000089');
--- ==========================================================================================
-
-Create Function [dbo].[FindRoUsages](@ROSearchString VarChar(Max))
-Returns @Results Table
-(
- ContentID int Primary Key
-)
-With Execute as Owner
-Begin
-
- Insert Into @Results
-
- Select ru.ContentID as 'ContentID'
- From ROUsages ru with (NoLock)
- inner join vefn_SplitROSearch(@ROSearchString) rr on rr.RODbID = ru.RODbID
- And dbo.vefn_RofstDataFormatRoidKey(ru.Roid, 1) like rr.Roid + '%' Collate SQL_Latin1_General_CP1_CI_AS
-
- Union
-
- Select e.ContentID as 'ContentID'
- From Entries e with (NoLock)
- inner join DROUsages ru with (NoLock) on ru.DocID = e.DocID
- inner join vefn_SplitROSearch(@ROSearchString) rr on rr.RODbID = ru.RODbID
- And dbo.vefn_RofstDataFormatRoidKey(ru.Roid, 1) like rr.Roid + '%' Collate SQL_Latin1_General_CP1_CI_AS
-
- Option (Recompile);
-
- Return;
-End
-Go
-
-IF (@@Error = 0) PRINT 'Function Creation: [FindRoUsages] Succeeded'
-ELSE PRINT 'Function Creation: [FindRoUsages] Error on Creation'
-GO
-
-
-/*
-==========================================================================================================
- End: B2022-104: SearchReferenced Objects in PROMS is not finding any results
-==========================================================================================================
-*/
-
-/*
-==========================================================================================================
- Begin: B2022-121: RO values containing curly braces around values that are NOT multi return values do not resolved in Word Sections.
-==========================================================================================================
-*/
-
-
-IF EXISTS (Select * From dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_RofstChildInsert]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP Procedure [dbo].[vesp_RofstChildInsert];
-GO
-
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: Inserts the RO Child object and associated return values
-==========================================================================================================
- */
-Create Procedure [dbo].[vesp_RofstChildInsert]
-(
- @RofstID Int,
- @ID Int,
- @ParentID Int,
- @dbiID Int,
- @type Int,
- @title VarChar(Max),
- @roid VarChar(50),
- @appid VarChar(Max) = null,
- @value VarChar(Max) = null
-)
-With Execute as Owner
-As
-Begin
-
- Declare @BaseAccPageID VarChar(Max) = null;
- Declare @DefaultValues VarChar(Max);
-
- Declare @RoidExt VarChar(Max);
- Declare @AccPageExt VarChar(Max);
-
-
- -- Create Rofst Child/Group Record --> [Roid = (12) Digits]
- Insert Into RofstChild (RofstID, ID, ParentID, dbiID, [type], title, roid, appid, [value])
- Values (@RofstID, @ID, @ParentID, @dbiID, @type, @title, @roid, @appid, @value);
-
-
- -- Check for appid, if exists, then insert the default value for each return type if multi-value
- If (Len(@appid) > 0)
- Begin
-
- -- Get Accessory Page ID
- Select @BaseAccPageID = dbo.vefn_RofstDataCleanUnitInfoTags(Concat(d.dbiAP, '-', @appid), 1)
- From RofstDatabase d with (NoLock)
- Where d.RofstID = @RofstID And d.dbiID = @dbiID;
-
- Select @DefaultValues = dbo.vefn_RofstDataReplaceVars(@value);
-
- If (PatIndex('%=%', @DefaultValues) > 0)
- Begin
-
- -- Insert Rofst Default Values (Multi-Values) --> [Roid = (16) Digits]
- Select @DefaultValues = Replace(@DefaultValues, '{', '');
-
- With ChildrenValues as
- (
- Select x.ListPosition as 'OffsetIndex',
- Case When (PatIndex('%=%', x.ListValue) > 0) Then Right(x.ListValue, Len(x.ListValue)-PatIndex('%=%', x.ListValue)) Else x.ListValue End as 'DefaultValue'
- From [dbo].[vefn_ParseStringListToTable](@DefaultValues, '}') x
- Where Len(x.ListValue) > 0
- )
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, re.RoidExt) as 'roid',
- Case When (Len(RTrim(LTrim(cv.DefaultValue))) > 0 ) Then dbo.vefn_RofstDataCleanUnitInfoTags(cv.DefaultValue, 0) Else '[TBD]' End as 'value',
- Concat(@BaseAccPageID, '.', re.AccPageExt) as 'AccPageID'
- From ChildrenValues cv
- inner join vwRofstData_RofstExtensions re on re.Offset = cv.OffsetIndex
- Order By cv.OffsetIndex Asc
-
- End
- Else
- Begin
-
- -- Insert Rofst Default Value (Single Value) --> [Roid = (16) Digits]
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, re.RoidExt) as 'roid',
- Case When (Len(RTrim(LTrim(@DefaultValues))) > 0 ) Then dbo.vefn_RofstDataCleanUnitInfoTags(@DefaultValues, 0) Else '[TBD]' End as 'value',
- Concat(@BaseAccPageID, '.', re.AccPageExt) as 'AccPageID'
- From vwRofstData_RofstExtensions re
- Where re.Offset = 1;
-
- End
-
- End -- (Len(@appid) > 0)
-
-
- Return;
-
-End
-Go
-
-IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstChildInsert] Succeeded'
-ELSE PRINT 'Procedure Creation: [vesp_RofstChildInsert] Error on Creation'
-GO
-
-
-
-
-
-If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceVars' AND type in (N'FN'))
-DROP FUNCTION [dbo].[vefn_RofstDataReplaceVars]
-GO
-
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
--- ==========================================================================================
--- Author: Jake Ropar
--- Create Date: 3/25/2022
--- Description: Replaces Any Variables and returns the rest of the value string
--- ==========================================================================================
-
-CREATE FUNCTION [dbo].[vefn_RofstDataReplaceVars](@Values VarChar(Max)) Returns VarChar(Max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @EqualsIndex Int;
- Declare @EndIndex Int;
- Declare @NameValPairStartIndex Int;
- Declare @NameValPairEndIndex Int;
-
- Declare @VarPair VarChar(Max);
- Declare @VarName VarChar(Max);
- Declare @VarValue VarChar(Max);
-
- -- Replace Any "" Tags with the Default Value first
- Select @RetVal = dbo.vefn_RofstDataReplaceApplTagsWithDefaults(@Values);
-
- -- Replace Any Legacy Applicability Tags with the Default Value second
- Select @RetVal = dbo.vefn_RofstDataReplaceLegacyTagsWithDefaults(@RetVal);
-
- If (PatIndex('%=%', @RetVal) > 0)
- Begin
-
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- While(@NameValPairStartIndex > 0 And @NameValPairStartIndex < @EndIndex)
- Begin
-
- -- Get Name Value Pair [ex. {EGS=1214}]
- Set @VarPair = SubString(@RetVal, @NameValPairStartIndex, (@NameValPairEndIndex - @NameValPairStartIndex) + 1);
-
- -- Remove Name Value Pair From Return Val
- Set @RetVal = Replace(@RetVal, @VarPair, '');
-
- -- Get Variable Name and Value
- Set @EqualsIndex = PatIndex('%=%', @VarPair);
-
- If (@EqualsIndex > 0)
- Begin
- Set @VarName = SubString(@VarPair, 2, @EqualsIndex - 2);
- Set @VarValue = SubString(@VarPair, @EqualsIndex + 1, Len(@VarPair) - @EqualsIndex - 1);
- Set @VarName = Concat('{', @VarName, '}');
-
- -- Replace All Occurences
- Set @RetVal = Replace(@RetVal, @VarName, @VarValue);
- End
-
- -- Get Updated Index Values
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- End -- End While(@ReplaceVarEndTagIndex > 0)
-
- End
-
- Return @RetVal;
-
-END
-GO
-
-IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Succeeded'
-ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Error on Creation'
-GO
-
-
-/*
-==========================================================================================================
- End: B2022-121: RO values containing curly braces around values that are NOT multi return values do not resolved in Word Sections.
-==========================================================================================================
-*/
-
-
-/*
-==========================================================================================================
- Begin: B2022-124: [JPR] Blank RO Values (All Spaces) printing as ?
-==========================================================================================================
-*/
-
-
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataReplaceVars' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataReplaceVars]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 3/25/2022
- -- Description: Replaces Any Variables and returns the rest of the value string
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataReplaceVars](@Values VarChar(Max)) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = '';
- Declare @EqualsIndex Int;
- Declare @EndIndex Int;
- Declare @NameValPairStartIndex Int;
- Declare @NameValPairEndIndex Int;
-
- Declare @VarPair VarChar(Max);
- Declare @VarName VarChar(Max);
- Declare @VarValue VarChar(Max);
-
- -- Replace Any "" Tags with the Default Value first
- Select @RetVal = dbo.vefn_RofstDataReplaceApplTagsWithDefaults(@Values);
-
- -- Replace Any Legacy Applicability Tags with the Default Value second
- Select @RetVal = dbo.vefn_RofstDataReplaceLegacyTagsWithDefaults(@RetVal);
-
- If (PatIndex('%=%', @RetVal) > 0)
- Begin
-
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = DataLength(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- While(@NameValPairStartIndex > 0 And @NameValPairStartIndex < @EndIndex)
- Begin
-
- -- Get Name Value Pair [ex. {EGS=1214}]
- Set @VarPair = SubString(@RetVal, @NameValPairStartIndex, (@NameValPairEndIndex - @NameValPairStartIndex) + 1);
-
- -- Remove Name Value Pair From Return Val
- Set @RetVal = Replace(@RetVal, @VarPair, '');
-
- -- Get Variable Name and Value
- Set @EqualsIndex = PatIndex('%=%', @VarPair);
-
- If (@EqualsIndex > 0)
- Begin
- Set @VarName = SubString(@VarPair, 2, @EqualsIndex - 2);
- Set @VarValue = SubString(@VarPair, @EqualsIndex + 1, Len(@VarPair) - @EqualsIndex - 1);
- Set @VarName = Concat('{', @VarName, '}');
-
- -- Replace All Occurences
- Set @RetVal = Replace(@RetVal, @VarName, @VarValue);
- End
-
- -- Get Updated Index Values
- If (PatIndex('%{{A%', @RetVal) > 0)
- Set @EndIndex = PatIndex('%{{A%', @RetVal);
- Else
- Set @EndIndex = Len(@RetVal) -1;
-
- Set @NameValPairStartIndex = PatIndex('%{%', @RetVal);
- Set @NameValPairEndIndex = PatIndex('%}%', @RetVal);
-
- End -- End While(@ReplaceVarEndTagIndex > 0)
-
- End
-
- Return @RetVal;
-
- END
- GO
-
-
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataReplaceVars] Error on Creation'
- GO
-
-
-
-
- If Exists(SELECT * FROM sys.objects Where name = 'vefn_RofstDataCleanUnitInfoTags' AND type in (N'FN'))
- DROP FUNCTION [dbo].[vefn_RofstDataCleanUnitInfoTags]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- -- ==========================================================================================
- -- Author: Jake Ropar
- -- Create Date: 06/21/2022
- -- Description: Removes any legacy legacy unit info variables and fixes older applicability tags
- -- ==========================================================================================
-
- CREATE FUNCTION [dbo].[vefn_RofstDataCleanUnitInfoTags](@Values VarChar(Max), @RemoveUnitInfoVars bit = 0) Returns VarChar(Max)
- WITH EXECUTE AS OWNER
- AS
- BEGIN
-
- Declare @RetVal VarChar(Max) = @Values;
-
- If (Len(@RetVal) > 0)
- Begin
-
- Set @RetVal = dbo.vefn_Clean(@Values, 1, null);
-
- -- Make Sure all tag/var instances are upper case & Remove any internal spaces
- Set @RetVal = Replace(@RetVal, 'U-OTHER TEXT', 'U-OTHERTEXT');
- Set @RetVal = Replace(@RetVal, 'U-OTHER NUMBER', 'U-OTHERNUMBER');
- Set @RetVal = Replace(@RetVal, 'U-OTHER NAME', 'U-OTHERNAME');
- Set @RetVal = Replace(@RetVal, 'U-OTHER ID', 'U-OTHERID');
- Set @RetVal = Replace(@RetVal, '', '');
-
- If (@RemoveUnitInfoVars > 0)
- Begin
-
- -- Remove any Unit Info Variables
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
-
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
- Set @RetVal = Replace(@RetVal, '', '');
-
- End
-
- End
-
- Return @RetVal;
-
- END
- Go
-
-
- IF (@@Error = 0) PRINT 'Function Creation: [vefn_RofstDataCleanUnitInfoTags] Succeeded'
- ELSE PRINT 'Function Creation: [vefn_RofstDataCleanUnitInfoTags] Error on Creation'
- GO
-
-
-
- If Exists(SELECT * FROM sys.objects Where name = 'vesp_RofstChildInsert' AND type in (N'P'))
- DROP PROCEDURE [dbo].[vesp_RofstChildInsert]
- GO
-
- SET ANSI_NULLS ON
- GO
- SET QUOTED_IDENTIFIER ON
- GO
-
- /*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2020 - Volian Enterprises, Inc. All rights reserved.
- *****************************************************************************/
- /*
- ==========================================================================================================
- Author: Jake Ropar
- Create Date: 03/24/2022
- Description: Inserts the RO Child object and associated return values
- ==========================================================================================================
- */
- Create Procedure [dbo].[vesp_RofstChildInsert]
- (
- @RofstID Int,
- @ID Int,
- @ParentID Int,
- @dbiID Int,
- @type Int,
- @title VarChar(Max),
- @roid VarChar(50),
- @appid VarChar(Max) = null,
- @value VarChar(Max) = null,
- @missingDefaultValue VarChar(Max) = null
- )
- With Execute as Owner
- As
- Begin
-
- Declare @BaseAccPageID VarChar(Max) = null;
- Declare @DefaultValues VarChar(Max);
-
- Declare @RoidExt VarChar(Max);
- Declare @AccPageExt VarChar(Max);
-
- -- Default missing value if Null (Null values not allowed for the [value] field in the RofstDefaultValue table
- if (DataLength(IsNull(@missingDefaultValue, '')) <= 0)
- Set @missingDefaultValue = '[TBD]';
-
- -- Create Rofst Child/Group Record --> [Roid = (12) Digits]
- Insert Into RofstChild (RofstID, ID, ParentID, dbiID, [type], title, roid, appid, [value])
- Values (@RofstID, @ID, @ParentID, @dbiID, @type, @title, @roid, @appid, @value);
-
-
- -- Check for appid, if exists, then insert the default value for each return type if multi-value
- If (Len(@appid) > 0)
- Begin
-
- -- Get Accessory Page ID
- Select @BaseAccPageID = dbo.vefn_RofstDataCleanUnitInfoTags(Concat(d.dbiAP, '-', @appid), 1)
- From RofstDatabase d with (NoLock)
- Where d.RofstID = @RofstID And d.dbiID = @dbiID;
-
- Select @DefaultValues = dbo.vefn_RofstDataReplaceVars(@value);
-
- If (PatIndex('%=%', @DefaultValues) > 0)
- Begin
-
- -- Insert Rofst Default Values (Multi-Values) --> [Roid = (16) Digits]
- Select @DefaultValues = Replace(@DefaultValues, '{', '');
-
- With ChildrenValues as
- (
- Select x.ListPosition as 'OffsetIndex',
- Case When (PatIndex('%=%', x.ListValue) > 0) Then Right(x.ListValue, Len(x.ListValue)-PatIndex('%=%', x.ListValue)) Else x.ListValue End as 'DefaultValue'
- From [dbo].[vefn_ParseStringListToTable](@DefaultValues, '}') x
- Where Len(x.ListValue) > 0
- )
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, re.RoidExt) as 'roid',
- Case When (DataLength(cv.DefaultValue) > 0) Then dbo.vefn_RofstDataCleanUnitInfoTags(cv.DefaultValue, 0) Else @missingDefaultValue End as 'value',
- Concat(@BaseAccPageID, '.', re.AccPageExt) as 'AccPageID'
- From ChildrenValues cv
- inner join vwRofstData_RofstExtensions re on re.Offset = cv.OffsetIndex
- Order By cv.OffsetIndex Asc
-
- End
- Else
- Begin
-
- -- Insert Rofst Default Value (Single Value) --> [Roid = (16) Digits]
- Insert Into RofstDefaultValue (RofstID, roid, [value], AccPageID)
- Select @RofstID as 'RofstID',
- Concat(@roid, re.RoidExt) as 'roid',
- Case When (DataLength(@DefaultValues) > 0) Then dbo.vefn_RofstDataCleanUnitInfoTags(@DefaultValues, 0) Else @missingDefaultValue End as 'value',
- Concat(@BaseAccPageID, '.', re.AccPageExt) as 'AccPageID'
- From vwRofstData_RofstExtensions re
- Where re.Offset = 1;
-
- End
-
- End -- (Len(@appid) > 0)
-
-
- Return;
-
- End
- Go
-
-
-
- IF (@@Error = 0) PRINT 'Procedure Creation: [vesp_RofstChildInsert] Succeeded'
- ELSE PRINT 'Procedure Creation: [vesp_RofstChildInsert] Error on Creation'
- GO
-
-
-
-/*
-==========================================================================================================
- End: B2022-124: [JPR] Blank RO Values (All Spaces) printing as ?
-==========================================================================================================
-*/
-
-
------------------------------------------------------------------------------
-/*
- ---------------------------------------------------------------------------
- | ADD New Code Before this Block |
- | Change Date and Description |
- ---------------------------------------------------------------------------
-*/
------------------------------------------------------------------------------
--- Rebuild / Reorganize All Indexes
-exec [dbo].[vesp_UtilityCheckIndexes];
-
-IF (@@Error = 0) PRINT 'Running vesp_UtilityCheckIndexes Succeeded'
-ELSE PRINT 'Running vesp_UtilityCheckIndexes Failed to Execute'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetSQLCodeRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetSQLCodeRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2022 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetSQLCodeRevision]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- -- Change information in the next line when you are done
- set nocount on
- DECLARE @RevDate varchar(255)
- DECLARE @RevDescription varchar(255)
-
- set @RevDate = '10/03/2022 2:00 PM'
- set @RevDescription = 'B2022-124: [JPR] Blank RO Values (All Spaces) printing as ?'
-
- Select cast(@RevDate as datetime) RevDate, @RevDescription RevDescription
- PRINT 'SQL Code Revision ' + @RevDate + ' - ' + @RevDescription
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [vesp_GetSQLCodeRevision] Succeeded'
-ELSE PRINT 'StoredProcedure [vesp_GetSQLCodeRevision] Error on Creation'
-go
-
-Exec vesp_GetSQLCodeRevision;
diff --git a/PROMS/DataLoader/PROMSFixes.Sql.bak b/PROMS/DataLoader/PROMSFixes.Sql.bak
deleted file mode 100644
index 0747fc48..00000000
--- a/PROMS/DataLoader/PROMSFixes.Sql.bak
+++ /dev/null
@@ -1,10400 +0,0 @@
-if db_name() in('master','model','msdn','tempdb')
-begin
- DECLARE @ErrorMsg varchar(255)
- SET @ErrorMsg = 'Don''t add these procedures and functions to ' + db_name()
- PRINT '=========================================================================='
- PRINT ''
- PRINT @ErrorMsg
- PRINT ''
- PRINT 'You probably want to be in the VEPROMS database'
- PRINT ''
- PRINT '=========================================================================='
- RAISERROR (@ErrorMsg, 20, -1) with log
- RETURN
-end
-print 'Adding procedures and functions to ' + db_name()
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemReplace]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemReplace];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemReplace] Script Date: 03/20/2012 16:02:54 ******/
-/*
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteItemReplace 398,397,20014,@dts,'bodine',@NewItemID output
-*/
--- ItemID is item to replace
--- StartItemID is item to copy
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemReplace]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
-
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First check if the replaced item can be deleted, i.e. it doesn't have transitions
- -- pointing to it or children.
-
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- DECLARE @DeleteID int
- INSERT INTO DeleteLog (UserID) VALUES (@UserID)
- SELECT @DeleteID = SCOPE_IDENTITY()
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- --SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID)
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- --IF @ExternalCount > 0 AND @NextItemID is null
- --BEGIN
- -- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- -- RETURN
- --END
-
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- -- Copy the item, 'NewItemID' represents the new item(s)
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
-
- -- Adjust the next/previous to point to the new item
-
- DECLARE @PreviousID int
- SELECT @PreviousID = [PreviousID]
- FROM [ITEMS] II
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [PreviousID]=@ItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
-
- -- UPDATE DocVersion if this was a procedure
- UPDATE DocVersions SET ItemID=@NewItemID where ItemID = @ItemID
-
- -- If there were 'external transitions' that pointed to the original
- -- top replaced step, adjust them to point to the new top.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @ExternalTrans) > 0
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NewItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NewItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans)
-
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that pointed to top step
- -- and need to point to
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Replaced Step Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
-
- END
- -- Remove the old one
-
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
---delete from itemaudits where itemid = @newitemid
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
---delete from contentaudits where contentid = (select contentid from items where itemid = @newitemid)
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- DELETE from DeleteLog where DeleteID = @DeleteID
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemReplace Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemReplace Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChronologyReport]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChronologyReport];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from vefn_chronologyreport(2) where type > 0 order by contentid,auditid
-*/
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 05/18/2011 11:20:48 ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_ChronologyReport](@ProcItemID int, @DTS datetime)
-returns @Report table
-(
-src int,
-AuditID bigint,
-ContentID int,
-Number nvarchar(512),
-Text nvarchar(max),
-Type int,
-FormatID int,
-Config nvarchar(max),
-DTS datetime,
-UserID nvarchar(200),
-DeleteStatus int,
-ActionDTS datetime,
-ItemDTS datetime,
-LastAuditID int,
-DeletedAuditID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
---added rhm/jcb 20121218i
-declare @tmpTable table
-(
- icontentid int primary key
-)
-insert into @tmpTable select icontentid from vefn_tblchilditems(@ProcItemID,@ProcItemID,1)
---added jcb 20111122
---declare @dts datetime
---set @dts = (select dts from items where itemid = @ProcItemID )
---set @dts = (SELECT .[dbo].[vefn_GetPreviousRevisionDTSByItemID] (@ProcItemID))
---end added jcb 20111122
- insert into @Report
- SELECT
-1 src,
- [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- where Number is not null
---added jcb 20111028_1827
-and ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > @dts)
---and ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.dts > @dts
---end added jcb 20111122
--- UNION
--- SELECT
---2 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
----- (select max(auditid) + 1 from contentaudits) [AuditID]
----- 0 [AuditID]
--- ,ca.[ContentID]
--- ,[Number]
--- ,[Text]
--- ,[Type]
--- ,[FormatID]
--- ,[Config]
--- ,ca.[DTS] cadts
--- ,ca.[UserID]
--- ,ca.[DeleteStatus]
--- ,ActionDTS
--- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
--- FROM tblContents ca
----- inner join tblitems ti on ca.contentid = ti.contentid
---WHERE ca.DeleteStatus = 0 AND
-----added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) and
-----end added jcb 20111028_1827
-----ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-----added jcb 20111122
-----ca.ContentID in (SELECT [ContentID] FROM Contents where dts > (select dts from items where itemid = @ProcItemID ))
---ca.ContentID in (SELECT [ContentID] FROM Contents where dts > @dts)
-----end added jcb 20111122
-----order by ca.DTS,ActionDTS
- UNION
- SELECT
-3 src,
- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
--- 0 [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM tblContents ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus = 0 AND
---added jcb 20111028_1827
-ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
- UNION
- SELECT distinct
-5 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
- ca.[AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus > 0
---added jcb 20111028_1827
- --ca.contentid != (select contentid from items where itemid = @procitemid) and
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.contentid in (select icontentid from @tmpTable)
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
-order by ca.DTS,ActionDTS
-
- insert into @Report
- SELECT
-4 src,
- ca.[AuditID]
- ,ca.[ContentID]
- ,ca.[Number]
- ,ca.[Text]
- ,ca.[Type]
- ,ca.[FormatID]
- ,ca.[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ca.ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- inner join @Report rpt on ca.contentid = rpt.contentid and ca.auditid = rpt.lastauditid
-where ca.auditid not in (select auditid from @report)
-and rpt.lastauditid is not null
-and ca.contentid in (select icontentid from @tmpTable)
- return
-end
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ChronologyReport Succeeded'
-ELSE PRINT 'Function: vefn_ChronologyReport Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingAfter]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemSiblingAfter];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemSiblingAfter] Script Date: 03/21/2012 15:25:31 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingAfter]
-(
- @ItemID int=null, @StartItemID int=null, -- ItemID is destination, StartItemID is top of copy
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- Adjust previous field
- DECLARE @NextID int
- SELECT @NextID = [ItemID]
- FROM [ITEMS]
- WHERE [PreviousID]=@ItemID
- IF @NextID is not null -- step after the copy point. Adjust it's previous to point to the new step
- BEGIN
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID, [DTS]=@DTS, [UserID]=@UserID where [ItemID]=@NextID
- END
- UPDATE [ITEMS] SET [PreviousID]=@ItemID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
-
-
- -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@NextID,@ItemID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @NextID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @NextID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@NextID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Next Step Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@newItemID) OR RangeID IN(@newItemID))
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@NextID) OR RangeID IN(@NextID))
- -- Transition Text gets updated in ItemInsertExt.cs
-
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingAfter Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingAfter Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemSiblingBefore]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [PasteItemSiblingBefore];
-GO
-/****** Object: StoredProcedure [dbo].[PasteItemSiblingBefore] Script Date: 03/21/2012 15:26:23 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteItemSiblingBefore]
-(
- @ItemID int=null, @StartItemID int=null,
- @Type int=null, @DTS datetime, @UserID nvarchar(100),
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input CopyStartID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- First adjust previous fields, may also have to do parts, if before first one in list.
- DECLARE @PreviousID int, @ContentID int, @newLastChanged timestamp, @NewType int
- SELECT @PreviousID = [PreviousID], @NewType=ISNULL(@Type,[Type])
- FROM [ITEMS] II
- JOIN [CONTENTS] CC ON CC.[ContentID]=II.[CONTENTID]
- WHERE [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [ITEMS] SET [PreviousID]=@PreviousID where [ItemID]=@NewItemID
- UPDATE [CONTENTS] SET [Type]=@Type
- FROM [CONTENTS] CC JOIN [ITEMS] ii ON CC.[ContentID]=II.[ContentID]
- WHERE [ItemID]=@NewItemID
- UPDATE [PARTS] SET [ItemID]=@NewItemID where [ItemID]=@ItemID
- UPDATE [DOCVERSIONS] SET [ItemID] = @NewItemID where [ItemID]=@ItemID
-
- IF @PreviousID is null -- The step is replacing the first step
- BEGIN
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ItemID OR TT.RangeID = @ItemID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ItemID THEN @NewItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ItemID THEN @NewItemID ELSE RangeID END
- WHERE ToID = @ItemID OR RangeID = @ItemID
- END
- ELSE -- Check for Transitions that point to the Next Step
- BEGIN
- -- Get a list of Transitions which need to change children of @ItemID that point to @NextID
- DECLARE @NextStepTransitions TABLE
- (
- [TransitionID] int PRIMARY KEY,
- [FromID] [int],
- [ToID] [int],
- [RangeID] [int],
- [TranType] [int],
- [Config] [nvarchar](max)
- )
- Insert into @NextStepTransitions select * from vefn_NextStepTransitions(@ItemID,@PreviousID)
- OPTION (MAXRECURSION 10000)
- IF (SELECT COUNT(*) from @NextStepTransitions) > 0 -- Next Step Transitions
- BEGIN
- -- Update all transitions in the list to point to @newItemID
- Update TT
- Set TT.ToID = CASE TT.ToID WHEN @ItemID THEN @NewItemID ELSE TT.ToID END,
- TT.RangeID = CASE TT.RangeID WHEN @ItemID THEN @NewItemID ELSE TT.RangeID END
- From TRANSITIONS TT
- JOIN @NextStepTransitions NS ON NS.TransitionID = TT.TransitionID
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,NS.TransitionID,NS.TranType,NS.ToID,NS.RangeID,@ItemID,@NewItemID)
- From CONTENTS CC
- JOIN @NextStepTransitions NS ON NS.FromID = CC.ContentID
- END
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ItemID,@NewItemID) OR RangeID IN(@ItemID,@NewItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
-delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
-delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
- IF( @@TRANCOUNT > 0 ) COMMIT
- EXECUTE GetItem @NewItemID
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemSiblingBefore Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemSiblingBefore Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetMyChronology]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetMyChronology];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetMyChronology] Script Date: 11/07/2012 18:09:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetMyChronology](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int, @DTS datetime)
-RETURNS @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-insert into @Chrono
-select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
- from
- (
- select
- case
- when lastauditid is null then 'Added'
- when r.deletestatus > 0 then 'Deleted'
- when lastauditid = -1 then 'Changed'
- when DeletedAuditID is not null then 'Restored'
--- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end actionwhat
-,actiondts actionwhen
--- ,case
--- when lastauditid is null then dts
--- when r.deletestatus > 0 then ActionDTS
--- when lastauditid = -1 then dts
--- when DeletedAuditID is not null then ActionDTS
--- else dts
--- end actionwhen
-,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
- ,*
- from vefn_tblchilditems (@ProcItemID,@ItemID,@IncludeDeletedChildren) t
- inner join vefn_chronologyreport(@ProcItemID,@DTS) r
- on t.icontentid = r.contentid
--- where ActionDTS > procdts or dts > procdts
- ) ah
- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-END
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetMyChronology] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetMyChronology] Error on Creation'
-go
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsChronologyByItemID] Script Date: 03/21/2012 15:58:26 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getContentAuditsChronologyByItemID];
-GO
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemID] ******/
-/*
-getContentAuditsChronologyByItemID 10154,10154,0
-getContentAuditsChronologyByItemID 42,42,0
-getContentAuditsChronologyByItemID 9,9,0
-getContentAuditsChronologyByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Succeeded'
-ELSE PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Error on Creation'
-go
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsSummaryByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsSummaryByItemID];
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-/*
-getContentAuditsSummaryByItemID 146,146,0
-getContentAuditsSummaryByItemID 42,42,0
-getContentAuditsSummaryByItemID 9,9,0
-getContentAuditsSummaryByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsSummaryByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-insert into @Chrono
-select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
-select * from @Chrono
-where AuditID is null OR AuditID in (select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid)
-order by OrdinalPath, contentid,auditid
---select z.* from
---(
---select contentid,min(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---union
---select z.* from
---(
---select contentid,max(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixSearchString]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixSearchString];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_FixSearchString] Script Date: 03/26/2012 09:31:13 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select ID,ss,.dbo.vefn_FixSearchString(ss)
-from (
-select 1 ID,'*' ss union
-select 2 ID,'50%' ss union
-select 3 ID,'IF*' ss union
-select 4 ID,'*then:' ss union
-select 5 ID,'530`F' ss union
-select 6 ID,'check' ss union
-select 7 ID,'RCP*Cooling' ss union
-select 8 ID,'14%[34%]' ss union
-select 9 ID,'\*' ss union
-select 10 ID,'\?' ss union
-select 11 ID,'_' ss union
-select 12 ID,'[' ss union
-select 13 ID,']' ss union
-select 14 ID,'%' ss union
-select 15 ID,'_' ss union
-select 16 ID,'-' ss union
-select 17 ID,'%' ss union
-select 18 ID,'C* - *' ss union
-select 19 ID,'' ss union
-select 20 ID,null ss
-) tt order by ID
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixSearchString](@SearchString nvarchar(MAX))
-RETURNS nvarchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- This code adds % at the beginning and end if the beginning and end
- -- of the search string if it does not have % at the beginning or end
- Set @SearchString = replace(@SearchString,'[','[[]')
- Set @SearchString = replace(@SearchString,'_','[_]')
- Set @SearchString = replace(@SearchString,'%','[%]')
- Set @SearchString = replace(@SearchString,'*','%')
- Set @SearchString = replace(@SearchString,'?','_')
- Set @SearchString = replace(@SearchString,'\%','*')
- Set @SearchString = replace(@SearchString,'\_','?')
- Set @SearchString = replace(@SearchString,'-','\u8209?')
- IF(@SearchString like '[%]%') RETURN @SearchString
- IF(@SearchString like '%[%]') RETURN @SearchString
- Set @SearchString = replace('%' + @SearchString + '%','%%','%')
- RETURN @SearchString
-END
-GO
--- Display the status
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_FixSearchString] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_FixSearchString] Error on Creation'
-go
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreDeletedItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [restoreDeletedItem];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-restoreDeletedItem 10133,1,10130,2
-select dbo.ve_GetPartContentID(10133)
-select dbo.ve_GetPartFromType(10133)
-select itemid from parts where contentid = 10126 and fromtype = 6
-SELECT ItemID FROM PartAudits WHERE DeleteStatus = 1
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreDeletedItem]
-(
- @ItemID int,
- @DeleteID int,
- @CurrentID int,
- @Level int
-)
-
-WITH EXECUTE AS OWNER
-AS
- DECLARE @PreviousID int
- declare @oldPreviousID int
- DECLARE @NextID int
- DECLARE @ContentID int
- declare @fromtype int
- IF @Level = 0 BEGIN
- SET @NextID = @CurrentID
- SELECT @PreviousID = PreviousID FROM Items WHERE ItemID = @CurrentID
- END
- IF @Level = 1 BEGIN
- SELECT @NextID = ItemID FROM Items WHERE PreviousID = @CurrentID
- SET @PreviousID = @CurrentID
- END
- SELECT @ContentID = dbo.[ve_GetPartContentID](@ItemID)
- select @fromtype = dbo.[ve_GetPartFromType](@ItemID)
- select @oldPreviousID = isnull(PreviousID,0) from tblItems where ItemID = @ItemID
- if @level = 2 begin
- select @NextID = itemid from parts where contentid = @contentid and fromtype = @fromtype
- end
- --restore parts from step being restored
- UPDATE tblParts SET DeleteStatus = 0 WHERE ItemID IN (SELECT ItemID FROM PartAudits WHERE DeleteStatus = @DeleteID)
---print 'oldpreviousid: ' + cast(@oldpreviousid as varchar(10))
---print 'currentid: ' + cast(@currentid as varchar(10))
- --restore of children in different order
- if(@oldPreviousID != @CurrentID and @Level = 2) begin
- update tblparts set deletestatus = 0, itemid = @itemid where contentid = @contentid and fromtype = @fromtype
---print 'special code'
- end
- UPDATE tblContents SET DeleteStatus = 0, ActionDTS = getdate() WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblItems SET DeleteStatus = 0,PreviousID = CASE WHEN ItemID = @ItemID THEN @PreviousID ELSE PreviousID END
- WHERE ItemID IN (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblGrids SET DeleteStatus = 0 WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblEntries SET DeleteStatus = 0 WHERE DocID IN (SELECT DocID FROM EntryAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblAnnotations SET DeleteStatus = 0, ActionDTS = getdate() WHERE deletestatus = @deleteid -- ItemID in (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblROUsages SET DeleteStatus = 0 WHERE deletestatus = @deleteid --ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblTransitions SET DeleteStatus = 0 WHERE deletestatus = @deleteid --FromID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- IF @NextID IS NOT NULL BEGIN
- UPDATE Items SET PreviousID = @ItemID WHERE ItemID = @NextID
- UPDATE DocVersions SET ItemID = @ItemID WHERE ItemID = @NextID
- IF @ContentID IS NOT NULL BEGIN
- UPDATE Parts SET ItemID = @ItemID WHERE ItemID = @NextID and ContentID = @ContentID
---print 'old code'
- END
- END
---else
--- begin
---update parts set itemid = @itemid where contentid = @contentid and fromtype = @fromtype
--- end
-RETURN
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreDeletedItem Succeeded'
-ELSE PRINT 'Procedure Creation: restoreDeletedItem Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetLastDelim] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetLastDelim]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetLastDelim];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select .dbo.vefn_GetLastDelim(bozo) delim,bozo
-from
-(
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using Backfill' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1.RNO..1' bozo union
-select 'ES\u8209?3.1Post\u8209?SGTR Cooldown Using BackfillProcedure Steps1.1.RNO..1.3' bozo
-) ah
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetLastDelim](@SearchString nvarchar(MAX))
-RETURNS nvarchar(1)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @patstr nvarchar(7)
- set @patstr = '%[' + char(7) + char(17) + '.]%'
- declare @patidx bigint
- set @patidx = patindex(@patstr,Reverse(@SearchString))
- if @patidx = 0 return ' '
- return substring(@SearchString,1 + len(@SearchString) - @patidx,1)
-END
-GO
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetLastDelim] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetLastDelim] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_tblChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_tblChildItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 03/28/2012 17:43:20 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_tblChildItems](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @path nvarchar(max)
- declare @ppath nvarchar(max)
- declare @ordinalpath nvarchar(max)
- declare @pordinalpath nvarchar(max)
- declare @ordinal int
- declare @pitemid int
- select @path = path,@ordinalpath = ordinalpath,@ordinal = ordinal,@pitemid = parentid from vefn_ProcedureByProcID(@ProcItemID) where itemid = @ItemID
- if @pitemid = 0 begin
- set @pordinalpath = ''
- set @ppath = ''
- end
- else begin
- select @ppath = path,@pordinalpath = ordinalpath from vefn_ProcedureByProcID(@ProcItemID) where itemid = @pitemID
- end
- declare @procdts datetime
- select @procdts = dts from items where itemid = @ProcItemID
- Declare @Delim char(1)
- Set @Delim=char(7)
- Declare @DelimNumber char(1)
- Set @DelimNumber=char(17)
- Declare @DelimStep char(1)
- Set @DelimStep='.'
- begin
- with Itemz([Level], [ItemID], [ContentID], DeleteStatus, ProcDTS, PPath, [Path], [POrdinalPath], [OrdinalPath], [FromType], [Ordinal]) as (
- Select 0 [Level], [ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- @ppath [PPath],
- @path [Path],
- @pordinalpath [POrdinalPath],
- @ordinalpath [OrdinalPath],
- 0 [FromType],@ordinal [Ordinal]
- FROM [tblItems] I
- --inner join tblContents C on C.ContentID=I.ContentID
- where I.[ItemID]=@ItemID
- Union All
- -- Children
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(3))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
- P.[FromType],0
- from Itemz Z
- join tblParts P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID
- inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus = 0
- Union All
- -- Children2
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(3))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
- P.[FromType],0
- from Itemz Z
- join PartAudits P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID and i.PreviousID is null
- inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus >= 0
- -- Siblings
- Union All
- select [Level] , I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end +
- case when I.deletestatus != 0 then 'Old ' else '' end + cast(Ordinal + 2 as varchar(3))
- end Path,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5),
- FromType,Z.[Ordinal] +1
- from Itemz Z
- join tblItems I on I.PreviousID = Z.ItemID
- inner join tblContents C on C.ContentID=I.ContentID
- where Z.[Level] > 0
- )
- insert into @Children select distinct ItemID, ContentID, DeleteStatus, ProcDTS, Path, OrdinalPath from Itemz
- OPTION (MAXRECURSION 10000)
- END
- RETURN
-end
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_tblChildItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_tblChildItems] Error on Creation'
-go
-
-/****** Object: StoredProcedure [dbo].[getAnnotationAuditsChronologyByItemID] Script Date: 04/02/2012 15:57:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getAnnotationAuditsChronologyByItemID];
-GO
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemID] ******/
-/*
-getAnnotationAuditsChronologyByItemID 13,13
-getAnnotationAuditsChronologyByItemID 30,8570
-getAnnotationAuditsChronologyByItemID 30,8513
-getAnnotationAuditsChronologyByItemID 30,8505
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[getAnnotationAuditsChronologyByItemID]
-(
- @ProcItemID int,
- @ItemID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from @tci)
- and dts > @dts
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetUnitPrefix]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetUnitPrefix];
-GO
-/*
-select 'DocVersions' Type, VersionID, Config, .dbo.vefn_GetUnitPrefix(config) UnitPrefix from DocVersions
-UNION select 'Blank' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
-UNION select 'Null' Type, 0 VersionID, null Config, .dbo.vefn_GetUnitPrefix(null) UnitPrefix
-UNION select 'XML with' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
-UNION select 'XML without' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
-UNION select 'XML empty' Type, 0 VersionID, '' Config, .dbo.vefn_GetUnitPrefix('') UnitPrefix
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_GetUnitPrefix](@config varchar(MAX))
-returns varchar(MAX)
-begin
- declare @Xml xml
- set @Xml = cast(@config as xml)
- declare @UnitPrefix varchar(MAX)
- set @UnitPrefix = (select Replace(v.value('@ProcedureNumber', 'nvarchar(100)'),'#','') UnitPrefix from @XML.nodes('//Unit') as tmpXml(v))
- return isnull(@UnitPrefix,'')
-end
-
-GO
-IF (@@Error = 0) PRINT 'Function: vefn_GetUnitPrefix Succeeded'
-ELSE PRINT 'Function: vefn_GetUnitPrefix Error on Creation'
-GO
-
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_DocVersionSplit]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_DocVersionSplit];
-GO
-/*
-select * from vefn_DocVersionSplit('1,4')
-select * from vefn_DocVersionSplit(null)
-select * from vefn_DocVersionSplit('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_DocVersionSplit](@DocVersionList varchar(MAX))
-RETURNS @IDs TABLE
-(
- VersionID int PRIMARY KEY,
- ItemID int,
- DVPath varchar(MAX),
- UnitPrefix varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-IF(isnull(@DocVersionList,'') = '')
- Insert into @IDs
- Select VersionID, ItemID, dbo.ve_GetFolderPath(VersionID), .dbo.vefn_GetUnitPrefix(config)
- from DocVersions where ItemID is not null
-else
- Insert into @IDs
- Select ID, ItemID, dbo.ve_GetFolderPath(VersionID), .dbo.vefn_GetUnitPrefix(config)
- from vefn_SplitInt(@DocVersionList,',') as T
- join DocVersions DV on VersionID = T.ID
-RETURN
-END
-
-GO
-
-IF (@@Error = 0) PRINT 'Function: [vefn_DocVersionSplit] Succeeded'
-ELSE PRINT 'Function: [vefn_DocVersionSplit] Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingAndChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingAndChildrenItems];
-GO
-
-/*
-select * from vefn_SiblingAndChildrenItems('','3-')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingAndChildrenItems](@DocVersionList varchar(MAX),@UnitPrefix varchar(MAX))
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ItemID], [DVPath], [Level], [ParentID], [Ordinal], [PreviousID], [FromType], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],PPath, [Path], [IsRNO], [POrdinalPath], [OrdinalPath], [UnitPrefix]) as (
- Select [I].[ItemID], DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],
- Cast('' as nvarchar(max)) [PPath],
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path],
- 0 IsRNO, Cast('' as nvarchar(max)) [POrdinalPath], Cast('0001' as nvarchar(max)) [OrdinalPath], UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select I.[ItemID], DVPath, [Level] + 1,Z.ItemID,0, I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Procedure
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Section
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select I.[ItemID], DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Procedure
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') -- Section
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-
-)
-insert into @SiblingAndChildren
-select I.[ItemID], [DvPath], [Path], I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO]/*,[PPath],[POrdinalPath]*/,[OrdinalPath]
- from ItemZ I
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
-
-IF (@@Error = 0) PRINT 'Function: vefn_SiblingAndChildrenItems Succeeded'
-ELSE PRINT 'Function: vefn_SiblingAndChildrenItems Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[FindAnnotations]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [FindAnnotations];
-
-/****** Object: UserDefinedFunction [dbo].[FindAnnotations] Script Date: 09/28/2012 11:06:59 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select * from [FindAnnotations]('12','',0,'')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[FindAnnotations](@AnnotationTypeList varchar(MAX), @SearchString varchar(MAX), @CaseSensitive int, @StepTypeList varchar(MAX))
-RETURNS @Results TABLE
-(
- AnnotationID int Primary Key
-)
-WITH EXECUTE AS OWNER
-BEGIN
- insert into @Results
- select Distinct A.AnnotationID from Items I
- join Contents C on I.ContentID = C.ContentID
- left Join Parts P on P.ItemID = I.ItemID
- join Annotations A on A.ItemID = I.ItemID
- join vefn_AnnotationTypeSplit(@AnnotationTypeList) TT on TT.TypeID=A.TypeID
-where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND A.SearchText like @SearchString Collate SQL_Latin1_General_CP1_CI_AS))
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND isnull(P.FromType,0) = 5)))
-
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'Function: FindAnnotations Succeeded'
-ELSE PRINT 'Function: FindAnnotations Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchAnnotationItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchAnnotationItemAndChildren];
-GO
-/*
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'1',Null,0,"3-"
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'2',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'3',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'4',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'5',Null,0
-exec vesp_SearchAnnotationItemAndChildren Null,Null,'',Null,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchAnnotationItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @AnnotationTypeList varchar(MAX), @SearchString nvarchar(MAX), @CaseSensitive as int, @UnitPrefix nvarchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],AnnotationID SearchAnnotationID, SearchText, TT.Name AnnotationType,
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- join Annotations A on A.ItemID = I.ItemID
- join vefn_AnnotationTypeSplit(@AnnotationTypeList) TT on TT.TypeID=A.TypeID
-where
- A.AnnotationID in(select AnnotationID from [FindAnnotations](@AnnotationTypeList, @SearchString, @CaseSensitive, @StepTypeList))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchAnnotationItemAndChildren Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchItemAndChildren];
-GO
-/*
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildren '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildren '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildren '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildren '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildren '','','RCP',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%',0,0,0,0
-exec vesp_SearchItemAndChildren '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildren '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildren '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildren '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildren '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildren '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildren '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildren '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildren '','','turbine-driven',0,0,0,0
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- (isnull(@SearchString,'')=''
- OR (@CaseSensitive = 1 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND .dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- OR (@CaseSensitive = 1 AND D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- OR (@CaseSensitive = 0 AND D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- )
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SearchItemAndChildrenNew] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchItemAndChildrenNew]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchItemAndChildrenNew];
-GO
-
-/*
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,1,0,0
-exec vesp_SearchItemAndChildrenNew '1,2,4','20007','#Link:Transition',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','#Link:Refer',1,2,0,0
-exec vesp_SearchItemAndChildrenNew '4','','200`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '4','10000','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '4','','[0-9]`F',0,1,0,0
-exec vesp_SearchItemAndChildrenNew '1','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','"RCP"',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','20040','',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','10000','XYZZY',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%IF%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%47%',1,0,0,1
-exec vesp_SearchItemAndChildrenNew '','','condenser not av',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(SG OR LHSI) AND DISPATCH',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','DISPATCH NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','PORV NEAR SG',2,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','CHECK NORMAL',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','(Resolved Transition Text)',0,0,0,0
-exec vesp_SearchItemAndChildrenNew '','','%turbine-driven%',0,0,0,0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchItemAndChildrenNew] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX),
-@SearchString varchar(MAX), @CaseSensitive as int, @IncludeLinks as int, @IncludeRtfFormatting as int, @IncludeSpecialCharacters as int, @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-select ZZ.DvPath, ZZ.Path, ZZ.[Level],ZZ.[FromType],ZZ.[Ordinal], ZZ.[ParentID], ZZ.[ItemID],ZZ.[PreviousID],ZZ.[ContentID],ZZ.[DTS],ZZ.[UserID]
- ,II.[LastChanged]
- ,CC.[Number],CC.[Text],CC.[Type],CC.[FormatID],CC.[Config],CC.[DTS] [cDTS],CC.[UserID] [cUserID]
- ,CC.[LastChanged] [cLastChanged],
- PP.[ContentID] [pContentID], PP.[DTS] [pDTS],PP.[UserID] [pUserID], PP.[LastChanged] [pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ZZ.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ZZ.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ZZ.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ZZ.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ZZ.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ZZ.[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=CC.[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=CC.[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=CC.[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=CC.[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=CC.[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=CC.[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=CC.[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=CC.[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=CC.[ContentID]) [ZContentCount]
-from vefn_SiblingAndChildrenItems(@DocVersionList, @UnitPrefix) ZZ
- Join Items II on ZZ.ItemID=II.ItemID
- Left Join Parts PP on ZZ.PContentID=PP.ContentID and ZZ.FromType = PP.FromType
- Join Contents CC on CC.ContentID=ZZ.ContentID
-where ZZ.ContentID in (select ContentID from vefn_FindText(@DocVersionList,@SearchString,@CaseSensitive,@IncludeLinks,@IncludeRtfFormatting,@IncludeSpecialCharacters,@StepTypeList))
- order by DvPath,OrdinalPath
- GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchItemAndChildrenNew Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tr_tblItems_Update]') AND OBJECTPROPERTY(id,N'IsTrigger') = 1)
- DROP TRIGGER [tr_tblItems_Update];
-
- /****** Object: Trigger [dbo].[tr_tblItems_Update] Script Date: 04/25/2012 14:09:52 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: Trigger [tr_tblItems_Update] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE trigger [dbo].[tr_tblItems_Update] on [dbo].[tblItems] for update as
- begin
- if exists (select * from inserted)
- begin
- if update(PreviousID) or update(ContentID) or update(UserID) or update(DeleteStatus)
- begin
- insert into ItemAudits(ItemID,PreviousID,ContentID,DTS,UserID,DeleteStatus)
- select dd.ItemID,dd.PreviousID,dd.ContentID,dd.DTS,dd.UserID,dd.DeleteStatus from deleted dd
- inner join inserted ii on dd.ItemID = ii.ItemID
- where dd.deletestatus = 0 or ii.deletestatus != 0
- end
- end
- end
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger alteration: tr_tblItems_Update Succeeded'
-ELSE PRINT 'Trigger alteration: tr_tblItems_Update Error on Alteration'
-GO
-
-/****** Object: StoredProcedure [vesp_GetROUsagesByProcedure] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetROUsagesByProcedure]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetROUsagesByProcedure];
-GO
-
-/*
-exec vesp_GetROUsagesByProcedure '1,2,4','20007','1:00010000019C,0001000002AE'
-exec vesp_GetROUsagesByProcedure '1,2,4','','1:00010000019C,0001000002AE'
-exec vesp_GetROUsagesByProcedure '1,2,4','20007','1:0001'
-exec vesp_GetROUsagesByProcedure '1,2,4','20006','1'
-exec vesp_GetROUsagesByProcedure '1,2,4','20006',''
-exec vesp_GetROUsagesByProcedure '1,2,4',Null,Null
-exec vesp_GetROUsagesByProcedure '1','','1:000700000124',''
-exec vesp_GetROUsagesByProcedure '','','1:0007000001C9,000700000124', ''
-exec vesp_SearchROItemAndChildren '1','','1:000700000124',''
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetROUsagesByProcedure] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @ROSearchString varchar(MAX), @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, FoundROID) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, null
-
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- --Path + case when Z.FromType < 3 then @Delim else @DelimStep end + case C.Type/10000
- Path + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001',
- null
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + @UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4),
- null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount],
- RRU.ROID FoundROID
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
-join (select contentid, ru.roid from ROusages RU
-join vefn_SplitROSearch(@ROSearchString) RR on case when len(RU.ROID) = 12 then RU.ROID +'0000' else RU.ROID end
- like RR.roid + '%'
-union
-select contentid, du.roid from DROusages DU
-join entries ee on DU.DOCID = EE.DOCID
-join vefn_SplitROSearch(@ROSearchString) RR on case when len(DU.ROID) = 12 then DU.ROID +'0000' else DU.ROID end like RR.roid + '%') RRU on RRU.ContentID = I.ContentID
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath /*having foundroid in ( select roid from vefn_SplitROSearch(@ROSearchString))*/
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetROUsagesByProcedure Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetROUsagesByProcedure Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[FindRoUsages]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [FindRoUsages];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Declare @ROSearchString varchar(MAX)
-set @ROSearchString='1:000200000089'
-select * from FindRoUsages('1:000200000089')
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[FindRoUsages](@ROSearchString varchar(Max))
-RETURNS @Results TABLE
-(
- ContentID int Primary Key
-)
-WITH EXECUTE AS OWNER
-BEGIN
- insert into @Results
- select ContentID from ROUsages RU
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- RU.ROID like RR.ROID + '%' Collate SQL_Latin1_General_CP1_CI_AS
- UNION
- select ContentID from Entries EE
- Join DROUsages RU on RU.DocID = EE.DocID
- join vefn_SplitROSearch(@ROSearchString) RR
- ON RR.RODBID = RU.RODBID and
- case when len(RU.ROID) = 12 then RU.ROID +'0000' else RU.ROID end like RR.ROID + '%' Collate SQL_Latin1_General_CP1_CI_AS
- RETURN
-END
-GO
-
-IF (@@Error = 0) PRINT 'Function: FindRoUsages Succeeded'
-ELSE PRINT 'Function: FindRoUsages Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchROItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [vesp_SearchROItemAndChildren];
-
-GO
-/****** Object: StoredProcedure [dbo].[vesp_SearchROItemAndChildren] Script Date: 09/28/2012 09:02:50 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:00010000019C,0001000002AE',''
-exec vesp_SearchROItemAndChildren '1,2,4','','1:00010000019C,0001000002AE',''
-exec vesp_SearchROItemAndChildren '1,2,4','20007','1:0001',''
-exec vesp_SearchROItemAndChildren '1,2,4','20006','1',''
-exec vesp_SearchROItemAndChildren '1,2,4','20006','',''
-exec vesp_SearchROItemAndChildren '',Null,Null,'XXX-',''
-exec vesp_SearchROItemAndChildren '1','','1:000200000089',''
-exec vesp_SearchROItemAndChildren '1','','1:00010000019c',''
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SearchROItemAndChildren] (@DocVersionList varchar(MAX), @StepTypeList varchar(MAX), @ROSearchString varchar(MAX), @UnitPrefix as varchar(MAX))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz(DVPath, [Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID],
- [pDTS],[pUserID],[pLastChanged],PPath, Path, IsRNO, POrdinalPath, OrdinalPath, UnitPrefix) as (
- Select DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [I].[ItemID], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID],[I].[LastChanged]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID], [I].[LastChanged] [pLastChanged],
- Cast('' as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path,
- 0 IsRNO, Cast('' as nvarchar(max)) POrdinalPath, Cast('0001' as nvarchar(max)) OrdinalPath, UnitPrefix
-
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
-Union All
--- Children
- select DVPath, [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- --Path + case when Z.FromType < 3 then @Delim else @DelimStep end + case C.Type/10000
- Path + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('0000' + Cast(P.FromType as varchar(4)), 4) + '-0001', UnitPrefix
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- ,PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + UnitPrefix + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('0000' + cast(Z.[Ordinal] + 2 as varchar(4)), 4), UnitPrefix
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-)
-select DvPath, Path, I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- left join Entries E on C.ContentID = E.ContentID
- left join Documents D on E.DocID = D.DocID
- where
- I.ContentID in(select ContentID from FindROUsages(@ROSearchString))
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or
- ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- or
- (@StepTypeList like '%20040%' AND IsRNO = -1)))
- order by DvPath,OrdinalPath
-OPTION (MAXRECURSION 10000)
-END
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchROItemAndChildren Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFrom]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFrom];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFrom] Script Date: 10/03/2012 10:06:38 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFrom]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=I.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=I.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=I.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=I.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=I.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=I.[ItemID]) [Transition_ToIDCount]
-from Items I
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFrom Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFrom Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranTo]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranTo];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranTo] Script Date: 10/03/2012 10:08:03 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranTo]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=Z.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=Z.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=Z.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=Z.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=Z.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=Z.[ItemID]) [Transition_ToIDCount]
-from Itemz Z join Items I on I.ItemID = Z.ItemID
-OPTION (MAXRECURSION 10000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranTo Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranTo Error on Creation'
-GO
-
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranFromAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranFromAndContent];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranFromAndContent] Script Date: 10/03/2012 10:52:31 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranFromAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Items I Join Contents C on I.ContentID = C.ContentID
-join Transitions T on I.ContentID = T.FromID
-END
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranFromAndContent Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsTranToAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsTranToAndContent];
-GO
-GO
-/****** Object: StoredProcedure [dbo].[vesp_ListItemsTranToAndContent] Script Date: 10/03/2012 10:08:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsTranToAndContent]
-WITH EXECUTE AS OWNER
-AS
-begin
-with Itemz(ItemID, ContentID, PreviousID, [Type]) as (
- Select Distinct ItemID, C.ContentID, PreviousID, C.Type
- FROM [Items] I
- Join Contents C on C.ContentID = I.ContentID
- JOIN Transitions T on t.ToID = I.ItemID or t.RangeID = I.ItemID
- --where [ItemID]=@ItemID
-Union ALL
--- Parent
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- Join Contents C on C.ContentID = I.ContentID
--- Previous
-Union ALL
- select I.ItemID,I.ContentID, I.PreviousID, C.Type
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- Join Contents C on C.ContentID = I.ContentID
- where Z.Type >= 10000
-)
-Select distinct I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz Z
-Join Items I on Z.ItemID = I.ItemID
-Join Contents C on I.ContentID = C.ContentID
-OPTION (MAXRECURSION 10000)
-END
-GO
-
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsTranToAndContent Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingAndChildrenItemsByProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingAndChildrenItemsByProc]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingAndChildrenItemsByProc];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select * from vefn_SiblingAndChildrenItemsByProc(30) II
-join
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingAndChildrenItemsByProc](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ItemID], [DVPath], [Level], [ParentID], [Ordinal], [PreviousID], [FromType], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],PPath, [Path], [IsRNO], [POrdinalPath], [OrdinalPath]) as (
- Select [I].[ItemID], '' DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],
- Cast('' as nvarchar(max)) [PPath],
- Cast(Case when C.Type < 20000 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path],
- 0 IsRNO, Cast('' as nvarchar(max)) [POrdinalPath], Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-Union All
--- Children
- select I.[ItemID], DVPath, [Level] + 1,Z.ItemID,0, I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select I.[ItemID], DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- when 1 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'')
- else case when .dbo.vefn_GetLastDelim(Path) = '.' THEN @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-
-)
-insert into @SiblingAndChildren
-select I.[ItemID], [DvPath], [Path], I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO]/*,[PPath],[POrdinalPath]*/,[OrdinalPath]
- from ItemZ I
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsByProc Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingAndChildrenItemsByProc Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_RemoveRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveRange]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveRange];
-GO
-
-/*
-SELECT ContentID, text, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid in (select top 25 ContentID from contents where text like '%[[]END>%')
-
-select top 25 * from contents where text like '%[[]END>%'
-
-SELECT ContentID, [dbo].[vefn_RemoveRange](text,'') StrippedText
-from contents
-where contentid =189
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveRange](@text nvarchar(MAX),@startToken nvarchar(MAX), @endToken nvarchar(MAX))
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @index int
- DECLARE @index2 int
- DECLARE @lenStartToken int
- DECLARE @lenEndToken int
- DECLARE @lastIndex int
- SET @lenStartToken = len(@startToken)
- SET @lenEndToken = len(@endToken)
- SET @index = CHARINDEX(@startToken , @text)
- SET @lastIndex = -1
- while (@index != 0)
- BEGIN
- SET @index2 = CHARINDEX(@endToken , @text, @index + @lenStartToken)
- if (@index2>0)
- SET @text = substring(@text,1,@index-1) + substring(@text,@index2+@lenEndToken,len(@text))
- SET @lastIndex = @index
- SET @index = CHARINDEX(@startToken , @text)
- if (@index = @lastIndex) SET @index = 0
- END
- RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveRange Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetPath]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetPath];
-GO
-
-/*
-select ItemID, CC.Type, dbo.ve_GetPath(ItemID)
-from Items II join Contents CC on II.ContentID = CC.ContentID
-where ItemID in(111,265,266,267)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetPath] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @Path varchar(max);
-with Itemz(ItemCount,ItemID,PreviousID,FromType,CType,Number,Text,PPath, Path) as (
- Select 1,ItemID,PreviousID,0,C.Type/10000,C.Number,C.Text,
- Cast(Case when C.Type < 20000 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') else '' end as nvarchar(max)) PPath,
- Cast(Case when C.Type < 20000 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') else '1' end as nvarchar(max)) Path
- from Items I
- join Contents C on I.ContentID = C.ContentID
- where ItemID=@ItemID
- Union All
--- siblings
- Select ItemCount+1,I.PreviousID,II.PreviousID,0,C.Type/10000,Z.Number,Z.Text,PPath,cast(ItemCount + 1 as nvarchar(3)) + PPath
- from Items I
- join Contents C on I.ContentID = C.ContentID
- Join Items II on II.ItemID = I.PreviousID
- Join Itemz Z on I.ItemID=Z.ItemID
- where I.PreviousID != 0
- Union All
--- children
- select 1,I.ItemID,I.PreviousID,P.FromType,C.Type/10000,C.Number,C.Text,
- case C.Type/10000
- when 0 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'')
- when 1 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO`'
- when 7 then '`Table`'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath PPath,
- --'1' +
- case C.Type/10000
- when 0 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'')
- when 1 then '`' + Isnull(C.Number,'') +'`' + Isnull(C.Text,'') +'`' + cast(ItemCount + 0 as varchar(3))
- else
- case P.FromType
- when 1 then 'PRC`' + cast(ItemCount + 0 as varchar(3))
- when 2 then '`SEC`' + cast(ItemCount + 0 as varchar(3))
- when 3 then '`Caution`' + cast(ItemCount + 0 as varchar(3))
- when 4 then '`Note`' + cast(ItemCount + 0 as varchar(3))
- when 5 then '`RNO'
- when 7 then '`Table'
- else '`' + cast(ItemCount + 0 as varchar(3))
- end end + PPath Path
-
- from Parts P
- join Items I on I.ContentID = P.ContentID
- join Contents C on I.ContentID = C.ContentID
- join Itemz Z on P.ItemID=Z.ItemID
-)
-select @Path = path From Itemz where ItemCount=1 and CType=0
-OPTION (MAXRECURSION 10000)
-return @Path
-END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetPath Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetPath Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_ProcedureByProcID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ProcedureByProcID]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ProcedureByProcID];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_ProcedureByProcID] Script Date: 05/18/2011 11:20:48 ******/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_ProcedureByProcID](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-insert into @SiblingAndChildren
- Select
-[I].[ItemID]
-, '' DVPath
-, Cast(Case when C.Type < 20000 then @Delim + Isnull(C.Number,'') + @DelimNumber + Isnull(C.Text,'') else '1' end as nvarchar(max)) [Path]
-,0 [Level]
-,0 [FromType]
-, 0 [Ordinal]
-, 0 [ParentID]
-, [PreviousID]
-,[I].[ContentID]
-,[I].[DTS]
-,[I].[UserID]
- ,0 [pContentID]
-,[I].[DTS] [pDTS]
-, [I].[UserID] [pUserID]
-,0 IsRNO
- , Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-END
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ProcedureByProcID Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ProcedureByProcID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindText];
-GO
-
-/*
-SELECT * From vefn_FindText('1','turbine-driven',0,0,0,1,'')
-SELECT * From vefn_FindText('1','turbine\u8209?driven',0,0,0,0,'')
-SELECT * From vefn_FindText('1','trip',0,0,0,0,'')
-select * from vefn_FindText('1','',0,0,0,1,'20010,20008')
-select * from vefn_FindText('1',null,0,0,0,1,'20010,20008')
-select * from vefn_FindText('1',' ',0,0,0,1,'20010,20008')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX)
-,@CaseSensitive as int
-,@IncludeLinks as int
-,@IncludeRtfFormatting as int
-,@IncludeSpecialCharacters as int
-,@StepTypeList varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Set @SearchString = .dbo.vefn_FixSearchString(@SearchString)
-IF isnull(@SearchString,'%')='%'
- BEGIN
- insert into @FoundContents
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- where(isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or (dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))
- END
-ELSE
- BEGIN
- Declare @SearchStringx nvarchar(200) --kbr
- set @SearchStringx = replace(@SearchString,'-','\u8209?') --kbr
- IF @CaseSensitive = 0 -- Not Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchStringx Collate SQL_Latin1_General_CP1_CI_AS)
- AND ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CI_AS)
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
- ELSE
- BEGIN
- IF @CaseSensitive = 1 -- Case Sensitive
- BEGIN
- insert into @FoundContents
- select C.ContentID from vefn_FindContentText(@DocVersionList,@SearchStringx) C
- where
- (.dbo.vefn_RemoveExtraText(C.Text,@IncludeLinks, @IncludeRtfFormatting, @IncludeSpecialCharacters) like @SearchStringx Collate SQL_Latin1_General_CP1_CS_AS)
- AND ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- UNION
- select C.ContentID from (select * from Contents where ContentID in(select ContentID from vefn_DVContent(@DocVersionList))) C
- join Entries E on C.ContentID = E.ContentID
- join Documents D on E.DocID = D.DocID
- where
- (D.DocAscii like @SearchString Collate SQL_Latin1_General_CP1_CS_AS)
- AND
- ((isnull(@StepTypeList,'') = '' and dbo.vefn_AllSections(C.Type)>=10000)
- or ((dbo.vefn_AllSections(C.Type) in (Select ID from vefn_SplitInt(@StepTypeList,',')))))
- END
- END
-END
-RETURN
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindText Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMS2010.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [getItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAndChildren];
-GO
-
--- getItemAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemNextAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemNextAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemNextAndChildren];
-GO
-
--- getItemNextAndChildren 111
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemNextAndChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged] from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemNextAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: getItemNextAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [ve_GetSiblingCount] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetSiblingCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetSiblingCount];
-GO
-
-/*
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) HLStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 10000 and CC.Type < 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Number,CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SectionCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type < 10000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-select top 5 CC.Text,Type,ItemID, dbo.ve_GetSiblingCount(ItemID) SubStepCount
-from Contents CC
-Join Parts PP on PP.ContentID = CC.ContentID
-where CC.Type >= 20000
-order by dbo.ve_GetSiblingCount(ItemID) desc
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetSiblingCount] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([Direction], [ItemID], [PreviousID]) as (
- Select 0 Direction,[ItemID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings Previous
-Union All
- select -1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.Direction <= 0
--- Siblings Next
-Union All
- select 1 Direction,I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.ItemID = Z.PreviousID
- where Z.Direction >= 0
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-return @Count END;
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetSiblingCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetSiblingCount Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelSteps] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelSteps]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelSteps];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelSteps]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetPath([ItemID]) Path
-from Itemz
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelSteps Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_AllHighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllHighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllHighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_AllHighLevelStepTransitions()
-where ExternalTransitions > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllHighLevelStepTransitions]()
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Ordinal int
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,ExternalChildTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM (select II.ItemID ParentID, PP.ItemID, PreviousID, II.ContentID, II.DTS, II.UserID, II.LastChanged from Items II
-Join Contents CC on II.ContentID = CC.ContentID
-Join Parts PP on PP.ContentID = II.ContentID and FromType = 6
-where CC.Type = 10000) TT
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,Ordinal,dbo.ve_GetShortPath([ItemID]) Path,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindExternalChildTransitions(ItemID)) ExternalChildTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-where (Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) > 0
-OR(Select count(*) from vefn_FindExternalTransitions(ItemID)) > 0
-OR(Select count(*) from vefn_FindInternalTransitions(ItemID)) > 0
-Order by ParentID,ItemID
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllHighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItems];
-GO
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItems](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildItemsRange] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildItemsRange]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildItemsRange];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildItemsRange](@StartItemID int, @EndItemID int, @DestFormat int)
-RETURNS @Children TABLE
-(
-ItemID int PRIMARY KEY,
-ContentID int,
-FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @FormatID int
-SELECT @FormatID = isnull(@DestFormat,.dbo.vefn_GetInheritedFormat(@StartItemID,1))
-BEGIN
-with Itemz([Level], [ItemID], [ContentID], [FormatID], [FoundEnd]) as (
-Select 0 [Level], [ItemID], I.[ContentID], IsNull(C.[FormatID], @FormatID), case [ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-FROM [Items] I
-JOIN [Contents] C on I.ContentID = C.ContentID
-where [ItemID]=@StartItemID
-Union All
--- Children
-select [Level] + 1, I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Parts P on P.ContentID = Z.ContentID
-join Items I on I.ItemID = P.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
--- Siblings
-Union All
-select [Level] , I.[ItemID], I.[ContentID], IsNull(C.[FormatID], Z.[FormatID]), case I.[ItemID] when @EndItemID then 1 else 0 end [FoundEnd]
-from Itemz Z
-join Items I on I.PreviousID = Z.ItemID
-JOIN [Contents] C on I.ContentID = C.ContentID
-where FoundEnd = 0
-)
-insert into @Children select ItemID, ContentID, FormatID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildItemsRange Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildItemsRange Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_ChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ChildrenItems](@ItemID int, @ParentID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_ChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_ChildrenItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindAffectedTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindAffectedTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindAffectedTransitions];
-GO
-
-/*
-select top 1 * from items order by itemid desc
-Select
-FromID,.dbo.ve_GetPathFromContentID(FromID) ContentPath
-,ToID,dbo.ve_GetPath(ToID) ToPath
-,RangeID,dbo.ve_GetPath(RangeID) RangePath
-,cc.Text
-from vefn_FindAffectedTransitions(2102) ttz
-join transitions tt on ttz.TransitionID = tt.TransitionID
---join items ii on ii.ItemID = tt.fromID
-join contents cc on tt.FromID = cc.contentid
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindAffectedTransitions](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Type int
-select @Type = CC.Type from Contents CC Join Items II ON II.ContentID = CC.ContentID Where ItemID = @ItemID
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where @Type >= 20000 OR Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-, Itemz2([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- All Siblings
-Union All
- select [Level] ,Z.[Ordinal] -1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz2 Z
- join Items I on Z.PreviousID = I.ItemID
- where @Type >= 20000 OR Z.[Level] > 0 -- This would limit the siblings to the siblings of the children and not the initial ItemID
-)
-insert into @Transitions
-select TransitionID from Transitions TT
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-UNION
-select TransitionID from Transitions TT
-JOIN Itemz2 on ToID=ItemID and RangeID=ItemID and IsRange = 2
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-END
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindAffectedTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalChildTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalChildTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalChildTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalChildTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalChildTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz where Level > 0) OR RangeID in(select ItemID from Itemz where Level > 0))
-AND FromID not in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalChildTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindExternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID not in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitions];
-GO
-
-/*
-Select * from vefn_FindInternalTransitions(185)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- FromItemID int,
- ToID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindInternalTransitionsForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindInternalTransitionsForCopy]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindInternalTransitionsForCopy];
-GO
-
-/*
-Select * from vefn_FindInternalTransitionsForCopy(10277)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindInternalTransitionsForCopy](@ItemID int)
-RETURNS @Transitions TABLE
-(
- TransitionID int,
- FromID int,
- TranType int,
- ToID int,
- RangeID int,
- OldTransition int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Transitions
-select TransitionID, FromID, TT.TranType, TT.ToID, TT.RangeID, CAST(TT.Config as int) --case when TT.ToID in(select ItemID from Itemz) then TT.ToID else TT.RangeID end [ToID]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID in(select ItemID from Itemz) OR RangeID in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindInternalTransitionsForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetInheritedFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetInheritedFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetInheritedFormat];
-GO
-
-/* Samples
-Select TranType, .dbo.vefn_GetInheritedFormat(355) TransFormat
- from(Select 1 TranType UNION Select 2 TranType UNION Select 3 TranType UNION
- Select 4 TranType UNION Select 5 TranType UNION Select 6 TranType UNION
- Select 7 TranType UNION Select 8 TranType UNION Select 9 TranType UNION Select 10 TranType) TT
-
-Select top 25 ItemID, TranType, .dbo.vefn_GetInheritedFormat(ItemID) TransFormat
- From Transitions TR
- Join Items II on II.ContentID = TR.FromID
-
-*/
-/*
- local is a 'boolean' (0=false, 1=true) to state whether to look at the item itself or
- only its parent
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetInheritedFormat] (@ItemID int, @local int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @FormatID as int
- -- First get the Active Format
- begin
- with Itemz([Level], [PreviousID], [ItemID], [ParentID], [FolderID], [FormatID]) as (
- Select 0 [Level], [PreviousID], [ItemID], null, null,
- case when @local = 1 then (Select FormatID from Contents CC where [CC].[ContentID] = [II].[ContentID])
- else null end FormatID
- FROM [Items] II
- where [ItemID]=@ItemID
- Union All
- -- Parent Item
- select [Level] + 1, I.[PreviousID], I.[ItemID], null, null, C.FormatID
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
- join Contents C on C.ContentID = P.ContentID
- where Z.FormatID is null
- -- Siblings Item
- Union All
- select [Level] , I.[PreviousID] , I.[ItemID], null, null, Z.FormatID
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
- where Z.FormatID is null
- Union All
- -- DocVersion From Item
- select [Level] + 1, null, null, DV.FolderID, null, DV.FormatID
- from Itemz Z
- join DocVersions DV on DV.ItemID = Z.ItemID
- where Z.FormatID is null
- Union All
- -- Folders
- select [Level] + 1, null, null, FF.ParentID, FF.FolderID, FF.FormatID
- from Itemz Z
- join Folders FF on FF.FolderID = Z.ParentID and FF.ParentID <> FF.FolderID
- where Z.FormatID is null
- )
- Select @FormatID = FormatID from Itemz ZZ Where FormatID is not null
- OPTION (MAXRECURSION 10000)
- RETURN @FormatID
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetInheritedFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_HighLevelStepTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_HighLevelStepTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_HighLevelStepTransitions];
-GO
-
-/*
-select * from vefn_HighLevelStepTransitions(105,104)
-where TransCount > 0
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_HighLevelStepTransitions](@ItemID int, @ParentID int)
-RETURNS @HighLevelStepTransitions TABLE
-(
- ParentID int
- ,ItemID int PRIMARY KEY
- ,Path varchar(max)
- ,TransCount int
- ,ExternalTransitions int
- ,InternalTransitions int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- --where Z.[Level] > 0
-)
-Insert into @HighLevelStepTransitions
-select [ParentID],ItemID,dbo.ve_GetPath([ItemID]) ,(Select Count(*) from Transitions where ToID=ItemID OR RangeID=ItemID ) TransCount
-,(Select count(*) from vefn_FindExternalTransitions(ItemID)) ExternalTransitions
-,(Select count(*) from vefn_FindInternalTransitions(ItemID)) InternalTransitions
-from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_HighLevelStepTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_SiblingChildrenItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingChildrenItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingChildrenItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingChildrenItems](@ItemID int)
-RETURNS @SiblingChildren TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 as [pContentID],[DTS] As [pDTS], [UserID] As [pUserID], [LastChanged] As [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] as [pContentID],P.[DTS] As [pDTS],P.[UserID] As [pUserID],P.[LastChanged] As [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @SiblingChildren select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingChildrenItems Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_SiblingItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_SiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_SiblingItems];
-GO
-
-/*
-select * from Transitions
-where (ToID in(select ItemID From dbo.vefn_ChildrenItems(185,184))) OR (RangeID in(select ItemID From dbo.vefn_ChildrenItems(185,184)))
-AND NOT (FromID in(Select ContentID From dbo.vefn_ChildrenItems(185,184)))
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingItems](@ItemID int, @ParentID int)
-RETURNS @Siblings TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @Siblings select ItemID, ContentID, Ordinal from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_SiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_SiblingItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_CleanUpItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CleanUpItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CleanUpItems];
-GO
-
-/*
-select *, .dbo.ve_GetParts(ContentID,6) SubSteps from items
-where contentid in(select contentid from contents where text like 'DISPATCH operator to open breaker%')
-
-
-select * from items
-where itemid in(298,299,436,440)
-
-select itemid from items
-where previousid is null and itemid not in (select itemid from parts)
-
---select * from contents where text like 'foldout cip%'
-
-select count(*) from parts
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_CleanUpItems]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- BEGIN
-with Itemz(ItemID) as(
-select itemid from items
-where previousid is null
-and itemid not in(1)
-and itemid not in (select itemid from parts)
-UNION ALL
-select ii.itemid from items ii join itemz zz on zz.itemid = ii.previousid
-)
-delete from items where itemid in (select itemid from itemz)
-OPTION (MAXRECURSION 10000)
- END
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_CleanUpItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_CleanUpItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListChildren];
-GO
-
--- vesp_ListChildren 17
--- drop procedure [getItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListChildren] (@ItemID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListContentPath] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListContentPath]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListContentPath];
-GO
-
--- vesp_ListContentPath 148
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[vesp_ListContentPath]
- (
- @ContentID int
- )
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with ContentZ(BaseID,ContentID,ItemID,Number,Text,Item,Level,PreviousID) as (
- Select II.ItemID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,1,II.PreviousID
- from Items II join Contents CC on CC.ContentID=II.ContentID where @ContentID=II.ContentID
- Union All
---
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,ZZ.Item+1,ZZ.Level,II.PreviousID
- FROM ContentZ ZZ
- Join Items II on II.ItemID = ZZ.PreviousID
- Join Contents CC on II.ContentID = CC.ContentID
- where ZZ.PreviousID is not null
- Union All
- Select BaseID,CC.ContentID,II.ItemID,CC.Number,CC.Text,1,ZZ.Level+1,II.PreviousID
- FROM ContentZ ZZ
- Join Parts PP on ZZ.ItemID = PP.ItemID
- Join Contents CC on PP.ContentID = CC.ContentID
- Join Items II on II.ContentID = CC.ContentID
- where ZZ.PreviousID is null --and ZZ.ItemID in(717,715,711,662)
-)
-Select ZZ.BaseID,ZZ.Level,MaxItem,ZZ.Number,ZZ.Text from ContentZ ZZ
-join (select BaseID, Level, max(item) MaxItem from ContentZ group by BaseID,Level) T1 on T1.BaseID=ZZ.BaseID and T1.Level = ZZ.Level
-where Item=1
-order by ZZ.BaseID,ZZ.Level Desc, Item Desc
-OPTION (MAXRECURSION 10000)
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListContentPath Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListContentPath Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemAndChildren];
-GO
-
--- vesp_ListItemAndChildren 1,0
--- drop procedure [vesp_ListItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemAndChildren] (@ItemID int, @ParentID int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemAndChildren Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMStoCM.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [getItemAuditsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAuditsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAuditsByItemID];
-GO
-
-/*
-getitemauditsbyitemid 10183
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAuditsByItemID]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-/*
- with Itemz([AuditType],[Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 'root' [AuditType], 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]= @ItemID
- Union All
- -- Children
- select 'chld' [AuditType], [Level] + 2,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- -- Siblings
- Union All
- select 'sibl' [AuditType], [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
- )
-*/
-
-select * from
-(
- --get deleted previous item
- select 0 Level,ia.*,dbo.[ve_GetPartType](@ItemID) ItemType from
- itemaudits ia
- inner join itemaudits iaa on ia.itemid = iaa.previousid
- where iaa.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
- union
- --get deleted next item
-/*
- select 1 Level,ia.*,@itemtype ItemType from itemaudits ia
- where ia.previousid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-*/
- select 1 Level,
- ia.[AuditID],
- ia.[ItemID],
- ia.[PreviousID],
- ia.[ContentID],
- ia.[DTS],
- ia.[UserID],
- ti.[DeleteStatus]
-,dbo.[ve_GetPartType](@ItemID) ItemType
- from itemaudits ia
- inner join tblitems ti on ia.itemid = ti.itemid
- where ia.previousid = @ItemID
- and ti.deletestatus > 0
-and ia.dts = ti.dts
- union
- --get chillins
- select 2 Level,ia.*,
-case
-when pa.fromtype = 1 then 'Procedure'
-when pa.fromtype = 2 then 'Section'
-when pa.fromtype = 3 then 'Caution'
-when pa.fromtype = 4 then 'Note'
-when pa.fromtype = 5 then 'RNO'
-when pa.fromtype = 6 then 'Step'
-when pa.fromtype = 7 then 'Table'
-else 'Unknown'
-end itemtype
- from itemaudits ia
- inner join partaudits pa on ia.itemid = pa.itemid
- inner join items ii on pa.contentid = ii.contentid
- where ii.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-) ia
-order by deletestatus desc
-OPTION (MAXRECURSION 10000)
---select * from itemz order by parentid,ordinal
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAuditsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAuditsByItemID Error on Creation'
-GO
-
--- THIS IS STUFF THAT WE FIXED IN PROMStoAPPR.SQL AND PUT IN HERE ALSO
-/****** Object: StoredProcedure [vefn_FindExternalFromTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalFromTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalFromTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalFromTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_FindExternalFromTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID not in(select ItemID from Itemz) OR RangeID not in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getAnnotationAuditsChronologyByItemIDandUnitID] Script Date: 10/10/2012 14:45:33 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsChronologyByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAuditsChronologyByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemIDandUnitID] ******/
-/*
-getAnnotationAuditsChronologyByItemIDandUnitID 13,13,1
-getAnnotationAuditsChronologyByItemIDandUnitID 30,8570,1
-getAnnotationAuditsChronologyByItemIDandUnitID 1,1,1
-getAnnotationAuditsChronologyByItemIDandUnitID 30,8505,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[getAnnotationAuditsChronologyByItemIDandUnitID]
-(
- @ProcItemID int,
- @ItemID int,
- @UnitID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from vefn_tblchilditems (@procitemid,@itemid,0))
- and dts > @dts
- and (dbo.ve_GetItemDerivedApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemDerivedApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%')
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsChronologyByItemIDandUnitID] Script Date: 10/10/2012 12:48:39 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsChronologyByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemIDandUnitID] ******/
-/*
-getContentAuditsChronologyByItemIDandUnitID 10154,10154,0,1
-getContentAuditsChronologyByItemIDandUnitID 42,42,0,1
-getContentAuditsChronologyByItemIDandUnitID 1,1,0,1
-getContentAuditsChronologyByItemIDandUnitID 146,146,1,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemIDandUnitID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @UnitID int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
- where dbo.ve_GetItemDerivedApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemDerivedApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsChronologyByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsChronologyByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsSummaryByItemIDandUnitID] Script Date: 10/10/2012 12:56:01 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsSummaryByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsSummaryByItemIDandUnitID];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemIDandUnitID] ******/
-/*
-getContentAuditsSummaryByItemIDandUnitID 146,146,0,1
-getContentAuditsSummaryByItemIDandUnitID 42,42,0,1
-getContentAuditsSummaryByItemIDandUnitID 1,1,0,1
-getContentAuditsSummaryByItemIDandUnitID 146,146,1,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getContentAuditsSummaryByItemIDandUnitID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @UnitID int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
-
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-insert into @Chrono
-select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
-where dbo.ve_GetItemDerivedApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemDerivedApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
-select * from @Chrono
-where AuditID is null OR AuditID in (select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid)
-order by OrdinalPath, contentid,auditid
-
---select xyz.* from
---(
---select z.* from
---(
---select contentid,min(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where dbo.ve_GetItemApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,appl,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
---,dbo.ve_GetItemApplicability(ItemID) appl
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where dbo.ve_GetItemApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---union
---select z.* from
---(
---select contentid,max(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where dbo.ve_GetItemApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,appl,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
---,dbo.ve_GetItemApplicability(ItemID) appl
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where dbo.ve_GetItemApplicability(ItemID) = '-1' or ',' + dbo.ve_GetItemApplicability(ItemID) + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---) xyz
--- where appl = '-1' or ',' + appl + ',' like '%,' + cast(@UnitID as varchar(10)) + ',%'
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsSummaryByItemIDandUnitID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsSummaryByItemIDandUnitID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getCurrentRevisionByItemIDandUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getCurrentRevisionByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getCurrentRevisionByItemIDandUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getCurrentRevisionByItemIDandUnitID] Script Date: 06/22/2012 16:58:12 ******/
-/*
-getCurrentRevisionByItemID 41
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getCurrentRevisionByItemIDandUnitID]
-(
- @ItemID int,
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [Revisions].[RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-inner join
-(
-select top 1 revisionid,mxvid from
-(
-select rr.revisionid,max(vv.versionid) mxvid
-from items ii
-inner join revisions rr on ii.itemid = rr.itemid
-inner join versions vv on rr.revisionid = vv.revisionid
-inner join stages ss on vv.stageid = ss.stageid
-cross apply rr.config.nodes('Config/Applicability') t1(r1)
-where ss.isapproved = 1
-and ii.itemid = @ItemID
-and r1.value('@Index','int') = @UnitID
-group by rr.revisionid
-union
-select null,null
-) ds
-order by mxvid desc
-) rr on [Revisions].revisionid = rr.revisionid
--- WHERE [ItemID] = @ItemID
--- ORDER BY [RevisionID] DESC
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getCurrentRevisionByItemIDandUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getCurrentRevisionByItemIDandUnitID] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getDocumentByLibDoc] Script Date: 01/30/2012 14:08:10 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentByLibDoc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentByLibDoc];
-GO
-
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',4
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',3
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',2
--- [dbo].[getDocumentByLibDoc] 'DOC_0000',1
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentByLibDoc]
-
-(
- @LibDoc varchar(12),
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- DECLARE @DocID int
- select @DocID = docid
- from
- (
- select
- distinct ah.docid,.dbo.vefn_GetVersionIDByItemID(ii.itemid) versionid
- from
- (
- select dd.docid,ofn.value('@OriginalFileName','varchar(20)') origfilename,dts
- from (select docid,cast(config as xml) xconfig,dts from documents) dd
- cross apply xconfig.nodes('//History') t1(ofn)
- ) ah
- inner join entries ee on ah.docid = ee.docid
- inner join items ii on ee.contentid = ii.itemid
- where origfilename = @LibDoc + '.LIB'
- ) ah
- where versionid = @VersionID
-
--- from (select docid,cast(config as xml) xconfig from documents) ah
--- cross apply xconfig.nodes('//Config/History') t1(roc)
--- where roc.value('@OriginalFileName','varchar(12)') = @LibDoc + '.LIB'
-
- SELECT
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [FileExtension],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[Documents].[DocID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[Documents].[DocID]) [EntryCount],
- (SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[Documents].[DocID]) [PdfCount]
- FROM [Documents]
- WHERE [DocID]=@DocID
-
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [DROUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[DROUsages].[RODbID]
- WHERE
- [DROUsages].[DocID]=@DocID
-
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [Entries]
- JOIN [Contents] ON
- [Contents].[ContentID]=[Entries].[ContentID]
- WHERE
- [Entries].[DocID]=@DocID
-
-
- SELECT
- [Pdfs].[DocID],
- [Pdfs].[DebugStatus],
- [Pdfs].[TopRow],
- [Pdfs].[PageLength],
- [Pdfs].[LeftMargin],
- [Pdfs].[PageWidth],
- [Pdfs].[PageCount],
- [Pdfs].[DocPdf],
- [Pdfs].[DTS],
- [Pdfs].[UserID],
- [Pdfs].[LastChanged]
- FROM [Pdfs]
- WHERE
- [Pdfs].[DocID]=@DocID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentByLibDoc Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentByLibDoc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getRevisionByItemIDandRevisionNumberAndUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID] Script Date: 06/25/2012 23:05:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionByItemIDandRevisionNumberAndUnitID]
-
-(
- @ItemID int,
- @RevisionNumber nvarchar(50),
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
-declare @RevisionID int
-set @RevisionID = (select revisionid from revisions rr cross apply rr.config.nodes('//Applicability') t1(r1) where itemid = @itemid and revisionnumber = @RevisionNumber and r1.value('@Index','int') = @UnitID)
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [RevisionID]=@RevisionID
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Checks]
- JOIN [Stages] ON
- [Stages].[StageID]=[Checks].[StageID]
- WHERE
- [Checks].[RevisionID]=@RevisionID
-
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getRevisionByItemIDandRevisionNumberAndUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getRevisionByItemIDandRevisionNumberAndUnitID] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionsByItemIDandUnitID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[getRevisionsByItemIDandUnitID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[getRevisionsByItemIDandUnitID];
-GO
-
-/****** Object: StoredProcedure [dbo].[getRevisionsByItemIDandUnitID] Script Date: 06/26/2012 16:22:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionsByItemIDandUnitID]
-(
- @ItemID int,
- @UnitID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-cross apply config.nodes('//Applicability') t1(r1)
- WHERE [ItemID] = @ItemID
-and r1.value('@Index','int') = @UnitID
-and (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) > 0
- ORDER BY [RevisionID] DESC
- RETURN
-GO
-IF (@@Error = 0) PRINT 'StoredProcedure [getRevisionsByItemIDandUnitID] Succeeded'
-ELSE PRINT 'StoredProcedure [getRevisionsByItemIDandUnitID] Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetItemApplicability] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetItemApplicability]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetItemApplicability];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetItemApplicability] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @apple varchar(max)
- select @apple = r2.value('@Applicability','varchar(max)')
- from
- (
- select itemid,cast(config as xml) xconfig from items ii join contents cc on ii.contentid = cc.contentid
- ) t1
- outer apply xconfig.nodes('//MasterSlave') t2(r2)
- where itemid = @ItemID
- return @apple
-END
-GO
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetItemApplicability] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetItemApplicability] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ParentItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ParentItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_ParentItems] Script Date: 10/12/2012 16:12:01 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from [dbo].[vefn_ParentItems](212)
-select * from [dbo].[vefn_ParentItems](48)
-select * from [dbo].[vefn_ParentItems](49)
-select * from [dbo].[vefn_ParentItems](50)
-select * from [dbo].[vefn_ParentItems](51)
-select * from [dbo].[vefn_ParentItems](52)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_ParentItems](@ItemID int)
-RETURNS @Parents TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Relationship], [ItemID], [ContentID], [PreviousID]) as (
- Select 1 [Relationship], [ItemID], [ContentID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Parents
- select 2 [Relationship], I.[ItemID], I.[ContentID], I.[PreviousID]
- from Itemz Z
- join Parts P on P.ItemID = Z.ItemID
- join Items I on I.ContentID = P.ContentID
--- Siblings
-Union All
- select 0 [Relationship] , I.[ItemID], I.[ContentID], I.[PreviousID]
- from Itemz Z
- join Items I on Z.PreviousID = I.ItemID
-)
-insert into @Parents select ItemID, ContentID from Itemz where Relationship > 0
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ParentItems Succeeded'
-ELSE PRINT 'Function: vefn_ParentItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetItemDerivedApplicability]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetItemDerivedApplicability];
-GO
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetItemDerivedApplicability] Script Date: 10/13/2012 00:57:34 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select [dbo].[ve_GetItemDerivedApplicability](48)
-select [dbo].[ve_GetItemDerivedApplicability](49)
-select [dbo].[ve_GetItemDerivedApplicability](50)
-select [dbo].[ve_GetItemDerivedApplicability](51)
-select [dbo].[ve_GetItemDerivedApplicability](52)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetItemDerivedApplicability] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @apple varchar(max)
- select @apple = dbo.ve_getitemapplicability(@ItemID)
- if @apple is null
- begin
- declare @ParentID int
- select @ParentID = dbo.ve_getparentitem(@ItemID)
- if @parentid is not null
- set @apple = dbo.ve_GetItemDerivedApplicability(@ParentID)
- else
- begin
- set @apple = ''
- select @apple = coalesce(@apple + ',','') + r2.value('@index','varchar(max)') from
- (select cast(config as xml) xconfig from docversions
- where versionid = dbo.vefn_GetVersionIDByItemID(@ItemID)) ah
- cross apply xconfig.nodes('//Slave') t2(r2)
- set @apple = substring(@apple,2,len(@apple))
- end
- end
- return @apple
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: ve_GetItemDerivedApplicability Succeeded'
-ELSE PRINT 'Function: ve_GetItemDerivedApplicability Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetParentItem] Script Date: 03/28/2012 17:58:48 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetParentItem]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetParentItem];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetParentItem] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @ParentID int;
-WITH Itemz([ItemID],[IsFound]) as
-(
-select ii.itemid,0 from items ii where ii.itemid = @ItemID
-union all
-select ii.previousid,0 from items ii
-join itemz zz on ii.itemid = zz.itemid
-where ii.previousid is not null
-and zz.isfound = 0
-union all
-select ii.itemid,1
-from parts pp
-join itemz zz on pp.itemid = zz.itemid
-join items ii on ii.contentid = pp.contentid
-)
-select top 1 @ParentID = itemid from itemz
-where isfound = 1 OPTION (MAXRECURSION 10000)
-RETURN @ParentID
-END
-GO
-
-IF (@@Error = 0) PRINT 'ScalerFunction [vefn_GetParentItem] Succeeded'
-ELSE PRINT 'ScalerFunction [vefn_GetParentItem] Error on Creation'
-go
-
-/****** Object: UserDefinedFunction [dbo].[vefn_CanTransitionBeCreated] Script Date: 10/14/2012 02:03:30 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CanTransitionBeCreated]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CanTransitionBeCreated];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_CanTransitionBeCreated(49,51)
-select dbo.vefn_CanTransitionBeCreated(51,49)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_CanTransitionBeCreated](@fromID int, @toID int) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@fromID),',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if (@tCount = 0) or (@tCount >= @uCount) begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_CanTransitionBeCreated Succeeded'
-ELSE PRINT 'Function: vefn_CanTransitionBeCreated Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionIDByItemID] Script Date: 02/03/2012 16:48:32 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionIDByItemID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetVersionIDByItemID];
-GO
-
-/*
-select dbo.vefn_GetVersionIDByItemID(41)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create function [dbo].[vefn_GetVersionIDByItemID]
-(@ItemID int)
-returns int
-as begin
- declare @VersionID int;
- with itemz
- (
- itemid,previousid,versionid
- ) as
- (
- select itemid,previousid,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- where itemid = @ItemID
- --siblins
- union all
- select ii.itemid,ii.previousid,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.previousid = ii.itemid
- where zz.versionid is null
- --chillins
- union all
- select ii.itemid,ii.previousid,null
- from parts pp
- join items ii on ii.contentid = pp.contentid
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.itemid = pp.itemid
- where zz.versionid is null
- --docversions
- union all
- select 0,0,dv.versionid
- from docversions dv
- join itemz zz on dv.itemid = zz.itemid
- where zz.versionid is null
- )
- select @VersionID = versionid from itemz zz
- where versionid is not null
- OPTION (MAXRECURSION 10000)
- return @VersionID
-end
-GO
--- Display the status of Func creation
-IF (@@Error = 0) PRINT 'Function Creation: vefn_GetVersionIDByItemID Succeeded'
-ELSE PRINT 'Function Creation: vefn_GetVersionIDByItemID Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_WillTransitionBeValidFrom] Script Date: 10/16/2012 18:17:37 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_WillTransitionBeValidFrom]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_WillTransitionBeValidFrom];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_WillTransitionBeValidFrom(194,'2')
-select dbo.vefn_WillTransitionBeValidFrom(216,'2')
-select dbo.vefn_WillTransitionBeValidFrom(246,'2')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_WillTransitionBeValidFrom](@toID int, @newAppl varchar(max)) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt(@newAppl,',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if @tCount >= @uCount begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_WillTransitionBeValidFrom Succeeded'
-ELSE PRINT 'Function: vefn_WillTransitionBeValidFrom Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_WillTransitionBeValidTo] Script Date: 10/16/2012 18:20:23 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_WillTransitionBeValidTo]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_WillTransitionBeValidTo];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.vefn_WillTransitionBeValidTo(10617,'2')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_WillTransitionBeValidTo](@toID int, @newAppl varchar(max)) RETURNS int
-AS BEGIN
- declare @rv int
- declare @tCount int
- declare @uCount int
- set @rv = 0
- select @tCount = count(*) from vefn_SplitInt(@newAppl,',')
- select @uCount = count(*) from
- (
- select * from vefn_SplitInt(@newAppl,',')
- union
- select * from vefn_SplitInt([dbo].[ve_GetItemDerivedApplicability](@toID),',')
- ) ah
- if @tCount >= @uCount begin
- set @rv = 1
- end
- return @rv
-END
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_WillTransitionBeValidTo Succeeded'
-ELSE PRINT 'Function: vefn_WillTransitionBeValidTo Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_CanTransitionBeCreated] Script Date: 10/15/2012 14:37:32 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_CanTransitionBeCreated]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_CanTransitionBeCreated];
-GO
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-exec vesp_CanTransitionBeCreated 46,180
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_CanTransitionBeCreated]
-(
- @fromItemID int,
- @toItemID int
-)
-AS BEGIN
- select dbo.vefn_CanTransitionBeCreated(@fromItemID,@toItemID) Status,
- dbo.ve_GetItemDerivedApplicability(@fromItemID) fromAppl,
- dbo.ve_GetItemDerivedApplicability(@toItemID) toAppl,
- dbo.ve_GetShortPath(@fromItemID) fromStep,
- dbo.ve_GetShortPath(@toItemID) toStep
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_CanTransitionBeCreated Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_CanTransitionBeCreated Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_ListItemAndChildrenByUnit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[dbo].[vesp_ListItemAndChildrenByUnit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [dbo].[vesp_ListItemAndChildrenByUnit];
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_ListItemAndChildrenByUnit] Script Date: 05/02/2012 23:16:53 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- vesp_ListItemAndChildrenByUnit 29546,0,'8'
--- drop procedure [vesp_ListItemAndChildren]
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemAndChildrenByUnit] (@ItemID int, @ParentID int, @UnitID varchar(max))
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([apple],[Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 1 [apple],0 [Level], @ParentID [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select case when s1.value('@Applicability','varchar(max)') is null or ',' + s1.value('@Applicability','varchar(max)') + ',' like '%,' + @UnitID + ',%' then 1 else 0 end apple
-,[Level] + 1,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join (select ContentID,cast(Config as xml) xConfig from Contents) C on C.ContentID = I.ContentID
- outer apply C.xConfig.nodes('//MasterSlave') m1(s1)
-where Z.[Apple] = 1
--- Siblings
-Union All
- select case when s1.value('@Applicability','varchar(max)') is null or ',' + s1.value('@Applicability','varchar(max)') + ',' like '%,' + @UnitID + ',%' then 1 else 0 end apple
-,[Level] ,Z.[ParentID],
-case when Z.[Apple] = 1 then Z.[Ordinal] +1 else Z.[Ordinal] end, I.[ItemID],
-case when Z.[Apple] = 1 then I.[PreviousID] else Z.[PreviousID] end, [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join (select ContentID,cast(Config as xml) xConfig from Contents) C on C.ContentID = I.ContentID
- outer apply C.xConfig.nodes('//MasterSlave') m1(s1)
- where Z.[Level] > 0
-)
-select I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- [pContentID],[pDTS],[pUserID],[pLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- CASE WHEN I.ItemID IN (SELECT ParentID FROM ItemZ WHERE apple = 1) THEN (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) ELSE 0 END [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- from ItemZ I
- join Contents C on C.ContentID = I.ContentID
-where i.apple = 1
- order by I.[Level] , I.[FromType], I.[Ordinal]
- OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Procedure Creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemAndChildrenByUnit Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemAndChildrenByUnit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vesp_WillTransitionsBeValid] Script Date: 10/15/2012 14:37:32 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_WillTransitionsBeValid]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_WillTransitionsBeValid];
-GO
-/*
-dbo.vesp_WillTransitionsBeValid 10616,'2'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE vesp_WillTransitionsBeValid
-(
- @ItemID int,
- @NewAppl varchar(max)
-)
-AS BEGIN
- select *, dbo.ve_GetShortPath(@ItemID) SrcStep, dbo.ve_GetShortPath(myitemid) TgtStep
- from
- (
- select tt.toid MyItemID, dbo.vefn_WillTransitionBeValidFrom(tt.toid,@NewAppl) Valid, @NewAppl SrcAppl, dbo.ve_GetItemDerivedApplicability(tt.toid) TgtAppl
- from transitions tt
- inner join items ii on tt.fromid = ii.contentid
- where fromid in (select contentid from dbo.vefn_childitems(@ItemID))
- union
- select ii.itemid MyItemID, dbo.vefn_WillTransitionBeValidTo(ii.itemid,@NewAppl) Valid, dbo.ve_GetItemDerivedApplicability(ii.itemid) SrcAppl, @NewAppl TgtAppl
- from transitions tt
- inner join items ii on tt.fromid = ii.contentid
- where toid in (select itemid from dbo.vefn_childitems(@ItemID))
- ) ah
- where Valid = 0
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_WillTransitionsBeValid Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_WillTransitionsBeValid Error on Creation'
-GO
-
-/****** Object: StoredProcedure [dbo].[vefn_NextCount] Script Date: 02/05/2013 11:58:00 ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_NextCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP Function [vefn_NextCount];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_NextCount](@ItemID int)
-RETURNS Int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @Count int;
-with Itemz([NextCnt], [ItemID], [PreviousID]) as (
- Select 0 [NextCnt], [ItemID], [PreviousID]
- FROM [Items]
- where [ItemID]=@ItemID
--- Siblings
-Union All
- select Z.[NextCnt] +1, I.[ItemID], I.[PreviousID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-Select @Count = Count(*) from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN @Count
-END
-GO
-IF (@@Error = 0) PRINT 'Function Creation: vefn_NextCount Succeeded'
-ELSE PRINT 'Function Creation: vefn_NextCount Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_ListItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItems]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItems];
-GO
-
---vesp_ListItems 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItems]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select 0 knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select Z.knt + 1,C.ItemID,C.PreviousID,C.ContentID,C.[DTS],C.[UserID],C.[LastChanged]
- from Items C
- Join Itemz Z on C.PreviousID=Z.ItemID
-)
-Select ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[Itemz].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[Itemz].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[Itemz].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[Itemz].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[Itemz].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[Itemz].[ItemID]) [Transition_ToIDCount]
-from Itemz order by knt
-OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItems Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListItemsAndContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListItemsAndContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListItemsAndContent];
-GO
-
---vesp_ListItemsAndContent 1
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ListItemsAndContent]
-(
-@ItemID int = 0
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz(knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]) as (
- Select 0 knt, ItemID,PreviousID,ContentID,[DTS],[UserID],[LastChanged]
- from Items
- where ItemID=@ItemID
- Union All
---
- Select z.knt + 1, I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged]
- from Items I
- Join Itemz Z on I.PreviousID=Z.ItemID
-)
-Select I.ItemID,I.PreviousID,I.ContentID,I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Children] WHERE [Children].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
-from Itemz I Join Contents C on I.ContentID = C.ContentID Order by knt
-OPTION (MAXRECURSION 10000)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListItemsAndContent Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListItemsAndContent Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_SortProcedures] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SortProcedures]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SortProcedures];
-GO
-
-/*
-select versionid, ff.folderid, ff.name,itemid
-from docversions dv
-join folders ff on dv.folderid=ff.folderid
-
-Westinghouse Data
-exec vesp_SortProcedures 1 -- Abnormal Procedures
---exec vesp_SortProcedures 4 -- Emergency Operating Procedures - Rev 2
-exec vesp_SortProcedures 5 -- System Operating Procedures
-exec vesp_SortProcedures 6 -- Maintenance, Test, Inspection, Surveillance Procedures
---exec vesp_SortProcedures 7 -- Severe Accident Management Guidelines
---exec vesp_SortProcedures 8 -- Emergency Response Guidelines
-exec vesp_SortProcedures 9 -- General Operating Procedures
-exec vesp_SortProcedures 11 -- Post 72-Hour Procedures 103811
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SortProcedures]( @VersionID int )
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @TopID int
- select @TopID = ItemID from DocVersions where versionID = @VersionID
- DECLARE @Procs TABLE
- (
- ItemID int PRIMARY KEY,
- ProcNum nvarchar(255)
- )
- DECLARE @Organize TABLE
- (
- ItemID int PRIMARY KEY,
- NewPreviousID int
- )
- DECLARE @NewTopID as int
- INSERT INTO @Procs select ZZ.ItemID, isnull(Replace(CC.Number,'\u8209?','-'),'') + ':' + substring('0000000000000000' + cast(ItemID as varchar(16)), 1+ len( cast(ItemID as varchar(16))), 16) ProcNum from vefn_SiblingItems(@TopID,0) ZZ Join Contents CC on CC.ContentID = ZZ.ContentID
- --select * from @Procs order by ProcNum + cast(ItemID as nvarchar(max))
- select top 1 @NewTopID = ItemID from @Procs order by ProcNum
- INSERT INTO @Organize
- select ItemID, (select top 1 ItemID from @Procs P2 where P1.ProcNum > P2.ProcNum order by P2.ProcNum DESC ) NewPreviousID
- from @Procs P1 order by isnull(ProcNum,'') + cast(ItemID as nvarchar(max))
- --select * from @Organize
- Update DocVersions Set ItemID = @NewTopID where versionID = @VersionID
- Update II Set II.PreviousID = ZZ.NewPreviousID
- from Items II join @Organize ZZ On II.ItemID = ZZ.ItemID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SortProcedures Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SortProcedures Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_RemoveExtraText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_RemoveExtraText]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_RemoveExtraText];
-GO
-
-/*
-select text, .dbo.vefn_RemoveExtraText(text,2,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,1,0,0) StrippedText from Contents where ContentID=373
-select text, .dbo.vefn_RemoveExtraText(text,0,0,0) StrippedText ,.dbo.vefn_FirstLink(text,0), PATINDEX('%[' + nchar(9516) + nchar(9574) + char(21) + ']%' , text) from Contents where ContentID=373
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,0,0)
-select .dbo.vefn_RemoveExtraText('\b Bold\b0',0,1,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,0)
-select .dbo.vefn_RemoveExtraText('A\u1?B\u12?C\u123?D\u1234?E',0,0,1)
-*/
-
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_RemoveExtraText](@text nvarchar(MAX),@includeLink int, @includeRtfFormatting int , @includeSpecialCharacters int)
-RETURNS varchar(MAX)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-DECLARE @index2 int
--- Replace Hard Hyphen with Hyphen
-SET @text = replace(@text,'\u8209?','-')
--- Replace Hard Space with Space
-SET @text = replace(@text,'\u160?',' ')
-set @text = replace(@text,nchar(160),' ')
--- Strip Links
-IF @includeLink = 0 -- Remove Links
- SET @text = [dbo].[vefn_RemoveRange](@text,'')
-IF @includeLink < 2 -- Remove Comments
- SET @text = [dbo].[vefn_RemoveRange](@text,'\v' ,'\v0')
-if(@includeRtfFormatting=0)
- -- Remove Rtf Formatting
- BEGIN
- SET @text = Replace(@text, '\b0 ', '');
- SET @text = Replace(@text, '\b ', '');
- SET @text = Replace(@text, '\ulnone ', '');
- SET @text = Replace(@text, '\ul0 ', '');
- SET @text = Replace(@text, '\ul ', '');
- SET @text = Replace(@text, '\i0 ', '');
- SET @text = Replace(@text, '\i ', '');
- SET @text = Replace(@text, '\super ', '');
- SET @text = Replace(@text, '\sub ', '');
- SET @text = Replace(@text, '\nosupersub ', '');
- SET @text = Replace(@text, '\b0', '');
- SET @text = Replace(@text, '\b', '');
- SET @text = Replace(@text, '\ul0', '');
- SET @text = Replace(@text, '\ul', '');
- SET @text = Replace(@text, '\i0', '');
- SET @text = Replace(@text, '\i', '');
- SET @text = Replace(@text, '\super', '');
- SET @text = Replace(@text, '\sub', '');
- SET @text = Replace(@text, '\nosupersub', '');
- END
-if(@includeSpecialCharacters=0)
- -- Remove Special Characters
- BEGIN
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\u[0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+5,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+6,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+7,len(@text))
- SET @index = PATINDEX('%\u[0-9][0-9][0-9][0-9]?%',@text)
- END
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- while(@index != 0)
- BEGIN
- SET @text = substring(@text,1,@index-1) + substring(@text,@index+4,len(@text))
- SET @index = PATINDEX('%\''[0-9A-Fa-f][0-9A-Fa-f]%',@text)
- END
-
- END
- -- Replace Hyphen with Hard Hyphen
-SET @text = replace(@text,'-','\u8209?')
-
-RETURN @text
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_RemoveExtraText Error on Creation'
-GO
-
-
-/****** Object: Table Function [vefn_FindSpecialChars] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindSpecialChars]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindSpecialChars];
-GO
-
-/*
-
-select * from vefn_FindSpecialChars('\u160?\ulnone \u8209?')
-
-select MIN(ContentID) MinContentID,Count(*) HowMany,UChar SpecialChar from Contents
-cross apply vefn_FindSpecialChars(text) SC
-where text like '%\u[0-9]%'
-group by UChar
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindSpecialChars](@text varchar(MAX))
-RETURNS @SpecialChars TABLE
-(
- uchar varchar(10)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @index1 int
- DECLARE @index2 int
- SET @index1 = -1
- SET @index1 = PATINDEX('%\u[0-9]%' , @text)
- WHILE (@index1 > 0)
- BEGIN
- SET @index2 = CHARINDEX('?' , @text, @index1 + 3)
- if @index2 > 0
- BEGIN
- INSERT INTO @SpecialChars VALUES (substring(@text,@index1,1 + @index2-@index1))
- SET @Text = substring(@text,@index2 + 1,len(@text))
- END
- SET @index1 = PATINDEX('%\u[0-9]%' , @text)
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindSpecialChars Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindSpecialChars Error on Creation'
-GO
-
-/****** Object: Table Function [vefn_FindSpecialChars2] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindSpecialChars2]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindSpecialChars2];
-GO
-
-/*
-
-select * from vefn_FindSpecialChars2(nchar(255) + nchar(8209) + nchar(160))
-
-select MIN(ContentID) MinContentID,Count(*) HowMany,UChar SpecialChar from Contents
-cross apply vefn_FindSpecialChars2(text) SC
-group by UChar
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindSpecialChars2](@text nvarchar(MAX))
-RETURNS @SpecialChars TABLE
-(
- uchar int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- WHILE (len(@text) > 0)
- BEGIN
- if(unicode(@text) > 127)
- INSERT INTO @SpecialChars VALUES (unicode(@text))
- SET @Text = substring(@text,2,len(@text))
- END
- RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindSpecialChars2 Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindSpecialChars2 Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[MoveItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [MoveItem];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[MoveItem](@ItemID int, @Index int)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DECLARE @ItemsChanged TABLE
- (
- ItemID int Primary Key
- )
- DECLARE @Siblings TABLE
- (
- ItemID int PRIMARY KEY,
- Ordinal int
- )
- DECLARE @OldPreviousID int
- SELECT @OldPreviousID = PreviousID FROM [Items] where ItemID = @ItemID
- DECLARE @OldNextID int
- SELECT @OldNextID = ItemID FROM [Items] where PreviousID = @ItemID
- insert into @Siblings select * from vefn_AllSiblingItems(@ItemID)
- DECLARE @NewNextID int
- SELECT @NewNextID = ItemID from @Siblings where Ordinal = @index
- DECLARE @NewPreviousID int
- SELECT @NewPreviousID = ItemID from @Siblings where Ordinal = @index -1
- --PRINT '****************************************************************'
- --PRINT '@ItemID = ' + isnull(Cast( @ItemID as varchar(20)),'{null}')
- --PRINT '@OldPreviousID = ' + isnull(Cast( @OldPreviousID as varchar(20)),'{null}')
- --PRINT '@OldNextID = ' + isnull(Cast( @OldNextID as varchar(20)),'{null}')
- --PRINT '@NewPreviousID = ' + isnull(Cast( @NewPreviousID as varchar(20)),'{null}')
- --PRINT '@NewNextID = ' + isnull(Cast( @NewNextID as varchar(20)),'{null}')
- Update Items set PreviousID = @NewPreviousID where ItemID = @ItemID
- Insert INTO @ItemsChanged Select @ItemID
- IF @OldNextID is not Null
- BEGIN
- Update Items set PreviousID = @OldPreviousID where ItemID = @OldNextID
- Insert INTO @ItemsChanged Select @OldNextID
- END
- IF @NewNextID is not Null
- BEGIN
- Update Items set PreviousID = @ItemID where ItemID = @NewNextID
- Insert INTO @ItemsChanged Select @NewNextID
- END
- IF @OldPreviousID is null
- BEGIN
- Update Parts set ItemID = @OldNextID where ItemID = @ItemID
- Update DocVersions set ItemID = @OldNextID where ItemID = @ItemID
- END
- IF @NewPreviousID is null
- BEGIN
- Update Parts set ItemID = @ItemID where ItemID = @NewNextID
- Update DocVersions set ItemID = @ItemID where ItemID = @NewNextID
- END
- SELECT
- ii.[ItemID],
- [PreviousID],
- ii.[ContentID],
- ii.[DTS],
- ii.[UserID],
- ii.[LastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount]
- FROM [Items] ii
- WHERE ItemID in (Select ItemID from @ItemsChanged)
- IF( @@TRANCOUNT > 0 )
- BEGIN
- PRINT 'COMMIT'
- COMMIT
- END
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 )
- BEGIN
- PRINT 'ROLLBACK'
- ROLLBACK -- Only rollback if top level
- END
- ELSE IF( @@TRANCOUNT > 1 )
- BEGIN
- PRINT 'COMMIT'
- COMMIT -- Otherwise commit. Top level will rollback
- END
- EXEC vlnErrorHandler
-END CATCH
-GO
-IF (@@Error = 0) PRINT 'Procedure Creation: MoveItem Succeeded'
-ELSE PRINT 'Procedure Creation: MoveItem Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_AllSiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_AllSiblingItems];
-GO
-/*
-DECLARE @ItemID int
-select @ItemID = ItemID from DocVersions where VersionID = 1
-Select * from vefn_AllSiblingItems(@ItemID) order by Ordinal
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_AllSiblingItems](@ItemID int)
-RETURNS @Siblings TABLE
-(
- ItemID int,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([ItemID], [PreviousID], [Ordinal]) as (
- Select [ItemID], [PreviousID], case when [PreviousID] is null then 0 else -1 end
- FROM [Items]
- where [ItemID]=@ItemID
--- Previous Siblings
-Union All
- select I.[ItemID], I.[PreviousID] ,case when I.[PreviousID] is null then 0 else Z.[Ordinal] -1 end
- from Itemz Z
- join Items I on I.ItemID = Z.PreviousID
- where Z.Ordinal < 0
--- Next Siblings
-Union All
- select I.[ItemID], I.[PreviousID] ,Z.[Ordinal] +1
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.Ordinal >= 0
-)
-insert into @Siblings select ItemID, Ordinal from Itemz Where Ordinal >= 0
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-
-GO
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_AllSiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_AllSiblingItems Error on Creation'
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_JustSiblingItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_JustSiblingItems];
-GO
-/*
-DECLARE @ItemID int
-select @ItemID = ItemID from DocVersions where VersionID = 1
-Select * from vefn_JustSiblingItems(@ItemID) order by Ordinal
-
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_JustSiblingItems](@FirstItemID int)
-RETURNS @Siblings TABLE
-(
- ItemID int PRIMARY KEY,
- Ordinal int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([ItemID],[Ordinal]) as (
- Select [ItemID],0
- FROM [Items]
- where [ItemID]=@FirstItemID
--- Siblings
-Union All
- select I.[ItemID],Z.[Ordinal] +1
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
-)
-insert into @Siblings select ItemID, Ordinal from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_JustSiblingItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_JustSiblingItems Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindContentText] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindContentText]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindContentText];
-GO
-
-/*
-SELECT * From vefn_FindContentText('1','%RCP%')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindContentText](
-@DocVersionList nvarchar(MAX)
-,@SearchString varchar(MAX))
-RETURNS @FoundContents TABLE
-(
- ContentID int PRIMARY KEY
- ,Type int
- ,Text varchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-IF(ISNULL(@DocVersionList,'')='')
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where Replace(Replace([Text],'-','\u8209?'),'\u160?',' ') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-ELSE
- BEGIN
- INSERT INTO @FoundContents -- Do a case insensitive search
- select ContentID,Type,Text from contents
- where [ContentID] in (select [ContentID] from vefn_DVContent(@DocVersionList))
- AND Replace(Replace([Text],'-','\u8209?'),'\u160?',' ') like @SearchString Collate SQL_Latin1_General_CP1_CI_AS
- END
-
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindContentText Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindContentText Error on Creation'
-GO
-/****** Object: StoredProcedure [vesp_ResetFolderManualOrder] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetFolderManualOrder]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetFolderManualOrder];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetFolderManualOrder]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-update fld
- set Fld.ManualOrder =Fld.MyRow
-from (Select ROW_NUMBER() OVER(Partition by ParentID Order BY FolderID) MyRow,* from folders ) fld
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetFolderManualOrder Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ResetFolderManualOrderAlphabetical] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetFolderManualOrderAlphabetical]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetFolderManualOrderAlphabetical];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetFolderManualOrderAlphabetical]
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
-update fld
- set Fld.ManualOrder =Fld.MyRow
-from (Select case when FolderID <> ParentID then ROW_NUMBER() OVER(Partition by ParentID Order BY Name) else 0 end MyRow,* from folders) fld
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetFolderManualOrderAlphabetical Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetFolderManualOrderAlphabetical Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tr_Documents_Delete]') AND OBJECTPROPERTY(id,N'IsTrigger') = 1)
- DROP TRIGGER [tr_Documents_Delete];
-
- /****** Object: Trigger [dbo].[tr_Documents_Delete] Script Date: 03/28/2013 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/****** Object: Trigger [tr_Documents_Delete] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE trigger [dbo].[tr_Documents_Delete] on [dbo].[Documents] instead of delete as
- begin
- update ii set DeleteStatus = Isnull((select max(DeleteID) from DeleteLog where SPID = @@spid),-1), DTS = getdate(),
- UserID = IsNull((select top 1 UserID from DeleteLog where SPID = @@spid order by deleteid desc),ii.UserID)
- from tblDocuments ii inner join deleted dd on dd.DocID = ii.DocID
- insert into DocumentAudits(DocID,LibTitle,DocContent,DocAscii,Config,DTS,UserID,FileExtension,DeleteStatus)
- select ii.DocID,ii.LibTitle,ii.DocContent,ii.DocAscii,ii.Config,ii.DTS,ii.UserID,ii.FileExtension,ii.DeleteStatus
- from tblDocuments ii inner join deleted dd on dd.DocID = ii.DocID
- where ii.DeleteStatus != 0
- end
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger alteration: tr_Documents_Delete Succeeded'
-ELSE PRINT 'Trigger alteration: tr_Documents_Delete Error on Alteration'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-Select * from vefn_GetVersionItems('')
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetVersionItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetVersionItems] Error on Creation'
-
-/****** Object: StoredProcedure [getAffectedRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedRoUsages];
-GO
-
-/*
-getAffectedROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR'
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedRoUsages]
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100),
- @VersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @JustThisVersion TABLE
- (
- ContentID int primary key
- )
- Insert INTO @JustThisVersion
- SELECT Distinct ContentID From vefn_GetVersionItems(@VersionList)
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID FROM ROUSAGES
- where RODbID = @RODbID AND ROID = @ROID AND ContentID in (select ContentID from @JustThisVersion))
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- WHERE
- [RoUsages].[RODbID]=@RODbID AND [RoUsages].[ROID]=@ROID
- AND [Contents].ContentID in (select ContentID from @JustThisVersion)
-END
-RETURN
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAffectedDRoUsages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAffectedDRoUsages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAffectedDRoUsages];
-GO
-
-/*
-getAffectedDROUsages 1, '00010000019c0000', 'KBR Test', 'Changed', 'KBR',''
-getAffectedDROUsages 1, '000300003D8E', 'KBR Test', 'Changed', 'KBR',''
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAffectedDRoUsages]
-(
- @RODbID int,
- @ROID nvarchar(16),
- @RODesc nvarchar(MAX),
- @Command nvarchar(10),
- @UserID nvarchar(100),
- @VersionList nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
- BEGIN
- DECLARE @JustThisVersion TABLE
- (
- ContentID int primary key
- )
- Insert INTO @JustThisVersion
- SELECT Distinct ContentID From vefn_GetVersionItems(@VersionList)
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- DECLARE @DRoUsages TABLE
- (
- DRoUsageID int primary key
- )
- Insert INTO @DRoUsages
- select DRoUsageID from DRoUsages where ROID like substring(@ROID,1,12) + '%' AND dbo.vefn_CompareROIDS(ROID,@ROID) > 0
-
- -- Add "Verification Required" Annotation for each ROUsage
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Referenced Object (' + @RODesc + ') ' + @Command,@UserID
- FROM Items where CONTENTID in (SELECT ContentID
- FROM (select dr.* from DRoUsages dr join @DRoUsages dd on dr.DRoUsageid = dd.DRoUsageid) DR
- JOIN Entries EE on EE.DocID = DR.DocID
- where RODbID = @RODbID AND ContentID in (select ContentID from @JustThisVersion))
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- WHERE
- [DRoUsages].[DRoUsageID] in (select DRoUsageid from @DRoUsages)
- AND [Documents].[DocID] in (select EE.DocID from Entries EE where ContentID in (select ContentID from @JustThisVersion))
- RETURN
- END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAffectedDRoUsages Succeeded'
-ELSE PRINT 'Procedure Creation: getAffectedDRoUsages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAnnotationType] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAnnotationType]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAnnotationType];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAnnotationType]
-
-(
- @TypeID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [tblAnnotations]
- WHERE [TypeID]=@TypeID
- DELETE [AnnotationTypes]
- WHERE [TypeID] = @TypeID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAnnotationType Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAnnotationType Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getJustFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustFormat]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getJustFormat];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getJustFormat]
-
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [FormatID],
- [ParentID],
- [Name],
- [Description],
- [Data],
- [GenMac],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Contents] WHERE [Contents].[FormatID]=[Formats].[FormatID]) [ContentCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[FormatID]=[Formats].[FormatID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Folders] WHERE [Folders].[FormatID]=[Formats].[FormatID]) [FolderCount],
- (SELECT COUNT(*) FROM [Formats] [Children] WHERE [Children].[ParentID]=[Formats].[FormatID]) [ChildCount]
- FROM [Formats]
- WHERE [FormatID]=@FormatID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustFormat Succeeded'
-ELSE PRINT 'Procedure Creation: getJustFormat Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_TurnChangeManagerOFF] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerOFF]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerOFF];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerOFF] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerOFF
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerOFF] WITH EXECUTE AS OWNER AS
-BEGIN
- DECLARE @cmd VARCHAR(MAX)
- SET @cmd = 'DISABLE TRIGGER tr_Annotations_Delete ON Annotations'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Contents_Delete ON Contents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Documents_Delete ON Documents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Entries_Delete ON Entries'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_GridAudits_insert ON GridAudits'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Grids_Delete ON Grids'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Images_Delete ON Images'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Items_Delete ON Items'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Parts_Delete ON Parts'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_ROUsages_Delete ON ROUsages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblAnnotations_Update ON tblAnnotations'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblContents_Update ON tblContents'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblDocuments_Update ON tblDocuments'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblEntries_Update ON tblEntries'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblGrids_Update ON tblGrids'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblImages_Update ON tblImages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblItems_Update ON tblItems'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblParts_Update ON tblParts'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblROUsages_Update ON tblROUsages'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_tblTransitions_Update ON tblTransitions'
- EXEC (@cmd)
- SET @cmd = 'DISABLE TRIGGER tr_Transitions_Delete ON Transitions'
- EXEC (@cmd)
- PRINT '***** Change Manager has been turned OFF *****'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerOFF Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_TurnChangeManagerON] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_TurnChangeManagerON]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_TurnChangeManagerON];
-GO
-/****** Object: StoredProcedure [dbo].[vesp_TurnChangeManagerON] Script Date: 03/20/2012 16:02:54 ******/
-/*
-exec vesp_TurnChangeManagerON
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_TurnChangeManagerON] WITH EXECUTE AS OWNER AS
-BEGIN
- DECLARE @cmd VARCHAR(MAX)
- SET @cmd = 'ENABLE TRIGGER tr_Annotations_Delete ON Annotations'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Contents_Delete ON Contents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Documents_Delete ON Documents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Entries_Delete ON Entries'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_GridAudits_insert ON GridAudits'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Grids_Delete ON Grids'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Images_Delete ON Images'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Items_Delete ON Items'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Parts_Delete ON Parts'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_ROUsages_Delete ON ROUsages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblAnnotations_Update ON tblAnnotations'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblContents_Update ON tblContents'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblDocuments_Update ON tblDocuments'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblEntries_Update ON tblEntries'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblGrids_Update ON tblGrids'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblImages_Update ON tblImages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblItems_Update ON tblItems'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblParts_Update ON tblParts'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblROUsages_Update ON tblROUsages'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_tblTransitions_Update ON tblTransitions'
- EXEC (@cmd)
- SET @cmd = 'ENABLE TRIGGER tr_Transitions_Delete ON Transitions'
- EXEC (@cmd)
- PRINT '***** Change Manager has been turned ON *****'
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_TurnChangeManagerON Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_TurnChangeManagerON Error on Creation'
-GO
-/****** Object: TableFunction [vefn_FindROUsageIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindROUsageIDs]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindROUsageIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindROUsageIDs](@ContentAuditID int)
-RETURNS @IDs TABLE
-(
- ROUsageID int PRIMARY KEY,
- ROUsageAction char(3)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- DECLARE @ContentID int
- DECLARE @text varchar(max)
- SELECT @ContentID = ContentID,@text = Text FROM ContentAudits WHERE AuditID = @ContentAuditID
- DECLARE @index1 int
- DECLARE @index2 int
- DECLARE @tid varchar(max)
- DECLARE @trid int
- WHILE (LEN(@text) > 0)
- BEGIN
- SET @index1 = CHARINDEX('#Link:ReferencedObject' , @text)
- IF (@index1 > 0)
- BEGIN
- SET @text = RIGHT(@text, (LEN(@text) - (22 + @index1)))
- SET @index1 = CHARINDEX(' ', @text)
- SET @tid = LTRIM(LEFT(@text, @index1))
- SET @trid = CAST(@tid AS INT)
- IF EXISTS (SELECT ROUsageID FROM tblROUsages WHERE ROUsageID = @trid AND DeleteStatus < 0)
- INSERT INTO @IDs VALUES (@trid, 'ADD')
- ELSE
- INSERT INTO @IDs VALUES (@trid, NULL)
- END
- ELSE
- SET @text = ''
- END
- INSERT INTO @IDs SELECT tt.ROUsageID,'DEL' FROM tblROUsages tt LEFT JOIN @IDs ti ON tt.ROUsageID = ti.ROUsageID WHERE tt.ContentID = @ContentID
- AND ti.ROUsageID IS NULL
- DELETE FROM @IDs WHERE ROUsageAction IS NULL
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindROUsageIDs Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindROUsageIDs Error on Creation'
-GO
-/****** Object: TableFunction [vefn_GetVersionFormatItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionFormatItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionFormatItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionFormatItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID], [ParentFormatID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID],
- isnull(C.[FormatID],isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))),
- isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID]
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join folders F on DV2.[FolderID] = F.[FolderID]
- join folders P on P.[FolderID] = F.[ParentID]
- join Contents C on I.ContentID = C.ContentID
-
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[FormatID]), Z.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[ParentFormatID]), Z.[ParentFormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionFormatItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionFormatItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDRoUsagesByROIDsAndVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDRoUsagesByROIDsAndVersions];
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDRoUsagesByROIDsAndVersions]
-(
- @ROIDs nvarchar(MAX),
- @Versions nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsages].[DROUsageID],
- [DROUsages].[DocID],
- [DROUsages].[ROID],
- [DROUsages].[Config],
- [DROUsages].[DTS],
- [DROUsages].[UserID],
- [DROUsages].[LastChanged],
- [DROUsages].[RODbID],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [DRoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [DRoUsages].RODBID = SS.[RODBID] and [DRoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Documents] ON
- [Documents].[DocID]=[DROUsages].[DocID]
- Where [Documents].[DocID] in
- (Select Distinct [DocID] from [ENTRIES]
- JOIN [VEFN_GetVersionItems](@Versions) VV ON [Entries].ContentID = VV.ContentID)
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDRoUsagesByROIDsAndVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getDRoUsagesByROIDsAndVersions Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesByROIDsAndVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesByROIDsAndVersions];
-GO
-
-CREATE PROCEDURE [dbo].[getRoUsagesByROIDsAndVersions]
-(
- @ROIDs nvarchar(MAX),
- @Versions nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [Contents].[Number] [Content_Number],
- [Contents].[Text] [Content_Text],
- [Contents].[Type] [Content_Type],
- [Contents].[FormatID] [Content_FormatID],
- [Contents].[Config] [Content_Config],
- [Contents].[DTS] [Content_DTS],
- [Contents].[UserID] [Content_UserID]
- FROM [RoUsages]
- JOIN vefn_SplitROSearch(@ROIDs) SS
- ON [RoUsages].RODBID = SS.[RODBID] and [RoUsages].[ROID] like SS.[ROID] + '%'
- JOIN [Contents] ON
- [Contents].[ContentID]=[RoUsages].[ContentID]
- JOIN [VEFN_GetVersionItems](@Versions) VV ON [Contents].ContentID = VV.ContentID
- RETURN
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesByROIDsAndVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesByROIDsAndVersions Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetROTokens] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetROTokens]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetROTokens];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetROTokens](@text varchar(MAX))
-RETURNS @Tokens TABLE
-(
- Token varchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @index int
-SET @index = -1
-DECLARE @indexb int
-DECLARE @indexc int
-DECLARE @indexd int
-DECLARE @indexNext int
-DECLARE @indexReturn int
-WHILE (LEN(@text) > 0)
- BEGIN
- SET @index = PATINDEX('%<[A-Z]-%' , @text)
- SET @indexb = PATINDEX('%<[A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexb>0) or (@indexb > 0 and @index > @indexb))
- SET @index = @indexb
- SET @indexc = PATINDEX('%<[A-Z][A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexc>0) or (@indexc > 0 and @index > @indexc))
- SET @index = @indexc
- SET @indexd = PATINDEX('%<[A-Z][A-Z][A-Z][A-Z0-9]-%' , @text)
- if((@index=0 and @indexd>0) or (@indexd > 0 and @index > @indexd))
- SET @index = @indexd
- IF @index = 0
- BREAK
- SET @indexNext = @index + CHARINDEX('<' , substring(@text,@index+1,len(@text)))
- IF @IndexNext=@index
- SET @IndexNext = len(@text)+ 3
- SET @indexReturn = @index + CHARINDEX(char(13) , substring(@text,@index+1,len(@text)))
- IF @IndexReturn=@index
- SET @IndexReturn = len(@text)+3
- DECLARE @index2 int
- SET @index2 = @index + CHARINDEX('>' , substring(@text,@index,len(@text)))
- if @index2 = @index
- BREAK
- if(@index2 > @indexNext or @index2 > @indexReturn)
- SET @text = RIGHT(@text, (LEN(@text) - @index))
- else
- BEGIN
- INSERT INTO @Tokens VALUES (substring(@text, @index,@index2-@index))
- if(len(@text) > @index2)
- SET @text = substring(@text, @index2 , len(@text))
- else
- SET @Text = ''
- END
- END
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetROTokens Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetROTokens Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetVersionNames] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionNames]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionNames];
-GO
-
---
--- select * from vefn_GetVersionNames()
---
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetVersionNames]()
-RETURNS @Versions TABLE
-(
- VersionID int primary Key,
- GrandParentName nvarchar(100),
- ParentName nvarchar(100),
- FolderName nvarchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO @Versions
- select versionid,gf.name GrandParentName, pf.name ParentName, ff.name FolderName
- from docversions dv
- Join folders ff on ff.FolderID = DV.FolderID
- Join folders pf on pf.FolderID = ff.parentID
- Join folders gf on gf.FolderID = pf.parentid
- RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionNames Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionNames Error on Creation'
-GO
-
-
-
-
--- =========================================== End of Functions and Procedures
-
--- Turn off Auto Close and Auto Shrink
-declare @CMD varchar(max)
-set @CMD = 'ALTER DATABASE [' + db_name() +'] SET AUTO_CLOSE OFF'
-exec(@CMD)
-GO
-declare @CMD varchar(max)
-set @CMD = 'ALTER DATABASE [' + db_name() +'] SET AUTO_SHRINK OFF'
-exec(@CMD)
-GO
-
---added by JCB for Security and MultiUser support
---ALTER TABLE Sessions add MachineName and ProcessID columns if they do not exist
-IF COL_LENGTH('Sessions','MachineName') IS NULL
- ALTER TABLE Sessions ADD [MachineName] [nvarchar](100) NOT NULL,[ProcessID] [int] NOT NULL;
-GO
---ALTER TABLE Sessions change DTSActivity column to not null
-ALTER TABLE sessions ALTER COLUMN [DTSActivity] [datetime] NOT NULL
-GO
---ALTER TABLE Sessions set DTSActivity column default value to getdate()
-IF OBJECT_ID('DF_Sessions_DTSActivity', 'D') IS NULL
- ALTER TABLE sessions ADD CONSTRAINT [DF_Sessions_DTSActivity] DEFAULT (getdate()) for [DTSActivity];
-GO
-
-/****** Object: StoredProcedure [purgeData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[purgeData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [purgeData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[purgeData]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- delete from [AnnotationAudits]
- dbcc checkident([AnnotationAudits],reseed,0)
- delete from [Applicabilities]
- dbcc checkident([Applicabilities],reseed,0)
- delete from [ApplicableStructures]
- delete from [Assignments]
- dbcc checkident([Assignments],reseed,0)
- delete from [Associations]
- dbcc checkident([Associations],reseed,0)
- delete from [Checks]
- dbcc checkident([Checks],reseed,0)
- delete from [ContentAudits]
- dbcc checkident([ContentAudits],reseed,0)
- delete from [DeleteLog]
- dbcc checkident([DeleteLog],reseed,0)
- delete from [Details]
- dbcc checkident([Details],reseed,0)
- delete from [DocumentAudits]
- dbcc checkident([DocumentAudits],reseed,0)
- delete from [DocVersions]
- dbcc checkident([DocVersions],reseed,0)
- delete from [DROUsages]
- dbcc checkident([DROUsages],reseed,0)
- delete from [EntryAudits]
- dbcc checkident([EntryAudits],reseed,0)
- delete from [Figures]
- dbcc checkident([Figures],reseed,0)
- delete from [Folders]
- dbcc checkident([Folders],reseed,0)
- delete from [GridAudits]
- dbcc checkident([GridAudits],reseed,0)
- delete from [ImageAudits]
- dbcc checkident([ImageAudits],reseed,0)
- delete from [ItemAudits]
- dbcc checkident([ItemAudits],reseed,0)
- delete from [Memberships]
- dbcc checkident([Memberships],reseed,0)
- delete from [PartAudits]
- dbcc checkident([PartAudits],reseed,0)
- delete from [Pdfs]
- delete from [Permissions]
- dbcc checkident([Permissions],reseed,0)
- delete from [ROFsts]
- dbcc checkident([ROFsts],reseed,0)
- delete from [ROImages]
- dbcc checkident([ROImages],reseed,0)
- delete from [Roles]
- dbcc checkident([Roles],reseed,0)
- delete from [ROUsageAudits]
- dbcc checkident([ROUsageAudits],reseed,0)
- delete from [tblAnnotations]
- dbcc checkident([tblAnnotations],reseed,0)
- delete from [tblEntries]
- delete from [tblGrids]
- delete from [tblImages]
- delete from [tblParts]
- delete from [tblROUsages]
- dbcc checkident([tblROUsages],reseed,0)
- delete from [TransitionAudits]
- dbcc checkident([TransitionAudits],reseed,0)
- delete from [Users]
- dbcc checkident([Users],reseed,0)
- delete from [Versions]
- dbcc checkident([Versions],reseed,0)
- delete from [ZContents]
- delete from [ZTransitions]
- delete from [AnnotationTypes]
- dbcc checkident([AnnotationTypes],reseed,0)
- delete from [Connections]
- dbcc checkident([Connections],reseed,0)
- delete from [Groups]
- dbcc checkident([Groups],reseed,0)
- delete from [Revisions]
- dbcc checkident([Revisions],reseed,0)
- delete from [RODbs]
- dbcc checkident([RODbs],reseed,0)
- delete from [Stages]
- dbcc checkident([Stages],reseed,0)
- delete from [tblDocuments]
- dbcc checkident([tblDocuments],reseed,0)
- delete from [tblTransitions]
- dbcc checkident([tblTransitions],reseed,0)
- delete from [tblItems]
- dbcc checkident([tblItems],reseed,0)
- delete from [tblContents]
- dbcc checkident([tblContents],reseed,0)
- delete from [Formats]
- dbcc checkident([Formats],reseed,0)
- delete from [Sessions]
- dbcc checkident([Sessions],reseed,0)
- delete from [Owners]
- dbcc checkident([Owners],reseed,0)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: purgeData Succeeded'
-ELSE PRINT 'Procedure Creation: purgeData Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getSessions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getSessions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getSessions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getSessions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getSessions Succeeded'
-ELSE PRINT 'Procedure Creation: getSessions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateSession]
-
-(
- @SessionID int,
- @UserID nvarchar(100),
- @DTSDtart datetime,
- @DTSEnd datetime=null,
- @DTSActivity datetime,
- @LastChanged timestamp,
- @MachineName nvarchar(100),
- @ProcessID int,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Sessions]
- SET
- [UserID]=@UserID,
- [DTSDtart]=@DTSDtart,
- [DTSEnd]=@DTSEnd,
- [DTSActivity]=@DTSActivity,
- [MachineName]=@MachineName,
- [ProcessID]=@ProcessID
- WHERE [SessionID]=@SessionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Sessions] WHERE [SessionID]=@SessionID)
- RAISERROR('Session record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Session has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Sessions] WHERE [SessionID]=@SessionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateSession Succeeded'
-ELSE PRINT 'Procedure Creation: updateSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addSession]
-
-(
- @UserID nvarchar(100),
- @DTSDtart datetime,
- @DTSEnd datetime=null,
- @DTSActivity datetime,
- @MachineName nvarchar(100),
- @ProcessID int,
- @newSessionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Sessions]
- (
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [MachineName],
- [ProcessID]
- )
- VALUES
- (
- @UserID,
- @DTSDtart,
- @DTSEnd,
- @DTSActivity,
- @MachineName,
- @ProcessID
- )
- SELECT @newSessionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Sessions] WHERE [SessionID]=@newSessionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addSession Succeeded'
-ELSE PRINT 'Procedure Creation: addSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Sessions]
- WHERE [SessionID] = @SessionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteSession Succeeded'
-ELSE PRINT 'Procedure Creation: deleteSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- WHERE [SessionID]=@SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getSession Succeeded'
-ELSE PRINT 'Procedure Creation: getSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsSession] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsSession]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsSession];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsSession]
-
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Sessions] WHERE [SessionID]=@SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsSession Succeeded'
-ELSE PRINT 'Procedure Creation: existsSession Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCleanup] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionBegin]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionBegin];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionBegin]
-
-(
- @UserID nvarchar(100),
- @MachineName nvarchar(100),
- @ProcessID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- DECLARE @oCount int
- SELECT @oCount = count(*) FROM Owners WHERE OwnerType = 3
- IF @oCount > 0 BEGIN
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- WHERE [SessionID]=0
- END
- ELSE BEGIN
- BEGIN TRANSACTION
- --delete old closed sessions
- DELETE FROM Sessions WHERE UserID = @UserID and DTSEnd is not null
- --delete old owners from inactive sessions
- DELETE FROM Owners WHERE SessionID in (SELECT SessionID FROM Sessions WHERE UserID = @UserID and DTSEnd is null and DTSActivity < DATEADD(minute, -5, getdate()))
- DELETE FROM Owners WHERE SessionID in (SELECT SessionID FROM Sessions WHERE DTSEnd is null and DTSActivity < DATEADD(minute, -15, getdate()))
- --delete inactive sessions where last activity is before 15 minutes ago
- DELETE FROM Sessions WHERE UserID = @UserID and DTSEnd is null and DTSActivity < DATEADD(minute, -5, getdate())
- DELETE FROM Sessions WHERE DTSEnd is null and DTSActivity < DATEADD(minute, -15, getdate())
- DELETE FROM Owners WHERE SessionID not in (SELECT SessionID FROM Sessions)
- INSERT INTO [Sessions]([UserID],[MachineName],[ProcessID])
- VALUES (@UserID, @MachineName, @ProcessID)
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- WHERE [SessionID]=SCOPE_IDENTITY()
- IF( @@TRANCOUNT > 0 ) COMMIT
- END
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionBegin Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionBegin Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionPing] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionPing]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionPing];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE vesp_SessionPing
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --update active session dtsactivity value
- UPDATE Sessions SET DTSActivity = getdate() WHERE SessionID = @SessionID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionPing Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionPing Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionPing] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionEnd]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionEnd];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE vesp_SessionEnd
-(
- @SessionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- --delete unclosed owners for session being closed
- DELETE FROM Owners WHERE SessionID = @SessionID
- --update active session dtsend value
- UPDATE Sessions SET DTSEnd = getdate() WHERE SessionID = @SessionID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionEnd Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionEnd Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwners] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwners]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwners];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwners]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwners Succeeded'
-ELSE PRINT 'Procedure Creation: getOwners Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnersBySessionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnersBySessionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnersBySessionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnersBySessionID]
-(
- @SessionID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [SessionID] = @SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnersBySessionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnersBySessionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateOwner]
-
-(
- @OwnerID int,
- @SessionID int,
- @OwnerType tinyint,
- @OwnerItemID int,
- @DTSStart datetime,
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Owners]
- SET
- [SessionID]=@SessionID,
- [OwnerType]=@OwnerType,
- [OwnerItemID]=@OwnerItemID,
- [DTSStart]=@DTSStart
- WHERE [OwnerID]=@OwnerID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Owners] WHERE [OwnerID]=@OwnerID)
- RAISERROR('Owner record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Owner has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Owners] WHERE [OwnerID]=@OwnerID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateOwner Succeeded'
-ELSE PRINT 'Procedure Creation: updateOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addOwner]
-
-(
- @SessionID int,
- @OwnerType tinyint,
- @OwnerItemID int,
- @DTSStart datetime,
- @newOwnerID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Owners]
- (
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart]
- )
- VALUES
- (
- @SessionID,
- @OwnerType,
- @OwnerItemID,
- @DTSStart
- )
- SELECT @newOwnerID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Owners] WHERE [OwnerID]=@newOwnerID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addOwner Succeeded'
-ELSE PRINT 'Procedure Creation: addOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Owners]
- WHERE [OwnerID] = @OwnerID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteOwner Succeeded'
-ELSE PRINT 'Procedure Creation: deleteOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [OwnerID]=@OwnerID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwner Succeeded'
-ELSE PRINT 'Procedure Creation: getOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsOwner] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsOwner]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsOwner];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsOwner]
-
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Owners] WHERE [OwnerID]=@OwnerID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsOwner Succeeded'
-ELSE PRINT 'Procedure Creation: existsOwner Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCanCheckOutItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCanCheckOutItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCanCheckOutItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/*
-exec dbo.vesp_SessionCanCheckOutItem 25915,0
-exec dbo.vesp_SessionCanCheckOutItem 554,1
-exec dbo.vesp_SessionCanCheckOutItem 13,2
-*/
-CREATE PROCEDURE [dbo].[vesp_SessionCanCheckOutItem]
-(
- @ObjectID int,
- @ObjectType int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DECLARE @CheckOuts TABLE
- (
- SessionID int
- )
- --look to see if anyone else has a session. if they do, then cannot check out
- DECLARE @sCount int
- SELECT @sCount = count(*) FROM Sessions
- IF @ObjectType = 3 BEGIN
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- WHERE DTSEnd IS NULL
- END ELSE BEGIN
- --look to see if object is already checked out in owner table as passed object type
- INSERT INTO @CheckOuts SELECT DISTINCT SessionID FROM Owners WHERE OwnerItemID = @ObjectID AND OwnerType = @ObjectType
- --look to see if object is part of a checked out docversion as passed object type
- DECLARE @VersionIDList varchar(max)
- SELECT @VersionIDList = COALESCE(@VersionIDList + ',','') + CAST(OwnerItemID as varchar(4)) FROM Owners WHERE OwnerType = 2
- IF ISNULL(@VersionIDList,'') != '' AND @ObjectType = 0 BEGIN --procedure
- INSERT INTO @CheckOuts
- SELECT ss.SessionID FROM dbo.vefn_GetVersionItems(@VersionIDList) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Owners oo ON vi.VersionID = oo.OwnerItemID
- INNER JOIN Sessions ss ON oo.SessionID = ss.SessionID
- WHERE cc.Type = 0 AND vi.ItemID = @ObjectID
- END
- IF ISNULL(@VersionIDList,'') != '' AND @ObjectType = 1 BEGIN --document
- INSERT INTO @CheckOuts
- SELECT ss.SessionID FROM dbo.vefn_GetVersionItems(@VersionIDList) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Entries ee ON vi.ContentID = ee.ContentID
- INNER JOIN Owners oo ON vi.VersionID = oo.OwneritemID
- INNER JOIN Sessions ss ON oo.SessionID = ss.SessionID
- WHERE ee.DocID = @ObjectID
- END
- --look to see if object type is docversion that no part of docversion passed is checked out
- IF @ObjectType = 2 BEGIN
- --see what procedures maybe checked out
- INSERT INTO @CheckOuts
- SELECT ss.SessionID FROM dbo.vefn_GetVersiONItems(@ObjectID) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Owners oo ON vi.ItemID = oo.OwnerItemID
- INNER JOIN Sessions ss ON oo.SessionID = ss.SessionID
- WHERE cc.Type = 0
- --see what documents maybe checked out
- INSERT INTO @CheckOuts
- SELECT ss.SessionID FROM dbo.vefn_GetVersiONItems(@ObjectID) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Entries ee ON vi.ContentID = ee.ContentID
- INNER JOIN Owners oo ON ee.DocID = oo.OwnerItemID
- INNER JOIN Sessions ss ON oo.SessionID = ss.SessionID
- END
-
- SELECT
- [SessionID],
- [UserID],
- [DTSDtart],
- [DTSEnd],
- [DTSActivity],
- [LastChanged],
- [MachineName],
- [ProcessID]
- FROM [Sessions]
- WHERE [SessionID] IN (SELECT SessionID FROM @CheckOuts)
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCanCheckOutItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCanCheckOutItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCheckOutItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCheckOutItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCheckOutItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionCheckOutItem]
-(
- @SessionID int,
- @ItemID int,
- @ItemType int,
- @OwnerID int OUTPUT
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- INSERT INTO Owners (SessionID, OwnerItemID, OwnerType) VALUES (@SessionID, @ItemID, @ItemType)
- SELECT @OwnerID = SCOPE_IDENTITY()
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCheckOutItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCheckOutItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_SessionCheckInItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SessionCheckInItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_SessionCheckInItem];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_SessionCheckInItem]
-(
- @OwnerID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- DELETE FROM Owners WHERE OwnerID = @OwnerID
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SessionCheckInItem Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SessionCheckInItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnerByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnerByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnerByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnerByItemID]
-
-(
- @ItemID int,
- @ItemType int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners]
- WHERE [OwnerItemID]=@ItemID AND [OwnerType]=@ItemType
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnerByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnerByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnerBySessionIDandVersionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnerBySessionIDandVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnerBySessionIDandVersionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnerBySessionIDandVersionID]
-
-(
- @SessionID int,
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- [LastChanged]
- FROM [Owners] oo
- INNER JOIN
- (
- SELECT 0 ObjectType,ItemID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID)
- UNION
- SELECT 1 ObjectType,ee.DocID ObjectID FROM dbo.vefn_GetVersionItems(@VersionID) vi
- INNER JOIN Contents cc ON vi.ContentID = cc.ContentID
- INNER JOIN Entries ee ON vi.ContentID = ee.ContentID
- UNION
- SELECT 2 ObjectType, @VersionID ObjectID
- ) tt ON oo.OwnerType = tt.ObjectType and oo.OwnerItemID = tt.ObjectID
- WHERE [SessionID] = @SessionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnerBySessionIDandVersionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnerBySessionIDandVersionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getUserByUserID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getUserByUserID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getUserByUserID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getUserByUserID]
-
-(
- @UserID varchar(100)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [UID],
- [UserID],
- [FirstName],
- [MiddleName],
- [LastName],
- [Suffix],
- [CourtesyTitle],
- [PhoneNumber],
- [CFGName],
- [UserLogin],
- [UserName],
- [Config],
- [DTS],
- [UsrID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Memberships] WHERE [Memberships].[UID]=[Users].[UID]) [MembershipCount]
- FROM [Users]
- WHERE [UserID]=@UserID
-
- SELECT
- [Memberships].[UGID],
- [Memberships].[UID],
- [Memberships].[GID],
- [Memberships].[StartDate],
- [Memberships].[EndDate],
- [Memberships].[Config],
- [Memberships].[DTS],
- [Memberships].[UsrID],
- [Memberships].[LastChanged],
- [Groups].[GroupName] [Group_GroupName],
- [Groups].[GroupType] [Group_GroupType],
- [Groups].[Config] [Group_Config],
- [Groups].[DTS] [Group_DTS],
- [Groups].[UsrID] [Group_UsrID]
- FROM [Memberships]
- JOIN [Groups] ON
- [Groups].[GID]=[Memberships].[GID]
- JOIN [Users] ON [Memberships].[UID] = [Users].[UID]
- WHERE
- [Users].[UserID]=@UserID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getUserByUserID Succeeded'
-ELSE PRINT 'Procedure Creation: getUserByUserID Error on Creation'
-GO
-
---need to check to see if security is already defined. if not then do this stuff
-declare @aCount int
-select @aCount = count(*) from assignments
-if @aCount = 0
-begin
---clean up security related tables
- EXEC sp_executesql N'
- delete from [Assignments]'
- EXEC sp_executesql N'
- dbcc checkident([Assignments],reseed,0)'
- EXEC sp_executesql N'
- delete from [Memberships]'
- EXEC sp_executesql N'
- dbcc checkident([Memberships],reseed,0)'
- EXEC sp_executesql N'
- delete from [Permissions]'
- EXEC sp_executesql N'
- dbcc checkident([Permissions],reseed,0)'
- EXEC sp_executesql N'
- delete from [Roles]'
- EXEC sp_executesql N'
- dbcc checkident([Roles],reseed,0)'
- EXEC sp_executesql N'
- delete from [Users]'
- EXEC sp_executesql N'
- dbcc checkident([Users],reseed,0)'
- EXEC sp_executesql N'
- delete from [Groups]'
- EXEC sp_executesql N'
- dbcc checkident([Groups],reseed,0)'
-
- --define Roles
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Administrator'',''Manage Generic Data;Manage Security;Edit RO Values,Create FST,Update RO Values;Update Formats;PROMS Settings;Create/Update/Delete Folders,DocVersions,Procedures,Sections,Steps,All Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Set Administrator'',''Edit RO Values,Create FST,Update RO Values;Create/Update/Delete Folders,DocVersions,Procedures,Sections,Steps,All Set Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Writer'',''Create/Update/Delete Procedures,Sections,Steps,All Set Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''Reviewer'',''Create/Update/Delete User Annotations'',getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- insert into Roles (Name,Title,DTS,UsrID) values
- (''RO Editor'',''Edit RO Values,Create FST'',getdate(),''VEPROMS'')'
-
- --define Permissions for Roles
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Administrator'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,1,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Set Administrator'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,2,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Writer'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,4,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''Reviewer'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,7,3,15,0,getdate(),getdate(),''VEPROMS'')'
- EXEC sp_executesql N'
- declare @rid int;
- select @rid = rid from roles where name = ''RO Editor'';
- insert into permissions (rid,permlevel,versiontype,permvalue,permad,startdate,dts,usrid) values
- (@rid,3,3,15,0,getdate(),getdate(),''VEPROMS'')'
-
- --define adminstrator Group
- EXEC sp_executesql N'
- insert into groups (groupname,dts,usrid)
- select name + ''s'',getdate(),''VEPROMS'' from roles where name = ''Administrator'''
-
- --define administrator Assignment
- EXEC sp_executesql N'
- insert into assignments (gid,rid,folderid,startdate,dts,usrid)
- select gg.gid,rr.rid,1,getdate(),getdate(),''VEPROMS'' from roles rr inner join groups gg on rr.name + ''s'' = gg.groupname'
- EXEC sp_executesql N'
- print ''MultiUser and Security Created'''
-end
-else begin
- EXEC sp_executesql N'
- print ''MultiUser and Security Exists'''
-end
-GO
-
---added jcb 1st round fixes multiuser and security testting
---ALTER TABLE Groups change GroupName column to 100 characters
-ALTER TABLE groups ALTER COLUMN [GroupName] [nvarchar](100) NOT NULL
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ResetSecurity]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ResetSecurity];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_ResetSecurity]
-AS
-BEGIN
- DELETE FROM [Memberships]
- DELETE FROM [Assignments] WHERE [AID] != 1
- DELETE FROM [Groups] WHERE [GID] != 1
- DELETE FROM [Users]
- DECLARE @gid VARCHAR(10)
- SELECT @gid = x1.value('@Group','varchar(10)')
- FROM
- (
- SELECT folderid,CAST(config as xml) xconfig FROM folders ff WHERE ff.folderid = 1
- ) ah
- CROSS APPLY xconfig.nodes('//Security') t1(x1)
- UPDATE folders SET config = replace(config,'Security Group="' + @gid + '"','Security Group="1"') WHERE folderid = 1
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ResetSecurity Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ResetSecurity Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevisionsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevisionsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevisionsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionsByItemID]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [ItemID] = @ItemID
-and (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) > 0
- ORDER BY [RevisionID] DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevisionsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getRevisionsByItemID Error on Creation'
-GO
-/****** Object: StoredProcedure [getRoUsagesForDocVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesForDocVersion]') AND OBJECTPROPERTY
-
-(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesForDocVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRoUsagesForDocVersion]
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROUsageID],
- rr.[ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [RoUsages] rr
- INNER JOIN vefn_getversionitems(@VersionID) vi on rr.contentid = vi.contentid
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesForDocVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesForDocVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_ListTables3] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_ListTables3]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_ListTables3];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[vesp_ListTables3]
-WITH EXECUTE AS OWNER
-AS
-begin
-select o.name TableName,c.name ColumnName,
-case c.system_type_id
- when 56 then 'int'
- when 231 then 'nvarchar'
- when 165 then 'varbinary'
- when 167 then 'varchar'
- when 239 then 'nchar'
- when 175 then 'char'
- when 61 then 'datetime'
- when 104 then 'bit'
- when 48 then 'TinyInt'
- when 127 then 'BigInt'
- when 241 then 'Xml'
- when 62 then 'float'
- when 189 then 'timestamp'
- else '???' + cast(c.system_type_id as varchar(10)) end ItemType,
-case c.system_type_id
- when 56 then '0'
- when 231 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 165 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 167 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 239 then case c.max_length when -1 then 'Max' else cast(c.max_length/2 as varchar(10)) end
- when 175 then case c.max_length when -1 then 'Max' else cast(c.max_length as varchar(10)) end
- when 61 then '0'
- when 104 then '0'
- when 48 then '0'
- when 189 then '0'
- else '0' end ItemSize,
-
- case when c.is_nullable=1 then 'Yes' else '' end AllowNulls,
- case when c.is_identity=1 then 'Identity' else dc.definition end DefaultValue,
- x.value Description
-from sys.objects o
-join sys.columns c on o.object_id=c.object_id
-left join sysconstraints cn on o.object_id=cn.id and c.column_id=cn.colid
-left join sys.default_constraints dc on dc.object_id = cn.constid
-left join sys.extended_properties x on x.major_id = o.OBJECT_ID AND x.minor_id=c.column_id AND x.Name='MS_Description'
-where o.type='U'
-order by o.name,c.column_id
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_ListTables3 Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_ListTables3 Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getOwnersByVersionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getOwnersByVersionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getOwnersByVersionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getOwnersByVersionID]
-(
- @VersionID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- JOIN vefn_GetVersionItems(@VersionID) vi ON oo.OwnerItemID = vi.ItemID
- WHERE oo.OwnerType = 0
- UNION
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- JOIN [Entries] ee on oo.OwnerItemID = ee.DocID
- JOIN vefn_GetVersionItems(@VersionID) vi on ee.ContentID = vi.ContentID
- WHERE oo.OwnerType = 1
- UNION
- SELECT
- [OwnerID],
- [SessionID],
- [OwnerType],
- [OwnerItemID],
- [DTSStart],
- oo.[LastChanged]
- FROM [Owners] oo
- WHERE oo.OwnerType = 2
- AND oo.OwnerItemID = @VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getOwnersByVersionID Succeeded'
-ELSE PRINT 'Procedure Creation: getOwnersByVersionID Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CompareROIDs]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CompareROIDs];
-/****** Object: UserDefinedFunction [dbo].[vefn_CompareROIDs] Script Date: 07/21/2014 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-create function vefn_CompareROIDs (@roid1 varchar(16), @roid2 varchar(16))
-returns int
-as begin
- declare @len1 int
- declare @len2 int
- if @roid1 = @roid2
- return 1
- set @len1 = len(@roid1)
- set @len2 = len(@roid2)
- if @len1 = @len2
- begin
- if @len1 = 16 and substring(@roid1,13,4) = '0000' and substring(@roid2,13,4) = '0041'
- return 2
- if @len1 = 16 and substring(@roid2,13,4) = '0000' and substring(@roid1,13,4) = '0041'
- return 3
- return 0
- end
- if substring(@roid1,1,12) = substring(@roid2,1,12)
- return 4
- return 0
-end
-GO
--- Display the status of ScalarFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_CompareROIDs Succeeded'
-ELSE PRINT 'Function: vefn_CompareROIDs Error on Creation'
-GO
-
-/****** Object: Index [IX_tblContentsForCopy] Script Date: 8/26/2014 8:55:16 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblContentsForCopy')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblContentsForCopy] ON [dbo].[tblContents]
-(
- [DTS] ASC,
- [UserID] ASC,
- [Type] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: Index [IX_tblItemsForCopy1] Script Date: 8/27/2014 5:26:31 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblItemsForCopy1')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblItemsForCopy1] ON [dbo].[tblItems]
-(
- [ContentID] ASC,
- [DTS] ASC,
- [UserID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: Index [IX_tblItemsForCopy2] Script Date: 8/27/2014 5:26:37 PM ******/
-IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_tblItemsForCopy2')
-BEGIN
-CREATE NONCLUSTERED INDEX [IX_tblItemsForCopy2] ON [dbo].[tblItems]
-(
- [PreviousID] ASC,
- [DTS] ASC,
- [UserID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-END
-GO
-
-/****** Object: StoredProcedure [CopyItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[CopyItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [CopyItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[CopyItemAndChildren]
-(
- @StartItemID INT,
- @DestFormatID INT,
- @UserID NVARCHAR(100),
- @NewStartItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
-
---+-----------------------------------------------------------------+
---¦ BEGIN TRANSACTION to make these changes temporary ¦
---+-----------------------------------------------------------------+
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @StartItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This step has been deleted',16,1)
- RETURN
- END
-DECLARE @Children AS TABLE
-(
- ItemID INT PRIMARY KEY,
- NewItemID INT,
- ContentID INT,
- NewContentID INT,
- FormatID INT,
- NewFormatID INT
-)
-DECLARE @NewDocuments AS TABLE
-(
- DocID INT PRIMARY KEY,
- NewDocID INT
-)
--- Locals
-DECLARE @DTS DATETIME -- DTS of all New Items
-DECLARE @StartContentID INT
-Select @StartContentID = ContentID from Items where ItemID = @StartItemID
-SET @DTS = GETDATE() -- Get the current Date and Time
--- Get a list of all of the Items to be copied based upon StartItemID and EndItemID
--- If the StartItemID = EndItemID then it is a single item and it's children
-INSERT INTO @Children SELECT ItemID,ItemID,ContentID,ContentID,FormatID,FormatID FROM vefn_ChildItemsRange(@StartItemID,@StartItemID,null)
--- <<< Copy Contents >>>
--- Create new content rows to match the existing rows. Set the type to the Current ContentID temporarily
--- so that the new content rows can be associated with the existing content rows.
-INSERT INTO Contents
- ([Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID])
- select CASE when [ContentID] = @StartContentID and [Type]<20000 then 'Copy Of ' + [Number] else [Number] end,
- [Text],[ContentID],[FormatID],[Config],@DTS,@UserID
- from Contents where ContentID in(Select ContentID from @Children)
--- Update the @Children with the NewConentIDs
---print 'A ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN set NN.NewContentID = CC.ContentID
-From Contents CC
-Join @Children NN on NN.ContentID = CC.Type AND CC.DTS = @DTS and CC.UserID = @UserID
--- Reset the Type column in the Contents table with the Type column from the original Records.
---print 'B ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-DECLARE @SourceType INT
-Select @SourceType = Type from Contents where ContentID = @StartContentID
-if @SourceType = 0
- BEGIN
- UPDATE CC set CC.Type = CC2.Type, CC.DTS = CC2.DTS, CC.UserID = CC2.UserID
- From Contents CC
- Join @Children NN on NN.NewContentID = CC.ContentID
- Join Contents CC2 on NN.ContentID = CC2.ContentID
- END
-else
- BEGIN
-UPDATE CC set CC.Type = CC2.Type
-From Contents CC
-Join @Children NN on NN.NewContentID = CC.ContentID
-Join Contents CC2 on NN.ContentID = CC2.ContentID
- END
---print 'B1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Contents are done
- -- SELECT * From Contents where DTS = @DTS and UserID = @UserID
--- <<< Copy Grids >>>
-INSERT INTO [Grids]([ContentID],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[Data],[Config],@DTS,@UserID
- FROM [Grids] GG Join @Children NN on GG.ContentID = NN.ContentID
--- <<< Copy Images >>>
---print 'B2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-INSERT INTO [Images]([ContentID],[ImageType],[FileName],[Data],[Config],[DTS],[UserID])
- SELECT NN.[NewContentID],[ImageType],[FileName],[Data],[Config],@DTS,@UserID
- FROM [Images] II Join @Children NN on II.ContentID = NN.ContentID
--- Create new item rows based upon the current item rows and the @Children table, with the NewContentIDs
---print 'B3 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-INSERT INTO [Items] ([PreviousID],[ContentID],[DTS],[UserID])
- SELECT II.[PreviousID], -- Leave the PreviousID as is for now
- NN.NewContentID, @DTS, @UserID
- from @Children NN
- join Items II on II.ContentID = NN.ContentID
--- Update the @Children with the NewItemIDs
---print 'B4 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN set NN.NewItemID = II.ItemID
-From Items II
-Join @Children NN on NN.NewContentID = II.ContentID AND II.DTS = @DTS and II.UserID = @UserID
-DECLARE @NewItemID int
-SELECT @NewItemID = NewItemID
- FROM @Children
- WHERE ItemID = @StartItemID
---print 'B5 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE NN SET NN.[NewFormatID] = CC.[FormatID]
- FROM @Children NN
- Join vefn_ChildItemsRange(@NewItemID,@NewItemID,@DestFormatID) CC
- ON NN.NewItemID = CC.ItemID
--- The @Children table is now complete
- --SELECT * From @Children
--- Update the PreviousID in the new Item rows, to the new ItemIDs based upon the old ItemIDs
---print 'B6 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-Update II Set II.[PreviousID] = NN.NewItemID
-from Items II
-Join @Children NN on NN.ItemID = II.PreviousID AND II.DTS = @DTS and II.UserID = @UserID
--- Get the new ItemIDs based upon the old ItemIDs
-SELECT @NewStartItemID = NewItemID from @Children where ItemID = @StartItemID
---SELECT @NewEndItemID = NewItemID from @Children where ItemID = @EndItemID
--- Set the PreviousID for the starting Item to null temporarily.
--- This will be adjusted based upon where the step is inserted.
---print 'B7 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-Update Items Set PreviousID = null where ItemID = @NewStartItemID
-if @SourceType = 0
- BEGIN
- UPDATE II SET II.DTS = II2.DTS, II.UserID = II2.UserID
- From Items II
- Join @Children NN on NN.NewItemID = II.ItemID
- Join Items II2 on NN.ItemID = II2.ItemID
- WHERE NN.ItemID = @StartItemID
- END
---print 'C ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Items are done
- --SELECT * From Items where DTS = @DTS and UserID = @UserID
--- <<< Copy Parts >>>
-INSERT INTO [Parts] ([ContentID],[FromType],[ItemID],[DTS],[UserID])
-Select NNF.NewContentID,[FromType],NNT.NewItemID, @DTS, @UserID from Parts PP
-JOIN @Children NNF on PP.ContentID = NNF.ContentID
-JOIN @Children NNT on PP.ItemID = NNT.ItemID
---print 'D ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Parts are done
- -- SELECT * From Parts where DTS = @DTS and UserID = @UserID
--- <<< Copy Annotations >>>
-INSERT INTO [Annotations] ([ItemID],[TypeID],[RtfText],[SearchText],[Config],[DTS],[UserID])
- Select NewItemID, TypeID, RtfText, SearchText, Config, @DTS, @UserID
- from Annotations AA Join @Children NN on AA.ItemID = NN.ItemID
---print 'E ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Annotations are done
- -- SELECT * From Annotations where DTS = @DTS and UserID = @UserID
--- <<< Copy Documents and Entries>>>
--- logic to create Entries for Library Documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],EE.[DocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') <> ''
--- Logic to create new documents for any documents used that do not have libtitles
-INSERT INTO [Documents] ([LibTitle],[DocContent],[DocAscii],[Config],[DTS],[UserID],[FileExtension])
- OUTPUT CAST(INSERTED.[LibTitle] as INT),INSERTED.[DocID] INTO @NewDocuments
- SELECT str(DD.[DocID]),[DocContent],[DocAscii],[Config],@DTS,@UserID,[FileExtension]
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN [Documents] DD on EE.[DocID] = DD.[DocID] and Isnull(LibTitle,'') = ''
-UPDATE DD SET LibTitle = ''
- FROM Documents DD JOIN @NewDocuments ND on DD.[DocID] = ND.[NewDocID]
- where DTS = @DTS and UserID = @UserID
---print 'F ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Documents are Done
- -- SELECT * From Documents where DTS = @DTS and UserID = @UserID
--- Logic to create entries for these newly created documents
-INSERT INTO [Entries] ([ContentID],[DocID],[DTS],[UserID])
- SELECT NN.[NewContentID],ND.[NewDocID],@DTS,@UserID
- FROM [Entries] EE JOIN @Children NN on NN.ContentID = EE.ContentID
- JOIN @NewDocuments ND on EE.[DocID] = ND.[DocID]
--- Logic to Create DROUsages for these newly created documents
-INSERT INTO [DROUsages] ([DocID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT ND.[NewDocID],[ROID],[Config],@DTS,@UserID,[RODbID]
- FROM [DROUsages] RR
- JOIN @NewDocuments ND on RR.[DocID] = ND.[DocID]
-
---print 'G ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Entries are done
- -- SELECT * From Entries EE JOIN Documents DD on ee.DocID = DD.DocID where EE.DTS = @DTS and EE.UserID = @UserID
--- <<< Copy RoUsages >>>
-INSERT INTO [RoUsages] ([ContentID],[ROID],[Config],[DTS],[UserID],[RODbID])
- SELECT NN.[NewContentID],CAST([ROUsageID] as nvarchar(16)),[Config],@DTS,@UserID,[RODbID]
- FROM [RoUsages] RR Join @Children NN on RR.ContentID = NN.ContentID
--- Update content records for newly copied records to use correct RO usage ids in the RO tags
-DECLARE @RowsAffected int
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixROText(C1.Text, CAST([ROID] as int), [ROUsageID]) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID where Len([ROID]) < 12) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
--- Update grid records for newly copied records to use correct RO usage ids in the RO tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
- UPDATE GG SET [Data] = G2.NewData
- FROM GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixROData(G1.Data, CAST([ROID] as int), [ROUsageID]) NewData
- FROM GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN RoUsages RO on NN.NewContentID = RO.ContentID where Len([ROID]) < 12) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([Data] as nvarchar(max)) <> cast(G2.NewData as nvarchar(max))
- SET @RowsAffected = @@RowCount
-END
-UPDATE RON SET [ROID] = ROO.[ROID]
- FROM RoUsages RON
- JOIN @Children NN on RON.ContentID = NN.NewContentID
- JOIN RoUsages ROO on CAST(RON.ROID as int) = ROO.RoUsageID
- where Len(RON.[ROID]) < 12
---print 'H ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- RoUsages are done
- -- SELECT * From RoUsages where DTS = @DTS and UserID = @UserID
-
--- <<< Copy Transtions >>>
--- Note that the inserted record has the 'TranType' field set to old transitionid. This is done
--- so that the next step can replace the old transitionid with the new transitionid in the
--- content record's transition tokens. The TranType gets reset after the content records are
--- updated.
--- Also note that the 'toid/rangeid' may need converted to newly copied ids or may not. If it's
--- not a range, then it always is converted to new, if there is a new. If it's a range, both
--- the toid & the rangeid must be new in order for the conversion to be correct. You cannot
--- have part of the range pointing to the new and part of the range pointing to the original
--- locations.
-
-INSERT INTO .[dbo].[Transitions] ([FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID])
- SELECT NNF.[NewContentID],
- -- if both toid & range are null, use the original toid & rangeid
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [ToID] ELSE NNT.[NewItemID] END,
- CASE WHEN NNT.[NewItemID] is null or NNR.[NewItemID] is null THEN [RangeID] ELSE NNR.[NewItemID] END,
- [IsRange],[TransitionID],[Config],@DTS,@UserID
- FROM .[dbo].[Transitions] TT
- JOIN @Children NNF on TT.[FromID] = NNF.[ContentID]
- LEFT JOIN @Children NNT on TT.[ToID] = NNT.[ItemID]
- LEFT JOIN @Children NNR on TT.[RangeID] = NNR.[ItemID]
---print 'H1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- -- Update content records for newly copied records to use correct TransitionIDs in the Transition tags
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE CC SET [TEXT] = C2.NewText
- FROM CONTENTS CC
- JOIN (SELECT C1.ContentID, .dbo.vefn_FixTransitionTextForCopy(C1.Text, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewText
- FROM CONTENTS C1
- JOIN @Children NN on C1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) C2 ON CC.ContentID = C2.ContentID
- WHERE [TEXT] <> C2.NewText
- SET @RowsAffected = @@RowCount
-END
---print 'H2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---set nocount off
--- -- Update grid records for newly copied records to use correct TransitionIDs in the Transition tags
-declare @grids table
-(
-contentid int primary key,
-data xml
-)
-insert into @grids select gg.contentid,gg.data from GRIDS GG
- where gg.contentid in (select nn.newcontentid from
- @Children NN
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID)
---print 'H2.1 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---select * from @grids
-SET @RowsAffected=1
-WHILE @RowsAffected > 0
-BEGIN
-UPDATE GG SET [DATA] = G2.NewData
- FROM @GRIDS GG
- JOIN (SELECT G1.ContentID, .dbo.vefn_FixTransitionDataForCopy(G1.Data, TRO.TransitionID, TRO.TranType, TRO.[ToID], TRO.[RangeID],TR.[TransitionID], TR.[ToID], TR.[RangeID], .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)) NewData
- FROM @GRIDS G1
- JOIN @Children NN on G1.ContentID = NN.NewContentID
- JOIN Transitions TR on NN.NewContentID = TR.FromID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID) G2 ON GG.ContentID = G2.ContentID
- WHERE Cast([DATA] as nvarchar(max)) <> CAST(G2.NewData as nvarchar(max))
- SET @RowsAffected = @@RowCount
-END
---print 'H2.2 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-update GG set data = g1.data from Grids gg join @grids g1 on gg.contentid = g1.contentid
---print 'H3 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---set nocount on
--- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition whose transition format changes
-INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT NN.NewItemID, @typeID,'Verify Transition Format',@UserID
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
- WHERE .dbo.vefn_CompareTranFormat(NN.FormatID, NN.NewFormatID, TRO.TranType) <> 0
---print 'H4 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
-UPDATE TR SET TR.[TranType] = .dbo.vefn_GetNewTranType(NN.FormatID, NN.NewFormatID, TRO.TranType)
- FROM Transitions TR
- JOIN @Children NN on TR.FromID = NN.NewContentID
- JOIN Transitions TRO on TR.TranType = TRO.TransitionID
---print 'H5 ' + cast(datediff(s,@dts,getdate()) as varchar(100))
--- Transitions are done
- -- SELECT * From Transitions where DTS = @DTS and UserID = @UserID
---print 'Z ' + cast(datediff(s,@dts,getdate()) as varchar(100))
---foldouts fixing code
-if exists (select * from contents where contentid in (select newcontentid from @children) and config like '%FloatingFoldout%')
-begin
- --insert into #mytemp
- select cc.contentid,xsteps.value('@FloatingFoldout','int') oldfoldoutid,(select newitemid
- from @children
- where itemid = xsteps.value('@FloatingFoldout','int')) newfoldoutid,xconfig
- into #mytemp
- from (select *,cast(config as xml) xconfig from contents where contentid in (select newcontentid from @children)) cc
- cross apply xconfig.nodes('Config/Step') tsteps(xsteps)
- --build @cmd string
- declare @cmd nvarchar(max)
- declare cmds cursor for
- select distinct 'update #mytemp set xconfig.modify(''replace value of (Config/Step/@FloatingFoldout)[1] with "'
- + cast(newfoldoutid as varchar(10))
- + '"'') where xconfig.value(''(Config/Step/@FloatingFoldout)[1]'',''int'') = '
- + cast(oldfoldoutid as varchar(10))
- from #mytemp
- --execute cursor over rows
- open cmds
- fetch next from cmds into @cmd
- while @@fetch_status = 0
- begin
- exec sp_executesql @cmd
- fetch next from cmds into @cmd
- end
- close cmds
- deallocate cmds
- --actually update contents
- update cc set config = cast(xconfig as varchar(max)) from contents cc join #mytemp mt on cc.contentid = mt.contentid
- --get rid of #mytemp
- drop table #mytemp
-end
---end foldouts fixing code
---section start
-DECLARE @NewContentID int
-Select @NewContentID = NewContentID from @Children where ItemID = @StartItemID
-DECLARE @Config varchar(max)
-DECLARE @XConfig xml
-select @Config = config from contents where contentid = @NewContentID
-select @XConfig = cast(@Config as xml)
-if @Config like '%SectionStart%' begin
- DECLARE @SectionStart int
- select @SectionStart = xproc.value('@SectionStart','int') from @xconfig.nodes('Config/Procedure') tproc(xproc)
- DECLARE @NewSectionStart int
- select @NewSectionStart = newitemid from @children where itemid = @SectionStart
- DECLARE @cmd2 nvarchar(max)
- set @cmd2 = '
- declare @XConfig xml;
- set @XConfig = cast(''' + @Config + ''' as xml);
- set @XConfig.modify(''replace value of (Config/Procedure/@SectionStart)[1] with "' + cast(@NewSectionStart as nvarchar(10)) + '"'');
- update contents set config = cast(@XConfig as varchar(max)) where contentid = ' + cast(@NewContentID as nvarchar(10)) + ';'
- exec sp_executesql @cmd2
-end
---end section start
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: CopyItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: CopyItemAndChildren Error on Creation'
-GO
-Delete From Formats where name like 'WPS%'
-PRINT 'Kewaunee formats removed'
-GO
-
-/****** Object: StoredProcedure [CopyItemAndChildren] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[DeleteItemAndChildren]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [DeleteItemAndChildren];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[DeleteItemAndChildren]
-(
- @ItemID int,
- @UserID AS VARCHAR(100)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- declare @DeleteID int
- DECLARE @ContentID AS INT
- DECLARE @NextItemID AS INT
- DECLARE @PreviousItemID AS INT
- DECLARE @ExternalChildCount AS INT
- DECLARE @ExternalCount AS INT
- DECLARE @Path AS VARCHAR(MAX)
- DECLARE @Children AS TABLE
- (
- ItemID INT PRIMARY KEY,
- ContentID INT
- )
- DECLARE @ExternalTrans TABLE
- (
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
- )
- SET NOCOUNT ON
- SELECT @ContentID = ContentID, @PreviousItemID = PreviousID FROM Items WHERE ItemID = @ItemID
- SELECT @NextItemID = ItemID FROM Items WHERE PreviousID = @ItemID
- SELECT @ExternalCount = count(*) FROM vefn_FindExternalTransitions(@ItemID) where rangeid = toid or toid = @ItemID
- SELECT @ExternalChildCount = count(*) FROM vefn_FindExternalChildTransitions(@ItemID)
- SET @Path = [dbo].[ve_GetShortPath](@ItemID)
-
- IF @ExternalCount > 0 AND @NextItemID is null
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions and has no next step - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
-
- IF @ExternalChildCount > 0
- BEGIN
- RAISERROR ('###Cannot Delete Item###Step %d has External Transitions to it''s children - (%s)',16,1,@ItemID,@Path)
- RETURN
- END
- --deletelog
- INSERT INTO DeleteLog (UserID) values (@UserID)
- Select @DeleteID = SCOPE_IDENTITY()
- --end deletelog
- -- Get list of Children
- INSERT INTO @Children SELECT * FROM vefn_ChildItems(@ItemID)
- -- UPDATE PreviousID in Items WHERE ItemID = @NextItemID
- UPDATE Items SET PreviousID = @PreviousItemID WHERE ItemID=@NextItemID
- -- UPDATE DocVersion
- UPDATE DocVersions SET ItemID=@NextItemID where ItemID = @ItemID
- -- UPDATE Parts
- IF @NextItemID is not NULL -- Remove Part Record
- BEGIN
- UPDATE PARTS SET ItemID = @NextItemID where ItemID=@ItemID
- END
- ELSE
- BEGIN
- DELETE FROM Parts WHERE ItemID=@ItemID
- END
- -- Get external transitions that point to the specified Item
- -- These will need to be adjusted to point to the next Item.
- INSERT INTO @ExternalTrans SELECT * FROM vefn_FindExternalTransitions(@ItemID);
- DECLARE @typeID int -- AnnotationType
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add 'Verification Required' annotions for transtions that point to different step
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where ItemID in (SELECT FromItemID FROM @ExternalTrans)
- -- Update content records for the transitions
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@NextItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ItemID,@PreviousItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Update transitions that point to @ItemID to Point to @NextItemID
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @NextItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID != @ItemID or RangeID = ToID)
- UPDATE TRANSITIONS
- SET ToID = case when ToID = @ItemID then @NextItemID else ToID END,
- RangeID = case when RangeID = @ItemID then @PreviousItemID else RangeID END
- WHERE TransitionID in(Select TransitionID from @ExternalTrans where RangeID = @ItemID and RangeID != ToID)
- -- Delete Annotations for @ItemID and children
- DELETE from Annotations where ItemID in(Select ItemID from @Children)
- -- Delete Details associated with @ContentID and children
- DELETE from Details where ContentID in(Select ContentID from @Children)
- -- Delete Grids associated with @ContentID and children
- DELETE from Grids where ContentID in(Select ContentID from @Children)
- -- Delete Images associated with @ContentID and children
- DELETE from Images where ContentID in(Select ContentID from @Children)
- -- Delete Entries associated with @ContentID and children
- DELETE from Entries where ContentID in(Select ContentID from @Children)
- -- Delete ROUsages associated with @ContentID and children
- DELETE from RoUsages where ContentID in(Select ContentID from @Children)
- -- Delete ZTransitions records associated with @ContentID and children
- DELETE FROM ZTransitions where TransitionID
- in(SELECT TransitionID from Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID)
- -- Delete Transitions associated with @ContentID and children
- DELETE FROM Transitions where FromID in(SELECT ContentID FROM @Children) or FromID = @ContentID
- -- Delete Parts associated with @ContentID and children
- DELETE from Parts where ContentID in(Select ContentID from @Children)
- -- Delete ZContents associated with @ContentID and children
- DELETE from ZContents where ContentID in(Select ContentID from @Children)
- -- Disconnect Items from Each Other
- DELETE from Items where ItemID in(Select ItemID from @Children) and PreviousID Is Not Null
- -- Disconnect Items to be deleted from each other
- Update Items set PreviousID = null where ItemID in (Select ItemID from @Children) and PreviousID Is Not Null
- -- Delete Item Records
- DELETE from Items where ItemID in(Select ItemID from @Children)
- -- DELETE Contents
- DELETE from Contents where ContentID in(Select ContentID from @Children)
- --purge deletelog
- DELETE from DeleteLog where DeleteID = @DeleteID
- --end purge deletelog
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: DeleteItemAndChildren Succeeded'
-ELSE PRINT 'Procedure Creation: DeleteItemAndChildren Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixTransitionDataForCopy] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixTransitionDataForCopy]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixTransitionDataForCopy];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FixTransitionDataForCopy]
-(@data XML,@TransitionID int,@TranType int,@OldToID int,@OldRangeID int, @NewID int, @NewToID int, @NewRangeID int, @NewTranType int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- -- Build Search String and Replace String
- DECLARE @offset int
- DECLARE @lookFor nvarchar(MAX)
- DECLARE @replaceWith nvarchar(MAX)
- DECLARE @text nvarchar(MAX)
- SET @text = Cast(@data as nvarchar(max))
- SET @lookFor = '#Link:Transition:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- if(@offset = 0)
- BEGIN
-
- SET @lookFor = '#Link:TransitionRange:' + ltrim(str(@TranType)) + ' ' + ltrim(str(@TransitionID))
- SET @offset = CHARINDEX(@lookFor,@text)
- SET @replaceWith = '#Link:TransitionRange:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID)) + ' ' + ltrim(str(@NewRangeID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID)) + ' ' + ltrim(str(@OldRangeID))
- END
- ELSE
- BEGIN
- SET @replaceWith = '#Link:Transition:' + ltrim(str(@NewTranType)) + ' ' + ltrim(str(@NewID))
- + ' ' + ltrim(str(@NewToID))
- SET @lookFor = @lookFor + ' ' + ltrim(str(@OldToID))
- END
- return Cast(replace(@text,@lookFor,@replaceWith) as XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixTransitionDataForCopy Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FixROData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FixROData]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_FixROData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create FUNCTION [dbo].[vefn_FixROData]
-(@data XML,@ROUsageID int,@NewROUsageID int)
-RETURNS XML
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- -- Build Search String and Replace String
- DECLARE @lookFor varchar(MAX)
- DECLARE @replaceWith varchar(MAX)
- SET @lookFor = '#Link:ReferencedObject:' + ltrim(str(@ROUsageID)) + ' '
- SET @replaceWith = '#Link:ReferencedObject:' + ltrim(str(@NewROUsageID)) + ' '
- return CAST(replace(CAST(@data AS NVarChar(max)),@lookFor,@replaceWith) AS XML)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_FixROData Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_FixROData Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_GetVersionProcedureItems] Script Date: 1/5/2015 3:58:49 PM ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionProcedureItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionProcedureItems];
-GO
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-Select * from vefn_GetVersionProcedureItems('') where procid = 63589
-Select * from vefn_GetVersionProcedureItems('1') where procid = 63589
-Select * from vefn_GetVersionProcedureItems('4') where procid = 63589
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionProcedureItems](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ProcID int,
- ItemID int primary key,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], ProcID, [ItemID], [ContentID]) as
- (Select DV.VersionID, DV.ItemID ProcID, [I].[ItemID], [I].[ContentID]
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV
- ON I.[ItemID] = DV.[ItemID]
- Union All
- -- Children
- select Z.VersionID, Z.ProcID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- Union All
- -- Siblings
- select Z.VersionID, case when z.ProcID = z.ItemID then I.ItemID else Z.ProcID end ProcID, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- )
- insert into @VersionItems
- select VersionID, ProcID, [ItemID], [ContentID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction vefn_GetVersionProcedureItems Succeeded'
-ELSE PRINT 'TableFunction vefn_GetVersionProcedureItems Error on Creation'
-
-/****** Object: StoredProcedure [getTransitionSearchResults] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_SearchTransitions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_SearchTransitions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_SearchTransitions] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-
-CREATE PROCEDURE [dbo].[vesp_SearchTransitions]
-(
- @DocVersionList varchar(max),
- @TranType int,
- @TranCategory varchar(20)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @itmp table
- (
- vid int,
- pid int,
- iid int primary key,
- cid int
- )
- declare @ctmp table
- (
- vid int,
- pid int,
- iid int,
- cid int primary key
- )
- declare @ttmp table
- (
- itemid int,
- dvpath varchar(max)
- )
- insert into @itmp select * from vefn_getversionprocedureitems(@DocVersionList)
- insert into @ctmp select * from @itmp
- if @TranType = -1 and @TranCategory = '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- end else if @TranType > -1 and @TranCategory = '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- where tt.TranType = @TranType
- end else if @TranType = -1 and @TranCategory != '' begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- join @itmp it on tt.ToID = it.iid
- where case when it.vid = ct.vid then case when it.pid = ct.pid then 'Internal' else 'External' end else 'Outside' end = @TranCategory
- end else begin
- insert into @ttmp
- select ii.ItemID,dv.DVPath
- from vefn_DocVersionSplit(@DocVersionList) dv
- join @ctmp ct on dv.VersionID = ct.vid
- join Items ii on ct.cid = ii.ContentID
- join Transitions tt on ii.ContentID = tt.FromID
- join @itmp it on tt.ToID = it.iid
- where tt.TranType = @TranType and case when it.vid = ct.vid then case when it.pid = ct.pid then 'Internal' else 'External' end else 'Outside' end = @TranCategory
- end
- SELECT
- tt.dvpath,I.[ItemID],I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged],
- C.[Number],C.[Text],C.[Type],C.[FormatID],C.[Config],C.[DTS] [cDTS],C.[UserID] [cUserID],C.[LastChanged] [cLastChanged],
- (SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=[I].[ItemID]) [AnnotationCount],
- (SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=[I].[ItemID]) [DocVersionCount],
- (SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=[I].[ItemID]) [NextCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=[I].[ItemID]) [PartCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=[I].[ItemID]) [Transition_RangeIDCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=[I].[ItemID]) [Transition_ToIDCount],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[C].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[C].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[C].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[C].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[C].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[C].[ContentID]) [cPartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[C].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[C].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[C].[ContentID]) [ZContentCount]
- FROM [Items] I
- join @ttmp tt on I.ItemID = tt.itemid
- join Contents C on C.ContentID = I.ContentID
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_SearchTransitions Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_SearchTransitions Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_GetVersionFormatSections] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetVersionFormatSections]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetVersionFormatSections];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetVersionFormatSections](@DocVersionList varchar(MAX))
-RETURNS @VersionItems TABLE
-(
- VersionID int,
- ItemID int,
- ContentID int primary key,
- FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- BEGIN
- with Itemz([VersionID], [ItemID], [ContentID], [FormatID], [ParentFormatID]) as
- (Select DV.VersionID, [I].[ItemID], [I].[ContentID],
- isnull(C.[FormatID],isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))),
- isnull(DV2.[FormatID],isnull(F.[FormatID],P.[FormatID]))
- FROM [Items] I
- JOIN vefn_DocVersionSplit(@DocVersionList) DV ON I.[ItemID] = DV.[ItemID]
- join docversions DV2 on DV.[VersionID] = DV2.[VersionID]
- join folders F on DV2.[FolderID] = F.[FolderID]
- join folders P on P.[FolderID] = F.[ParentID]
- join Contents C on I.ContentID = C.ContentID
-
- Union All
- -- Children
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[FormatID]), Z.[FormatID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on I.ContentID = C.ContentID
- where c.Type < 20000
- Union All
- -- Siblings
- select Z.VersionID, I.[ItemID], I.[ContentID], isnull(C.[FormatID],Z.[ParentFormatID]), Z.[ParentFormatID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on I.ContentID = C.ContentID
- )
- insert into @VersionItems
- select VersionID, [ItemID], [ContentID], [FormatID]
- from ItemZ I
- --Select * From rousages RU Where RU.ContentID in (Select ContentID from ItemZ)
- OPTION (MAXRECURSION 10000)
- END
-RETURN
-END
-GO
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_GetVersionFormatSections Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_GetVersionFormatSections Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetFormatVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetFormatVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetFormatVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetFormatVersions] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-CREATE PROCEDURE vesp_GetFormatVersions
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- select ff.Name + ' - ' + ff.Description Title,vfi.FormatID,vn.VersionID
- from vefn_GetVersionNames() vn
- join vefn_GetVersionFormatSections('') vfi on vn.VersionID = vfi.VersionID
- join Formats ff on vfi.FormatID = ff.FormatID
- group by ff.Name + ' - ' + ff.Description,vfi.formatid,vn.VersionID
- return
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetFormatVersions Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetFormatVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetTranTypesByFormatID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetTranTypesByFormatID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetTranTypesByFormatID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetTranTypesByFormatID] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-vesp_GetTranTypesByFormatID 102
-*/
-CREATE PROCEDURE vesp_GetTranTypesByFormatID
-(
- @FormatID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @t1 table
- (
- formatid int,
- transindex int,
- transmenu varchar(max)
- )
- declare @t2 table
- (
- transindex int,
- formatid int
- )
- insert into @t1
- select ff.formatid,r1.value('@Index','int') transindex, r1.value('@TransMenu','varchar(max)') transmenu
- from Formats ff
- cross apply ff.Data.nodes('//TransTypes') t1(r1)
- where ff.FormatID = @FormatID
- union
- select ff.formatid,r1.value('@Index','int') transindex, r1.value('@TransMenu','varchar(max)') transmenu
- from Formats ff
- cross apply ff.Data.nodes('//TransTypes') t1(r1)
- where ff.FormatID = 1
- insert into @t2
- select transindex,max(formatid) formatid from @t1 group by transindex
- select t1.transindex,t1.transmenu
- from @t1 t1
- join @t2 t2 on t1.formatid = t2.formatid and t1.transindex = t2.transindex
- order by t1.transindex
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetTranTypesByFormatID Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetTranTypesByFormatID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetTransitionReportData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetTransitionReportData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [dbo].[vesp_GetTransitionReportData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-/****** Object: StoredProcedure [dbo].[vesp_GetTransitionReportData] Script Date: 1/7/2015 6:15:17 PM ******/
-SET ANSI_NULLS ON
-GO
-
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-vesp_GetTransitionReportData 1,1
-*/
-CREATE PROCEDURE vesp_GetTransitionReportData
-(
- @VersionID int,
- @ProcedureID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @itmp table
- (
- vid int,
- pid int,
- iid int primary key,
- cid int
- )
- declare @ctmp table
- (
- vid int,
- pid int,
- iid int,
- cid int primary key
- )
- declare @ttmp table
- (
- tid int primary key
- )
- insert into @itmp select * from vefn_getversionprocedureitems(@VersionID)
- insert into @ctmp select * from @itmp
- insert into @ttmp select tt.TransitionID from Transitions tt join @ctmp ct on tt.FromID = ct.cid join @itmp it on tt.ToID = it.iid
- --internal
- select 1 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.vid = it.vid and ct.pid = @ProcedureID and it.pid = @ProcedureID
- --external from
- union
- select 2 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.pid = @ProcedureID and it.pid != @ProcedureID
- --external to
- union
- select 3 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join @itmp it on tt.ToID = it.iid
- where ct.pid != @ProcedureID and it.pid = @ProcedureID
- --outside from
- union
- select 4 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @ctmp ct on tt.FromID = ct.cid
- join Items ii on tt.ToID = ii.ItemID
- where ct.pid = @ProcedureID and ii.ItemID not in (select iid from @itmp)
- --outside to
- union
- select 5 level,tt.*,
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=tt.[TransitionID]) [ZTransitionCount]
- from Transitions tt
- join @ttmp tp on tt.TransitionID = tp.tid
- join @itmp it on tt.ToID = it.iid
- join Items ii on tt.FromID = ii.ContentID
- where it.pid = @ProcedureID and ii.ContentID not in (select cid from @ctmp)
- RETURN
-END
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetTransitionReportData Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetTransitionReportData Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [PasteItemChild] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteItemChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteItemChild];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2015 - Volian Enterprises, Inc. All rights reserved.
-
-Copies & Pastes into a level above the copied item, for example copied item is step pasted into a section.
-
-Example test:
-
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteItemChild 1493,484,20041,2,@dts,'KATHY',@NewItemID output
-
-*****************************************************************************/
-
-CREATE PROCEDURE [dbo].[PasteItemChild]
-(
- @ItemID int=null, @StartItemID int=null, -- ItemID is destination, StartItemID is top of copy
- @Type int=null, @FromType int=null, @DTS datetime, @UserID nvarchar(100), -- Type is step/section type for content record, fromtype is for parts
- @NewItemID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if exists (select * from tblitems where itemid = @ItemID and DeleteStatus !=0)
- BEGIN
- RAISERROR ('###Cannot Paste Step###This current step has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @DestFormatID int
- SET @DestFormatID = .dbo.vefn_GetInheritedFormat(@ItemID, 0)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- -- print 'testing PasteItemChild 1 ' + cast(dbo.ve_GetTransitionErrorCount() as varchar(20))
- DECLARE @ChildID int, @ContentID int, @ParentContentID int, @LastChanged timestamp
- , @newLastChanged timestamp, @Error int, @Rowcount int, @ChildDeleted int
- SELECT @ChildID = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [PARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID
- IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[tblParts]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- BEGIN
- SELECT @ChildDeleted = pp.[ItemID],@ParentContentID = ii.ContentID, @LastChanged = pp.LastChanged
- FROM [ITEMS] ii
- LEFT JOIN [tblPARTS] pp on pp.ContentID=ii.ContentID and pp.FromType=@FromType
- WHERE ii.[ItemID]=@ItemID and pp.DeleteStatus > 0
- END
- -- No existing child - Add Parts record. Note that don't need to update any transition records if no existing children
- IF @ChildID is null
- BEGIN
- IF @ChildDeleted is not null
- DELETE FROM [tblParts] WHERE ItemID = @ChildDeleted
- EXECUTE AddPart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @newLastChanged output
- END
- ELSE -- Children exist: Update existing Parts record and adjust transition records that may have pointed to 1st child.
- BEGIN
- EXECUTE UpdatePart @ParentContentID, @FromType, @newItemID, @DTS, @UserID, @LastChanged, @newLastChanged output
- UPDATE [Items] SET [PreviousID]=@newItemID WHERE [ItemID]=@ChildID
-
- -- Update content records for the transitions, this only fixes the link portion. Code fixes the text.
- Update CC
- Set Text = DBO.vefn_FixTransitionText(Text,TT.TransitionID,TT.TranType,TT.ToID,TT.RangeID,@ChildID,@newItemID)
- From CONTENTS CC
- JOIN Transitions TT ON TT.FromID = CC.ContentID
- WHERE TT.ToID = @ChildID OR TT.RangeID = @ChildID
- -- Update transitions that pointed to @ItemID to point to @newItemID
- Update TRANSITIONS
- Set ToID = CASE ToID WHEN @ChildID THEN @newItemID ELSE ToID END,
- RangeID = CASE RangeID WHEN @ChildID THEN @newItemID ELSE RangeID END
- WHERE ToID = @ChildID OR RangeID = @ChildID
- END
- -- Add 'Verification Required' AnnotationType
- DECLARE @typeID int
- SELECT @typeID = TypeID from AnnotationTypes where Name = 'Verification Required'
- IF(@typeID IS NULL)
- BEGIN
- INSERT INTO [AnnotationTypes] ([Name],[UserID]) VALUES ('Verification Required','Volian')
- SELECT @typeID = SCOPE_IDENTITY()
- END
- -- Add "Verification Required" Annotation for each Transition that points to @newItemID or @NextID
- -- I don't expect to see any transitions that point to @ChildID. They should have changed in
- -- the update above to point to @newItemID. This is here for consistency with the other insert
- -- stored procedures
- INSERT INTO [Annotations] ([ItemID],[TypeID],[SearchText],[UserID])
- SELECT ItemID, @typeID,'Verify Transition Destination',@UserID
- FROM Items where CONTENTID in (SELECT FromID FROM TRANSITIONS
- where ToID IN(@ChildID,@newItemID) OR RangeID IN(@ChildID,@newItemID))
- -- Transition Text gets updated in ItemInsertExt.cs
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetItem @newItemID
- delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
- delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteItemChild Succeeded'
-ELSE PRINT 'Procedure Creation: PasteItemChild Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [PasteDocVersionChild] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[PasteDocVersionChild]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [PasteDocVersionChild];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2014 - Volian Enterprises, Inc. All rights reserved.
-
-Copies & Pastes into a docversion that does NOT have any existing procedures.
-
-Example test:
-
-declare @NewItemID int
-declare @dts datetime
-set @newitemid = 0
-set @dts = getdate()
-exec PasteDocVersionChild 5,30,@dts,'KATHY',@NewItemID output
-
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[PasteDocVersionChild]
-(
- @VersionID int=null, @StartItemID int=null, -- VersionID is destination (docversion), StartItemID is top of copy (i.e. procedure)
- @DTS datetime, @UserID nvarchar(100),
- @ThisVersionID int output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- if not exists (select * from DocVersions where versionid = @VersionID)
- BEGIN
- RAISERROR ('###Cannot Paste Procedure###This document version has been deleted in another session',16,1)
- RETURN
- END
- -- First make a copy of the input StartItemID (Procedure)
- -- DestFormatID is the formatid for the destination parent's format
- DECLARE @NewItemID int
- DECLARE @DestFormatID int
- SET @ThisVersionID = @VersionID
- SET @DestFormatID = .dbo.vefn_GetDocVersionInheritedFormat(@VersionID)
- EXECUTE CopyItemAndChildren @StartItemID, @DestFormatID, @UserID, @NewItemID OUTPUT
- UPDATE [DOCVERSIONS] SET [ItemID] = @NewItemID where [VersionID]=@VersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
- PRINT 'Child Added ' + ltrim(str(@newItemID))
- EXECUTE GetDocVersion @ThisVersionID
- delete from itemaudits where itemid in (select itemid from vefn_ChildItems(@newitemid))
- delete from contentaudits where contentid in (select contentid from vefn_ChildItems(@newitemid))
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: PasteDocVersionChild Succeeded'
-ELSE PRINT 'Procedure Creation: PasteDocVersionChild Error on Creation'
-GO
-
-
-/****** Object: StoredProcedure [vefn_GetDocVersionInheritedFormat] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetDocVersionInheritedFormat]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetDocVersionInheritedFormat];
-GO
-
-CREATE FUNCTION [dbo].[vefn_GetDocVersionInheritedFormat] (@VersionID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @FormatID as int
- -- First get format for the input doc version
- begin
- with Itemz([Level], [VersionID], [FolderID], [ParentID], [FormatID]) as (
- -- DocVersion From Item
- select 0 [Level], DV.VersionID, DV.FolderID, null, DV.FormatID
- from DocVersions DV
- where [VersionID] = @VersionID
- Union All
- -- Folders
- select [Level] + 1, null, FF.ParentID, FF.FolderID, FF.FormatID
- from Itemz Z
- join Folders FF on FF.FolderID = Z.ParentID and FF.ParentID <> FF.FolderID
- where Z.FormatID is null
- )
- Select @FormatID = FormatID from Itemz ZZ Where FormatID is not null
- OPTION (MAXRECURSION 10000)
- RETURN @FormatID
- END
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetDocVersionInheritedFormat Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetDocVersionInheritedFormat Error on Creation'
-GO
-
-/*********the following funcion is for debugging copy/paste where transition text in content records does not get updated */
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[ve_GetTransitionErrorCount]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [ve_GetTransitionErrorCount];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*
-select dbo.ve_GetTransitionErrorCount ()
-print 'testing ' + cast(dbo.ve_GetTransitionErrorCount() as varchar(20))
-*/
-
-CREATE FUNCTION [dbo].[ve_GetTransitionErrorCount] () RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-DECLARE @Count int
-select @Count = count(*) from (
-select dbo.ve_GetShortPathFromContentId(contentid) location, * from (
-select contentid, text, tt.*,
-case when text like '%'+ case when tt.toid = tt.rangeid and tt.IsRange = 0
-then
-'#Link:Transition:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + '%'
-else
-'#Link:TransitionRange:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + ' ' + cast(RangeID as nvarchar(10))+ '%'
-end then 'matches' else 'different' end ContentMatchesTrans,
-case when text like '%'+
-'#Link:TransitionRange:' + cast(TranType as nvarchar(2)) +
-' ' + cast(TransitionID as nvarchar(10)) + ' ' + cast(ToID as nvarchar(10)) + ' ' + cast(RangeID as nvarchar(10))+ '%'
-then 'matches' else 'different' end ContentMatchesRangeTrans
-from Contents cc
-join transitions tt on tt.fromid = cc.contentid) mm
-where ContentMatchesTrans = 'different') mm
-return @Count
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: ve_GetTransitionErrorCount Succeeded'
-ELSE PRINT 'ScalarFunction Creation: ve_GetTransitionErrorCount Error on Creation'
-GO
-
---added by JCB for storing procedure xml for approved version
---ALTER TABLE Versions add ApprovedXML if it does not exist
-IF COL_LENGTH('Versions','ApprovedXML') IS NULL
- ALTER TABLE Versions ADD [ApprovedXML] [NVARCHAR](MAX) NULL;
-GO
-
-/****** Object: StoredProcedure [addVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addVersion]
-
-(
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @ApprovedXML nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @newVersionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Versions]
- (
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RevisionID,
- @StageID,
- @PDF,
- @SummaryPDF,
- @ApprovedXML,
- @DTS,
- @UserID
- )
- SELECT @newVersionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@newVersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addVersion Succeeded'
-ELSE PRINT 'Procedure Creation: addVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- WHERE [VersionID]=@VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [ApprovedXML],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByRevisionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByRevisionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByRevisionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByRevisionID]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[ApprovedXML],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByRevisionID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByRevisionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByStageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByStageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByStageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByStageID]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[ApprovedXML],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Versions]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Versions].[RevisionID]
- WHERE
- [Versions].[StageID]=@StageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByStageID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByStageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateVersion]
-
-(
- @VersionID int,
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @ApprovedXML nvarchar(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Versions]
- SET
- [RevisionID]=@RevisionID,
- [StageID]=@StageID,
- [PDF]=@PDF,
- [SummaryPDF]=@SummaryPDF,
- [ApprovedXML]=@ApprovedXML,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [VersionID]=@VersionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Versions] WHERE [VersionID]=@VersionID)
- RAISERROR('Version record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Version has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@VersionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateVersion Succeeded'
-ELSE PRINT 'Procedure Creation: updateVersion Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetDisconnectedItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetDisconnectedItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetDisconnectedItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_GetDisconnectedItems()
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION [dbo].[vefn_GetDisconnectedItems]()
-RETURNS @DiscItems TABLE
-(
- ItemID int primary Key,
- ContentID int,
- UNIQUE (ContentID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- declare @UsedItems Table
- ( itemid int primary key, contentid int)
- insert into @UsedItems
- Select ItemID, ContentID from vefn_GetVersionItems('')
- insert into @DiscItems
- select itemid,ii.contentid from (
- Select ItemID,ii.ContentID from Items II
- where ItemID not in(select ItemID from @UsedItems)) ii
- Join Contents CC ON CC.ContentID = II.ContentID
- And CC.Type is not null
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetDisconnectedItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetDisconnectedItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_TransitionsToDisconnected]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_TransitionsToDisconnected];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_TransitionsToDisconnected] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_TransitionsToDisconnected('1')
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.vefn_TransitionsToDisconnected(@DocVersionList nvarchar(MAX))
-RETURNS @Transitions TABLE
-(
- [TransitionID] int primary key
- ,[FromID] int
- ,[ToID] int
- ,[RangeID] int
- ,[IsRange] int
- ,[TranType] int
- ,[Config] nvarchar(max)
- ,[DTS] datetime
- ,[UserID] nvarchar(100)
- ,UNIQUE(FromID,TransitionID)
- ,UNIQUE(ToID,TransitionID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Transitions
- select [TransitionID],[FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID]
- from Transitions tt
- join vefn_GetVersionItems(@DocVersionList) vi on tt.FromID = vi.ContentID
- join vefn_GetDisconnectedItems() di on tt.ToID = di.ItemID
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_TransitionsToDisconnected] Succeeded'
-ELSE PRINT 'TableFunction [vefn_TransitionsToDisconnected] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsToDisconnected] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsToDisconnected]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsToDisconnected];
-GO
-
-/*
-exec getTransitionsToDisconnected
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsToDisconnected]
-(
- @DocVersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- from transitions tt
- join vefn_TransitionsToDisconnected(@DocVersionList) td on tt.TransitionID = td.TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsToDisconnected Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsToDisconnected Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetNonEditableItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetNonEditableItems];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetNonEditableItems] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_GetNonEditableItems()
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION vefn_GetNonEditableItems()
-RETURNS @NonEditItems TABLE
-(
- ItemID int primary Key,
- ContentID int,
- UNIQUE (ContentID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @NonEditItems
- select ii.ItemID,ah.ContentID
- from
- (
- select cast(Config as xml) xconfig,ContentID from Contents where ContentID in
- (
- select p1.ContentID from Parts p1
- join Parts p2 on p1.ContentID = p2.ContentID
- where p1.FromType = 2 and p2.FromType = 6
- )
- and Config like '%edit%'
- ) ah
- cross apply xconfig.nodes('//SubSection') tSubsection(xSubsection)
- join Items ii on ah.ContentID = ii.ContentID
- where isnull(xSubsection.value('@Edit','varchar(1)'),'N') = 'N'
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetNonEditableItems] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetNonEditableItems] Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_TransitionsToNonEditable]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_TransitionsToNonEditable];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_TransitionsToNonEditable] ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
--- select * from vefn_TransitionsToNonEditable('1')
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2013 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-
-CREATE FUNCTION dbo.vefn_TransitionsToNonEditable(@DocVersionList nvarchar(MAX))
-RETURNS @Transitions TABLE
-(
- [TransitionID] int primary key
- ,[FromID] int
- ,[ToID] int
- ,[RangeID] int
- ,[IsRange] int
- ,[TranType] int
- ,[Config] nvarchar(max)
- ,[DTS] datetime
- ,[UserID] nvarchar(100)
- ,UNIQUE(FromID,TransitionID)
- ,UNIQUE(ToID,TransitionID)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
- insert into @Transitions
- select [TransitionID],[FromID],[ToID],[RangeID],[IsRange],[TranType],[Config],[DTS],[UserID]
- from Transitions tt
- join vefn_GetVersionItems(@DocVersionList) vi on tt.FromID = vi.ContentID
- join vefn_GetNonEditableItems() di on tt.ToID in (select ItemID from vefn_StepChildItems(di.ItemID))
- RETURN
-END
-GO
-IF (@@Error = 0) PRINT 'TableFunction [vefn_TransitionsToNonEditable] Succeeded'
-ELSE PRINT 'TableFunction [vefn_TransitionsToNonEditable] Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsToNonEditable] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsToNonEditable]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsToNonEditable];
-GO
-
-/*
-exec getTransitionsToNonEditable '8'
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsToNonEditable]
-(
- @DocVersionList nvarchar(MAX)
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- TT.[TransitionID],
- TT.[FromID],
- TT.[ToID],
- TT.[RangeID],
- TT.[IsRange],
- TT.[TranType],
- TT.[Config],
- TT.[DTS],
- TT.[UserID],
- TT.[LastChanged],
- (SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=TT.[TransitionID]) [ZTransitionCount]
- from transitions tt
- join vefn_TransitionsToNonEditable(@DocVersionList) td on tt.TransitionID = td.TransitionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsToNonEditable Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsToNonEditable Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_StepChildItems] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_StepChildItems]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_StepChildItems];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_StepChildItems](@ItemID int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [ItemID], [ContentID]) as (
- Select 0 [Level], [ItemID], [ContentID]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID and (Z.Level > 0 or p.FromType = 6)
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children select ItemID, ContentID from Itemz
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_StepChildItems Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_StepChildItems Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getJustStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getJustStage];
-GO
-/****** Object: StoredProcedure [dbo].[getJustStage] ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-Create PROCEDURE [dbo].[getJustStage]
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [StageID],
- [Name],
- [Description],
- [IsApproved],
- [DTS],
- [UserID],
- [LastChanged]
- --(SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[RODbID]=[RODbs].[RODbID]) [DROUsageCount],
- --(SELECT COUNT(*) FROM [ROFsts] WHERE [ROFsts].[RODbID]=[RODbs].[RODbID]) [ROFstCount],
- --(SELECT COUNT(*) FROM [ROImages] WHERE [ROImages].[RODbID]=[RODbs].[RODbID]) [ROImageCount],
- --(SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[RODbID]=[RODbs].[RODbID]) [RoUsageCount]
- FROM [Stages]
- WHERE [StageID]=@StageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getJustStage Succeeded'
-ELSE PRINT 'Procedure Creation: getJustStage Error on Creation'
-GO
\ No newline at end of file
diff --git a/PROMS/DataLoader/PROMStoAPPR.sql b/PROMS/DataLoader/PROMStoAPPR.sql
deleted file mode 100644
index 34ce8a68..00000000
--- a/PROMS/DataLoader/PROMStoAPPR.sql
+++ /dev/null
@@ -1,3372 +0,0 @@
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Checks]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
-ALTER TABLE [dbo].[Checks] DROP CONSTRAINT [FK_Checks_Revisions]
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Versions]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
-ALTER TABLE [dbo].[Versions] DROP CONSTRAINT [FK_Versions_Stages]
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Versions]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
-ALTER TABLE [dbo].[Versions] DROP CONSTRAINT [FK_Versions_Revisions]
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Checks]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
-ALTER TABLE [dbo].[Checks] DROP CONSTRAINT [FK_Checks_Stages]
-GO
-
-/****** Object: Table [dbo].[Stages] Script Date: 10/21/2011 15:04:48 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Stages]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- DROP TABLE [Stages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE TABLE [dbo].[Stages](
- [StageID] [int] IDENTITY(1,1) NOT NULL,
- [Name] [nvarchar](50) NOT NULL,
- [Description] [nvarchar](200) NULL,
- [IsApproved] [int] NOT NULL CONSTRAINT [DF_Stages_IsApproved] DEFAULT ((0)),
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Stages_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) NOT NULL CONSTRAINT [DF_Stages_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Stages] PRIMARY KEY CLUSTERED
-(
- [StageID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Stages', @level2type=N'COLUMN',@level2name=N'DTS'
-
--- Display the status of Table creation
-IF (@@Error = 0) PRINT 'Table Creation: Stages Succeeded'
-ELSE PRINT 'Table Creation: Stages Error on Creation'
-GO
-
-/****** Object: Table [dbo].[Revisions] Script Date: 10/21/2011 15:06:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Revisions]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- DROP TABLE [Revisions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE TABLE [dbo].[Revisions](
- [RevisionID] [int] IDENTITY(1,1) NOT NULL,
- [ItemID] [int] NOT NULL,
- [TypeID] [int] NOT NULL CONSTRAINT [DF_Revisions_TypeID] DEFAULT ((1)),
- [RevisionNumber] [nvarchar](50) NULL,
- [RevisionDate] [datetime] NULL,
- [Notes] [nvarchar](max) NULL,
- [Config] [xml] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Revisions_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) NOT NULL CONSTRAINT [DF_Revisions_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Revisions] PRIMARY KEY CLUSTERED
-(
- [RevisionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Revisions', @level2type=N'COLUMN',@level2name=N'RevisionDate'
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Revisions', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-
--- Display the status of Table creation
-IF (@@Error = 0) PRINT 'Table Creation: Revisions Succeeded'
-ELSE PRINT 'Table Creation: Revisions Error on Creation'
-GO
-
-/****** Object: Table [dbo].[Checks] Script Date: 10/21/2011 15:07:45 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Checks]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- DROP TABLE [Checks];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE TABLE [dbo].[Checks](
- [CheckID] [int] IDENTITY(1,1) NOT NULL,
- [RevisionID] [int] NOT NULL,
- [StageID] [int] NOT NULL,
- [ConsistencyChecks] [xml] NULL,
- [DTS] [datetime] NOT NULL CONSTRAINT [DF_Checks_DTS] DEFAULT (getdate()),
- [UserID] [nvarchar](100) NOT NULL CONSTRAINT [DF_Checks_UserID] DEFAULT (upper(suser_sname())),
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Checks] PRIMARY KEY CLUSTERED
-(
- [CheckID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Checks', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-
-ALTER TABLE [dbo].[Checks] WITH CHECK ADD CONSTRAINT [FK_Checks_Revisions] FOREIGN KEY([RevisionID])
-REFERENCES [dbo].[Revisions] ([RevisionID])
-GO
-ALTER TABLE [dbo].[Checks] CHECK CONSTRAINT [FK_Checks_Revisions]
-GO
-ALTER TABLE [dbo].[Checks] WITH CHECK ADD CONSTRAINT [FK_Checks_Stages] FOREIGN KEY([StageID])
-REFERENCES [dbo].[Stages] ([StageID])
-GO
-ALTER TABLE [dbo].[Checks] CHECK CONSTRAINT [FK_Checks_Stages]
-
--- Display the status of Table creation
-IF (@@Error = 0) PRINT 'Table Creation: Checks Succeeded'
-ELSE PRINT 'Table Creation: Checks Error on Creation'
-GO
-
-/****** Object: Table [dbo].[Versions] Script Date: 10/21/2011 15:09:15 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-SET ANSI_PADDING ON
-GO
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[Versions]') AND OBJECTPROPERTY(id,N'IsTable') = 1)
- DROP TABLE [Versions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE TABLE [dbo].[Versions](
- [VersionID] [int] IDENTITY(1,1) NOT NULL,
- [RevisionID] [int] NOT NULL,
- [StageID] [int] NOT NULL,
- [PDF] [varbinary](max) NULL,
- [SummaryPDF] [varbinary](max) NULL,
- [DTS] [datetime] NOT NULL,
- [UserID] [nvarchar](200) NOT NULL,
- [LastChanged] [timestamp] NOT NULL,
- CONSTRAINT [PK_Version] PRIMARY KEY CLUSTERED
-(
- [VersionID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-) ON [PRIMARY]
-GO
-SET ANSI_PADDING OFF
-GO
-EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'{datetime}' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'Versions', @level2type=N'COLUMN',@level2name=N'DTS'
-GO
-
-ALTER TABLE [dbo].[Versions] WITH CHECK ADD CONSTRAINT [FK_Versions_Revisions] FOREIGN KEY([RevisionID])
-REFERENCES [dbo].[Revisions] ([RevisionID])
-GO
-ALTER TABLE [dbo].[Versions] CHECK CONSTRAINT [FK_Versions_Revisions]
-GO
-ALTER TABLE [dbo].[Versions] WITH CHECK ADD CONSTRAINT [FK_Versions_Stages] FOREIGN KEY([StageID])
-REFERENCES [dbo].[Stages] ([StageID])
-GO
-ALTER TABLE [dbo].[Versions] CHECK CONSTRAINT [FK_Versions_Stages]
-
--- Display the status of Table creation
-IF (@@Error = 0) PRINT 'Table Creation: Versions Succeeded'
-ELSE PRINT 'Table Creation: Versions Error on Creation'
-GO
-
-
---put in stage data
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Input to review','',0,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Initial review','',0,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Final review','',0,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Verification','',0,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Validation','',0,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Issued','',1,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Published','',1,getdate(),'VOLIAN\BODINE')
-GO
-INSERT INTO [dbo].[Stages] ([Name],[Description],[IsApproved],[DTS],[UserID]) VALUES ('Approved','',1,getdate(),'VOLIAN\BODINE')
-GO
---end put in stage data
-
-/****** Object: StoredProcedure [addCheck] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addCheck]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addCheck];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addCheck]
-
-(
- @RevisionID int,
- @StageID int,
- @ConsistencyChecks xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newCheckID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Checks]
- (
- [RevisionID],
- [StageID],
- [ConsistencyChecks],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RevisionID,
- @StageID,
- @ConsistencyChecks,
- @DTS,
- @UserID
- )
- SELECT @newCheckID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Checks] WHERE [CheckID]=@newCheckID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addCheck Succeeded'
-ELSE PRINT 'Procedure Creation: addCheck Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addRevision] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addRevision]
-
-(
- @ItemID int,
- @TypeID int,
- @RevisionNumber nvarchar(50)=null,
- @RevisionDate datetime=null,
- @Notes nvarchar(MAX)=null,
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @newRevisionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Revisions]
- (
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @ItemID,
- @TypeID,
- @RevisionNumber,
- @RevisionDate,
- @Notes,
- @Config,
- @DTS,
- @UserID
- )
- SELECT @newRevisionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Revisions] WHERE [RevisionID]=@newRevisionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addRevision Succeeded'
-ELSE PRINT 'Procedure Creation: addRevision Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addStage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addStage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addStage]
-
-(
- @Name nvarchar(50),
- @Description nvarchar(200)=null,
- @IsApproved int,
- @DTS datetime,
- @UserID nvarchar(100),
- @newStageID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Stages]
- (
- [Name],
- [Description],
- [IsApproved],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @Name,
- @Description,
- @IsApproved,
- @DTS,
- @UserID
- )
- SELECT @newStageID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Stages] WHERE [StageID]=@newStageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addStage Succeeded'
-ELSE PRINT 'Procedure Creation: addStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [addVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[addVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [addVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[addVersion]
-
-(
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @newVersionID int output,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- INSERT INTO [Versions]
- (
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [DTS],
- [UserID]
- )
- VALUES
- (
- @RevisionID,
- @StageID,
- @PDF,
- @SummaryPDF,
- @DTS,
- @UserID
- )
- SELECT @newVersionID= SCOPE_IDENTITY()
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@newVersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: addVersion Succeeded'
-ELSE PRINT 'Procedure Creation: addVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteCheck] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteCheck]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteCheck];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteCheck]
-
-(
- @CheckID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Checks]
- WHERE [CheckID] = @CheckID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteCheck Succeeded'
-ELSE PRINT 'Procedure Creation: deleteCheck Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteRevision] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteRevision]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Checks]
- WHERE [RevisionID]=@RevisionID
- DELETE [Versions]
- WHERE [RevisionID]=@RevisionID
- DELETE [Revisions]
- WHERE [RevisionID] = @RevisionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteRevision Succeeded'
-ELSE PRINT 'Procedure Creation: deleteRevision Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteStage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteStage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteStage]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Checks]
- WHERE [StageID]=@StageID
- DELETE [Versions]
- WHERE [StageID]=@StageID
- DELETE [Stages]
- WHERE [StageID] = @StageID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteStage Succeeded'
-ELSE PRINT 'Procedure Creation: deleteStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- DELETE [Versions]
- WHERE [VersionID] = @VersionID
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteVersion Succeeded'
-ELSE PRINT 'Procedure Creation: deleteVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsCheck] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsCheck]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsCheck];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsCheck]
-
-(
- @CheckID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Checks] WHERE [CheckID]=@CheckID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsCheck Succeeded'
-ELSE PRINT 'Procedure Creation: existsCheck Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsRevision] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsRevision]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Revisions] WHERE [RevisionID]=@RevisionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsRevision Succeeded'
-ELSE PRINT 'Procedure Creation: existsRevision Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsStage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsStage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsStage]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Stages] WHERE [StageID]=@StageID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsStage Succeeded'
-ELSE PRINT 'Procedure Creation: existsStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [existsVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[existsVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [existsVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[existsVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT COUNT(*)
- FROM [Versions] WHERE [VersionID]=@VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: existsVersion Succeeded'
-ELSE PRINT 'Procedure Creation: existsVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAuditsChronologyByItemID];
-GO
-
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemID] ******/
-/*
-getAnnotationAuditsChronologyByItemID 3,1230
-getAnnotationAuditsChronologyByItemID 30,8570
-getAnnotationAuditsChronologyByItemID 30,8513
-getAnnotationAuditsChronologyByItemID 30,8505
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE procedure [dbo].[getAnnotationAuditsChronologyByItemID]
-(
- @ProcItemID int,
- @ItemID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from @tci)
- and dts > @dts
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsChronologyByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getCheck] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getCheck]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getCheck];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getCheck]
-
-(
- @CheckID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [CheckID],
- [RevisionID],
- [StageID],
- [ConsistencyChecks],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Checks]
- WHERE [CheckID]=@CheckID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getCheck Succeeded'
-ELSE PRINT 'Procedure Creation: getCheck Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getChecks] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChecks]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChecks];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChecks]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [CheckID],
- [RevisionID],
- [StageID],
- [ConsistencyChecks],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Checks]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChecks Succeeded'
-ELSE PRINT 'Procedure Creation: getChecks Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getChecksByRevisionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChecksByRevisionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChecksByRevisionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChecksByRevisionID]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Checks]
- JOIN [Stages] ON
- [Stages].[StageID]=[Checks].[StageID]
- WHERE
- [Checks].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChecksByRevisionID Succeeded'
-ELSE PRINT 'Procedure Creation: getChecksByRevisionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getChecksByStageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getChecksByStageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getChecksByStageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getChecksByStageID]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Checks]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Checks].[RevisionID]
- WHERE
- [Checks].[StageID]=@StageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getChecksByStageID Succeeded'
-ELSE PRINT 'Procedure Creation: getChecksByStageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsByContentIDandDTS] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsByContentIDandDTS]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsByContentIDandDTS];
-GO
-
-/*
-declare @dts datetime
-set @dts = (select dts from items where itemid = 41)
-print @dts
-exec .dbo.getContentAuditsByContentIDandDTS 9701,@dts
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsByContentIDandDTS]
-(
- @ContentID int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-declare @audits table
-(
- [AuditID] [bigint],
- [ContentID] [int],
- [Number] [nvarchar](512),
- [Text] [nvarchar](max),
- [Type] [int],
- [FormatID] [int],
- [Config] [nvarchar](max),
- [DTS] [datetime],
- [UserID] [nvarchar](200),
- [DeleteStatus] [int],
- [ActionWhat] [nvarchar](max)
-)
-insert into @audits
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
- case when auditid = (select min(auditid) from contentaudits where contentid = @ContentID) then 'Original'
- when deletestatus > 0 then 'Deleted'
- else 'Changed' end ActionWhat
- FROM [ContentAudits]
- WHERE ContentID = @ContentID
-and DTS > @DTS
-insert into @audits
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
-'Original' ActionWhat
--- case when auditid = (select min(auditid) from contentaudits where contentid = @ContentID) then 'Original'
--- when deletestatus > 0 then 'Deleted'
--- else 'Changed' end ActionWhat
- FROM [ContentAudits]
- WHERE ContentID = @ContentID
-and auditid = (select max(auditid) from contentaudits where contentid = @contentid and auditid not in (select auditid from @audits))
-and number is not null
-select * from @audits
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsByContentIDandDTS Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsByContentIDandDTS Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetMyChronology]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetMyChronology];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetMyChronology] Script Date: 11/07/2012 18:09:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetMyChronology](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int, @DTS datetime)
-RETURNS @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-insert into @Chrono
-select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
- from
- (
- select
- case
- when lastauditid is null then 'Added'
- when r.deletestatus > 0 then 'Deleted'
- when lastauditid = -1 then 'Changed'
- when DeletedAuditID is not null then 'Restored'
--- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end actionwhat
-,actiondts actionwhen
--- ,case
--- when lastauditid is null then dts
--- when r.deletestatus > 0 then ActionDTS
--- when lastauditid = -1 then dts
--- when DeletedAuditID is not null then ActionDTS
--- else dts
--- end actionwhen
-,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
- ,*
- from vefn_tblchilditems (@ProcItemID,@ItemID,@IncludeDeletedChildren) t
- inner join vefn_chronologyreport(@ProcItemID,@DTS) r
- on t.icontentid = r.contentid
--- where ActionDTS > procdts or dts > procdts
- ) ah
- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-END
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetMyChronology] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetMyChronology] Error on Creation'
-go
-
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsChronologyByItemID];
-GO
-
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemID] ******/
-/*
-getContentAuditsChronologyByItemID 146,146,0
-getContentAuditsChronologyByItemID 42,42,0
-getContentAuditsChronologyByItemID 9,9,0
-getContentAuditsChronologyByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsChronologyByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsChronologyByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsSummaryByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsSummaryByItemID];
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-/*
-getContentAuditsSummaryByItemID 146,146,0
-getContentAuditsSummaryByItemID 42,42,0
-getContentAuditsSummaryByItemID 9,9,0
-getContentAuditsSummaryByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsSummaryByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-insert into @Chrono
-select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
-select * from @Chrono
-where AuditID is null OR AuditID in (select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid)
-order by OrdinalPath, contentid,auditid
---select z.* from
---(
---select contentid,min(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---union
---select z.* from
---(
---select contentid,max(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsSummaryByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getCurrentRevisionByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getCurrentRevisionByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getCurrentRevisionByItemID];
-GO
-
-/*
-getCurrentRevisionByItemID 41
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getCurrentRevisionByItemID]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [Revisions].[RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-inner join
-(
-select top 1 revisionid,mxvid from
-(
-select rr.revisionid,max(vv.versionid) mxvid
-from items ii
-inner join revisions rr on ii.itemid = rr.itemid
-inner join versions vv on rr.revisionid = vv.revisionid
-inner join stages ss on vv.stageid = ss.stageid
-where ss.isapproved = 1
-and ii.itemid = @ItemID
-group by rr.revisionid
-union
-select null,null
-) ds
-order by mxvid desc
-) rr on [Revisions].revisionid = rr.revisionid
--- WHERE [ItemID] = @ItemID
--- ORDER BY [RevisionID] DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getCurrentRevisionByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getCurrentRevisionByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getLibDocsForProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getLibDocsForProc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getLibDocsForProc];
-GO
-
-/*
-getLibDocsForProc 10
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getLibDocsForProc]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-SELECT dd.[DocID]
- ,[LibTitle]
- ,[DocContent]
- ,[DocAscii]
- ,[Config]
- ,dd.[DTS]
- ,dd.[UserID]
- ,dd.[LastChanged]
- ,[FileExtension],
- (SELECT COUNT(*) FROM [DROUsages] WHERE [DROUsages].[DocID]=[dd].[DocID]) [DROUsageCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[DocID]=[dd].[DocID]) [EntryCount],
- (SELECT COUNT(*) FROM [Pdfs] WHERE [Pdfs].[DocID]=[dd].[DocID]) [PdfCount]
-
- FROM [Documents] dd
- INNER JOIN [Entries] ee on dd.docid = ee.docid
- INNER JOIN vefn_ChildItems(@ItemID) cc on cc.contentid = ee.contentid
- RETURN
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getLibDocsForProc Succeeded'
-ELSE PRINT 'Procedure Creation: getLibDocsForProc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPreviousRevisionByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPreviousRevisionByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPreviousRevisionByItemID];
-GO
-
-/*
-getPreviousRevisionByItemID(41)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getPreviousRevisionByItemID]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [Revisions].[RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
-inner join
-(
-select top 1 revisionid,mxvid from
-(
-select top 2 revisionid,mxvid from
-(
-select rr.revisionid,max(vv.versionid) mxvid
-from items ii
-inner join revisions rr on ii.itemid = rr.itemid
-inner join versions vv on rr.revisionid = vv.revisionid
-inner join stages ss on vv.stageid = ss.stageid
-where ss.isapproved = 1
-and ii.itemid = @ItemID
-group by rr.revisionid
-union
-select null,null
-) ds
-order by mxvid desc
-) ah
-order by revisionid
-) rr on [Revisions].revisionid = rr.revisionid
--- WHERE [ItemID] = @ItemID
--- ORDER BY [RevisionID] DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPreviousRevisionByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getPreviousRevisionByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevision] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevision]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [RevisionID]=@RevisionID
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Checks]
- JOIN [Stages] ON
- [Stages].[StageID]=[Checks].[StageID]
- WHERE
- [Checks].[RevisionID]=@RevisionID
-
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevision Succeeded'
-ELSE PRINT 'Procedure Creation: getRevision Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevisionByItemIDandRevisionNumber] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevisionByItemIDandRevisionNumber]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevisionByItemIDandRevisionNumber];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionByItemIDandRevisionNumber]
-
-(
- @ItemID int,
- @RevisionNumber nvarchar(50)
-)
-WITH EXECUTE AS OWNER
-AS
-declare @RevisionID int
-set @RevisionID = (select revisionid from revisions where itemid = @itemid and revisionnumber = @RevisionNumber)
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [RevisionID]=@RevisionID
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Checks]
- JOIN [Stages] ON
- [Stages].[StageID]=[Checks].[StageID]
- WHERE
- [Checks].[RevisionID]=@RevisionID
-
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevisionByItemIDandRevisionNumber Succeeded'
-ELSE PRINT 'Procedure Creation: getRevisionByItemIDandRevisionNumber Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevisions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevisions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevisions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevisions Succeeded'
-ELSE PRINT 'Procedure Creation: getRevisions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRevisionsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRevisionsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRevisionsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getRevisionsByItemID]
-(
- @ItemID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [RevisionID],
- [ItemID],
- [TypeID],
- [RevisionNumber],
- [RevisionDate],
- [Notes],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[RevisionID]=[Revisions].[RevisionID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[RevisionID]=[Revisions].[RevisionID]) [VersionCount]
- FROM [Revisions]
- WHERE [ItemID] = @ItemID
- ORDER BY [RevisionID] DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRevisionsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getRevisionsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsagesForProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getRoUsagesForProc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getRoUsagesForProc];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getRoUsagesForProc]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ROUsageID],
- rr.[ContentID],
- [ROID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- [RODbID]
- FROM [RoUsages] rr
- INNER JOIN vefn_ChildItems(@ItemID) cc on cc.contentid = rr.contentid
- RETURN
-
-/****** Object: UserDefinedFunction [dbo].[vefn_CheckXML] Script Date: 10/25/2011 18:36:53 ******/
-SET ANSI_NULLS ON
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getRoUsagesForProc Succeeded'
-ELSE PRINT 'Procedure Creation: getRoUsagesForProc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getRoUsagesForProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDROUsagesForProc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDROUsagesForProc];
-GO
-
---[dbo].[getDROUsagesForProc] 2
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDROUsagesForProc]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [DROUsageID],
- rr.[DocID],
- [ROID],
- [Config],
- rr.[DTS],
- rr.[UserID],
- rr.[LastChanged],
- [RODbID]
- FROM [DROUsages] rr
- INNER JOIN Entries ee on rr.docid = ee.docid
- INNER JOIN vefn_ChildItems(@ItemID) cc on cc.contentid = ee.contentid
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDROUsagesForProc Succeeded'
-ELSE PRINT 'Procedure Creation: getDROUsagesForProc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getStage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getStage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getStage]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [StageID],
- [Name],
- [Description],
- [IsApproved],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[StageID]=[Stages].[StageID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[StageID]=[Stages].[StageID]) [VersionCount]
- FROM [Stages]
- WHERE [StageID]=@StageID
-
- SELECT
- [Checks].[CheckID],
- [Checks].[RevisionID],
- [Checks].[StageID],
- [Checks].[ConsistencyChecks],
- [Checks].[DTS],
- [Checks].[UserID],
- [Checks].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Checks]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Checks].[RevisionID]
- WHERE
- [Checks].[StageID]=@StageID
-
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Versions]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Versions].[RevisionID]
- WHERE
- [Versions].[StageID]=@StageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getStage Succeeded'
-ELSE PRINT 'Procedure Creation: getStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getStages] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getStages]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getStages];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getStages]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [StageID],
- [Name],
- [Description],
- [IsApproved],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Checks] WHERE [Checks].[StageID]=[Stages].[StageID]) [CheckCount],
- (SELECT COUNT(*) FROM [Versions] WHERE [Versions].[StageID]=[Stages].[StageID]) [VersionCount]
- FROM [Stages]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getStages Succeeded'
-ELSE PRINT 'Procedure Creation: getStages Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsFromProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsFromProc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsFromProc];
-GO
-
-/*
-getTransitionsFromProc 10
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getTransitionsFromProc]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-SELECT tt.[TransitionID]
- ,[FromID]
- ,[ToID]
- ,[RangeID]
- ,[IsRange]
- ,[TranType]
- ,tt.[Config]
- ,tt.[DTS]
- ,tt.[UserID]
- ,tt.[LastChanged]
- ,(SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[tt].[TransitionID]) [ZTransitionCount]
-,cc.text ContentText
- FROM [Transitions] tt
-inner join contents cc on tt.fromid = cc.contentid
- WHERE transitionid in (select transitionid from vefn_FindExternalFromTransitions(@ItemID))
- RETURN
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsFromProc Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsFromProc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getTransitionsToProc] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getTransitionsToProc]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getTransitionsToProc];
-GO
-
-/*
-getTransitionsToProc 10
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getTransitionsToProc]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-SELECT tt.[TransitionID]
- ,[FromID]
- ,[ToID]
- ,[RangeID]
- ,[IsRange]
- ,[TranType]
- ,tt.[Config]
- ,tt.[DTS]
- ,tt.[UserID]
- ,tt.[LastChanged]
- ,(SELECT COUNT(*) FROM [ZTransitions] WHERE [ZTransitions].[TransitionID]=[tt].[TransitionID]) [ZTransitionCount]
-,cc.text ContentText
- FROM [Transitions] tt
-inner join contents cc on tt.fromid = cc.contentid
- WHERE transitionid in (select transitionid from vefn_FindExternalTransitions(@ItemID))
- RETURN
-
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getTransitionsToProc Succeeded'
-ELSE PRINT 'Procedure Creation: getTransitionsToProc Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersion]
-
-(
- @VersionID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- WHERE [VersionID]=@VersionID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersion Succeeded'
-ELSE PRINT 'Procedure Creation: getVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersions]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersions];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersions]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [VersionID],
- [RevisionID],
- [StageID],
- [PDF],
- [SummaryPDF],
- [DTS],
- [UserID],
- [LastChanged]
- FROM [Versions]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersions Succeeded'
-ELSE PRINT 'Procedure Creation: getVersions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByRevisionID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByRevisionID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByRevisionID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByRevisionID]
-
-(
- @RevisionID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Stages].[Name] [Stage_Name],
- [Stages].[Description] [Stage_Description],
- [Stages].[IsApproved] [Stage_IsApproved],
- [Stages].[DTS] [Stage_DTS],
- [Stages].[UserID] [Stage_UserID]
- FROM [Versions]
- JOIN [Stages] ON
- [Stages].[StageID]=[Versions].[StageID]
- WHERE
- [Versions].[RevisionID]=@RevisionID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByRevisionID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByRevisionID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getVersionsByStageID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getVersionsByStageID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getVersionsByStageID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getVersionsByStageID]
-
-(
- @StageID int
-)
-WITH EXECUTE AS OWNER
-AS
-
- SELECT
- [Versions].[VersionID],
- [Versions].[RevisionID],
- [Versions].[StageID],
- [Versions].[PDF],
- [Versions].[SummaryPDF],
- [Versions].[DTS],
- [Versions].[UserID],
- [Versions].[LastChanged],
- [Revisions].[ItemID] [Revision_ItemID],
- [Revisions].[TypeID] [Revision_TypeID],
- [Revisions].[RevisionNumber] [Revision_RevisionNumber],
- [Revisions].[RevisionDate] [Revision_RevisionDate],
- [Revisions].[Notes] [Revision_Notes],
- [Revisions].[Config] [Revision_Config],
- [Revisions].[DTS] [Revision_DTS],
- [Revisions].[UserID] [Revision_UserID]
- FROM [Versions]
- JOIN [Revisions] ON
- [Revisions].[RevisionID]=[Versions].[RevisionID]
- WHERE
- [Versions].[StageID]=@StageID
-
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getVersionsByStageID Succeeded'
-ELSE PRINT 'Procedure Creation: getVersionsByStageID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateCheck] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateCheck]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateCheck];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateCheck]
-
-(
- @CheckID int,
- @RevisionID int,
- @StageID int,
- @ConsistencyChecks xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Checks]
- SET
- [RevisionID]=@RevisionID,
- [StageID]=@StageID,
- [ConsistencyChecks]=@ConsistencyChecks,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [CheckID]=@CheckID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Checks] WHERE [CheckID]=@CheckID)
- RAISERROR('Check record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Check has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Checks] WHERE [CheckID]=@CheckID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateCheck Succeeded'
-ELSE PRINT 'Procedure Creation: updateCheck Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateRevision] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateRevision]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateRevision];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateRevision]
-
-(
- @RevisionID int,
- @ItemID int,
- @TypeID int,
- @RevisionNumber nvarchar(50)=null,
- @RevisionDate datetime=null,
- @Notes nvarchar(MAX)=null,
- @Config xml=null,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Revisions]
- SET
- [ItemID]=@ItemID,
- [TypeID]=@TypeID,
- [RevisionNumber]=@RevisionNumber,
- [RevisionDate]=@RevisionDate,
- [Notes]=@Notes,
- [Config]=@Config,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [RevisionID]=@RevisionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Revisions] WHERE [RevisionID]=@RevisionID)
- RAISERROR('Revision record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Revision has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Revisions] WHERE [RevisionID]=@RevisionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateRevision Succeeded'
-ELSE PRINT 'Procedure Creation: updateRevision Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateStage] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateStage]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateStage];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateStage]
-
-(
- @StageID int,
- @Name nvarchar(50),
- @Description nvarchar(200)=null,
- @IsApproved int,
- @DTS datetime,
- @UserID nvarchar(100),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Stages]
- SET
- [Name]=@Name,
- [Description]=@Description,
- [IsApproved]=@IsApproved,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [StageID]=@StageID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Stages] WHERE [StageID]=@StageID)
- RAISERROR('Stage record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Stage has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Stages] WHERE [StageID]=@StageID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateStage Succeeded'
-ELSE PRINT 'Procedure Creation: updateStage Error on Creation'
-GO
-
-/****** Object: StoredProcedure [updateVersion] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[updateVersion]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [updateVersion];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[updateVersion]
-
-(
- @VersionID int,
- @RevisionID int,
- @StageID int,
- @PDF varbinary(MAX)=null,
- @SummaryPDF varbinary(MAX)=null,
- @DTS datetime,
- @UserID nvarchar(200),
- @LastChanged timestamp,
- @newLastChanged timestamp output
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- UPDATE [Versions]
- SET
- [RevisionID]=@RevisionID,
- [StageID]=@StageID,
- [PDF]=@PDF,
- [SummaryPDF]=@SummaryPDF,
- [DTS]=@DTS,
- [UserID]=@UserID
- WHERE [VersionID]=@VersionID AND [LastChanged]=@LastChanged
- IF @@ROWCOUNT = 0
- BEGIN
- IF NOT exists(select * from [Versions] WHERE [VersionID]=@VersionID)
- RAISERROR('Version record has been deleted by another user', 16, 1)
- ELSE
- RAISERROR('Version has been edited by another user', 16, 1)
- END
-
- SELECT @newLastChanged=[LastChanged]
- FROM [Versions] WHERE [VersionID]=@VersionID
-
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: updateVersion Succeeded'
-ELSE PRINT 'Procedure Creation: updateVersion Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_CheckAllXML] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CheckAllXML]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CheckAllXML];
-GO
-
-/*
-select [dbo].[vefn_CheckAllXML](1)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_CheckAllXML](@DocVersionID int)
-returns xml
-begin
---temp table for max checkid
- declare @tChecks table (CheckID int)
- insert into @tChecks
- select max(cc.checkid) checkid from checks cc inner join stages ss on cc.stageid = ss.stageid
- inner join revisions rr on cc.revisionid = rr.revisionid where ss.isapproved = 1 group by rr.itemid
---temp table for sibling itemid
- declare @tItems table (ItemID int)
- insert into @tItems
- select itemid from vefn_siblingitems((select itemid from docversions where versionid = @docversionid),0)
---temp table for multi valued roids
- declare @mvROIDS table (ROID varchar(max))
- insert into @mvROIDS
- select roid from (select distinct r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue
- from checks cc cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)) t1 group by roid having count(*) > 1
---temp table for multi valued transitionids
- declare @mvTransitions table (TransitionID int)
- insert into @mvTransitions
- select transitionid from (select distinct r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue
- from checks cc cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)) t1 group by transitionid having count(*) > 1
---temp table for multi valued docids
- declare @mvLibDocs table (DocID int)
- insert into @mvLibDocs
- select docid from (select distinct r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate
- from checks cc cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)) t1 group by docid having count(*) > 1
---temp table for roids
- declare @tROIDS table (ItemID int,ROID varchar(max),ROValue varchar(max),CheckID int)
- insert into @tROIDS
- select rr.itemid,r1.value('@ROID','varchar(max)') roid,r1.value('@ROValue','varchar(max)') rovalue, cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//ROCheck') t1(r1)
---temp table for transitions
- declare @tTransitions table (ItemID int,TransitionID int,TransitionValue varchar(max),CheckID int)
- insert into @tTransitions
- select rr.itemid,r1.value('@TransitionID','int') transitionid,r1.value('@TransitionValue','varchar(max)') transitionvalue,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//TransitionCheck') t1(r1)
---temp table for libdocs
- declare @tLibDocs table (ItemID int, DocID int, DocDate datetime,CheckID int)
- insert into @tLibDocs
- select rr.itemid,r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') docdate,cc.checkid
- from checks cc inner join revisions rr on cc.revisionid = rr.revisionid
- cross apply cc.consistencychecks.nodes('//LibDocCheck') t1(r1)
-
---get all inconsitencies accross set
- declare @ChkXML xml
- set @ChkXML =
- (
- select
- (--ro inconsistencies accross set
- select ROCheck.ItemID,ROCheck.ROID,ROCheck.ROValue from @tROIDS ROCheck
- inner join @tChecks tc on ROCheck.checkid = tc.checkid
- inner join @tItems ti on ROCheck.itemid = ti.itemid
- inner join @mvROIDS mv on ROCheck.roid = mv.roid
- order by ROCheck.itemid
- for xml auto,root('ROChecks'),type
- ),
- (--transition inconsistencies accross set
- select TransitionCheck.ItemID,TransitionCheck.TransitionID,TransitionCheck.TransitionValue from @tTransitions TransitionCheck
- inner join @tChecks tc on TransitionCheck.checkid = tc.checkid
- inner join @tItems ti on TransitionCheck.itemid = ti.itemid
- inner join @mvTransitions mv on TransitionCheck.TransitionID = mv.TransitionID
- order by TransitionCheck.itemid
- for xml auto,root('TransitionChecks'),type
- ),
- (--libdoc inconsistencies accross set
- select LibDocCheck.ItemID,LibDocCheck.DocID,LibDocCheck.DocDate from @tLibDocs LibDocCheck
- inner join @tChecks tc on LibDocCheck.checkid = tc.checkid
- inner join @tItems ti on LibDocCheck.itemid = ti.itemid
- inner join @mvLibDocs mv on LibDocCheck.docid = mv.docid
- order by LibDocCheck.itemid
- for xml auto,root('LibDocChecks'),type
- )
- for xml path(''),ROOT ('ConsistencyChecks'),type
- )
- return @ChkXML
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_CheckAllXML Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_CheckAllXML Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_CheckAllXMLByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CheckAllXMLByItemID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CheckAllXMLByItemID];
-GO
-
-/*
-declare @myxml xml
-set @myxml = (select dbo.vefn_checkallxml(1))
-select dbo.vefn_checkallxmlbyitemid(1,@myxml)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_CheckAllXMLByItemID](@ItemID int,@MyXml xml)
-returns xml
-begin
- declare @ChkXML xml
- declare @ROCheck table
- (
- ItemID int,
- ROID varchar(max),
- ROValue varchar(max)
- )
- insert into @ROCheck
- select r2.value('@ItemID','int'),r2.value('@ROID','varchar(max)'),r2.value('@ROValue','varchar(max)')
- from @MyXml.nodes('//ROCheck') t2(r2)
---jcb
- declare @TransitionCheck table
- (
- ItemID int,
- TransitionID int,
- TransitionValue varchar(max)
- )
- insert into @TransitionCheck
- select r2.value('@ItemID','int'),r2.value('@TransitionID','int'),r2.value('@TransitionValue','varchar(max)')
- from @MyXml.nodes('//TransitionCheck') t2(r2)
---end jcb
- declare @LibDocCheck table
- (
- ItemID int,
- DocID int,
- DocDate datetime
- )
- insert into @LibDocCheck
- select r2.value('@ItemID','int'),r2.value('@DocID','int'),r2.value('@DocDate','datetime')
- from @MyXml.nodes('//LibDocCheck') t2(r2)
- set @ChkXML =
- (
- select
- (select * from @ROCheck ROCheck where itemid = @ItemID for xml auto, root('ROChecks'),type),
- (select * from @TransitionCheck TransitionCheck where itemid = @ItemID for xml auto, root('TransitionChecks'),type),
- (select * from @LibDocCheck LibDocCheck where itemid = @ItemID for xml auto, root('LibDocChecks'),type)
- for xml path(''),ROOT ('ConsistencyChecks'),type
- )
- return @ChkXML
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_CheckAllXMLByItemID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_CheckAllXMLByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_CheckXML] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_CheckXML]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_CheckXML];
-GO
-
-/*
-declare @NewXML xml
-select @NewXML = consistencychecks from checks where checkid = 48
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),'2011-08-24T11:20:57.027','2011-12-25T00:00:00.000') as xml)
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),'88%','88.12345%') as xml)
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),'="6%','="6.12345%') as xml)
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),'23%','23.12345%') as xml)
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),'90%','90.12345%') as xml)
-set @NewXML = cast(replace(cast(@NewXML as varchar(max)),', Step 13',', Step 14') as xml)r
-declare @OldXML xml
-select @OldXML = consistencychecks from checks where checkid = 1
---select .dbo.vefn_CheckXML(@NewXML, @OldXML)
-select ii.*,ss.*,.dbo.vefn_CheckXML(@NewXML, consistencychecks) chkxml from checks cc
-inner join revisions rr on cc.revisionid = rr.revisionid
-inner join items ii on rr.itemid = ii.itemid
-inner join stages ss on cc.stageid = ss.stageid
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_CheckXML](@NewXML xml, @OldXML xml)
-returns xml
-begin
-declare @ChkXML xml
-set @ChkXML =
-(
-select
-(
-select * from
-(
- select ah.ROID,OldROValue,ROValue from
- (
- select r1.value('@ROID','varchar(20)') roid,r1.value('@ROValue','varchar(max)') oldrovalue
- from @OldXML.nodes('//ROCheck') as t1(r1)
- ) ah
- inner join
- (
- select distinct r2.value('@ROID','varchar(20)') roid,r2.value('@ROValue','varchar(max)') rovalue
- from @NewXML.nodes('//ROCheck') as t2(r2)
- ) ds
- on ah.roid = ds.roid
- and oldrovalue != rovalue
-) ROCheck
-for xml auto,root('ROChecks'),type
-)
- ,
- (
-select * from
-(
- select ah.TransitionID,OldTransitionValue,TransitionValue from
- (
- select r1.value('@TransitionID','int') TransitionID,r1.value('@TransitionValue','varchar(max)') OldTransitionValue
- from @OldXML.nodes('//TransitionCheck') as t1(r1)
- ) ah
- inner join
- (
- select distinct r2.value('@TransitionID','int') TransitionID,r2.value('@TransitionValue','varchar(max)') TransitionValue
- from @NewXML.nodes('//TransitionCheck') as t2(r2)
- ) ds
- on ah.TransitionID = ds.TransitionID
- and OldTransitionValue != TransitionValue
-) TransitionCheck
- for xml auto,root('TransitionChecks'),type
-)
- ,
- (
-select * from
-(
- select ah.DocID,OldDocDate,DocDate from
- (
- select r1.value('@DocID','int') docid,r1.value('@DocDate','datetime') olddocdate
- from @OldXML.nodes('//LibDocCheck') as t1(r1)
- ) ah
- inner join
- (
- select distinct r2.value('@DocID','int') docid,r2.value('@DocDate','datetime') docdate
- from @NewXML.nodes('//LibDocCheck') as t2(r2)
- ) ds
- on ah.docid = ds.docid
- and olddocdate != docdate
-) LibDocCheck
- for xml auto,root('LibDocChecks'),type
-)
-for xml path(''),ROOT ('ConsistencyChecks'),type
-)
-return @ChkXML
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_CheckXML Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_CheckXML Error on Creation'
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChronologyReport]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChronologyReport];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from vefn_chronologyreport(2) where type > 0 order by contentid,auditid
-*/
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 05/18/2011 11:20:48 ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_ChronologyReport](@ProcItemID int, @DTS datetime)
-returns @Report table
-(
-src int,
-AuditID bigint,
-ContentID int,
-Number nvarchar(512),
-Text nvarchar(max),
-Type int,
-FormatID int,
-Config nvarchar(max),
-DTS datetime,
-UserID nvarchar(200),
-DeleteStatus int,
-ActionDTS datetime,
-ItemDTS datetime,
-LastAuditID int,
-DeletedAuditID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
---added rhm/jcb 20121218i
-declare @tmpTable table
-(
- icontentid int primary key
-)
-insert into @tmpTable select icontentid from vefn_tblchilditems(@ProcItemID,@ProcItemID,1)
---added jcb 20111122
---declare @dts datetime
---set @dts = (select dts from items where itemid = @ProcItemID )
---set @dts = (SELECT .[dbo].[vefn_GetPreviousRevisionDTSByItemID] (@ProcItemID))
---end added jcb 20111122
- insert into @Report
- SELECT
-1 src,
- [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- where Number is not null
---added jcb 20111028_1827
-and ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > @dts)
---and ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.dts > @dts
---end added jcb 20111122
--- UNION
--- SELECT
---2 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
----- (select max(auditid) + 1 from contentaudits) [AuditID]
----- 0 [AuditID]
--- ,ca.[ContentID]
--- ,[Number]
--- ,[Text]
--- ,[Type]
--- ,[FormatID]
--- ,[Config]
--- ,ca.[DTS] cadts
--- ,ca.[UserID]
--- ,ca.[DeleteStatus]
--- ,ActionDTS
--- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
--- FROM tblContents ca
----- inner join tblitems ti on ca.contentid = ti.contentid
---WHERE ca.DeleteStatus = 0 AND
-----added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) and
-----end added jcb 20111028_1827
-----ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-----added jcb 20111122
-----ca.ContentID in (SELECT [ContentID] FROM Contents where dts > (select dts from items where itemid = @ProcItemID ))
---ca.ContentID in (SELECT [ContentID] FROM Contents where dts > @dts)
-----end added jcb 20111122
-----order by ca.DTS,ActionDTS
- UNION
- SELECT
-3 src,
- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
--- 0 [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM tblContents ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus = 0 AND
---added jcb 20111028_1827
-ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
- UNION
- SELECT distinct
-5 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
- ca.[AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus > 0
---added jcb 20111028_1827
- --ca.contentid != (select contentid from items where itemid = @procitemid) and
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.contentid in (select icontentid from @tmpTable)
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
-order by ca.DTS,ActionDTS
-
- insert into @Report
- SELECT
-4 src,
- ca.[AuditID]
- ,ca.[ContentID]
- ,ca.[Number]
- ,ca.[Text]
- ,ca.[Type]
- ,ca.[FormatID]
- ,ca.[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ca.ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- inner join @Report rpt on ca.contentid = rpt.contentid and ca.auditid = rpt.lastauditid
-where ca.auditid not in (select auditid from @report)
-and rpt.lastauditid is not null
-and ca.contentid in (select icontentid from @tmpTable)
- return
-end
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ChronologyReport Succeeded'
-ELSE PRINT 'Function: vefn_ChronologyReport Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_FindExternalFromTransitions] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindExternalFromTransitions]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindExternalFromTransitions];
-GO
-
-/*
-Select * from vefn_FindExternalFromTransitions(185)
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_FindExternalFromTransitions](@ItemID int)
-RETURNS @Children TABLE
-(
- [FromItemID] int,
- [TransitionID] [int] NOT NULL,
- [FromID] [int] NOT NULL,
- [ToID] [int] NOT NULL,
- [RangeID] [int] NOT NULL,
- [Config] [nvarchar](max) NULL
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-with Itemz([Level], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged],[pContentID], [pDTS],[pUserID],[pLastChanged]) as (
- Select 0 [Level], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- ,0 [pContentID],[DTS] [pDTS], [UserID] [pUserID], [LastChanged] [pLastChanged]
- FROM [Items]
- where [ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID],P.[LastChanged] [pLastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
--- Siblings
-Union All
- select [Level] ,Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- ,null,null,null,null
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
-)
-insert into @Children
-select ItemID [FromItemID], TT.[TransitionID], TT.[FromID], TT.[ToID], TT.[RangeID], TT.[Config]
- from Transitions TT
- join Items II on II.ContentID=TT.FromID
-where (ToID not in(select ItemID from Itemz) OR RangeID not in(select ItemID from Itemz))
-AND FromID in(Select ContentID from ItemZ)
-OPTION (MAXRECURSION 10000)
-RETURN
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindExternalFromTransitions Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetFormatIDByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetFormatIDByItemID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetFormatIDByItemID];
-GO
-
-/*
-select dbo.vefn_GetFormatIDByItemID(41)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_GetFormatIDByItemID]
-(@ItemID int)
-returns int
-as begin
- declare @FormatID int;
- with itemz
- (
- itemid,previousid,formatid,folderid,parentid
- ) as
- (
- select itemid,previousid,formatid,null,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- where itemid = @ItemID
- --siblins
- union all
- select ii.itemid,ii.previousid,cc.formatid,null,null
- from items ii
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.previousid = ii.itemid
- where zz.formatid is null
- --chillins
- union all
- select ii.itemid,ii.previousid,cc.formatid,null,null
- from parts pp
- join items ii on ii.contentid = pp.contentid
- join contents cc on ii.contentid = cc.contentid
- join itemz zz on zz.itemid = pp.itemid
- where zz.formatid is null
- --docversions
- union all
- select 0,0,dv.formatid,0,dv.folderid
- from docversions dv
- join itemz zz on dv.itemid = zz.itemid
- where zz.formatid is null
- --folders
- union all
- select 0,0,ff.formatid,ff.folderid,ff.parentid
- from folders ff
- join itemz zz on ff.folderid = zz.parentid
- where zz.folderid != zz.parentid
- and zz.formatid is null
- )
- select @FormatID = formatid from itemz zz
- where formatid is not null
- OPTION (MAXRECURSION 10000)
- return @FormatID
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetFormatIDByItemID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetFormatIDByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetPreviousRevisionDTSByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetPreviousRevisionDTSByItemID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetPreviousRevisionDTSByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_GetPreviousRevisionDTSByItemID](@ItemID int)
-returns datetime
-WITH EXECUTE AS OWNER
-AS
-begin
- declare @dts datetime
- SELECT
- @dts = [RevisionDate]
- FROM [Revisions]
- inner join
- (
- select top 1 revisionid,mxvid from
- (
- select top 2 revisionid,mxvid from
- (
- select rr.revisionid,max(vv.versionid) mxvid
- from items ii
- inner join revisions rr on ii.itemid = rr.itemid
- inner join versions vv on rr.revisionid = vv.revisionid
- inner join stages ss on vv.stageid = ss.stageid
- where ss.isapproved = 1
- and ii.itemid = @ItemID
- group by rr.revisionid
- union
- select null,null
- ) ds
- order by mxvid desc
- ) ah
- order by revisionid
- ) rr on [Revisions].revisionid = rr.revisionid
- -- WHERE [ItemID] = @ItemID
- -- ORDER BY [RevisionID] DESC
- return @dts
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetPreviousRevisionDTSByItemID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetPreviousRevisionDTSByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vefn_GetStepTypeNameByItemIDandTypeID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetStepTypeNameByItemIDandTypeID]') AND OBJECTPROPERTY(id,N'IsScalarFunction') = 1)
- DROP FUNCTION [vefn_GetStepTypeNameByItemIDandTypeID];
-GO
-
-/*
-select dbo.vefn_GetStepTypeNameByItemIDandTypeID(9830,20005)
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_GetStepTypeNameByItemIDandTypeID](@ItemID int, @TypeID int)
-returns varchar(max)
-as begin
- declare @typename varchar(max)
- select @typename = r1.value('@Type','varchar(max)')
- from items ii
- inner join formats ff on 1=1
- cross apply ff.data.nodes('//Step') t1(r1)
- where ii.itemid = @ItemID
- and ff.formatid = (select dbo.vefn_GetFormatIDByItemID(@ItemID))
- and r1.value('@Index','int') = @TypeID - 20000
- return @typename
-end
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'ScalarFunction Creation: vefn_GetStepTypeNameByItemIDandTypeID Succeeded'
-ELSE PRINT 'ScalarFunction Creation: vefn_GetStepTypeNameByItemIDandTypeID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetAllConsistencyIssues] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetAllConsistencyIssues]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetAllConsistencyIssues];
-GO
-
-/*
-[dbo].[vesp_GetAllConsistencyIssues] 1
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetAllConsistencyIssues]
-(
- @DocVersionID int
-)
-AS BEGIN
- declare @myxml xml
- set @myxml = (select dbo.vefn_checkallxml(@DocVersionID))
- DECLARE @Items TABLE
- (
- ItemID int PRIMARY KEY
- )
- INSERT INTO @Items
- select r1.value('@ItemID','int') itemid
- from @myxml.nodes('//ROCheck') t1(r1)
- union
- select r1.value('@ItemID','int') itemid
- from @myxml.nodes('//TransitionCheck') t1(r1)
- union
- select r1.value('@ItemID','int') itemid
- from @myxml.nodes('//LibDocCheck') t1(r1)
- SELECT
- ii.[ItemID]
- ,ii.[PreviousID]
- ,ii.[ContentID]
- ,ii.[DTS]
- ,ii.[UserID]
- ,ii.[LastChanged]
- ,CC.[Number]
- ,CC.[Text]
- ,CC.[Type]
- ,CC.[FormatID]
- ,CC.[Config]
- ,CC.[DTS] [cDTS]
- ,CC.[UserID] [cUserID]
- ,CC.[LastChanged] [cLastChanged]
- ,(SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount]
- ,(SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount]
- ,(SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount]
- ,(SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount]
- ,(SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=CC.[ContentID]) [DetailCount]
- ,(SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=CC.[ContentID]) [EntryCount]
- ,(SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=CC.[ContentID]) [GridCount]
- ,(SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=CC.[ContentID]) [ImageCount]
- ,(SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=CC.[ContentID]) [ItemCount]
- ,(SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=CC.[ContentID]) [cPartCount]
- ,(SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=CC.[ContentID]) [RoUsageCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=CC.[ContentID]) [TransitionCount]
- ,(SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=CC.[ContentID]) [ZContentCount]
- ,(select dbo.vefn_CheckAllXMLByItemID(ii.itemid,@myxml)) ChkXml
- FROM [Items] ii
- INNER JOIN [Contents] cc ON ii.[ContentID] = cc.[ContentID]
- where ii.ItemID in (select ItemID from @Items)
--- order by ii.itemid
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetAllConsistencyIssues Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetAllConsistencyIssues Error on Creation'
-GO
-
-/****** Object: StoredProcedure [vesp_GetConsistencyCheckProcedures] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vesp_GetConsistencyCheckProcedures]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [vesp_GetConsistencyCheckProcedures];
-GO
-
-/*
-declare @myxml xml
-select @myxml = consistencychecks from checks where checkid = 2
-declare @docversionid int
-set @docversionid = 1
-exec vesp_GetConsistencyCheckProcedures @docversionid, @myxml
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[vesp_GetConsistencyCheckProcedures]
-(
- @DocVersionID int,
- @MyXml xml
-)
-AS BEGIN
---to be removed
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),'2011-08-24T11:20:57.027','2011-12-25T00:00:00.000') as xml)
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),'88%','88.12345%') as xml)
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),'="6%','="6.12345%') as xml)
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),'23%','23.12345%') as xml)
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),'90%','90.12345%') as xml)
--- set @myxml = cast(replace(cast(@myxml as varchar(max)),', Step 13',', Step 14') as xml)
---end to be removed
- DECLARE @Items TABLE
- (
- ID int identity(1,1),
- ItemID int
- )
- INSERT INTO @Items (itemid)
- select roc.value('@ItemID','int') itemid
- from @myxml.nodes('//ConsistencyChecks') t1(roc)
- declare @LatestApproved TABLE
- (
- ItemID int PRIMARY KEY,
- CheckID int
- )
- insert into @LatestApproved
- select rr.itemid,max(checkid) checkid
- from revisions rr
- inner join checks cc on rr.revisionid = cc.revisionid
- inner join stages ss on cc.stageid = ss.stageid
- where ss.isapproved = 1
- and rr.itemid in
- (select itemid from vefn_siblingitems((select itemid from docversions where versionid = @docversionid),0))
- group by rr.itemid
-
- SELECT
- ii.[ItemID]
- ,ii.[PreviousID]
- ,ii.[ContentID]
- ,ii.[DTS]
- ,ii.[UserID]
- ,ii.[LastChanged]
- ,CC.[Number]
- ,CC.[Text]
- ,CC.[Type]
- ,CC.[FormatID]
- ,CC.[Config]
- ,CC.[DTS] [cDTS]
- ,CC.[UserID] [cUserID]
- ,CC.[LastChanged] [cLastChanged]
- ,(SELECT COUNT(*) FROM [Annotations] WHERE [Annotations].[ItemID]=ii.[ItemID]) [AnnotationCount]
- ,(SELECT COUNT(*) FROM [DocVersions] WHERE [DocVersions].[ItemID]=ii.[ItemID]) [DocVersionCount]
- ,(SELECT COUNT(*) FROM [Items] [Next] WHERE [Next].[PreviousID]=ii.[ItemID]) [NextCount]
- ,(SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ItemID]=ii.[ItemID]) [PartCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[RangeID]=ii.[ItemID]) [Transition_RangeIDCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[ToID]=ii.[ItemID]) [Transition_ToIDCount]
- ,(SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=CC.[ContentID]) [DetailCount]
- ,(SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=CC.[ContentID]) [EntryCount]
- ,(SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=CC.[ContentID]) [GridCount]
- ,(SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=CC.[ContentID]) [ImageCount]
- ,(SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=CC.[ContentID]) [ItemCount]
- ,(SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=CC.[ContentID]) [cPartCount]
- ,(SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=CC.[ContentID]) [RoUsageCount]
- ,(SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=CC.[ContentID]) [TransitionCount]
- ,(SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=CC.[ContentID]) [ZContentCount]
- ,ribeye.ChkXml
- FROM [Items] ii
- INNER JOIN [Contents] cc ON ii.[ContentID] = cc.[ContentID]
- inner join
- (
- select la.itemid,.dbo.vefn_checkxml(@myxml,cc.consistencychecks) chkxml
- from checks cc
- inner join @LatestApproved la on cc.checkid = la.checkid
- ) ribeye on ii.itemid = ribeye.itemid
-left join @items iii on ii.itemid = iii.itemid
- where chkxml.exist('//ROChecks') | chkxml.exist('//TransitionChecks') | chkxml.exist('//LibDocChecks') > 0 or
- ii.ItemID in (select ItemID from @Items)
- order by isnull(iii.id,999999)
-END
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: vesp_GetConsistencyCheckProcedures Succeeded'
-ELSE PRINT 'Procedure Creation: vesp_GetConsistencyCheckProcedures Error on Creation'
-GO
-
-/****** Object: StoredProcedure [purgeData] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[purgeData]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [purgeData];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[purgeData]
-
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
- delete from [AnnotationAudits]
- dbcc checkident([AnnotationAudits],reseed,0)
- delete from [Applicabilities]
- dbcc checkident([Applicabilities],reseed,0)
- delete from [ApplicableStructures]
- delete from [Assignments]
- dbcc checkident([Assignments],reseed,0)
- delete from [Associations]
- dbcc checkident([Associations],reseed,0)
- delete from [Checks]
- dbcc checkident([Checks],reseed,0)
- delete from [ContentAudits]
- dbcc checkident([ContentAudits],reseed,0)
- delete from [DeleteLog]
- dbcc checkident([DeleteLog],reseed,0)
- delete from [Details]
- dbcc checkident([Details],reseed,0)
- delete from [DocumentAudits]
- dbcc checkident([DocumentAudits],reseed,0)
- delete from [DocVersions]
- dbcc checkident([DocVersions],reseed,0)
- delete from [DROUsages]
- dbcc checkident([DROUsages],reseed,0)
- delete from [EntryAudits]
- dbcc checkident([EntryAudits],reseed,0)
- delete from [Figures]
- dbcc checkident([Figures],reseed,0)
- delete from [Folders]
- dbcc checkident([Folders],reseed,0)
- delete from [GridAudits]
- dbcc checkident([GridAudits],reseed,0)
- delete from [ImageAudits]
- dbcc checkident([ImageAudits],reseed,0)
- delete from [ItemAudits]
- dbcc checkident([ItemAudits],reseed,0)
- delete from [Memberships]
- dbcc checkident([Memberships],reseed,0)
- delete from [PartAudits]
- dbcc checkident([PartAudits],reseed,0)
- delete from [Pdfs]
- delete from [Permissions]
- dbcc checkident([Permissions],reseed,0)
- delete from [ROFsts]
- dbcc checkident([ROFsts],reseed,0)
- delete from [ROImages]
- dbcc checkident([ROImages],reseed,0)
- delete from [Roles]
- dbcc checkident([Roles],reseed,0)
- delete from [ROUsageAudits]
- dbcc checkident([ROUsageAudits],reseed,0)
- delete from [tblAnnotations]
- dbcc checkident([tblAnnotations],reseed,0)
- delete from [tblEntries]
- delete from [tblGrids]
- delete from [tblImages]
- delete from [tblParts]
- delete from [tblROUsages]
- dbcc checkident([tblROUsages],reseed,0)
- delete from [TransitionAudits]
- dbcc checkident([TransitionAudits],reseed,0)
- delete from [Users]
- dbcc checkident([Users],reseed,0)
- delete from [Versions]
- dbcc checkident([Versions],reseed,0)
- delete from [ZContents]
- delete from [ZTransitions]
- delete from [AnnotationTypes]
- dbcc checkident([AnnotationTypes],reseed,0)
- delete from [Connections]
- dbcc checkident([Connections],reseed,0)
- delete from [Groups]
- dbcc checkident([Groups],reseed,0)
- delete from [Revisions]
- dbcc checkident([Revisions],reseed,0)
- delete from [RODbs]
- dbcc checkident([RODbs],reseed,0)
- delete from [Stages]
- dbcc checkident([Stages],reseed,0)
- delete from [tblDocuments]
- dbcc checkident([tblDocuments],reseed,0)
- delete from [tblTransitions]
- dbcc checkident([tblTransitions],reseed,0)
- delete from [tblItems]
- dbcc checkident([tblItems],reseed,0)
- delete from [tblContents]
- dbcc checkident([tblContents],reseed,0)
- delete from [Formats]
- dbcc checkident([Formats],reseed,0)
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: purgeData Succeeded'
-ELSE PRINT 'Procedure Creation: purgeData Error on Creation'
-GO
diff --git a/PROMS/DataLoader/PROMStoCM.sql b/PROMS/DataLoader/PROMStoCM.sql
deleted file mode 100644
index b0713187..00000000
--- a/PROMS/DataLoader/PROMStoCM.sql
+++ /dev/null
@@ -1,3236 +0,0 @@
-/****** Object: StoredProcedure [dbo].[jcbAuditConfig] Script Date: 03/29/2011 17:32:35 ******/
-IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[jcbAuditConfig]') AND type in (N'P', N'PC'))
-DROP PROCEDURE [dbo].[jcbAuditConfig]
-GO
-
-/****** Object: StoredProcedure [dbo].[jcbAuditConfig] Script Date: 03/29/2011 17:33:30 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[jcbAuditConfig]
-@tablename varchar(max)
-as begin
---print 'table name: ' + @tablename
- declare @cmd varchar(max)
- set @cmd = ''
-
- --new table name variable
- declare @newtablename varchar(max)
- set @newtablename = 'tbl' + @tablename
---print 'new table name: ' + @newtablename
-
- --rename table
- set @cmd = 'sp_rename ' + '''' + @tablename + '''' + ',' + '''' + @newtablename + ''''
---print 'rename table: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --add column DeleteStatus
- set @cmd = 'alter table ' + @newtablename + ' add DeleteStatus int not null constraint DF_' + @newtablename + '_DeleteStatus default ((0))'
---print 'add column deletestatus: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --create index on deletestatus
- set @cmd = 'CREATE NONCLUSTERED INDEX IX_' + @newtablename + 'DeleteStatus ON ' + @newtablename + '
- (
- [DeleteStatus] ASC
- )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
- '
- exec (@cmd)
- set @cmd = ''
-
- --primary key variable
- declare @primarykey varchar(max)
- select @primarykey = coalesce(@primarykey + ' and ','') +
- 'dd.' + c.name + ' = ' + 'ii.' + c.name
- from sysindexes i
- inner join sysobjects o ON i.id = o.id
- inner join sysobjects pk ON i.name = pk.name and pk.parent_obj = i.id and pk.xtype = 'PK'
- inner join sysindexkeys ik on i.id = ik.id and i.indid = ik.indid
- inner join syscolumns c ON ik.id = c.id and ik.colid = c.colid
- where o.name = @newtablename
- order by ik.keyno
---print 'primary key: ' + @primarykey
-
- --shadow table name variable
- declare @shadowtablename varchar(max)
- if substring(@tablename,len(@tablename)-2,3) = 'ies'
- set @shadowtablename = replace(@tablename,'ies','y') + 'Audits'
- else
- set @shadowtablename = substring(@tablename,1,len(@tablename)-1) + 'Audits'
---print 'shadow table name: ' + @shadowtablename
-
- --create base shadow table
- set @cmd = 'create table ' + @shadowtablename + '(AuditID bigint identity (1,1) not null CONSTRAINT [PK_' + @shadowtablename + '] PRIMARY KEY CLUSTERED ([AuditID] ASC))'
---print 'create shadow table: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --temp variables for cursor
- declare @columnname varchar(max)
- declare @columntype varchar(max)
- declare @columnlength smallint
- declare @columnnullable int
- declare @columncollation sysname
- declare @columnprecision tinyint
- declare @columnscale tinyint
-
- --separator variable
- declare @sep varchar(max)
- set @sep = ''
-
- --table columns variable
- declare @tablecolumns varchar(max)
- set @tablecolumns = ''
-
- --ii table columns variable
- declare @iitablecolumns varchar(max)
- set @iitablecolumns = ''
-
- --dd table columns variable
- declare @ddtablecolumns varchar(max)
- set @ddtablecolumns = ''
-
- --view columns variable
- declare @viewcolumns varchar(max)
- set @viewcolumns = ''
-
- --trigger columns variable
- declare @trigcolumns varchar(max)
- set @trigcolumns = ''
-
- --cursor for getting columns
- declare tc cursor read_only for
- select c.name,t.name typename,c.length,c.isnullable,c.collation,c.xprec,c.xscale
- from sysobjects o
- inner join syscolumns c on o.id = c.id
- inner join systypes t on c.xtype = t.xtype
- where 1=1
- and o.name = @newtablename
- and t.name != 'sysname'
- order by c.colorder
-
- --alter shadow table command
- set @cmd = 'alter table ' + @shadowtablename + ' add '
---print 'alter shadow table start: ' + @cmd
-
- open tc
- fetch next from tc
- into @columnname,@columntype,@columnlength,@columnnullable,@columncollation,@columnprecision,@columnscale
- while @@fetch_status = 0
- begin
- if @columntype not in ('text','ntext','image')
- begin
- if @columntype not in ('timestamp')
- begin
- set @cmd = @cmd + @sep + @columnname + ' ' + @columntype
- if @columntype in ('binary','char','nchar','nvarchar','varbinary','varchar')
- begin
- if @columnlength = -1
- set @cmd = @cmd + '(max)'
- else
- set @cmd = @cmd + '(' + cast(@columnlength as varchar(10)) + ')'
- end
- if @columntype in ('decimal','numeric')
- set @cmd = @cmd + '(' + cast(@columnprecision as varchar(10)) + ',' + cast(@columnscale as varchar(10)) + ')'
- if @columntype in ('char','nchar','nvarchar','varchar')
- set @cmd = @cmd + ' collate ' + @columncollation + ' '
- if @columnnullable = 0
- set @cmd = @cmd + ' not'
- set @cmd = @cmd + ' null'
- set @tablecolumns = @tablecolumns + @sep + @columnname
- set @iitablecolumns = @iitablecolumns + @sep + 'ii.' + @columnname
- set @ddtablecolumns = @ddtablecolumns + @sep + 'dd.' + @columnname
- end
- if @columnname <> 'DeleteStatus'
- begin
- set @viewcolumns = @viewcolumns + @sep + @columnname
- if @columntype not in ('timestamp')
- begin
- set @trigcolumns = @trigcolumns + @sep + @columnname
- end
- end
- set @sep = ','
- end
- fetch next from tc
- into @columnname,@columntype,@columnlength,@columnnullable,@columncollation,@columnprecision,@columnscale
- end
- close tc
- deallocate tc
-
- --modify shadow table
---print 'modify shadow table: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --add extended property for shadow table dts
- set @cmd = 'sys.sp_addextendedproperty @name=N''MS_Description'', @value=N''{datetime}'' , @level0type=N''SCHEMA'',@level0name=N''dbo'', @level1type=N''TABLE'',@level1name=N''' + @shadowtablename + ''', @level2type=N''COLUMN'',@level2name=N''DTS'''
- exec (@cmd)
- set @cmd = ''
-
- --add original indexes to shadowtable
- --variables for cursor
- declare @indexcolumnname varchar(max)
- declare ic cursor for
- select
- c.name columnname
- from sysindexes i
- inner join sysobjects o ON i.id = o.id
- inner join sysindexkeys ik on i.id = ik.id and i.indid = ik.indid
- inner join syscolumns c ON ik.id = c.id and ik.colid = c.colid
- where o.name = @newtablename
-
- open ic
- fetch next from ic into @indexcolumnname
- while @@fetch_status = 0
- begin
- set @cmd = 'CREATE NONCLUSTERED INDEX IX_' + @shadowtablename + @indexcolumnname + ' on ' + @shadowtablename + '
- (' + @indexcolumnname + ')
- WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]'
- exec (@cmd)
- set @cmd = ''
- fetch next from ic into @indexcolumnname
- end
- close ic
- deallocate ic
-
- --create view
- set @cmd = 'create view ' + @tablename + ' as select ' + @viewcolumns + ' from ' + @newtablename + ' where DeleteStatus = 0'
---print 'create view: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --create update trigger on table
- set @cmd = 'create trigger tr_' + @newtablename + '_Update on ' + @newtablename +
- ' for update as
- begin
- if exists (select * from inserted)
- begin
- insert into ' + @shadowtablename + '(' + @tablecolumns + ')
- select ' + @ddtablecolumns + ' from deleted dd
- inner join inserted ii on ' + @primarykey + '
- end
- end'
---print 'table trigger update: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-
- --create delete trigger on view
- set @cmd = 'create trigger tr_' + @tablename + '_Delete on ' + @tablename +
- ' instead of delete as
- begin
- update ii set DeleteStatus = (select max(DeleteID) from DeleteLog where SPID = @@spid), DTS = getdate(),
- UserID = (select top 1 UserID from DeleteLog where SPID = @@spid order by deleteid desc)
- from ' + @newtablename + ' ii inner join deleted dd on ' + @primarykey + '
- insert into ' + @shadowtablename + '(' + @tablecolumns + ')
- select ' + @iitablecolumns + '
- from ' + @newtablename + ' ii inner join deleted dd on ' + @primarykey + '
- where ii.DeleteStatus > 0
- end'
---print 'view trigger delete: ' + @cmd
- exec (@cmd)
- set @cmd = ''
-end
-GO
-jcbAuditConfig 'Annotations'
-go
-jcbAuditConfig 'Contents'
-go
-jcbAuditConfig 'Documents'
-go
-jcbAuditConfig 'Entries'
-go
-jcbAuditConfig 'Grids'
-go
-jcbAuditConfig 'Images'
-go
-jcbAuditConfig 'Items'
-go
-jcbAuditConfig 'Parts'
-go
---new stuff
-jcbAuditConfig 'ROUsages'
-go
-jcbAuditConfig 'Transitions'
-go
-
-/****** Object: Alter Table: contentaudits ******/
---alter table contentaudits add ActionDTS datetime, ActionType varchar(100)
-alter table contentaudits add ActionDTS datetime
-go
--- Display the status of alter table
-IF (@@Error = 0) PRINT 'Alter Table: contentaudits Succeeded'
-ELSE PRINT 'Alter Table: contentaudits Error on Creation'
-GO
-
-/****** Object: Alter Table: tblcontents ******/
---alter table tblcontents add ActionDTS datetime, ActionType varchar(100)
-alter table tblcontents add ActionDTS datetime
-go
--- Display the status of alter table
-IF (@@Error = 0) PRINT 'Alter Table: tblcontents Succeeded'
-ELSE PRINT 'Alter Table: tblcontents Error on Creation'
-GO
-
-/****** Object: Alter Table: annotationaudits ******/
---alter table annotationaudits add ActionDTS datetime, ActionType varchar(100)
-alter table annotationaudits add ActionDTS datetime
-go
--- Display the status of alter table
-IF (@@Error = 0) PRINT 'Alter Table: annotationaudits Succeeded'
-ELSE PRINT 'Alter Table: annotationaudits Error on Creation'
-GO
-
-/****** Object: Alter Table: tblAnnotations ******/
---alter table tblAnnotations add ActionDTS datetime, ActionType varchar(100)
-alter table tblAnnotations add ActionDTS datetime
-go
--- Display the status of alter table
-IF (@@Error = 0) PRINT 'Alter Table: tblAnnotations Succeeded'
-ELSE PRINT 'Alter Table: tblAnnotations Error on Creation'
-GO
-
-/****** Object: Alter Table: gridaudits ******/
-alter table gridaudits add ContentAuditID bigint NOT NULL CONSTRAINT [DF_GridAudits_ContentAuditID] DEFAULT ((0))
-go
--- Display the status of alter table
-IF (@@Error = 0) PRINT 'Alter Table: gridaudits Succeeded'
-ELSE PRINT 'Alter Table: gridaudits Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetPartType] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select ItemID, dbo.[ve_GetPartType](ItemID)
-from Items II
-where ItemID in(10181,10182,10183)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[ve_GetPartType] (@ItemID int) RETURNS varchar(max)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @PartType varchar(max);
-with Itemz(ItemID,PreviousID,PartType) as (
- Select ItemID,PreviousID,cast(null as varchar(max))
- from Items I
- where ItemID=@ItemID
- Union All
--- siblings
- Select Z.PreviousID,II.PreviousID,cast(null as varchar(max))
- from Items II
- Join Itemz Z on II.ItemID = Z.PreviousID
- where Z.PreviousID != 0
- and Z.PartType is null
- Union All
--- children
- select Z.ItemID,Z.PreviousID,
- cast(case P.FromType
- when 1 then 'Procedure'
- when 2 then 'Section'
- when 3 then 'Caution'
- when 4 then 'Note'
- when 5 then 'RNO'
- when 6 then 'Step'
- when 7 then 'Table'
- else 'Unknown'
- end as varchar(max)) PartType
- from Parts P
- join Itemz Z on P.ItemID=Z.ItemID
- where Z.PartType is null
-)
-select @PartType = PartType From Itemz where PartType is not null
-OPTION (MAXRECURSION 10000)
-return @PartType
-END;
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: ve_GetPartType Succeeded'
-ELSE PRINT 'Function: ve_GetPartType Error on Creation'
-go
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetPartContentID] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select ItemID, dbo.[ve_GetPartContentID](ItemID)
-from ItemAudits II
-where ii.ItemID in(10181,10182,10183)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[ve_GetPartContentID] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @ContentID int;
-with Itemz(ItemID,PreviousID,ContentID,path) as (
- Select ItemID,PreviousID,cast(null as int),'.' + cast(itemid as varchar(max)) + '.'
- from ItemAudits I
- where ItemID=@ItemID
-and i.deletestatus > 0
- Union All
--- siblings
- Select Z.PreviousID,II.PreviousID,cast(null as int),z.path + '.' + cast(z.previousid as varchar(max)) + '.'
- from Items II
- Join Itemz Z on II.ItemID = Z.PreviousID
- where Z.PreviousID != 0
- and Z.ContentID is null
- Union All
--- siblings
- Select Z.PreviousID,II.PreviousID,cast(null as int),z.path + '.' + cast(z.previousid as varchar(max)) + '.'
- from ItemAudits II
- Join Itemz Z on II.ItemID = Z.PreviousID
- where Z.PreviousID != 0
- and Z.ContentID is null
-and ii.deletestatus > 0
-and z.path not like '%.' + cast(z.previousid as varchar(max)) + '.%'
- Union All
--- children
- select Z.ItemID,Z.PreviousID,
-P.Contentid,z.path + '.' + cast(Z.ItemID as varchar(max)) + '.'
- from Parts P
- join Itemz Z on P.ItemID=Z.ItemID
- where Z.ContentID is null
- Union All
--- children
- select Z.ItemID,Z.PreviousID,
-P.Contentid,z.path + '.' + cast(Z.ItemID as varchar(max)) + '.'
- from PartAudits P
- join Itemz Z on P.ItemID=Z.ItemID
- where Z.ContentID is null
-)
-select @ContentID = min(ContentID) From Itemz where ContentID is not null
-OPTION (MAXRECURSION 10000)
-return @ContentID
-END;
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: ve_GetPartContentID Succeeded'
-ELSE PRINT 'Function: ve_GetPartContentID Error on Creation'
-go
-
-/****** Object: UserDefinedFunction [dbo].[ve_GetPartFromType] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select ItemID, dbo.[ve_GetPartFromType](ItemID)
-from ItemAudits II
-where ii.ItemID in(10181,10182,10183)
-*/
--- drop function ve_GetPath
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[ve_GetPartFromType] (@ItemID int) RETURNS int
-WITH EXECUTE AS OWNER
-AS
-BEGIN
--- declare @STructID int
---set @StructID=11
-declare @FromType int;
-with Itemz(ItemID,PreviousID,FromType,path) as (
- Select ItemID,PreviousID,cast(null as int),'.' + cast(itemid as varchar(max)) + '.'
- from ItemAudits I
- where ItemID=@ItemID
-and i.deletestatus > 0
- Union All
--- siblings
- Select Z.PreviousID,II.PreviousID,cast(null as int),z.path + '.' + cast(z.previousid as varchar(max)) + '.'
- from Items II
- Join Itemz Z on II.ItemID = Z.PreviousID
- where Z.PreviousID != 0
- and Z.FromType is null
- Union All
--- siblings
- Select Z.PreviousID,II.PreviousID,cast(null as int),z.path + '.' + cast(z.previousid as varchar(max)) + '.'
- from ItemAudits II
- Join Itemz Z on II.ItemID = Z.PreviousID
- where Z.PreviousID != 0
- and Z.FromType is null
-and ii.deletestatus > 0
-and z.path not like '%.' + cast(z.previousid as varchar(max)) + '.%'
- Union All
--- children
- select Z.ItemID,Z.PreviousID,
-P.FromType,z.path + '.' + cast(Z.ItemID as varchar(max)) + '.'
- from Parts P
- join Itemz Z on P.ItemID=Z.ItemID
- where Z.FromType is null
- Union All
--- children
- select Z.ItemID,Z.PreviousID,
-P.FromType,z.path + '.' + cast(Z.ItemID as varchar(max)) + '.'
- from PartAudits P
- join Itemz Z on P.ItemID=Z.ItemID
- where Z.FromType is null
-)
-select @FromType = min(FromType) From Itemz where FromType is not null
-OPTION (MAXRECURSION 10000)
-return @FromType
-END;
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: ve_GetPartFromType Succeeded'
-ELSE PRINT 'Function: ve_GetPartFromType Error on Creation'
-go
-
-
-/****** Object: StoredProcedure [getAnnotationAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [AnnotationAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [AnnotationAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationAuditsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAuditsByItemID];
-GO
-
-/*
-exec getannotationauditsbyitemid 894
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationAuditsByItemID]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [AnnotationAudits]
- WHERE ItemID = @ItemID
- AND AnnotationID NOT IN (SELECT AnnotationID FROM Annotations)
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationAuditsByAnnotationID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getAnnotationAuditsByAnnotationID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getAnnotationAuditsByAnnotationID];
-GO
-
-/*
-exec getannotationauditsbyannotationid 53
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getAnnotationAuditsByAnnotationID]
-(
- @AnnotationID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [AnnotationID],
- [ItemID],
- [TypeID],
- [RtfText],
- [SearchText],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [AnnotationAudits]
- WHERE AnnotationID = @AnnotationID
- AND DeleteStatus = 0
- --AND AnnotationID IN (SELECT AnnotationID FROM Annotations)
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getAnnotationAuditsByAnnotationID Succeeded'
-ELSE PRINT 'Procedure Creation: getAnnotationAuditsByAnnotationID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsByDeleteStatus] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsByDeleteStatus]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getContentAuditsByDeleteStatus];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsByDeleteStatus]
-(
- @DeleteStatus int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ContentAudits]
- WHERE DeleteStatus = @DeleteStatus
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getContentAuditsByDeleteStatus Succeeded'
-ELSE PRINT 'Procedure Creation: getContentAuditsByDeleteStatus Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getDocumentAuditsByDocID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getDocumentAuditsByDocID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getDocumentAuditsByDocID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getDocumentAuditsByDocID]
-(
- @DocID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [DocID],
- [LibTitle],
- [DocContent],
- [DocAscii],
- [Config],
- [DTS],
- [UserID],
- [FileExtension],
- [DeleteStatus]
- FROM [DocumentAudits]
- WHERE DocID = @DocID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getDocumentAuditsByDocID Succeeded'
-ELSE PRINT 'Procedure Creation: getDocumentAuditsByDocID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getEntryAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getEntryAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getEntryAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getEntryAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [DocID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [EntryAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getEntryAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getEntryAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
- [ContentAuditID]
- FROM [GridAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
- [ContentAuditID]
- FROM [GridAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getGridAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getGridAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getGridAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getGridAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
- [ContentAuditID]
- FROM [GridAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getGridAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getGridAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getImageAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getImageAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getImageAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getImageAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [ImageType],
- [FileName],
- [Data],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ImageAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getImageAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getImageAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ItemAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ItemID],
- [PreviousID],
- [ContentID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [ItemAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getItemAuditsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getItemAuditsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getItemAuditsByItemID];
-GO
-
-/*
-getitemauditsbyitemid 10183
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getItemAuditsByItemID]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
-/*
- with Itemz([AuditType],[Level], [ParentID], [Ordinal], [ItemID], [PreviousID], [FromType], [ContentID], [DTS], [UserID], [LastChanged]) as (
- Select 'root' [AuditType], 0 [Level], 0 [ParentID], 0 [Ordinal], [ItemID], [PreviousID],0 [FromType],[ContentID],[DTS],[UserID],[LastChanged]
- FROM [Items]
- where [ItemID]= @ItemID
- Union All
- -- Children
- select 'chld' [AuditType], [Level] + 2,Z.ItemID,0, I.[ItemID], I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- -- Siblings
- Union All
- select 'sibl' [AuditType], [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[ItemID], I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID],I.[LastChanged]
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- where Z.[Level] > 0
- )
-*/
-
-select * from
-(
- --get deleted previous item
- select 0 Level,ia.*,dbo.[ve_GetPartType](@ItemID) ItemType from
- itemaudits ia
- inner join itemaudits iaa on ia.itemid = iaa.previousid
- where iaa.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
- union
- --get deleted next item
-/*
- select 1 Level,ia.*,@itemtype ItemType from itemaudits ia
- where ia.previousid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-*/
- select 1 Level,
- ia.[AuditID],
- ia.[ItemID],
- ia.[PreviousID],
- ia.[ContentID],
- ia.[DTS],
- ia.[UserID],
- ti.[DeleteStatus]
-,dbo.[ve_GetPartType](@ItemID) ItemType
- from itemaudits ia
- inner join tblitems ti on ia.itemid = ti.itemid
- where ia.previousid = @ItemID
- and ti.deletestatus > 0
-and ia.dts = ti.dts
- union
- --get chillins
- select 2 Level,ia.*,
-case
-when pa.fromtype = 1 then 'Procedure'
-when pa.fromtype = 2 then 'Section'
-when pa.fromtype = 3 then 'Caution'
-when pa.fromtype = 4 then 'Note'
-when pa.fromtype = 5 then 'RNO'
-when pa.fromtype = 6 then 'Step'
-when pa.fromtype = 7 then 'Table'
-else 'Unknown'
-end itemtype
- from itemaudits ia
- inner join partaudits pa on ia.itemid = pa.itemid
- inner join items ii on pa.contentid = ii.contentid
- where ii.itemid = @ItemID
- and ia.itemid not in (select itemid from items where itemid = ia.itemid)
- and ia.deletestatus in (select max(deletestatus) from itemaudits where itemid = ia.itemid)
-) ia
-order by deletestatus desc
-OPTION (MAXRECURSION 10000)
---select * from itemz order by parentid,ordinal
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getItemAuditsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getItemAuditsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [restoreDeletedItem] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreDeletedItem]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [restoreDeletedItem];
-GO
-/*
-restoreDeletedItem 2274,1,1940,2
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreDeletedItem]
-(
- @ItemID int,
- @DeleteID int,
- @CurrentID int,
- @Level int
-)
-
-WITH EXECUTE AS OWNER
-AS
- DECLARE @PreviousID int
- DECLARE @NextID int
- DECLARE @ContentID int
-declare @fromtype int
- IF @Level = 0
- BEGIN
- SET @NextID = @CurrentID
- SELECT @PreviousID = PreviousID FROM Items WHERE ItemID = @CurrentID
- END
- IF @Level = 1
- BEGIN
- SELECT @NextID = ItemID FROM Items WHERE PreviousID = @CurrentID
- SET @PreviousID = @CurrentID
- END
- SELECT @ContentID = dbo.[ve_GetPartContentID](@ItemID)
-select @fromtype = dbo.[ve_GetPartFromType](@ItemID)
-if @level = 2
-begin
- select @NextID = itemid from parts where contentid = @contentid and fromtype = @fromtype
-end
- UPDATE tblParts SET DeleteStatus = 0 WHERE ItemID IN (SELECT ItemID FROM PartAudits WHERE DeleteStatus = @DeleteID)
-update tblparts set deletestatus = 0 where contentid = @contentid and fromtype = @fromtype
- UPDATE tblContents SET DeleteStatus = 0, ActionDTS = getdate() WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblItems SET DeleteStatus = 0,PreviousID = CASE WHEN ItemID = @ItemID THEN @PreviousID ELSE PreviousID END
- WHERE ItemID IN (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblGrids SET DeleteStatus = 0 WHERE ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblEntries SET DeleteStatus = 0 WHERE DocID IN (SELECT DocID FROM EntryAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblAnnotations SET DeleteStatus = 0, ActionDTS = getdate() WHERE deletestatus = @deleteid -- ItemID in (SELECT ItemID FROM ItemAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblROUsages SET DeleteStatus = 0 WHERE deletestatus = @deleteid --ContentID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- UPDATE tblTransitions SET DeleteStatus = 0 WHERE deletestatus = @deleteid --FromID IN (SELECT ContentID FROM ContentAudits WHERE DeleteStatus = @DeleteID)
- IF @NextID IS NOT NULL
- BEGIN
- UPDATE Items SET PreviousID = @ItemID WHERE ItemID = @NextID
- IF @ContentID IS NOT NULL
- BEGIN
- UPDATE Parts SET ItemID = @ItemID WHERE ItemID = @NextID and ContentID = @ContentID
- END
- END
---else
--- begin
---update parts set itemid = @itemid where contentid = @contentid and fromtype = @fromtype
--- end
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreDeletedItem Succeeded'
-ELSE PRINT 'Procedure Creation: restoreDeletedItem Error on Creation'
-GO
-
-/****** Object: StoredProcedure [restoreDeletedAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreDeletedAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [restoreDeletedAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreDeletedAnnotation]
-(
- @AnnotationID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- UPDATE tblAnnotations SET DeleteStatus = 0, ActionDTS = getdate() WHERE DeleteStatus = (SELECT DeleteStatus FROM tblAnnotations WHERE AnnotationID = @AnnotationID)
- RETURN
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreDeletedAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: restoreDeletedAnnotation Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAudits] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAudits]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAudits];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAudits]
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAudits Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAudits Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAudit] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAudit]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAudit];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAudit]
-
-(
- @AuditID bigint
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE [AuditID]=@AuditID
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAudit Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAudit Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAuditsByContentID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAuditsByContentID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAuditsByContentID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAuditsByContentID Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAuditsByContentID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAuditsByItemID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAuditsByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAuditsByItemID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAuditsByItemID]
-(
- @ItemID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE ItemID = @ItemID
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAuditsByItemID Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAuditsByItemID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getPartAuditsByDeleteStatus] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getPartAuditsByDeleteStatus]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [getPartAuditsByDeleteStatus];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getPartAuditsByDeleteStatus]
-(
- @DeleteStatus int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [FromType],
- [ItemID],
- [DTS],
- [UserID],
- [DeleteStatus]
- FROM [PartAudits]
- WHERE DeleteStatus = @DeleteStatus
- ORDER BY AuditID DESC
- RETURN
-GO
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: getPartAuditsByDeleteStatus Succeeded'
-ELSE PRINT 'Procedure Creation: getPartAuditsByDeleteStatus Error on Creation'
-GO
-
-/****** Object: Trigger [tr_tblContents_Update] ******/
-ALTER trigger [dbo].[tr_tblContents_Update] on [dbo].[tblContents] for update as
- begin
- if exists (select * from inserted)
- begin
- if update(Number) or update(Text) or update(Type) or update(FormatID) or update(Config) or update(DeleteStatus)
- begin
- insert into ContentAudits(ContentID,Number,Text,Type,FormatID,Config,DTS,UserID,DeleteStatus,ActionDTS)
- select dd.ContentID,dd.Number,dd.Text,dd.Type,dd.FormatID,dd.Config,dd.DTS,dd.UserID,dd.DeleteStatus,dd.ActionDTS
- from deleted dd
- inner join inserted ii on dd.ContentID = ii.ContentID
- where dd.Text not like '% 0
- end
-GO
-
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Ateration: tr_ROUsages_Delete Succeeded'
-ELSE PRINT 'Trigger Ateration: tr_ROUsages_Delete Error on Creation'
-GO
-
-/****** Object: StoredProcedure [restoreChangedAnnotation] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreChangedAnnotation]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [restoreChangedAnnotation];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreChangedAnnotation]
-(
- @AuditID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- DECLARE @AnnotationID int
- DECLARE @RtfText nvarchar(max)
- DECLARE @SearchText nvarchar(max)
- DECLARE @Config nvarchar(max)
- DECLARE @DTS datetime
- SELECT @AnnotationID = AnnotationID,@RtfText = RtfText,@SearchText = SearchText,@Config = Config,@DTS = DTS
- FROM AnnotationAudits WHERE AuditID = @AuditID
- UPDATE tblAnnotations SET RtfText = @RtfText,SearchText = @SearchText,Config = @Config,DTS = @DTS WHERE AnnotationID = @AnnotationID
- RETURN
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreChangedAnnotation Succeeded'
-ELSE PRINT 'Procedure Creation: restoreChangedAnnotation Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_FindTransitionIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindTransitionIDs]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindTransitionIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindTransitionIDs](@ContentAuditID int)
-RETURNS @IDs TABLE
-(
- TransitionID int PRIMARY KEY,
- TransitionAction char(3)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- DECLARE @ContentID int
- DECLARE @text varchar(max)
- SELECT @ContentID = ContentID,@text = Text FROM ContentAudits WHERE AuditID = @ContentAuditID
- DECLARE @index1 int
- DECLARE @index2 int
- DECLARE @tid varchar(max)
- DECLARE @trid int
- WHILE (LEN(@text) > 0)
- BEGIN
- SET @index1 = CHARINDEX('#Link:Transition' , @text)
- IF (@index1 > 0)
- BEGIN
- SET @text = RIGHT(@text, (LEN(@text) - @index1))
- SET @index1 = CHARINDEX(' ', @text)
- SET @text = RIGHT(@text, (LEN(@text) - @index1))
- SET @index2 = CHARINDEX(' ', @text)
- SET @tid = LTRIM(LEFT(@text, @index2))
- SET @text = RIGHT(@text, (len(@text) - @index2))
- SET @trid = CAST(@tid AS INT)
- IF EXISTS (SELECT TransitionID FROM tblTransitions WHERE TransitionID = @trid AND DeleteStatus < 0)
- INSERT INTO @IDs VALUES (@trid, 'ADD')
- ELSE
- INSERT INTO @IDs VALUES (@trid, NULL)
- END
- ELSE
- SET @text = ''
- END
- INSERT INTO @IDs SELECT tt.TransitionID,'DEL' FROM tblTransitions tt LEFT JOIN @IDs ti ON tt.TransitionID = ti.TransitionID WHERE tt.FromID = @ContentID
- AND ti.TransitionID IS NULL
- DELETE FROM @IDs WHERE TransitionAction IS NULL
- RETURN
-END
-GO
-
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindTransitionIDs Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindTransitionIDs Error on Creation'
-GO
-
-/****** Object: TableFunction [vefn_FindROUsageIDs] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_FindROUsageIDs]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_FindROUsageIDs];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_FindROUsageIDs](@ContentAuditID int)
-RETURNS @IDs TABLE
-(
- ROUsageID int PRIMARY KEY,
- ROUsageAction char(3)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-
- DECLARE @ContentID int
- DECLARE @text varchar(max)
- SELECT @ContentID = ContentID,@text = Text FROM ContentAudits WHERE AuditID = @ContentAuditID
- DECLARE @index1 int
- DECLARE @index2 int
- DECLARE @tid varchar(max)
- DECLARE @trid int
- WHILE (LEN(@text) > 0)
- BEGIN
- SET @index1 = CHARINDEX('#Link:Transition' , @text)
- IF (@index1 > 0)
- BEGIN
- SET @text = RIGHT(@text, (LEN(@text) - @index1))
- SET @index1 = CHARINDEX(' ', @text)
- SET @text = RIGHT(@text, (LEN(@text) - @index1))
- SET @index2 = CHARINDEX(' ', @text)
- SET @tid = LTRIM(LEFT(@text, @index2))
- SET @text = RIGHT(@text, (len(@text) - @index2))
- SET @trid = CAST(@tid AS INT)
- IF EXISTS (SELECT ROUsageID FROM tblROUsages WHERE ROUsageID = @trid AND DeleteStatus < 0)
- INSERT INTO @IDs VALUES (@trid, 'ADD')
- ELSE
- INSERT INTO @IDs VALUES (@trid, NULL)
- END
- ELSE
- SET @text = ''
- END
- INSERT INTO @IDs SELECT tt.ROUsageID,'DEL' FROM tblROUsages tt LEFT JOIN @IDs ti ON tt.ROUsageID = ti.ROUsageID WHERE tt.ContentID = @ContentID
- AND ti.ROUsageID IS NULL
- DELETE FROM @IDs WHERE ROUsageAction IS NULL
- RETURN
-END
-GO
-
--- Display the status of func creation
-IF (@@Error = 0) PRINT 'TableFunction Creation: vefn_FindROUsageIDs Succeeded'
-ELSE PRINT 'TableFunction Creation: vefn_FindROUsageIDs Error on Creation'
-GO
-
-/****** Object: StoredProcedure [restoreChangedContent] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[restoreChangedContent]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [restoreChangedContent];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[restoreChangedContent]
-(
- @AuditID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- DECLARE @ContentID int
- DECLARE @Number nvarchar(256)
- DECLARE @Text nvarchar(max)
- DECLARE @Type int
- DECLARE @FormatID int
- DECLARE @Config nvarchar(max)
- DECLARE @DTS datetime
- DECLARE @Data xml
- DECLARE @ConfigX xml
- SELECT @Contentid = Contentid,@Number = Number,@Text = Text,@Type = Type,@FormatID = FormatID,@Config = Config,@DTS = DTS
- FROM ContentAudits WHERE AuditID = @AuditID
--- SELECT @Data = Data,@ConfigX = Config FROM GridAudits WHERE ContentID = @ContentID and DTS = @DTS
- SELECT @Data = Data,@ConfigX = Config FROM GridAudits WHERE ContentID = @ContentID and ContentAuditID = @AuditID
- UPDATE tblContents SET Number = @Number,Text = @Text,Type = @Type,FormatID = @FormatID,Config = @Config,DTS = @DTS, ActionDTS = getdate()
- WHERE ContentID = @ContentID
- UPDATE tblGrids SET Data = @Data,Config = @ConfigX WHERE ContentID = @ContentID
---transitions
-update tblTransitions set deletestatus = 0 where transitionid in (select transitionid from vefn_FindTransitionIDs(@AuditID) where TransitionAction = 'ADD')
-delete from transitions where transitionid in (select transitionid from vefn_FindTransitionIDs(@AuditID) where TransitionAction = 'DEL')
---transitions end
---rousages
-update tblROUsages set deletestatus = 0 where rousageid in (select rousageid from vefn_FindROUsageIDs(@AuditID) where rousageaction = 'ADD')
-delete from rousages where rousageid in (select rousageid from vefn_FindROUsageIDs(@AuditID) where rousageaction = 'DEL')
---rousages end
- RETURN
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: restoreChangedContent Succeeded'
-ELSE PRINT 'Procedure Creation: restoreChangedContent Error on Creation'
-GO
-
-/****** Object: Trigger [tr_tblAnnotations_Update] ******/
-ALTER trigger [dbo].[tr_tblAnnotations_Update] on [dbo].[tblAnnotations] for update as
- begin
- if exists (select * from inserted)
- begin
- insert into AnnotationAudits(AnnotationID,ItemID,TypeID,RtfText,SearchText,Config,DTS,UserID,DeleteStatus,ActionDTS)
- select dd.AnnotationID,dd.ItemID,dd.TypeID,dd.RtfText,dd.SearchText,dd.Config,dd.DTS,dd.UserID,dd.DeleteStatus,dd.ActionDTS
- from deleted dd
- inner join inserted ii on dd.AnnotationID = ii.AnnotationID
- where (select count(*) from annotationaudits where annotationid = dd.annotationid and dts = dd.dts and ActionDTS = dd.ActionDTS) = 0
- end
- end
-GO
-
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Ateration: tr_tblAnnotations_Update Succeeded'
-ELSE PRINT 'Trigger Ateration: tr_tblAnnotations_Update Error on Creation'
-GO
-
-/****** Object: StoredProcedure [deleteAnnotationWithUserID] ******/
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteAnnotationWithUserID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
- DROP PROCEDURE [deleteAnnotationWithUserID];
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[deleteAnnotationWithUserID]
-
-(
- @AnnotationID int,
- @UserID varchar(200)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN TRY -- Try Block
- BEGIN TRANSACTION
---delete log add
- DECLARE @DeleteID int
- INSERT INTO DeleteLog (UserID) VALUES (@UserID)
- SELECT @DeleteID = SCOPE_IDENTITY()
---end delete log add
- DELETE [Annotations]
- WHERE [AnnotationID] = @AnnotationID
---delete log purge
- DELETE from DeleteLog where DeleteID = @DeleteID
---end delete log purge
- IF( @@TRANCOUNT > 0 ) COMMIT
-END TRY
-BEGIN CATCH -- Catch Block
- IF( @@TRANCOUNT = 1 ) ROLLBACK -- Only rollback if top level
- ELSE IF( @@TRANCOUNT > 1 ) COMMIT -- Otherwise commit. Top level will rollback
- EXEC vlnErrorHandler
-END CATCH
-GO
-
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'Procedure Creation: deleteAnnotationWithUserID Succeeded'
-ELSE PRINT 'Procedure Creation: deleteAnnotationWithUserID Error on Creation'
-GO
-
-/****** Object: Trigger [tr_Annotations_Delete] ******/
-ALTER trigger [dbo].[tr_Annotations_Delete] on [dbo].[Annotations] instead of delete as
- begin
- update ii set DeleteStatus = (select max(DeleteID) from DeleteLog where SPID = @@spid),ActionDTS = getdate()
---DTS = getdate(),
-,DTS = dd.dts,
- UserID = (select top 1 UserID from DeleteLog where SPID = @@spid order by deleteid desc)
- from tblAnnotations ii inner join deleted dd on dd.AnnotationID = ii.AnnotationID
- insert into AnnotationAudits(AnnotationID,ItemID,TypeID,RtfText,SearchText,Config,DTS,UserID,DeleteStatus,ActionDTS)
- select ii.AnnotationID,ii.ItemID,ii.TypeID,ii.RtfText,ii.SearchText,ii.Config,ii.DTS,ii.UserID,ii.DeleteStatus,ii.ActionDTS
- from tblAnnotations ii inner join deleted dd on dd.AnnotationID = ii.AnnotationID
- where ii.DeleteStatus > 0
- end
-GO
-
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Ateration: tr_Annotations_Delete Succeeded'
-ELSE PRINT 'Trigger Ateration: tr_Annotations_Delete Error on Creation'
-GO
-
-/****** Object: Trigger [tr_tblItems_Update] ******/
-ALTER trigger [dbo].[tr_tblItems_Update] on [dbo].[tblItems] for update as
- begin
- if exists (select * from inserted)
- begin
- insert into ItemAudits(ItemID,PreviousID,ContentID,DTS,UserID,DeleteStatus)
- select dd.ItemID,dd.PreviousID,dd.ContentID,dd.DTS,dd.UserID,dd.DeleteStatus from deleted dd
- inner join inserted ii on dd.ItemID = ii.ItemID
- where dd.deletestatus = 0 or ii.deletestatus != 0
- end
- end
-GO
-
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Ateration: tr_tblItems_Update Succeeded'
-ELSE PRINT 'Trigger Ateration: tr_tblItems_Update Error on Creation'
-GO
-
-/****** Object: Trigger [tr_Contents_Delete] ******/
-ALTER trigger [dbo].[tr_Contents_Delete] on [dbo].[Contents] instead of delete as
- begin
- update ii set DeleteStatus = (select max(DeleteID) from DeleteLog where SPID = @@spid), ActionDTS = getdate(),
- UserID = (select top 1 UserID from DeleteLog where SPID = @@spid order by deleteid desc)
- from tblContents ii inner join deleted dd on dd.ContentID = ii.ContentID
- insert into ContentAudits(ContentID,Number,Text,Type,FormatID,Config,DTS,UserID,DeleteStatus,ActionDTS)
- select ii.ContentID,ii.Number,ii.Text,ii.Type,ii.FormatID,ii.Config,ii.DTS,ii.UserID,ii.DeleteStatus,ii.ActionDTS
- from tblContents ii inner join deleted dd on dd.ContentID = ii.ContentID
- where ii.DeleteStatus > 0
- update ga set ga.contentauditid = (select max(auditid) from contentaudits where contentid = ga.contentid and deletestatus = ga.deletestatus)
- from gridaudits ga join deleted dd on ga.contentid = dd.contentid where ga.contentauditid = 0
- end
-go
-
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Ateration: tr_Contents_Delete Succeeded'
-ELSE PRINT 'Trigger Ateration: tr_Contents_Delete Error on Creation'
-GO
-
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 05/18/2011 11:20:48 ******/
-/*
-select * from vefn_SiblingAndChildrenItemsByProc(30) II
-join
-*/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_SiblingAndChildrenItemsByProc](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-with Itemz([ItemID], [DVPath], [Level], [ParentID], [Ordinal], [PreviousID], [FromType], [ContentID], [DTS], [UserID],[pContentID],
- [pDTS],[pUserID],PPath, [Path], [IsRNO], [POrdinalPath], [OrdinalPath]) as (
- Select [I].[ItemID], '' DVPath, 0 [Level], 0 [ParentID], 0 [Ordinal], [PreviousID],0 [FromType],[I].[ContentID],[I].[DTS],[I].[UserID]
- ,0 [pContentID],[I].[DTS] [pDTS], [I].[UserID] [pUserID],
- Cast('' as nvarchar(max)) [PPath],
- Cast(Case when C.Type < 20000 then @Delim + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) [Path],
- 0 IsRNO, Cast('' as nvarchar(max)) [POrdinalPath], Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-Union All
--- Children
- select I.[ItemID], DVPath, [Level] + 1,Z.ItemID,0, I.[PreviousID], P.[FromType],I.[ContentID],I.[DTS],I.[UserID],
- P.[ContentID] [pContentID],P.[DTS] [pDTS],P.[UserID] [pUserID]
- ,PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim +C.Number + @DelimNumber + C.Text
- when 1 then @Delim +C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end + cast(1 as varchar(3))
- end end Path,
- case when P.FromType = 5 then -1 else 0 end IsRNO,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001'
- from Itemz Z
- join Parts P on P.ContentID = Z.ContentID
- join Items I on I.ItemID = P.ItemID
- join Contents C on C.ContentID = I.ContentID
-Union All
--- Siblings
- select I.[ItemID], DVPath, [Level] ,Z.[ParentID],Z.[Ordinal] +1, I.[PreviousID], [FromType],I.[ContentID],I.[DTS],I.[UserID]
- ,null,null,null,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + C.Number + @DelimNumber + C.Text
- else case when Path like '%.%' then @DelimStep else @Delim end + cast(Ordinal + 2 as varchar(3))
- end Path, 0,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5)
- from Itemz Z
- join Items I on I.PreviousID = Z.ItemID
- join Contents C on C.ContentID = I.ContentID
- --where Z.[Level] > 0
-
-)
-insert into @SiblingAndChildren
-select I.[ItemID], [DvPath], [Path], I.[Level],I.[FromType],I.[Ordinal], I.[ParentID], I.[PreviousID],I.[ContentID],I.[DTS],I.[UserID],
- [pContentID],[pDTS],[pUserID],[IsRNO]/*,[PPath],[POrdinalPath]*/,[OrdinalPath]
- from ItemZ I
-OPTION (MAXRECURSION 10000)
-END
-RETURN
-END
-GO
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: vefn_SiblingAndChildrenItemsByProc Succeeded'
-ELSE PRINT 'Function: vefn_SiblingAndChildrenItemsByProc Error on Creation'
-
-go
-
-/****** Object: UserDefinedFunction [dbo].[vefn_ProcedureByProcID] Script Date: 05/18/2011 11:20:48 ******/
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create FUNCTION [dbo].[vefn_ProcedureByProcID](@ProcID int)
-RETURNS @SiblingAndChildren TABLE
-(
- [ItemID] int PRIMARY KEY
- , [DVPath] nvarchar(max)
- , [Path] nvarchar(max)
- , [Level] int
- , [FromType] int
- , [Ordinal] int
- , [ParentID] int
- , [PreviousID] int
- , [ContentID] int
- , [DTS] datetime
- , [UserID] nvarchar(100)
- , [pContentID] int
- , [pDTS] datetime
- , [pUserID] nvarchar(100)
- , [IsRNO] int
-
--- , [PPath] nvarchar(max)
--- , [POrdinalPath] nvarchar(max)
- , [OrdinalPath] nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-BEGIN
-insert into @SiblingAndChildren
- Select
-[I].[ItemID]
-, '' DVPath
-, Cast(Case when C.Type < 20000 then @Delim + C.Number + @DelimNumber + C.Text else '1' end as nvarchar(max)) [Path]
-,0 [Level]
-,0 [FromType]
-, 0 [Ordinal]
-, 0 [ParentID]
-, [PreviousID]
-,[I].[ContentID]
-,[I].[DTS]
-,[I].[UserID]
- ,0 [pContentID]
-,[I].[DTS] [pDTS]
-, [I].[UserID] [pUserID]
-,0 IsRNO
- , Cast('0001' as nvarchar(max)) [OrdinalPath]
- FROM [Items] I
- Join Contents C on C.ContentID=I.ContentID
- WHERE I.[ItemID] = @ProcID
-END
-RETURN
-END
-go
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: vefn_ProcedureByProcID Succeeded'
-ELSE PRINT 'Function: vefn_ProcedureByProcID Error on Creation'
-
-go
-
-
-/****** Object: UserDefinedFunction [dbo].[vefn_tblChildItems] Script Date: 05/18/2011 11:20:48 ******/
-
-/*
-declare @PreviousID as int
-declare @ItemID as int
-set @ItemID = 450
-select @PreviousID = PreviousID from items where ItemID = @ItemID
-
-Select * from Items where ItemID = @ItemID
-
-select * from Transitions
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-select CC.Text from Transitions TT
-join contents CC on TT.FromID = CC.ContentID
-where FromID in (Select ContentID from vefn_ChildItems(@PreviousID))
-AND (ToID = @ItemID or RangeID = @ItemID)
-
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_tblChildItems](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int)
-RETURNS @Children TABLE
-(
- ItemID int PRIMARY KEY,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-declare @path nvarchar(max)
-declare @ppath nvarchar(max)
-declare @ordinalpath nvarchar(max)
-declare @pordinalpath nvarchar(max)
-declare @ordinal int
-declare @pitemid int
-select @path = path,@ordinalpath = ordinalpath,@ordinal = ordinal,@pitemid = parentid from vefn_ProcedureByProcID(@ProcItemID) where itemid = @ItemID
-if @pitemid = 0 begin
- set @pordinalpath = ''
- set @ppath = ''
-end
-else begin
- select @ppath = path,@pordinalpath = ordinalpath from vefn_ProcedureByProcID(@ProcItemID) where itemid = @pitemID
-end
-declare @procdts datetime
-select @procdts = dts from items where itemid = @ProcItemID
-Declare @Delim char(1)
-Set @Delim=char(7)
-Declare @DelimNumber char(1)
-Set @DelimNumber=char(17)
-Declare @DelimStep char(1)
-Set @DelimStep='.'
-begin
-with Itemz([Level], [ItemID], [ContentID], DeleteStatus, ProcDTS, PPath, [Path], [POrdinalPath], [OrdinalPath], [FromType], [Ordinal]) as (
- Select 0 [Level], [ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- @ppath [PPath],
- @path [Path],
- @pordinalpath [POrdinalPath],
- @ordinalpath [OrdinalPath],
-0 [FromType],@ordinal [Ordinal]
- FROM [tblItems] I
---inner join tblContents C on C.ContentID=I.ContentID
- where I.[ItemID]=@ItemID
-Union All
--- Children
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim +C.Number + @DelimNumber + C.Text
- when 1 then @Delim +C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
-case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(3))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
-P.[FromType],0
- from Itemz Z
- join tblParts P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID
-inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus = 0
-Union All
--- Children2
- select [Level] + 1, I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PATH + --''
- case C.Type/10000
- when 2 then
- case P.FromType
- when 3 then @DelimStep + 'Caution'
- when 4 then @DelimStep + 'Note'
- else '' end
- else '' end
- PPath,
- Path + case C.Type/10000
- when 0 then @Delim +C.Number + @DelimNumber + C.Text
- when 1 then @Delim +C.Number + @DelimNumber + C.Text
- else
- case P.FromType
- --when 1 then 'PRC' + @Delim + cast(1 as varchar(3))
- --when 2 then 'SEC' + @Delim + cast(1 as varchar(3))
- when 3 then @DelimStep +'Caution' + @DelimStep + cast(1 as varchar(3))
- when 4 then @DelimStep +'Note' + @DelimStep + cast(1 as varchar(3))
- when 5 then @DelimStep +'RNO' + @DelimStep
- when 7 then @DelimStep +'Table' + @DelimStep
- else case when Z.FromType < 3 then @Delim else @DelimStep end +
-case when I.deletestatus != 0 then 'Old ' else '' end + cast(1 as varchar(3))
- end end Path,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-' ,
- OrdinalPath + '.' + Right('000' + Cast(P.FromType as varchar(4)), 4) + '-00001',
-P.[FromType],0
- from Itemz Z
- join PartAudits P on P.ContentID = Z.ContentID
- join tblItems I on I.ItemID = P.ItemID and i.PreviousID is null
-inner join tblContents C on C.ContentID=I.ContentID
- where @IncludeDeletedChildren = 1 or z.DeleteStatus >= 0
--- Siblings
-Union All
- select [Level] , I.[ItemID], I.[ContentID], I.DeleteStatus, @procdts procdts,
- PPath,
- --'1' +
- PPath + case C.Type/10000
- when 0 then @Delim + C.Number + @DelimNumber + C.Text
- when 1 then @Delim + C.Number + @DelimNumber + C.Text
- else case when Path like '%.%' then @DelimStep else @Delim end +
-case when I.deletestatus != 0 then 'Old ' else '' end + cast(Ordinal + 2 as varchar(3))
- end Path,
- POrdinalPath,
- POrdinalPath + right('00000' + cast(Z.[Ordinal] + 2 as varchar(5)), 5),
-FromType,Z.[Ordinal] +1
- from Itemz Z
- join tblItems I on I.PreviousID = Z.ItemID
-inner join tblContents C on C.ContentID=I.ContentID
- where Z.[Level] > 0
-)
-insert into @Children select distinct ItemID, ContentID, DeleteStatus, ProcDTS, Path, OrdinalPath from Itemz
-RETURN
-END
-end
-
-go
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Function: vefn_tblChildItems Succeeded'
-ELSE PRINT 'Function: vefn_tblChildItems Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_GetMyChronology]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_GetMyChronology];
-GO
-/****** Object: UserDefinedFunction [dbo].[vefn_GetMyChronology] Script Date: 11/07/2012 18:09:17 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE FUNCTION [dbo].[vefn_GetMyChronology](@ProcItemID int, @ItemID int, @IncludeDeletedChildren int, @DTS datetime)
-RETURNS @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
-insert into @Chrono
-select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
- from
- (
- select
- case
- when lastauditid is null then 'Added'
- when r.deletestatus > 0 then 'Deleted'
- when lastauditid = -1 then 'Changed'
- when DeletedAuditID is not null then 'Restored'
--- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end actionwhat
-,actiondts actionwhen
--- ,case
--- when lastauditid is null then dts
--- when r.deletestatus > 0 then ActionDTS
--- when lastauditid = -1 then dts
--- when DeletedAuditID is not null then ActionDTS
--- else dts
--- end actionwhen
-,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
- ,*
- from vefn_tblchilditems (@ProcItemID,@ItemID,@IncludeDeletedChildren) t
- inner join vefn_chronologyreport(@ProcItemID,@DTS) r
- on t.icontentid = r.contentid
--- where ActionDTS > procdts or dts > procdts
- ) ah
- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-END
-go
-IF (@@Error = 0) PRINT 'TableFunction [vefn_GetMyChronology] Succeeded'
-ELSE PRINT 'TableFunction [vefn_GetMyChronology] Error on Creation'
-go
-
-/****** Object: StoredProcedure [dbo].[getContentAuditsChronologyByItemID] Script Date: 03/21/2012 15:58:26 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[getContentAuditsChronologyByItemID]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)
-DROP PROCEDURE [getContentAuditsChronologyByItemID];
-GO
-/****** Object: StoredProcedure [getContentAuditsChronologyByItemID] ******/
-/*
-getContentAuditsChronologyByItemID 10154,10154,0
-getContentAuditsChronologyByItemID 42,42,0
-getContentAuditsChronologyByItemID 9,9,0
-getContentAuditsChronologyByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE PROCEDURE [dbo].[getContentAuditsChronologyByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
- select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
--- select distinct [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
-go
--- Display the status of Proc creation
-IF (@@Error = 0) PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Succeeded'
-ELSE PRINT 'StoredProcedure [getContentAuditsChronologyByItemID] Error on Creation'
-go
-
-IF EXISTS (SELECT * FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[vefn_ChronologyReport]') AND OBJECTPROPERTY(id,N'IsTableFunction') = 1)
- DROP FUNCTION [vefn_ChronologyReport];
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 03/20/2012 17:50:44 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-/*
-select * from vefn_chronologyreport(2) where type > 0 order by contentid,auditid
-*/
-/****** Object: UserDefinedFunction [dbo].[vefn_ChronologyReport] Script Date: 05/18/2011 11:20:48 ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE function [dbo].[vefn_ChronologyReport](@ProcItemID int, @DTS datetime)
-returns @Report table
-(
-src int,
-AuditID bigint,
-ContentID int,
-Number nvarchar(512),
-Text nvarchar(max),
-Type int,
-FormatID int,
-Config nvarchar(max),
-DTS datetime,
-UserID nvarchar(200),
-DeleteStatus int,
-ActionDTS datetime,
-ItemDTS datetime,
-LastAuditID int,
-DeletedAuditID int
-)
-WITH EXECUTE AS OWNER
-AS
-BEGIN
---added rhm/jcb 20121218i
-declare @tmpTable table
-(
- icontentid int primary key
-)
-insert into @tmpTable select icontentid from vefn_tblchilditems(@ProcItemID,@ProcItemID,1)
---added jcb 20111122
---declare @dts datetime
---set @dts = (select dts from items where itemid = @ProcItemID )
---set @dts = (SELECT .[dbo].[vefn_GetPreviousRevisionDTSByItemID] (@ProcItemID))
---end added jcb 20111122
- insert into @Report
- SELECT
-1 src,
- [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- where Number is not null
---added jcb 20111028_1827
-and ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-and ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > @dts)
---and ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.dts > @dts
---end added jcb 20111122
--- UNION
--- SELECT
---2 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
----- (select max(auditid) + 1 from contentaudits) [AuditID]
----- 0 [AuditID]
--- ,ca.[ContentID]
--- ,[Number]
--- ,[Text]
--- ,[Type]
--- ,[FormatID]
--- ,[Config]
--- ,ca.[DTS] cadts
--- ,ca.[UserID]
--- ,ca.[DeleteStatus]
--- ,ActionDTS
--- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
---,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
--- FROM tblContents ca
----- inner join tblitems ti on ca.contentid = ti.contentid
---WHERE ca.DeleteStatus = 0 AND
-----added jcb 20111028_1827
---ca.contentid != (select contentid from items where itemid = @procitemid) and
-----end added jcb 20111028_1827
-----ca.ContentID in (SELECT [ContentID] FROM ContentAudits where dts > (select dts from items where itemid = @ProcItemID ))
-----added jcb 20111122
-----ca.ContentID in (SELECT [ContentID] FROM Contents where dts > (select dts from items where itemid = @ProcItemID ))
---ca.ContentID in (SELECT [ContentID] FROM Contents where dts > @dts)
-----end added jcb 20111122
-----order by ca.DTS,ActionDTS
- UNION
- SELECT
-3 src,
- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
--- 0 [AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM tblContents ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus = 0 AND
---added jcb 20111028_1827
-ca.contentid != (select contentid from items where itemid = @procitemid)
-and ca.contentid in (select icontentid from @tmpTable)
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
- UNION
- SELECT distinct
-5 src,
--- cast(ident_current('contentaudits') + 1 as bigint) auditid
--- (select max(auditid) + 1 from contentaudits) [AuditID]
- ca.[AuditID]
- ,ca.[ContentID]
- ,[Number]
- ,[Text]
- ,[Type]
- ,[FormatID]
- ,[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
-WHERE ca.DeleteStatus > 0
---added jcb 20111028_1827
- --ca.contentid != (select contentid from items where itemid = @procitemid) and
---end added jcb 20111028_1827
---added jcb 20111122
---ca.dts > (select dts from items where itemid = @ProcItemID )
-and ca.contentid in (select icontentid from @tmpTable)
-and (ca.dts > @dts or ca.actiondts > @dts)
---end added jcb 20111122
-order by ca.DTS,ActionDTS
-
- insert into @Report
- SELECT
-4 src,
- ca.[AuditID]
- ,ca.[ContentID]
- ,ca.[Number]
- ,ca.[Text]
- ,ca.[Type]
- ,ca.[FormatID]
- ,ca.[Config]
- ,ca.[DTS] cadts
- ,ca.[UserID]
- ,ca.[DeleteStatus]
- ,ca.ActionDTS
- ,(select min(dts) from itemaudits where contentid = ca.contentid) ItemDTS
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null) LastAuditID
-,(select max(auditid) from contentaudits where ca.contentid = contentid and ca.auditid > auditid and number is not null and deletestatus > 0 and ca.dts = dts) DeletedAuditID
- FROM ContentAudits ca
--- inner join tblitems ti on ca.contentid = ti.contentid
- inner join @Report rpt on ca.contentid = rpt.contentid and ca.auditid = rpt.lastauditid
-where ca.auditid not in (select auditid from @report)
-and rpt.lastauditid is not null
-and ca.contentid in (select icontentid from @tmpTable)
- return
-end
-GO
--- Display the status of TableFunction creation
-IF (@@Error = 0) PRINT 'Function: vefn_ChronologyReport Succeeded'
-ELSE PRINT 'Function: vefn_ChronologyReport Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getAnnotationAuditsChronologyByItemID] ******/
-/*
-getAnnotationAuditsChronologyByItemID 30,30
-getAnnotationAuditsChronologyByItemID 30,8570
-getAnnotationAuditsChronologyByItemID 30,8513
-getAnnotationAuditsChronologyByItemID 30,8505
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create procedure [dbo].[getAnnotationAuditsChronologyByItemID]
-(
- @ProcItemID int,
- @ItemID int,
- @DTS datetime
-)
-WITH EXECUTE AS OWNER
-AS
-begin
--- declare @dts datetime
--- set @dts = (select dts from items where itemid = @procitemid)
- declare @tci table
- (
- ItemID int,
- IContentID int,
- IDeleteStatus int,
- ProcDTS datetime,
- Path nvarchar(max),
- OrdinalPath nvarchar(max)
- )
- insert into @tci
- select * from vefn_tblchilditems(@ProcItemID,@ItemID,0)
- select
- case
- when lastauditid is null and dts > itemdts then 'Added'
- when deletestatus > 0 then 'Deleted'
- when lastauditid = deletedauditid then 'Restored'
- else 'Changed'
- end ActionWhat
- ,case
- when lastauditid is null and dts > itemdts then dts
- when deletestatus > 0 then ActionDTS
- when lastauditid = deletedauditid then ActionDTS
- else dts
- end ActionWhen
- ,*
- from
- (
- select
- cast(ident_current('annotationaudits') + 1 as bigint) auditid
- -- (select max(auditid) + 1 from annotationaudits) auditid
- -- 0 auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,0 deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from tblannotations aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- where aa.deletestatus = 0
- union
- select
- aa.auditid
- ,aa.annotationid
- ,aa.itemid
- ,aa.typeid
- ,aa.rtftext
- ,aa.searchtext
- ,aa.config
- ,aa.dts
- ,aa.userid
- ,aa.deletestatus
- ,aa.ActionDTS
- ,ii.contentid icontentid
- ,(select min(dts) from tblitems where itemid = ii.itemid) ItemDTS
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid ) LastAuditID
- ,(select max(auditid) from annotationaudits where annotationid = aa.annotationid and itemid = ii.itemid and aa.auditid > auditid and deletestatus > 0 and aa.dts = dts) DeletedAuditID
-,tci.ordinalpath
- from annotationaudits aa
- inner join items ii on aa.itemid = ii.itemid
-join @tci tci on tci.itemid = ii.itemid
- ) ah
- where itemid in (select itemid from @tci)
- and dts > @dts
- --(select dts from versions where versionid = (select max(versionid) from revisions rr inner join versions vv on rr.revisionid = vv.revisionid
- --inner join stages ss on vv.stageid = ss.stageid where itemid = @procitemid and ss.isapproved = 1))
- order by ordinalpath,annotationid,auditid--actionwhen
-end
-go
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'StoredProcedure [getAnnotationAuditsChronologyByItemID] Succeeded'
-ELSE PRINT 'StoredProcedure [getAnnotationAuditsChronologyByItemID] Error on Creation'
-go
-
-
-/****** Object: Trigger [dbo].[tr_GridAudits_insert] Script Date: 06/06/2011 16:58:07 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create trigger [dbo].[tr_GridAudits_insert]
-on [dbo].[GridAudits]
-after INSERT
-AS
-begin
- update ga set ga.contentauditid = (select isnull(max(auditid),0) from contentaudits where contentid = ii.contentid)
- from inserted ii
- inner join gridaudits ga on ii.auditid = ga.auditid
-end
-go
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'Trigger Creation: tr_GridAudits_insert Succeeded'
-ELSE PRINT 'Trigger Creation: tr_GridAudits_insert Error on Creation'
-GO
-
-
-/****** Object: Index [IX_GridAuditsContentAuditID] Script Date: 06/08/2011 11:13:09 ******/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-CREATE NONCLUSTERED INDEX [IX_GridAuditsContentAuditID] ON [dbo].[GridAudits]
-(
- [ContentAuditID] ASC
-)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
-GO
--- Display the status of index creation
-IF (@@Error = 0) PRINT 'Index Creation: IX_GridAuditsContentAuditID Succeeded'
-ELSE PRINT 'Index Creation: IX_GridAuditsContentAuditID Error on Creation'
-GO
-
-/****** Object: StoredProcedure [getContentAuditsSummaryByItemID] ******/
-/*
-getContentAuditsSummaryByItemID 146,146,0
-getContentAuditsSummaryByItemID 30,30,0
-getContentAuditsSummaryByItemID 9,9,0
-getContentAuditsSummaryByItemID 146,146,1
-*/
-/*****************************************************************************
- Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
- Copyright 2012 - Volian Enterprises, Inc. All rights reserved.
-*****************************************************************************/
-create PROCEDURE [dbo].[getContentAuditsSummaryByItemID]
-(
- @ProcedureItemID int,
- @SelectedItemID int,
- @IncludeDeletedChildren int,
- @DTS datetime
-)
-
-WITH EXECUTE AS OWNER
-AS
-begin
-DECLARE @Chrono TABLE
-(
-[AuditID] bigint,
-[ContentID] int,
-[Number] nvarchar(max),
-[Text] nvarchar(max),
-[Type] int,
-[FormatID] int,
-[Config] nvarchar(max),
-[DTS] datetime,
-[UserID] nvarchar(max),
-[DeleteStatus] int,
-[ActionDTS] datetime,
-[ActionWhat] nvarchar(max),
-[ActionWhen] datetime,
-[Path] nvarchar(max),
-ItemID int,
-TypeName nvarchar(max),
-ordinalpath nvarchar(max)
-)
-insert into @Chrono
-select * from vefn_GetMyChronology(@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren,@DTS)
-select * from @Chrono
-where AuditID is null OR AuditID in (select min(auditID) from @Chrono group by contentid UNION select max(auditID) from @Chrono group by contentid)
-order by OrdinalPath, contentid,auditid
---select z.* from
---(
---select contentid,min(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
---union
---select z.* from
---(
---select contentid,max(auditid) auditid from
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) x
---group by contentid
---) y
---inner join
---(
--- select [AuditID],[ContentID],[Number],[Text],[Type],[FormatID],[Config],[DTS],[UserID],[DeleteStatus],[ActionDTS],[ActionWhat],[ActionWhen],[Path],ItemID,TypeName,ordinalpath
--- from
--- (
--- select
--- case
--- when lastauditid is null then 'Added'
--- when r.deletestatus > 0 then 'Deleted'
--- when lastauditid = -1 then 'Changed'
--- when DeletedAuditID is not null then 'Restored'
----- when DeletedAuditID is not null and lastauditid = deletedauditid then 'Restored'
--- else 'Changed'
--- end actionwhat
---,actiondts actionwhen
----- ,case
----- when lastauditid is null then dts
----- when r.deletestatus > 0 then ActionDTS
----- when lastauditid = -1 then dts
----- when DeletedAuditID is not null then ActionDTS
----- else dts
----- end actionwhen
---,(select dbo.vefn_GetStepTypeNameByItemIDandTypeID(t.itemid,r.type)) TypeName
--- ,*
--- from vefn_tblchilditems (@ProcedureItemID,@SelectedItemID,@IncludeDeletedChildren) t
--- inner join vefn_chronologyreport(@ProcedureItemID) r
--- on t.icontentid = r.contentid
----- where ActionDTS > procdts or dts > procdts
--- ) ah
---) z on y.contentid = z.contentid and y.auditid = z.auditid
--- order by OrdinalPath, contentid,auditid--actionwhen
- RETURN
-end
--- Display the status of Trigger alter
-IF (@@Error = 0) PRINT 'StoredProcedure [getAnnotationAuditsSummaryByItemID] Succeeded'
-ELSE PRINT 'StoredProcedure [getAnnotationAuditsSummaryByItemID] Error on Creation'
-go
-
-
-ALTER PROCEDURE [dbo].[getContentAuditsByContentID]
-(
- @ContentID int
-)
-
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [AuditID],
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [DeleteStatus],
- case when auditid = (select min(auditid) from contentaudits where contentid = @ContentID) then 'Original'
- when deletestatus > 0 then 'Deleted'
- else 'Changed' end ActionWhat
- FROM [ContentAudits]
- WHERE ContentID = @ContentID
- ORDER BY AuditID DESC
- RETURN
-go
-
---NEW STUFF 1
-GO
-/****** Object: StoredProcedure [dbo].[getContent] Script Date: 07/07/2011 15:46:16 ******/
-SET ANSI_NULLS ON
-GO
-SET QUOTED_IDENTIFIER ON
-GO
-
-ALTER PROCEDURE [dbo].[getContent]
-
-(
- @ContentID int
-)
-WITH EXECUTE AS OWNER
-AS
- SELECT
- [ContentID],
- [Number],
- [Text],
- [Type],
- [FormatID],
- [Config],
- [DTS],
- [UserID],
- [LastChanged],
- (SELECT COUNT(*) FROM [Details] WHERE [Details].[ContentID]=[Contents].[ContentID]) [DetailCount],
- (SELECT COUNT(*) FROM [Entries] WHERE [Entries].[ContentID]=[Contents].[ContentID]) [EntryCount],
- (SELECT COUNT(*) FROM [Grids] WHERE [Grids].[ContentID]=[Contents].[ContentID]) [GridCount],
- (SELECT COUNT(*) FROM [Images] WHERE [Images].[ContentID]=[Contents].[ContentID]) [ImageCount],
- (SELECT COUNT(*) FROM [Items] WHERE [Items].[ContentID]=[Contents].[ContentID]) [ItemCount],
- (SELECT COUNT(*) FROM [Parts] WHERE [Parts].[ContentID]=[Contents].[ContentID]) [PartCount],
- (SELECT COUNT(*) FROM [RoUsages] WHERE [RoUsages].[ContentID]=[Contents].[ContentID]) [RoUsageCount],
- (SELECT COUNT(*) FROM [Transitions] WHERE [Transitions].[FromID]=[Contents].[ContentID]) [TransitionCount],
- (SELECT COUNT(*) FROM [ZContents] WHERE [ZContents].[ContentID]=[Contents].[ContentID]) [ZContentCount]
- FROM [Contents]
- WHERE [ContentID]=@ContentID
-
- SELECT
- [Details].[DetailID],
- [Details].[ContentID],
- [Details].[ItemType],
- [Details].[Text],
- [Details].[Config],
- [Details].[DTS],
- [Details].[UserID],
- [Details].[LastChanged]
- FROM [Details]
- WHERE
- [Details].[ContentID]=@ContentID
-
-
- SELECT
- [Entries].[ContentID],
- [Entries].[DocID],
- [Entries].[DTS],
- [Entries].[UserID],
- [Entries].[LastChanged],
- [Documents].[LibTitle] [Document_LibTitle],
- [Documents].[DocContent] [Document_DocContent],
- [Documents].[DocAscii] [Document_DocAscii],
- [Documents].[Config] [Document_Config],
- [Documents].[DTS] [Document_DTS],
- [Documents].[UserID] [Document_UserID],
- [Documents].[FileExtension] [Document_FileExtension]
- FROM [Entries]
- JOIN [Documents] ON
- [Documents].[DocID]=[Entries].[DocID]
- WHERE
- [Entries].[ContentID]=@ContentID
-
-
- SELECT
- [Grids].[ContentID],
- [Grids].[Data],
- [Grids].[Config],
- [Grids].[DTS],
- [Grids].[UserID],
- [Grids].[LastChanged]
- FROM [Grids]
- WHERE
- [Grids].[ContentID]=@ContentID
-
-
- SELECT
- [Images].[ContentID],
- [Images].[ImageType],
- [Images].[FileName],
- [Images].[Data],
- [Images].[Config],
- [Images].[DTS],
- [Images].[UserID],
- [Images].[LastChanged]
- FROM [Images]
- WHERE
- [Images].[ContentID]=@ContentID
-
-
- SELECT
- [Items].[ItemID],
- [Items].[PreviousID],
- [Items].[ContentID],
- [Items].[DTS],
- [Items].[UserID],
- [Items].[LastChanged]
- FROM [Items]
- WHERE
- [Items].[ContentID]=@ContentID
-
-
- SELECT
- [Parts].[ContentID],
- [Parts].[FromType],
- [Parts].[ItemID],
- [Parts].[DTS],
- [Parts].[UserID],
- [Parts].[LastChanged],
- [Items].[PreviousID] [Item_PreviousID],
- [Items].[ContentID] [Item_ContentID],
- [Items].[DTS] [Item_DTS],
- [Items].[UserID] [Item_UserID]
- FROM [Parts]
- JOIN [Items] ON
- [Items].[ItemID]=[Parts].[ItemID]
- WHERE
- [Parts].[ContentID]=@ContentID
-
-
- SELECT
- [RoUsages].[ROUsageID],
- [RoUsages].[ContentID],
- [RoUsages].[ROID],
- [RoUsages].[Config],
- [RoUsages].[DTS],
- [RoUsages].[UserID],
- [RoUsages].[LastChanged],
- [RoUsages].[RODbID],
- [RODbs].[ROName] [RODb_ROName],
- [RODbs].[FolderPath] [RODb_FolderPath],
- [RODbs].[DBConnectionString] [RODb_DBConnectionString],
- [RODbs].[Config] [RODb_Config],
- [RODbs].[DTS] [RODb_DTS],
- [RODbs].[UserID] [RODb_UserID]
- FROM [RoUsages]
- JOIN [RODbs] ON
- [RODbs].[RODbID]=[RoUsages].[RODbID]
- WHERE
- [RoUsages].[ContentID]=@ContentID
-
-
- SELECT
- [Transitions].[TransitionID],
- [Transitions].[FromID],
- [Transitions].[ToID],
- [Transitions].[RangeID],
- [Transitions].[IsRange],
- [Transitions].[TranType],
- [Transitions].[Config],
- [Transitions].[DTS],
- [Transitions].[UserID],
- [Transitions].[LastChanged],
- [Items_RangeID].[PreviousID] [Item_RangeID_PreviousID],
- [Items_RangeID].[ContentID] [Item_RangeID_ContentID],
- [Items_RangeID].[DTS] [Item_RangeID_DTS],
- [Items_RangeID].[UserID] [Item_RangeID_UserID],
- [Items_ToID].[PreviousID] [Item_ToID_PreviousID],
- [Items_ToID].[ContentID] [Item_ToID_ContentID],
- [Items_ToID].[DTS] [Item_ToID_DTS],
- [Items_ToID].[UserID] [Item_ToID_UserID]
- FROM [Transitions]
- LEFT JOIN [Items] [Items_RangeID] ON
- [Items_RangeID].[ItemID]=[Transitions].[RangeID]
- LEFT JOIN [Items] [Items_ToID] ON
- [Items_ToID].[ItemID]=[Transitions].[ToID]
- WHERE
- [Transitions].[FromID]=@ContentID
-
-
- SELECT
- [ZContents].[ContentID],
- [ZContents].[OldStepSequence],
- [ZContents].[LastChanged]
- FROM [ZContents]
- WHERE
- [ZContents].[ContentID]=@ContentID
-
- RETURN
-GO
-
-
diff --git a/PROMS/DataLoader/PrivateProfile.cs b/PROMS/DataLoader/PrivateProfile.cs
deleted file mode 100644
index 14c090a0..00000000
--- a/PROMS/DataLoader/PrivateProfile.cs
+++ /dev/null
@@ -1,285 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-
-using System;
-using System.IO;
-using System.Xml;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Drawing;
-using VEPROMS.CSLA.Library;
-
-namespace Config
-{
- ///
- /// PrivateProfile opens a private profile string and stores it's contents in an xml document.
- ///
- public class PrivateProfile
- {
- #region Log4Net
- private static readonly log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- #endregion
-
- private string ppName;
- private XmlDocument ppXml;
- private List attr;
- private List ele;
-
- private XmlNode AddNode(XmlNode xParent, string sName, string sValue )
- {
- XmlNode nd=AddNode(xParent,sName);
- nd.Value=sValue;
- return nd;
- }
- private XmlNode AddNode(XmlNode xParent, string sName)
- {
- XmlNode nd;
- // Add a node
- string tsName = sName.Replace(' ', '_').Replace("applicability", "Applicability").Replace("unit", "Unit");
- nd=xParent.OwnerDocument.CreateNode(System.Xml.XmlNodeType.Element,tsName,"");
- xParent.AppendChild(nd);
- return nd;
- }
- private void AddAttribute(XmlNode xParent, string sName, string sValue)
- {
- XmlNode xa = xParent.Attributes.GetNamedItem(sName);
- // bug fix. 09/15/03
- // If there was a space after an equal sign, that space character
- // was becomming part of the value string (reading the user.CFG file).
- // This was giving us a "Must have semi-colon" error message.
- // We now strip spaces before and after any Attribute that is written.
- sValue = sValue.Trim(' ');
- sName = sName.Replace(' ', '_');
- sName = sName.Replace("\\", "_slash_");
- sName = sName.Replace("/", "_fslash_");
-
- if (xParent.Name == "color")
- {
- string[] parts = sValue.Split(",".ToCharArray());
- sValue = ColorConfig.FindKnownColor(int.Parse(parts[0]), int.Parse(parts[1]), int.Parse(parts[2])).ToString();
- }
- // Add an attribute
- if (sValue == "")
- {
- if (xa != null)
- {
- xParent.Attributes.RemoveNamedItem(sName);
- }
- }
- else
- {
- if (xa == null)
- {
- xa = xParent.OwnerDocument.CreateNode(System.Xml.XmlNodeType.Attribute, sName, "");
- xParent.Attributes.SetNamedItem(xa);
- }
- xa.Value = sValue;
- }
-
- }
- private XmlNode AddSection(XmlNode xParent, string sSection)
- {
- // get the name. If it's not in the 'migrated elements' list, then
- // preface the name with a 'z'.
- string elename = sSection.Substring(1, sSection.IndexOf("]") - 1);
- while(elename.IndexOf(' ')>-1) elename = elename.Remove(elename.IndexOf(' '),1);
- if (!ele.Contains(elename.ToLower())) elename = 'z' + elename;
- elename = elename.Replace("\\", "_slash_");
- // Add a section [name]
- XmlNode nd = AddNode(xParent, elename);
- //AddAttribute(nd,"name",sSection.Substring(1,sSection.IndexOf("]")-1));
- return nd;
- }
- private XmlNode AddSection_UC(XmlNode xParent, string sSection )
- {
- // Add a section [name]
- string name_uc = sSection.Substring(1,sSection.IndexOf("]")-1).ToUpper() + "__UC";
- XmlNode nd =AddNode(xParent,name_uc);
- // AddAttribute(nd,"name",name_uc);
- return nd;
- }
- private void AddComment(XmlNode xParent, string sComment)
- {
-
- if(xParent.ChildNodes.Count > 0)
- {
- XmlNode ndlast=xParent.ChildNodes.Item(xParent.ChildNodes.Count-1);
- if(ndlast.Name=="comment")
- {
- XmlNode xa = ndlast.Attributes.GetNamedItem("text");
- xa.Value=xa.Value + "\r\n" + sComment;
- return;
- }
- }
- // Add a comment text
- XmlNode nd =AddNode(xParent,"comment");
- AddAttribute(nd,"text",sComment);
- }
- private void AddLine(XmlNode xParent, string sLine)
- {
- // Add a comment text
- XmlNode nd =AddNode(xParent,"line");
- AddAttribute(nd,"text",sLine);
- }
- private void AddParam(XmlNode xParent, string sParam)
- {
- int i = sParam.IndexOf("=");
- // get the name. If it's not in the 'migrated attribute' list, then
- // preface the name with a 'z'.
- string attrname = sParam.Substring(0, i);
- while (attrname.IndexOf(' ') > -1) attrname = attrname.Remove(attrname.IndexOf(' '), 1);
- if (!attr.Contains(attrname.ToLower())) attrname = 'z' + attrname;
- string sValue=sParam.Substring(i+1);
- string sName = attrname.Trim(' ');
- sName = sName.Replace("id", "ID").Replace("name", "Name").Replace("number", "Number").Replace("text", "Text").Replace("other", "Other").Replace("masterdir","MasterDir");
- AddAttribute(xParent, sName, sValue);
- }
- private void AddParam_UC(XmlNode xParent, string sParam)
- {
- int i = sParam.IndexOf("=");
- // add a param name=value
- string sName=sParam.Substring(0,i);
- string sValue=sParam.Substring(i+1);
- //XmlNode nd =AddNode(xParent,"paramUC");
- sName = sName.Trim(' ');
- AddAttribute(xParent, sName, sValue);
- //AddAttribute(nd,"name",sName.ToUpper()+"__UC");
- //AddAttribute(nd,"value",sValue);
- }
- private void LoadXML()
- {
- string sLine;
- ppXml.LoadXml("");// initialize ppXml
- XmlNode xmlTop=ppXml.DocumentElement;
- XmlNode xmlNd=ppXml.DocumentElement;
- //XmlNode xmlNd_UC=ppXml.DocumentElement;
- StreamReader myReader = new StreamReader(ppName);// Open file
- while( (sLine = myReader.ReadLine())!= null)// read line-by-line
- {
- // add structure
- try
- {
- if (sLine.Length > 0)
- {
- switch (sLine.Substring(0, 1))
- {
- case "[":
- xmlNd = AddSection(xmlTop, sLine);
- //xmlNd_UC=AddSection_UC(xmlTop, sLine);
- break;
- case ";":
- //AddComment(xmlNd, sLine);
- break;
- default:
- if (sLine.IndexOf("=") >= 0)
- {
- AddParam(xmlNd, sLine);
- //AddParam_UC(xmlNd_UC, sLine);
- }
- else
- {
- //AddLine(xmlNd, sLine);
- }
- break;
- }
- }
- }
- catch (Exception ex)
- {
- log.ErrorFormat("error parsing .INI file: {0} - Directory: {1}", ex.Message,ppName);
- }
- }
- myReader.Close();
- }
- public PrivateProfile(string sFileName, List listIni_EleName, List listIni_AttrName)
- {
- ppName=sFileName;
- ppXml= new XmlDocument();
- attr = listIni_AttrName;
- ele = listIni_EleName;
- LoadXML();
- }
- ~PrivateProfile()
- {
- // Clean-up
- //
- }
- public string PrettyNode(XmlNode nd,int level)
- {
- string retval="";
- string prefix=new string(' ',level*2);
- if(nd.ChildNodes.Count > 0)
- {
- retval = prefix + "<" + nd.Name;
- for(int i=0;i";
- for(int i=0;i";
- }
- else
- {
- retval = prefix + "<" + nd.Name;
- for(int i=0;i";
- }
- return retval;
- }
- public string PrettyXML()
- {
- return PrettyNode(ppXml.DocumentElement,0);
- }
- public XmlDocument XML()
- {
- // return XML Document
- return ppXml;
- }
- public override string ToString()
- {
- // return string
- return "";
- }
- public void Save()
- {
- SaveAs(ppName);
- }
- public void SaveAs(string sName)
- {
- }
- public string Attr(string sPath)
- {
- string retval="";
- XmlNode xn = ppXml.SelectSingleNode(sPath);
- if(xn != null)
- {
- string quots = xn.Value;
- if (quots.Substring(0,1)=="\"" && quots.Substring(quots.Length-1,1)=="\"")
- retval = quots.Substring(1,quots.Length-2);
- else
- retval=xn.Value;
- }
- return retval;
- }
-
- public string Attr(string sSection, string sParameter)
- {
- string findstr = "/ini/sectionUC[@name='" + sSection.ToUpper() + "__UC']/paramUC[@name='" + sParameter.ToUpper() + "__UC']/@value";
- return Attr(findstr);
- }
- }
-}
diff --git a/PROMS/DataLoader/PrivateProfile.cs.bak b/PROMS/DataLoader/PrivateProfile.cs.bak
deleted file mode 100644
index 206849d5..00000000
--- a/PROMS/DataLoader/PrivateProfile.cs.bak
+++ /dev/null
@@ -1,284 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-
-using System;
-using System.IO;
-using System.Xml;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Drawing;
-using VEPROMS.CSLA.Library;
-
-namespace Config
-{
- ///
- /// PrivateProfile opens a private profile string and stores it's contents in an xml document.
- ///
- public class PrivateProfile
- {
- #region Log4Net
- private static readonly log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- #endregion
-
- private string ppName;
- private XmlDocument ppXml;
- private List attr;
- private List ele;
-
- private XmlNode AddNode(XmlNode xParent, string sName, string sValue )
- {
- XmlNode nd=AddNode(xParent,sName);
- nd.Value=sValue;
- return nd;
- }
- private XmlNode AddNode(XmlNode xParent, string sName)
- {
- XmlNode nd;
- // Add a node
- string tsName = sName.Replace(' ', '_').Replace("applicability", "Applicability").Replace("unit", "Unit");
- nd=xParent.OwnerDocument.CreateNode(System.Xml.XmlNodeType.Element,tsName,"");
- xParent.AppendChild(nd);
- return nd;
- }
- private void AddAttribute(XmlNode xParent, string sName, string sValue)
- {
- XmlNode xa = xParent.Attributes.GetNamedItem(sName);
- // bug fix. 09/15/03
- // If there was a space after an equal sign, that space character
- // was becomming part of the value string (reading the user.CFG file).
- // This was giving us a "Must have semi-colon" error message.
- // We now strip spaces before and after any Attribute that is written.
- sValue = sValue.Trim(' ');
- sName = sName.Replace(' ', '_');
- sName = sName.Replace("\\", "_slash_");
- sName = sName.Replace("/", "_fslash_");
- if (xParent.Name == "color")
- {
- string[] parts = sValue.Split(",".ToCharArray());
- sValue = ColorConfig.FindKnownColor(int.Parse(parts[0]), int.Parse(parts[1]), int.Parse(parts[2])).ToString();
- }
- // Add an attribute
- if (sValue == "")
- {
- if (xa != null)
- {
- xParent.Attributes.RemoveNamedItem(sName);
- }
- }
- else
- {
- if (xa == null)
- {
- xa = xParent.OwnerDocument.CreateNode(System.Xml.XmlNodeType.Attribute, sName, "");
- xParent.Attributes.SetNamedItem(xa);
- }
- xa.Value = sValue;
- }
-
- }
- private XmlNode AddSection(XmlNode xParent, string sSection)
- {
- // get the name. If it's not in the 'migrated elements' list, then
- // preface the name with a 'z'.
- string elename = sSection.Substring(1, sSection.IndexOf("]") - 1);
- while(elename.IndexOf(' ')>-1) elename = elename.Remove(elename.IndexOf(' '),1);
- if (!ele.Contains(elename.ToLower())) elename = 'z' + elename;
- elename = elename.Replace("\\", "_slash_");
- // Add a section [name]
- XmlNode nd = AddNode(xParent, elename);
- //AddAttribute(nd,"name",sSection.Substring(1,sSection.IndexOf("]")-1));
- return nd;
- }
- private XmlNode AddSection_UC(XmlNode xParent, string sSection )
- {
- // Add a section [name]
- string name_uc = sSection.Substring(1,sSection.IndexOf("]")-1).ToUpper() + "__UC";
- XmlNode nd =AddNode(xParent,name_uc);
- // AddAttribute(nd,"name",name_uc);
- return nd;
- }
- private void AddComment(XmlNode xParent, string sComment)
- {
-
- if(xParent.ChildNodes.Count > 0)
- {
- XmlNode ndlast=xParent.ChildNodes.Item(xParent.ChildNodes.Count-1);
- if(ndlast.Name=="comment")
- {
- XmlNode xa = ndlast.Attributes.GetNamedItem("text");
- xa.Value=xa.Value + "\r\n" + sComment;
- return;
- }
- }
- // Add a comment text
- XmlNode nd =AddNode(xParent,"comment");
- AddAttribute(nd,"text",sComment);
- }
- private void AddLine(XmlNode xParent, string sLine)
- {
- // Add a comment text
- XmlNode nd =AddNode(xParent,"line");
- AddAttribute(nd,"text",sLine);
- }
- private void AddParam(XmlNode xParent, string sParam)
- {
- int i = sParam.IndexOf("=");
- // get the name. If it's not in the 'migrated attribute' list, then
- // preface the name with a 'z'.
- string attrname = sParam.Substring(0, i);
- while (attrname.IndexOf(' ') > -1) attrname = attrname.Remove(attrname.IndexOf(' '), 1);
- if (!attr.Contains(attrname.ToLower())) attrname = 'z' + attrname;
- string sValue=sParam.Substring(i+1);
- string sName = attrname.Trim(' ');
- sName = sName.Replace("id", "ID").Replace("name", "Name").Replace("number", "Number").Replace("text", "Text").Replace("other", "Other").Replace("masterdir","MasterDir");
- AddAttribute(xParent, sName, sValue);
- }
- private void AddParam_UC(XmlNode xParent, string sParam)
- {
- int i = sParam.IndexOf("=");
- // add a param name=value
- string sName=sParam.Substring(0,i);
- string sValue=sParam.Substring(i+1);
- //XmlNode nd =AddNode(xParent,"paramUC");
- sName = sName.Trim(' ');
- AddAttribute(xParent, sName, sValue);
- //AddAttribute(nd,"name",sName.ToUpper()+"__UC");
- //AddAttribute(nd,"value",sValue);
- }
- private void LoadXML()
- {
- string sLine;
- ppXml.LoadXml("");// initialize ppXml
- XmlNode xmlTop=ppXml.DocumentElement;
- XmlNode xmlNd=ppXml.DocumentElement;
- //XmlNode xmlNd_UC=ppXml.DocumentElement;
- StreamReader myReader = new StreamReader(ppName);// Open file
- while( (sLine = myReader.ReadLine())!= null)// read line-by-line
- {
- // add structure
- try
- {
- if (sLine.Length > 0)
- {
- switch (sLine.Substring(0, 1))
- {
- case "[":
- xmlNd = AddSection(xmlTop, sLine);
- //xmlNd_UC=AddSection_UC(xmlTop, sLine);
- break;
- case ";":
- //AddComment(xmlNd, sLine);
- break;
- default:
- if (sLine.IndexOf("=") >= 0)
- {
- AddParam(xmlNd, sLine);
- //AddParam_UC(xmlNd_UC, sLine);
- }
- else
- {
- //AddLine(xmlNd, sLine);
- }
- break;
- }
- }
- }
- catch (Exception ex)
- {
- log.Error("error parsing .INI file:", ex);
- }
- }
- myReader.Close();
- }
- public PrivateProfile(string sFileName, List listIni_EleName, List listIni_AttrName)
- {
- ppName=sFileName;
- ppXml= new XmlDocument();
- attr = listIni_AttrName;
- ele = listIni_EleName;
- LoadXML();
- }
- ~PrivateProfile()
- {
- // Clean-up
- //
- }
- public string PrettyNode(XmlNode nd,int level)
- {
- string retval="";
- string prefix=new string(' ',level*2);
- if(nd.ChildNodes.Count > 0)
- {
- retval = prefix + "<" + nd.Name;
- for(int i=0;i";
- for(int i=0;i";
- }
- else
- {
- retval = prefix + "<" + nd.Name;
- for(int i=0;i";
- }
- return retval;
- }
- public string PrettyXML()
- {
- return PrettyNode(ppXml.DocumentElement,0);
- }
- public XmlDocument XML()
- {
- // return XML Document
- return ppXml;
- }
- public override string ToString()
- {
- // return string
- return "";
- }
- public void Save()
- {
- SaveAs(ppName);
- }
- public void SaveAs(string sName)
- {
- }
- public string Attr(string sPath)
- {
- string retval="";
- XmlNode xn = ppXml.SelectSingleNode(sPath);
- if(xn != null)
- {
- string quots = xn.Value;
- if (quots.Substring(0,1)=="\"" && quots.Substring(quots.Length-1,1)=="\"")
- retval = quots.Substring(1,quots.Length-2);
- else
- retval=xn.Value;
- }
- return retval;
- }
-
- public string Attr(string sSection, string sParameter)
- {
- string findstr = "/ini/sectionUC[@name='" + sSection.ToUpper() + "__UC']/paramUC[@name='" + sParameter.ToUpper() + "__UC']/@value";
- return Attr(findstr);
- }
- }
-}
diff --git a/PROMS/DataLoader/Procedures.cs b/PROMS/DataLoader/Procedures.cs
deleted file mode 100644
index 002295ae..00000000
--- a/PROMS/DataLoader/Procedures.cs
+++ /dev/null
@@ -1,605 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- #region Log4Net
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- //public static readonly log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- #endregion
- public static int HandleCount
- {
- get { return System.Diagnostics.Process.GetCurrentProcess().HandleCount; }
- }
- private bool RunWithDB2K = false;
- private Item MigrateProcedure(OleDbConnection cn, DataRow dr, Item FromItem, string pth, DocVersion docver, bool convertProcedures, FormatInfo activeFormat)
- {
- dicOldStepSequence = new Dictionary();
- Stack SubSectLevels = new Stack(); // levels of subsections
- ProcFileName = dr["Entry"].ToString();
- ProcNumber = dr["Number"].ToString();
- frmMain.Status = "Processing Procedure " + ProcNumber + " - " + ProcFileName;
- GC.Collect();
- frmMain.AddInfo("Processing Procedure {0} {1}", ProcNumber, GC.GetTotalMemory(true));
- //frmMain.MyInfo = CSLACache.UsageNotFinalized;
-
-
- DateTime dts = GetDTS(dr["Date"].ToString(), dr["Time"].ToString());
- string userid = dr["initials"].ToString().Trim();
- if (userid == null || userid == "") userid = "Migration";
-
- ConfigInfo ci = null;
- string tstr = dr["Proccode"].ToString();
- if (tstr != null && tstr != "")
- {
- ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "ProcCode", tstr);
- }
- //load revdate
- string tstr2 = dts.ToString("MM/dd/yyyy");
- if (tstr2 != null && tstr2 != "")
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "RevDate", tstr2);
- }
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("History", "ProcName", ProcFileName.ToUpper());
-
- // Load in format data, i.e. default number of columns:
- string tstr1 = dr["Format"].ToString();
- if (tstr1 != null && tstr1 != "")
- {
- switch (tstr1)
- {
- case "1":
- case "2":
- case "3":
- case "4":
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Format", "Columns", tstr1);
- break;
- default:
- break;
- }
- }
- // try to load in fix file data:
- FileInfo fi = new FileInfo(pth + @"\" + ProcFileName + @".fix");
- if (fi.Exists)
- {
- FixItems fixItems = new FixItems(fi);
- if (fixItems.Count > 0)
- {
- if (ci == null) ci = new ConfigInfo(null);
- if (fixItems[0].Rev != null && fixItems[0].Rev != "") ci.AddItem("Procedure", "Rev", fixItems[0].Rev);
- if (fixItems[0].RevDate != null && fixItems[0].RevDate != "") ci.AddItem("Procedure", "RevDate", fixItems[0].RevDate);
- if (fixItems[0].ReviewDate != null && fixItems[0].ReviewDate != "") ci.AddItem("Procedure", "ReviewDate", fixItems[0].ReviewDate);
- }
- }
- fi = new FileInfo(pth + @"\" + ProcFileName + @".apl");
- if (fi.Exists)
- {
- MyProcAPL = GetApple(fi.FullName);
- }
- // check that there is a "Series" column, i.e. the 10th column, some datasets
- // may not have it, for example vetuec\master.sl1
- if (dr.ItemArray.Length > 10)
- {
- tstr = dr["Series"].ToString();
- if (tstr != null && tstr != "")
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "Series", tstr);
- }
- }
- if (docver.DocVersionConfig.Unit_Count > 1)
- {
- for (int i = 1; i <= docver.DocVersionConfig.Unit_Count; i++)
- {
- ci.AddSlaveNode(i);
- docver.DocVersionConfig.SelectedSlave = i;
- string un = ".SL" + docver.DocVersionConfig.Old_Index;
-
- string mupth = pth.Replace(".prc", un);
- fi = new FileInfo(mupth + @"\" + ProcFileName + @".fix");
- if (fi.Exists)
- {
- FixItems fixItems = new FixItems(fi);
- if (fixItems.Count > 0)
- {
- if (fixItems[0].Rev != null && fixItems[0].Rev != "")
- ci.AddSlaveItem(i, "Rev", fixItems[0].Rev);
- else
- ci.AddSlaveItem(i, "Rev", "");
- if (fixItems[0].RevDate != null && fixItems[0].RevDate != "")
- ci.AddSlaveItem(i, "RevDate", fixItems[0].RevDate);
- else
- ci.AddSlaveItem(i, "RevDate", "");
- if (fixItems[0].ReviewDate != null && fixItems[0].ReviewDate != "")
- ci.AddSlaveItem(i, "ReviewDate", fixItems[0].ReviewDate);
- else
- ci.AddSlaveItem(i, "ReviewDate", "");
- }
- }
- else
- {
- ci.AddSlaveItem(i, "Rev", "");
- ci.AddSlaveItem(i, "RevDate", "");
- ci.AddSlaveItem(i, "ReviewDate", "");
- }
- }
- }
- DataSet ds = new DataSet();
- DataTable dt = null;
-
- // check that file exists, i.e. if proc file doesn't exist but has entry in set
- // file, flag error, but continue.
- string fname = pth + "\\" + dr["entry"] + ".dbf";
- if (File.Exists(fname))
- {
- // if the dbt is bad, fix it.
- DbtOk(dr["entry"].ToString(), pth);
- // See if there is PSI and if so, add it to the xml.
- OleDbDataAdapter dapsi = new OleDbDataAdapter("select * from [" + dr["entry"] + "] where [STEP] is null", cn);
- int handleBefore = HandleCount;
- TryToLoadDataSet(ds, fname, dapsi);
- int handleAfter = HandleCount;
- if (!RunWithDB2K && handleAfter - handleBefore > 10)
- {
- string msg = "It appears that handles are being created and not cleared.";
- if (dB2KInstalled())
- {
- msg += "\r\n\r\nThis is most likely because dB2K is installed." +
- "\r\n\r\nUninstall dB2K and run again.";
- if (MessageBox.Show(msg + "\r\n\r\nDo you want to continue?", "Run with dB2K",
- MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
- RunWithDB2K = true;
- }
- else
- {
- msg += "\r\n\r\nCall Volian for support.";
- }
- if (!RunWithDB2K) throw new Exception(msg);
- }
- dt = ds.Tables[0];
-
- if (dt.Rows.Count > 0)
- {
- DataRow drpsi = dt.Rows[0];
- string psistr = drpsi["TEXTM"].ToString();
- try
- {
- if (psistr != null && psistr != "")
- {
- StringReader strrd = new StringReader(psistr);
-
- string sLine;
- if (ci == null) ci = new ConfigInfo(null);
- while ((sLine = strrd.ReadLine()) != null)
- {
- int indx = sLine.IndexOf(' ');
- string nm = null;
- string vl = null;
- if (indx < 0)
- nm = sLine;
- else
- {
- nm = sLine.Substring(0, indx);
- string tmpPsi = sLine.Substring(indx + 1, sLine.Length - indx - 1);
- if (tmpPsi.Length > 0) tmpPsi = TextConvert.ConvertText(tmpPsi);
- vl = tmpPsi;
- }
- ci.AddItem("PSI", nm, vl == null ? null : vl);
- }
- }
- }
- catch(Exception ex)
- {
- log.Warn("Failure during PSI", ex);
- }
- }
- dapsi.Dispose();
- }
- else // log an error
- {
- log.ErrorFormat("Missing DBF: {0}", fname);
- }
-
- // Note, for now the data from the format field will be saved. Later, xpath, ??
- EditSectId = 0;
-
- // See if no caret convert...
- //FormatInfo docverFormat = docver.MyDocVersionInfo.ActiveFormat;
- bool do_cvt = activeFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta;//docverFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta;
- // pass in a 0 on MakeContent for type of procedure, i.e. procedure = 0 (on type field)
-
- // can we save itm.ItemID in a dictionary of outside trans? ex: otrans("vehlp\procs\0POP05-EO00",itm.ItemID)?
- Content cont = null;
- Item itm = null;
- string dicNumber = dr["Number"].ToString();
- string number = TextConvert.ConvertText(dr["Number"].ToString());
- frmMain.UpdateLabels(1, 0, 0);
- //Console.WriteLine("number {0}", number);
- //Console.WriteLine("Item Key {0} List {1}", Item.CacheCountPrimaryKey, Item.CacheCountList);
- //Console.WriteLine("ItemInfo Key {0} List {1}", ItemInfo.CacheCountPrimaryKey, ItemInfo.CacheCountList);
- DocVersionInfo dvi = DocVersionInfo.Get(docver.VersionID);
- dvi.ResetProcedures(); // need this to clear out Procedures so that they are retrieved (resolves a caching problem)
- foreach (ItemInfo ii in dvi.Procedures)
- {
- if (ii.MyContent.Number == number)
- {
- //Console.WriteLine(number);
- itm = ii.Get();
- cont = ii.MyContent.Get();
- break;
- }
- }
- if (!convertProcedures || (docver.VersionType != (int)VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft && docver.VersionType != (int)VEPROMS.CSLA.Library.VersionTypeEnum.Approved))
- {
- // if this procedure already exists for this docversion, just use it.
- if (itm == null && cont == null)
- {
- cont = Content.New(number, TextConvert.ConvertText(dr["Title"].ToString(), do_cvt), 0, null, ci == null ? null : ci.ToString(), dts, userid);
- itm = Item.MakeItem(FromItem, cont, dts, userid);
- }
- }
- if (convertProcedures /* && number == "001\\u8209?007"/* && number == "0POP05-EO-EC00"*/)
- {
- OleDbDataAdapter da = new OleDbDataAdapter("select * from [" + dr["entry"] + "] where sequence like ' %' and [STEP] is not null", cn);
- try
- {
- dicTrans_ItemDone[dicNumber] = itm; // will be null if only doing procs & no sections, etc.
- LoadSection(ds, da, dr["entry"].ToString());
- da.SelectCommand.CommandText = "select * from [" + dr["entry"] + "] where step not like ' ' and sequence not like ' %'";
- da.Fill(ds, "Steps");
- dt = ds.Tables["Steps"];
- dt.CaseSensitive = true;
- ds.Tables["Steps"].CaseSensitive = true;
- dt.Columns.Add("CStep", System.Type.GetType("System.String"));
- dt.Columns.Add("CSequence", System.Type.GetType("System.String"));
- // set the cstep & csequence - couldn't do it in the add because it needed a sql function
- foreach (DataRow drw in ds.Tables["Steps"].Rows)
- {
- drw["CStep"] = TextConvert.ConvertSeq(drw["Step"].ToString());
- drw["CSequence"] = TextConvert.ConvertSeq(drw["Sequence"].ToString());
- }
- dt.Columns.Add("StepNo", System.Type.GetType("System.Int32"), "Convert(Convert(Substring(CStep,2,1),'System.Char'),'System.Int32')-48");
- dt.Columns.Add("Level", System.Type.GetType("System.Int32"), "Len(CSequence)");
- dt.Columns.Add("SubStepNo", System.Type.GetType("System.Int32"), "Convert(Convert(Substring(CSequence,Len(CSequence),1),'System.Char'),'System.Int32')-48");
- }
- catch (Exception ex)
- {
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- log.Error(ex.StackTrace);
- frmMain.AddError(ex, "MigrateProcedure - {0}", ProcFileName);
- }
- da.Dispose();
- // dicSecCount is dictionary to track number of subsections for the parent at a level
- // dicSecID is the parent at that level
- Dictionary dicSecCount = new Dictionary();
- Dictionary dicSecParentItem = new Dictionary();
- frmMain.pbSectMaximum = ds.Tables["Sections"].Rows.Count;
- frmMain.pbSectValue = 0;
-
- DataTable dtsect = ds.Tables["Sections"];
- dtsect.CaseSensitive = true;
- DataView dv = new DataView(dtsect, "", "locb", DataViewRowState.CurrentRows);
- Item SectItm = null;
- int level = 0;
- bool addpart = true;
- Item parentitem = itm;
- //if (ProcNumber == "001-002")
- // Console.WriteLine("proc 001-002");
- foreach (DataRowView drw in dv)
- {
- //if (ProcNumber == "016-001") //"017-001") //"082-002AB")
- // Console.WriteLine("016-001"); //("017-001"); //"082-002AB");
-
- // If there is a '~' in step[1] and the sequence number is blank, the this record
- // is a multiline section title. Skip it from processing the section. This record
- // will get read in the section code to get the section title.
- string sequence = drw["CSequence"].ToString().PadRight(10);
- string step = drw["CStep"].ToString();
- if (step[1]=='~' && sequence[1]==' ') break;
- bool hasSubSects = (sequence[5] != ' ' && sequence[5] != '0');
- SectItm = MigrateSection(parentitem, ProcNumber, cn, drw, ds.Tables["Steps"], SectItm, hasSubSects, pth, docver, activeFormat, addpart ? cont : null);
- addpart = false;
- // if no children, add first child (cont)
- //if (addpart)
- //{
- // // ContentsParts.Add can use 'fromtype', item - fromtype here = 2, section
- // cont.ContentParts.Add(2, SectItm);
- // if (cont.MyZContent.OldStepSequence == null || cont.MyZContent.OldStepSequence == "") cont.MyZContent.OldStepSequence = ProcNumber;
- // if (!cont.IsSavable) ErrorRpt.ErrorReport(cont);
- // cont.Save();
- // addpart = false;
- //}
- //FrType = 0;
- //Console.WriteLine("'before',{0},{1},{2},{3}", SectItm == null ? "" : SectItm.DisplayNumber, parentitem.DisplayNumber, level, dicSecCount.Count > 0 ? dicSecCount[level] : 0);
- dicSecParentItem[level] = SectItm;
- int subSecs = drw["Sequence"].ToString().PadRight(12, ' ')[5] - 48;
- if (level > 0)
- {
- dicSecCount[level]--; // decrements number of sections to process
- }
- if (subSecs > 0)
- {
- dicSecCount[++level] = subSecs;
- cont = SectItm.MyContent;
- parentitem = SectItm;
- addpart = true;
- SectItm = null; // no previous sibling for the first child node.
- }
- if (level > 0)
- {
- while (level > 0 && dicSecCount[level] == 0)
- {
- // shift up a level, i.e. give me the parent for the previous level
- dicSecCount.Remove(level);
- SectItm = dicSecParentItem[--level];
- if (level > 0)
- parentitem = dicSecParentItem[level - 1];
- else
- parentitem = itm;
- }
- }
- //Console.WriteLine("'after',{0},{1},{2},{3}", SectItm == null ? "" : SectItm.DisplayNumber, parentitem.DisplayNumber, level, dicSecCount.Count > 0 ? dicSecCount[level] : 0);
- }
- dv.Dispose();
- //foreach (Item secItm in dicSecParentItem.Values)
- // secItm.Dispose();
- // need section start
- if (EditSectId != 0)
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "SectionStart", string.Format("{0}", EditSectId));
- itm.MyContent.Config = (ci == null) ? null : ci.ToString();
- if (!itm.IsSavable) ErrorRpt.ErrorReport(itm);
- itm.Save();
- }
- }
- ds.Dispose();
-
- // if there are any floating foldouts & associated steps, set config on steps for foldout association.
- // the free the lists for the next procedure:
- if (FoldoutStpSeq != null && FoldoutStpSeq.Count>0)
- {
- string cmd = "SELECT * FROM [tran] WHERE [FROMNUMBER]='" + ProcNumber.Replace("'", "''") + "' AND [TYPE] ='R'";
- OleDbDataAdapter da = new OleDbDataAdapter(cmd, cn);
- // get transition records for this step.
- ds = new DataSet();
- try
- {
- da.Fill(ds);
- DataTable dtt = ds.Tables[0];
- dtt.CaseSensitive = true;
- Dictionary stpFoldSeq = new Dictionary();
- foreach (DataRow drt in dtt.Rows)
- {
- // get from/to seq, subtract off '0' to get stepnumber.
- // The 'oldto' field stores which foldout section these steps go
- // to. However, if reset, the 'oldto' may not contain a reference
- // to a foldout, i.e. may contain 'junk' data. Only add the
- // reference to the dictionary if it's a foldout.
- int fromStep = TextConvert.ConvertSeq(drt["FROMSEQUEN"].ToString())[1] - '0';
- int toStep = TextConvert.ConvertSeq(drt["TOSEQUENCE"].ToString())[1] - '0';
- string foldSeq = drt["OLDTO"].ToString().Substring(0, 2);
- if (foldSeq[1] == 'F')
- {
- for (int istp = fromStep; istp <= toStep; istp++)
- stpFoldSeq.Add(istp, foldSeq);
- }
- }
- ds.Dispose();
- da.Dispose();
- // now read in the HLS's and set their config to the appropriate foldout.
- // stpFoldSeq contains 16 bit step to foldout associations, i.e. an integer step
- // number (ordinal) and string sequence of foldout.
- // FloatingFoldoutHLS contains each 16bit ordinal step number (all steps, whether
- // they have a foldout or not) and the associated itemid in 32bit
- // FoldoutStpSeq contains all foldouts, i.e. the string representing the sequence
- // number if 16bit and the resulting 32bit itemid.
- foreach (KeyValuePair kvp in stpFoldSeq)
- {
- int hlsItemId = FloatingFoldoutHLS[kvp.Key-1]; // -1 for indexes starting at 0 (not 1)
- using (Item itmF = Item.Get(hlsItemId))
- {
- // be sure that the dictionaries contain the key.
- // Some data may be 'corrupt' and not have the appropriate linkages
- // to floating foldouts.
- if (FoldoutStpSeq.ContainsKey(kvp.Value))
- {
- int fldItemId = FoldoutStpSeq[kvp.Value];
- ConfigInfo ciFold = new ConfigInfo(itmF.MyContent.Config);
- ciFold.AddItem("Step", "FloatingFoldout", fldItemId.ToString());
- itmF.MyContent.Config = ciFold.ToString();
- itmF.Save();
- }
- }
- }
- }
- catch (Exception ex)
- {
- frmMain.AddError(ex, "Error resolving Floating Foldout Data '{0}'", ProcNumber);
- log.Error("Error resolving Floating Foldout Data");
- log.ErrorFormat("from number = {0}", ProcNumber);
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- ds.Dispose();
- da.Dispose();
- }
- }
- if (FoldoutStpSeq!=null) FoldoutStpSeq.Clear();
- if (FloatingFoldoutHLS!=null) FloatingFoldoutHLS.Clear();
- //Console.WriteLine("End MigrateProcedure number {0}", number);
- //Console.WriteLine("End MigrateProcedure Item Key {0} List {1}", Item.CacheCountPrimaryKey, Item.CacheCountList);
- //Console.WriteLine("End MigrateProcedure ItemInfo Key {0} List {1}", ItemInfo.CacheCountPrimaryKey, ItemInfo.CacheCountList);
- return itm;
- }
-
- private static void TryToLoadDataSet(DataSet ds, string fname, OleDbDataAdapter dapsi)
- {
- try
- {
- dapsi.Fill(ds);
- }
- catch (Exception ex)
- {
- FileInfo fi;
- switch (ex.Message)
- {
- case "Index file not found.":// then delete inf file
- fi = new FileInfo(fname.ToLower().Replace(".dbf",".inf"));
- fi.Delete();
- TryToLoadDataSet(ds, fname, dapsi); // Try again
- break;
- case "External table is not in the expected format.": // then pad dbt file with 128 zeros.
- fi = new FileInfo(fname.ToLower().Replace(".dbf", ".dbt"));
- FileStream fs = fi.OpenWrite();
- fs.Position = fs.Length;
- byte[] buf = new byte[128];
- for (int i = 0; i < 128; i++) buf[i] = 0;
- fs.Write(buf, 0, 128);
- fs.Close();
- TryToLoadDataSet(ds, fname, dapsi); // Try again
- break;
- default: // Unrecognized error
- Console.WriteLine(ex.Message);
- //Application.Exit();
- throw new Exception("Error in MigrateProcedure: " + fname, ex);
- }
- }
- }
- private bool dB2KInstalled()
- {
- Microsoft.Win32.RegistryKey key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey(@"software\dBase\dB2K");
- bool retval = key != null;
- if(key != null)key.Close();
- return retval;
- }
-
- // check for duplicate SET file data - jsj 2/11/10
- private bool OKtoProcessDBF(DataRow dr, string pth)
- {
- string pfn = dr["Entry"].ToString();
- string pn = dr["Number"].ToString();
- FileInfo fi = new FileInfo(pth + "\\" + pfn + ".dbf");
- if (!fi.Exists)
- {
- _MyLog.WarnFormat("Data file does not exist {0}", fi.FullName);
- frmMain.AddError("Data file does not exist {0}", fi.FullName);
- return false;
- }
- if (!dicSetfileEntries.ContainsValue(pfn) && !dicSetfileEntries.ContainsKey(pn))
- {
- dicSetfileEntries.Add(pn, pfn);
- return true;
- }
- return false;
- }
- private Item MigrateProcedures(OleDbConnection cn, string pth, DocVersion docver, bool convertProcedures, FormatInfo activeFormat)
- {
-
- Item FirstItm = docver.MyItem;// null;
- // Loop through Set File for each Procedure
- try
- {
- OleDbDataAdapter da = new OleDbDataAdapter("Select * from [set] where entry is not null", cn);
- DataSet ds = new DataSet();
- da.Fill(ds);
- Item FrItm = null;
- if (FirstItm != null)
- FrItm = ItemInfo.Get(FirstItm.ItemID).LastSibling.Get();
- frmMain.pbProcMaximum = ds.Tables[0].Rows.Count;
- frmMain.UpdateLabels(0, 0, 0);
- dicSetfileEntries = new Dictionary(); // used to check for duplicate SET file info - jsj 2/11/10
- int i = 0;
- frmMain.ShowSections = convertProcedures;
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- i++;
- if (i > frmMain.SkipProcedures && (frmMain.HowManyProcedures == 0|| i <= (frmMain.SkipProcedures + frmMain.HowManyProcedures) ))
- {
- if (OKtoProcessDBF(dr, pth)) // look for duplicate SET file info - jsj 2/11/10
- {
- List cacheContentInfo = ContentInfo.CacheList;
- List cacheItemInfo = ItemInfo.CacheList;
- List cacheEntryInfo = EntryInfo.CacheList;
- List cachePdfInfo = PdfInfo.CacheList;
- List cacheDocVersionInfo = DocVersionInfo.CacheList;
- List cachePartInfo = PartInfo.CacheList;
- frmMain.pbStepValue = 0;//Reset Step Count
- FrItm = MigrateProcedure(cn, dr, FrItm, pth, docver, convertProcedures, activeFormat);
- if (FirstItm == null) FirstItm = FrItm;
- //frmMain.MyInfo = string.Format("Before Restore {0}", GC.GetTotalMemory(true));
- ContentInfo.RestoreCacheList(cacheContentInfo);
- PartInfo.RestoreCacheList(cachePartInfo);
- ItemInfo.RestoreCacheList(cacheItemInfo);
- EntryInfo.RestoreCacheList(cacheEntryInfo);
- PdfInfo.RestoreCacheList(cachePdfInfo);
- DocVersionInfo.RestoreCacheList(cacheDocVersionInfo);
- //frmMain.MyInfo = string.Format("After Restore {0}", GC.GetTotalMemory(true));
- }
- }
- //GC.Collect();
- }
- ds.Dispose();
- da.Dispose();
- }
- catch (Exception ex)
- {
- _MyLog.ErrorFormat("MigrateProcedures - {0} - {1}\r\n\r\n{2}", pth,ex.Message, ex.InnerException);
- //throw new Exception("Error in MigrateProcedures: " + pth, ex);
- }
- frmMain.MyInfo = CSLACache.UsageAll;
- frmMain.AddInfo(Content.MyStack);
- frmMain.AddInfo(ContentInfo.MyStack);
- frmMain.AddInfo(DocVersionInfo.MyStack);
- return FirstItm;
- }
- private void DbtOk(string fname, string pth)
- {
- string dbtname = pth + "\\" + fname + ".dbt";
- if (File.Exists(dbtname))
- {
- // check if dbt is at least 512, if not append 508 bytes. This is to fix
- // a problem where dbts were created with only 4 bytes in the 16-bit code.
- // if only 4 bytes, ado.net gives an "External table not in expected format"
- // error
- FileInfo fi = new FileInfo(dbtname);
- if (fi.Length < 512)
- {
- FileStream fs = new FileStream(dbtname, FileMode.Open, FileAccess.Write, FileShare.ReadWrite);
- BinaryWriter bw = new BinaryWriter(fs);
- bw.Seek(0, SeekOrigin.End);
- byte[] wrBytes = new byte[512 - fi.Length];
- for (int i = 0; i < 512 - fi.Length; i++) wrBytes[i] = 0;
- wrBytes[4] = 0x02;
- bw.Write(wrBytes);
- bw.Close();
- }
- fi = null;
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/Procedures.cs.bak b/PROMS/DataLoader/Procedures.cs.bak
deleted file mode 100644
index bba624f5..00000000
--- a/PROMS/DataLoader/Procedures.cs.bak
+++ /dev/null
@@ -1,294 +0,0 @@
-// ========================================================================
-// Copyright 2006 - Volian Enterprises, Inc. All rights reserved.
-// Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
-// ------------------------------------------------------------------------
-// $Workfile: $ $Revision: $
-// $Author: $ $Date: $
-//
-// $History: $
-// ========================================================================
-using System;
-using System.Drawing;
-using System.Collections;
-using System.ComponentModel;
-using System.Windows.Forms;
-using System.Data;
-using System.Data.OleDb;
-using System.Collections.Specialized;
-using System.Collections.Generic;
-using System.Xml;
-using System.IO;
-using System.Text;
-using VEPROMS.CSLA.Library;
-
-namespace DataLoader
-{
- public partial class Loader
- {
- #region Log4Net
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- //public static readonly log4net.ILog log = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- #endregion
- private Item MigrateProcedure(OleDbConnection cn, DataRow dr, Item FromItem, string pth, DocVersion docver, bool convertProcedures)
- {
- dicOldStepSequence = new Dictionary();
- Stack SubSectLevels = new Stack(); // levels of subsections
- ProcFileName = dr["Entry"].ToString();
- ProcNumber = dr["Number"].ToString();
- DateTime dts = GetDTS(dr["Date"].ToString(), dr["Time"].ToString());
- string userid = dr["initials"].ToString().Trim();
- if (userid == null || userid == "") userid = "Migration";
-
- ConfigInfo ci = null;
- string tstr = dr["Proccode"].ToString();
- if (tstr != null && tstr != "")
- {
- ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "ProcCode", tstr);
- }
-
- // check that there is a "Series" column, i.e. the 10th column, some datasets
- // may not have it, for example vetuec\master.sl1
- if (dr.ItemArray.Length > 10)
- {
- tstr = dr["Series"].ToString();
- if (tstr != null && tstr != "")
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "Series", tstr);
- }
- }
-
- DataSet ds = new DataSet();
- DataTable dt = null;
-
- // check that file exists, i.e. if proc file doesn't exist but has entry in set
- // file, flag error, but continue.
- //string fname = frmMain.tbSourceText +"\\"+ dr["entry"] + ".dbf";
- string fname = pth + "\\" + dr["entry"] + ".dbf";
- if (File.Exists(fname))
- {
- // if the dbt is bad, fix it.
- DbtOk(dr["entry"].ToString(),pth);
- // See if there is PSI and if so, add it to the xml.
- OleDbDataAdapter dapsi = new OleDbDataAdapter("select * from [" + dr["entry"] + "] where [STEP] is null", cn);
- try
- {
- dapsi.Fill(ds);
- }
- catch (Exception ex)
- {
- Console.WriteLine(ex.Message);
- Application.Exit();
- }
- dt = ds.Tables[0];
-
- if (dt.Rows.Count > 0)
- {
- DataRow drpsi = dt.Rows[0];
- string psistr = drpsi["TEXTM"].ToString();
- if (psistr != null && psistr != "")
- {
- StringReader strrd = new StringReader(psistr);
-
- string sLine;
- if (ci == null) ci = new ConfigInfo(null);
- while ((sLine = strrd.ReadLine()) != null)
- {
- int indx = sLine.IndexOf(' ');
- string nm = null;
- string vl = null;
- if (indx < 0)
- nm = sLine;
- else
- {
- nm = sLine.Substring(0, indx);
- vl = sLine.Substring(indx + 1, sLine.Length - indx - 1);
- }
- ci.AddItem("PSI", nm, vl == null ? null : vl);
- }
- }
- }
- dapsi.Dispose();
- }
- else // log an error
- {
- log.ErrorFormat("Missing DBF: {0}", fname);
- }
-
- // Note, for now the data from the format field will be saved. Later, xpath, ??
- EditSectId = 0;
-
- // See if no caret convert...
- FormatInfo docverFormat = docver.MyDocVersionInfo.ActiveFormat;
- bool do_cvt = docverFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta;
- // pass in a 0 on MakeContent for type of procedure, i.e. procedure = 0 (on type field)
-
- // can we save itm.ItemID in a dictionary of outside trans? ex: otrans("vehlp\procs\0POP05-EO00",itm.ItemID)?
- Content cont = null;
- Item itm =null;
- string number = TextConvert.ConvertText(dr["Number"].ToString());
- frmMain.UpdateLabels(1, 0, 0);
- if (!convertProcedures || docver.VersionType != (int)VEPROMS.CSLA.Library.VersionTypeEnum.WorkingDraft)
- {
- cont = Content.New(number, TextConvert.ConvertText(dr["Title"].ToString(),do_cvt), 0, null, ci == null ? null : ci.ToString(), dts, userid);
- itm = Item.MakeItem(FromItem, cont, dts, userid);
- }
- else
- {
- DocVersionInfo dvi = DocVersionInfo.Get(docver.VersionID);
- foreach(ItemInfo ii in dvi.Procedures){
- if (ii.MyContent.Number == number)
- {
- Console.WriteLine(number);
- itm = ii.Get();
- cont = ii.MyContent.Get();
- }
- }
- }
- if (convertProcedures /*&& number == "0POP05\\u8209?EO\\u8209?ES32"*/) //0POP05\u8209?EO\u8209?ES32
- {
- OleDbDataAdapter da = new OleDbDataAdapter("select * from [" + dr["entry"] + "] where sequence like ' %'", cn);
- try
- {
- LoadSection(ds, da, dr["entry"].ToString());
- da.SelectCommand.CommandText = "select * from [" + dr["entry"] + "] where step not like ' ' and step not like '%~'";
- da.Fill(ds, "Steps");
- dt = ds.Tables["Steps"];
- dt.CaseSensitive = true;
- ds.Tables["Steps"].CaseSensitive = true;
- dt.Columns.Add("CStep", System.Type.GetType("System.String"));
- dt.Columns.Add("CSequence", System.Type.GetType("System.String"));
- // set the cstep & csequence - couldn't do it in the add because it needed a sql function
- foreach (DataRow drw in ds.Tables["Steps"].Rows)
- {
- drw["CStep"] = TextConvert.ConvertSeq(drw["Step"].ToString());
- drw["CSequence"] = TextConvert.ConvertSeq(drw["Sequence"].ToString());
- }
- dt.Columns.Add("StepNo", System.Type.GetType("System.Int32"), "Convert(Convert(Substring(CStep,2,1),'System.Char'),'System.Int32')-48");
- dt.Columns.Add("Level", System.Type.GetType("System.Int32"), "Len(CSequence)");
- dt.Columns.Add("SubStepNo", System.Type.GetType("System.Int32"), "Convert(Convert(Substring(CSequence,Len(CSequence),1),'System.Char'),'System.Int32')-48");
- }
- catch (Exception ex)
- {
- log.ErrorFormat("{0}\r\n\r\n{1}", ex.Message, ex.InnerException);
- log.Error(ex.StackTrace);
- }
- da.Dispose();
-
- // dicSecCount is dictionary to track number of subsections for the parent at a level
- // dicSecID is the parent at that level
- Dictionary dicSecCount = new Dictionary();
- Dictionary dicSecParentItem = new Dictionary();
- frmMain.pbSectMaximum = ds.Tables["Sections"].Rows.Count;
- frmMain.pbSectValue = 0;
-
- DataTable dtsect = ds.Tables["Sections"];
- dtsect.CaseSensitive = true;
- DataView dv = new DataView(dtsect, "", "locb", DataViewRowState.CurrentRows);
- Item SectItm = null;
- int level = 0;
- bool addpart = true;
- Item parentitem = itm;
- foreach (DataRowView drw in dv)
- {
- SectItm = MigrateSection(parentitem, ProcNumber, cn, drw, ds.Tables["Steps"], SectItm, dicSecCount.Count > 0 ? true : false, pth, docver);
- // if no children, add first child (cont)
- if (addpart)
- {
- // ContentsParts.Add can use 'fromtype', item - fromtype here = 2, section
- cont.ContentParts.Add(2, SectItm);
- if (cont.MyZContent.OldStepSequence == null || cont.MyZContent.OldStepSequence == "") cont.MyZContent.OldStepSequence = ProcNumber;
- if (!cont.IsSavable) ErrorRpt.ErrorReport(cont);
- cont.Save();
- addpart = false;
- }
- //FrType = 0;
- dicSecParentItem[level] = SectItm;
- if (level > 0)
- {
- if ((dicSecCount[level]) == 1)
- // shift up a level, i.e. give me the parent for the previous level
- SectItm = dicSecParentItem[--level];
- else
- dicSecCount[level]--; // decrements number of sections to process
- }
- // get number of subsections for this section
- int subSecs = drw["Sequence"].ToString().PadRight(12, ' ')[5] - 48;
- if (subSecs > 0)
- {
- dicSecCount[++level] = subSecs;
- cont = SectItm.MyContent;
- parentitem = SectItm;
- addpart = true;
- SectItm = null; // no previous sibling for the first child node.
- }
- }
- // need section start
- if (EditSectId != 0)
- {
- if (ci == null) ci = new ConfigInfo(null);
- ci.AddItem("Procedure", "SectionStart", string.Format("{0}", EditSectId));
- itm.MyContent.Config = (ci == null) ? null : ci.ToString();
- if (!itm.IsSavable) ErrorRpt.ErrorReport(itm);
- itm.Save();
- }
- }
- ds.Dispose();
- return itm;
- }
- private Item MigrateProcedures(OleDbConnection cn, string pth, DocVersion docver, bool convertProcedures)
- {
- Item FirstItm = null;
- // Loop through Set File for each Procedure
- int whereami = 0;
- try
- {
- OleDbDataAdapter da = new OleDbDataAdapter("Select * from [set] where entry is not null", cn);
- DataSet ds = new DataSet();
- da.Fill(ds);
- Item FrItm = null;
- frmMain.pbProcMaximum = ds.Tables[0].Rows.Count;
- frmMain.UpdateLabels(0, 0, 0);
-
- foreach (DataRow dr in ds.Tables[0].Rows)
- {
- FrItm = MigrateProcedure(cn, dr, FrItm, pth, docver, convertProcedures);
- if (FirstItm == null) FirstItm = FrItm;
- }
- da.Dispose();
- }
- catch (Exception ex)
- {
- Console.WriteLine("End of MigrateProcedures - ex = {0}", ex.Message);
- _MyLog.ErrorFormat("MigrateProcedures - {0} - {1}\r\n\r\n{2}", pth,ex.Message, ex.InnerException);
- }
- return FirstItm;
- }
- private void DbtOk(string fname, string pth)
- {
- //string dbtname = frmMain.tbSourceText + "\\" + fname + ".dbt";
- string dbtname = pth + "\\" + fname + ".dbt";
- if (File.Exists(dbtname))
- {
- // check if dbt is at least 512, if not append 508 bytes. This is to fix
- // a problem where dbts were created with only 4 bytes in the 16-bit code.
- // if only 4 bytes, ado.net gives an "External table not in expected format"
- // error
- FileInfo fi = new FileInfo(dbtname);
- if (fi.Length < 512)
- {
- FileStream fs = new FileStream(dbtname, FileMode.Open, FileAccess.Write, FileShare.ReadWrite);
- BinaryWriter bw = new BinaryWriter(fs);
- bw.Seek(0, SeekOrigin.End);
- byte[] wrBytes = new byte[512 - fi.Length];
- for (int i = 0; i < 512 - fi.Length; i++) wrBytes[i] = 0;
- wrBytes[4] = 0x02;
- bw.Write(wrBytes);
- bw.Close();
- }
- fi = null;
- }
- }
- }
-}
\ No newline at end of file
diff --git a/PROMS/DataLoader/Program.cs b/PROMS/DataLoader/Program.cs
deleted file mode 100644
index 5ba04ba7..00000000
--- a/PROMS/DataLoader/Program.cs
+++ /dev/null
@@ -1,21 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Windows.Forms;
-
-
-namespace DataLoader
-{
- static class Program
- {
- //
- //The main entry point for the application.
- //
- [STAThread]
- static void Main()
- {
- Application.EnableVisualStyles();
- Application.SetCompatibleTextRenderingDefault(false);
- Application.Run(new frmLoader());
- }
- }
-}
diff --git a/PROMS/DataLoader/Properties/AssemblyInfo.cs b/PROMS/DataLoader/Properties/AssemblyInfo.cs
deleted file mode 100644
index ee29bd60..00000000
--- a/PROMS/DataLoader/Properties/AssemblyInfo.cs
+++ /dev/null
@@ -1,33 +0,0 @@
-using System.Reflection;
-using System.Runtime.CompilerServices;
-using System.Runtime.InteropServices;
-
-// General Information about an assembly is controlled through the following
-// set of attributes. Change these attribute values to modify the information
-// associated with an assembly.
-[assembly: AssemblyTitle("DataLoader")]
-[assembly: AssemblyDescription("")]
-[assembly: AssemblyConfiguration("")]
-[assembly: AssemblyCompany("Volian Enterprises, Inc.")]
-[assembly: AssemblyProduct("DataLoader")]
-[assembly: AssemblyCopyright("Copyright © Volian Enterprises, Inc. 2006")]
-[assembly: AssemblyTrademark("")]
-[assembly: AssemblyCulture("")]
-
-// Setting ComVisible to false makes the types in this assembly not visible
-// to COM components. If you need to access a type in this assembly from
-// COM, set the ComVisible attribute to true on that type.
-[assembly: ComVisible(false)]
-
-// The following GUID is for the ID of the typelib if this project is exposed to COM
-[assembly: Guid("bcf6964e-0a2b-4e99-8dde-2dd62366294c")]
-
-// Version information for an assembly consists of the following four values:
-//
-// Major Version
-// Minor Version
-// Build Number
-// Revision
-//
-[assembly: AssemblyVersion("1.0.0.0")]
-[assembly: AssemblyFileVersion("1.0.0.0")]
diff --git a/PROMS/DataLoader/Properties/Resources.Designer.cs b/PROMS/DataLoader/Properties/Resources.Designer.cs
deleted file mode 100644
index bae8975a..00000000
--- a/PROMS/DataLoader/Properties/Resources.Designer.cs
+++ /dev/null
@@ -1,63 +0,0 @@
-//------------------------------------------------------------------------------
-//
-// This code was generated by a tool.
-// Runtime Version:2.0.50727.832
-//
-// Changes to this file may cause incorrect behavior and will be lost if
-// the code is regenerated.
-//
-//------------------------------------------------------------------------------
-
-namespace DataLoader.Properties {
- using System;
-
-
- ///
- /// A strongly-typed resource class, for looking up localized strings, etc.
- ///
- // This class was auto-generated by the StronglyTypedResourceBuilder
- // class via a tool like ResGen or Visual Studio.
- // To add or remove a member, edit your .ResX file then rerun ResGen
- // with the /str option, or rebuild your VS project.
- [global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0")]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
- internal class Resources {
-
- private static global::System.Resources.ResourceManager resourceMan;
-
- private static global::System.Globalization.CultureInfo resourceCulture;
-
- [global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")]
- internal Resources() {
- }
-
- ///
- /// Returns the cached ResourceManager instance used by this class.
- ///
- [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
- internal static global::System.Resources.ResourceManager ResourceManager {
- get {
- if (object.ReferenceEquals(resourceMan, null)) {
- global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("DataLoader.Properties.Resources", typeof(Resources).Assembly);
- resourceMan = temp;
- }
- return resourceMan;
- }
- }
-
- ///
- /// Overrides the current thread's CurrentUICulture property for all
- /// resource lookups using this strongly typed resource class.
- ///
- [global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
- internal static global::System.Globalization.CultureInfo Culture {
- get {
- return resourceCulture;
- }
- set {
- resourceCulture = value;
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/Properties/Resources.resx b/PROMS/DataLoader/Properties/Resources.resx
deleted file mode 100644
index af7dbebb..00000000
--- a/PROMS/DataLoader/Properties/Resources.resx
+++ /dev/null
@@ -1,117 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/PROMS/DataLoader/Properties/Settings.Designer.cs b/PROMS/DataLoader/Properties/Settings.Designer.cs
deleted file mode 100644
index 5897d349..00000000
--- a/PROMS/DataLoader/Properties/Settings.Designer.cs
+++ /dev/null
@@ -1,422 +0,0 @@
-//------------------------------------------------------------------------------
-//
-// This code was generated by a tool.
-// Runtime Version:2.0.50727.5485
-//
-// Changes to this file may cause incorrect behavior and will be lost if
-// the code is regenerated.
-//
-//------------------------------------------------------------------------------
-
-namespace DataLoader.Properties {
-
-
- [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
- [global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0")]
- internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase {
-
- private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings())));
-
- public static Settings Default {
- get {
- return defaultInstance;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string VeSamFilename {
- get {
- return ((string)(this["VeSamFilename"]));
- }
- set {
- this["VeSamFilename"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string DbfPathname {
- get {
- return ((string)(this["DbfPathname"]));
- }
- set {
- this["DbfPathname"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState LoadWordDoc {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["LoadWordDoc"]));
- }
- set {
- this["LoadWordDoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Unchecked")]
- public global::System.Windows.Forms.CheckState LoadRTFDoc {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["LoadRTFDoc"]));
- }
- set {
- this["LoadRTFDoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState PurgeData {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["PurgeData"]));
- }
- set {
- this["PurgeData"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string VePromsFilename {
- get {
- return ((string)(this["VePromsFilename"]));
- }
- set {
- this["VePromsFilename"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string LogFileLoc {
- get {
- return ((string)(this["LogFileLoc"]));
- }
- set {
- this["LogFileLoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string BackupFileName {
- get {
- return ((string)(this["BackupFileName"]));
- }
- set {
- this["BackupFileName"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string BackupFolder {
- get {
- return ((string)(this["BackupFolder"]));
- }
- set {
- this["BackupFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Data Source=.\\SQLEXPRESS;Initial Catalog={DBName};Integrated Security=True")]
- public string ConnectionString {
- get {
- return ((string)(this["ConnectionString"]));
- }
- set {
- this["ConnectionString"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("VEPROMS")]
- public string DBName {
- get {
- return ((string)(this["DBName"]));
- }
- set {
- this["DBName"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string DBPath {
- get {
- return ((string)(this["DBPath"]));
- }
- set {
- this["DBPath"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string PDFFolder {
- get {
- return ((string)(this["PDFFolder"]));
- }
- set {
- this["PDFFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Unchecked")]
- public global::System.Windows.Forms.CheckState CheckRTF {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["CheckRTF"]));
- }
- set {
- this["CheckRTF"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int Skip {
- get {
- return ((int)(this["Skip"]));
- }
- set {
- this["Skip"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("1")]
- public int ConvertTo {
- get {
- return ((int)(this["ConvertTo"]));
- }
- set {
- this["ConvertTo"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState RedPDFs {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["RedPDFs"]));
- }
- set {
- this["RedPDFs"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState OnlyThisSet {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["OnlyThisSet"]));
- }
- set {
- this["OnlyThisSet"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int ExecutionMode {
- get {
- return ((int)(this["ExecutionMode"]));
- }
- set {
- this["ExecutionMode"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase1")]
- public string Phase1 {
- get {
- return ((string)(this["Phase1"]));
- }
- set {
- this["Phase1"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase2")]
- public string Phase2 {
- get {
- return ((string)(this["Phase2"]));
- }
- set {
- this["Phase2"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase3")]
- public string Phase3 {
- get {
- return ((string)(this["Phase3"]));
- }
- set {
- this["Phase3"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("c:\\development\\fmtall")]
- public string FormatFolder {
- get {
- return ((string)(this["FormatFolder"]));
- }
- set {
- this["FormatFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("c:\\development\\genmacall")]
- public string GenMacFolder {
- get {
- return ((string)(this["GenMacFolder"]));
- }
- set {
- this["GenMacFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("False")]
- public bool LoadApproved {
- get {
- return ((bool)(this["LoadApproved"]));
- }
- set {
- this["LoadApproved"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase4")]
- public string Phase4 {
- get {
- return ((string)(this["Phase4"]));
- }
- set {
- this["Phase4"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string ProcessOnlyInLocation {
- get {
- return ((string)(this["ProcessOnlyInLocation"]));
- }
- set {
- this["ProcessOnlyInLocation"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int WhatROsToConvert {
- get {
- return ((int)(this["WhatROsToConvert"]));
- }
- set {
- this["WhatROsToConvert"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("-1")]
- public int SelectedROFst {
- get {
- return ((int)(this["SelectedROFst"]));
- }
- set {
- this["SelectedROFst"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("False")]
- public bool AnnotateWhenConvertingToText {
- get {
- return ((bool)(this["AnnotateWhenConvertingToText"]));
- }
- set {
- this["AnnotateWhenConvertingToText"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("False")]
- public bool AnnotateWhenShowingMissingRO {
- get {
- return ((bool)(this["AnnotateWhenShowingMissingRO"]));
- }
- set {
- this["AnnotateWhenShowingMissingRO"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("False")]
- public bool AnnotateWhenShowingDifferentRO {
- get {
- return ((bool)(this["AnnotateWhenShowingDifferentRO"]));
- }
- set {
- this["AnnotateWhenShowingDifferentRO"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int HowMany {
- get {
- return ((int)(this["HowMany"]));
- }
- set {
- this["HowMany"] = value;
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/Properties/Settings.Designer.cs.org b/PROMS/DataLoader/Properties/Settings.Designer.cs.org
deleted file mode 100644
index 564d3ec5..00000000
--- a/PROMS/DataLoader/Properties/Settings.Designer.cs.org
+++ /dev/null
@@ -1,314 +0,0 @@
-//------------------------------------------------------------------------------
-//
-// This code was generated by a tool.
-// Runtime Version:2.0.50727.4216
-//
-// Changes to this file may cause incorrect behavior and will be lost if
-// the code is regenerated.
-//
-//------------------------------------------------------------------------------
-
-namespace DataLoader.Properties {
-
-
- [global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
- [global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0")]
- internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase {
-
- private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings())));
-
- public static Settings Default {
- get {
- return defaultInstance;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string VeSamFilename {
- get {
- return ((string)(this["VeSamFilename"]));
- }
- set {
- this["VeSamFilename"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string DbfPathname {
- get {
- return ((string)(this["DbfPathname"]));
- }
- set {
- this["DbfPathname"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState LoadWordDoc {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["LoadWordDoc"]));
- }
- set {
- this["LoadWordDoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Unchecked")]
- public global::System.Windows.Forms.CheckState LoadRTFDoc {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["LoadRTFDoc"]));
- }
- set {
- this["LoadRTFDoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState PurgeData {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["PurgeData"]));
- }
- set {
- this["PurgeData"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string VePromsFilename {
- get {
- return ((string)(this["VePromsFilename"]));
- }
- set {
- this["VePromsFilename"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string LogFileLoc {
- get {
- return ((string)(this["LogFileLoc"]));
- }
- set {
- this["LogFileLoc"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string BackupFileName {
- get {
- return ((string)(this["BackupFileName"]));
- }
- set {
- this["BackupFileName"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string BackupFolder {
- get {
- return ((string)(this["BackupFolder"]));
- }
- set {
- this["BackupFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Data Source=.\\SQLEXPRESS;Initial Catalog={DBName};Integrated Security=True")]
- public string ConnectionString {
- get {
- return ((string)(this["ConnectionString"]));
- }
- set {
- this["ConnectionString"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("VEPROMS")]
- public string DBName {
- get {
- return ((string)(this["DBName"]));
- }
- set {
- this["DBName"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string DBPath {
- get {
- return ((string)(this["DBPath"]));
- }
- set {
- this["DBPath"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("")]
- public string PDFFolder {
- get {
- return ((string)(this["PDFFolder"]));
- }
- set {
- this["PDFFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Unchecked")]
- public global::System.Windows.Forms.CheckState CheckRTF {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["CheckRTF"]));
- }
- set {
- this["CheckRTF"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int Skip {
- get {
- return ((int)(this["Skip"]));
- }
- set {
- this["Skip"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("1")]
- public int ConvertTo {
- get {
- return ((int)(this["ConvertTo"]));
- }
- set {
- this["ConvertTo"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState RedPDFs {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["RedPDFs"]));
- }
- set {
- this["RedPDFs"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Checked")]
- public global::System.Windows.Forms.CheckState OnlyThisSet {
- get {
- return ((global::System.Windows.Forms.CheckState)(this["OnlyThisSet"]));
- }
- set {
- this["OnlyThisSet"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("0")]
- public int ExecutionMode {
- get {
- return ((int)(this["ExecutionMode"]));
- }
- set {
- this["ExecutionMode"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase1")]
- public string Phase1 {
- get {
- return ((string)(this["Phase1"]));
- }
- set {
- this["Phase1"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase2")]
- public string Phase2 {
- get {
- return ((string)(this["Phase2"]));
- }
- set {
- this["Phase2"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("Phase3")]
- public string Phase3 {
- get {
- return ((string)(this["Phase3"]));
- }
- set {
- this["Phase3"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("c:\\development\\fmtall")]
- public string FormatFolder {
- get {
- return ((string)(this["FormatFolder"]));
- }
- set {
- this["FormatFolder"] = value;
- }
- }
-
- [global::System.Configuration.UserScopedSettingAttribute()]
- [global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
- [global::System.Configuration.DefaultSettingValueAttribute("c:\\development\\genmacall")]
- public string GenMacFolder {
- get {
- return ((string)(this["GenMacFolder"]));
- }
- set {
- this["GenMacFolder"] = value;
- }
- }
- }
-}
diff --git a/PROMS/DataLoader/Properties/Settings.settings b/PROMS/DataLoader/Properties/Settings.settings
deleted file mode 100644
index 24ea2b23..00000000
--- a/PROMS/DataLoader/Properties/Settings.settings
+++ /dev/null
@@ -1,105 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
- Checked
-
-
- Unchecked
-
-
- Checked
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Data Source=.\SQLEXPRESS;Initial Catalog={DBName};Integrated Security=True
-
-
- VEPROMS
-
-
-
-
-
-
-
-
- Unchecked
-
-
- 0
-
-
- 1
-
-
- Checked
-
-
- Checked
-
-
- 0
-
-
- Phase1
-
-
- Phase2
-
-
- Phase3
-
-
- c:\development\fmtall
-
-
- c:\development\genmacall
-
-
- False
-
-
- Phase4
-
-
-
-
-
- 0
-
-
- -1
-
-
- False
-
-
- False
-
-
- False
-
-
- 0
-
-
-
\ No newline at end of file
diff --git a/PROMS/DataLoader/Properties/licenses.licx b/PROMS/DataLoader/Properties/licenses.licx
deleted file mode 100644
index d4ec2296..00000000
--- a/PROMS/DataLoader/Properties/licenses.licx
+++ /dev/null
@@ -1 +0,0 @@
-C1.Win.C1FlexGrid.C1FlexGrid, C1.Win.C1FlexGrid.2, Version=2.6.20101.528, Culture=neutral, PublicKeyToken=79882d576c6336da
diff --git a/PROMS/DataLoader/ROFixer.cs b/PROMS/DataLoader/ROFixer.cs
deleted file mode 100644
index be437fcf..00000000
--- a/PROMS/DataLoader/ROFixer.cs
+++ /dev/null
@@ -1,290 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using System.Windows.Forms;
-
-namespace DataLoader
-{
- public delegate void ROFixerEvent(object sender, ROFixerEventArgs args);
- public class ROFixerEventArgs
- {
- private string _MyStatus;
-
- public string MyStatus
- {
- get { return _MyStatus; }
- set { _MyStatus = value; }
- }
- public ROFixerEventArgs(string myStatus)
- {
- _MyStatus = myStatus;
- }
- }
- class ROFixer
- {
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- public event ROFixerEvent StatusChanged;
- private void OnStatusChanged(object sender, ROFixerEventArgs args)
- {
- if (StatusChanged != null)
- StatusChanged(sender, args);
- }
- private string _Status;
-
- public string Status
- {
- get { return _Status; }
- set
- {
- _Status = value;
- OnStatusChanged(this, new ROFixerEventArgs(_Status));
- }
- }
- private int _ErrorCount = 0;
-
- public int ErrorCount
- {
- get { return _ErrorCount; }
- set { _ErrorCount = value; }
- }
- private string _LogPath;
- private frmLoader frmMain;
- public ROFixer(string logpath, frmLoader myfrmMain)
- {
- _LogPath = logpath;
- frmMain = myfrmMain;
- }
- public TimeSpan Process()
- {
- DateTime tstart = DateTime.Now;
- ProcessROs();
- return DateTime.Now - tstart;
- }
- public TimeSpan Process(DocVersionInfo dvi)
- {
- DateTime tstart = DateTime.Now;
- ProcessROs(dvi);
- return DateTime.Now - tstart;
- }
- public TimeSpan Process(ProcedureInfo pi)
- {
- DateTime tstart = DateTime.Now;
- ProcessROs(pi);
- return DateTime.Now - tstart;
- }
- private void ProcessROs()
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.Get();
- DoProcessROs(myRoUsages);
- }
- //private void ProcessROs(FolderInfo fi)
- //{
- // Status = "Getting List...";
- // RoUsageInfoList myRoUsages = RoUsageInfoList.GetByFolder(fi);
- // DoProcessROs(myRoUsages);
- //}
- private void ProcessROs(DocVersionInfo dvi)
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.GetByDocVersion(dvi);
- DoProcessROs(myRoUsages);
- }
- private void ProcessROs(ProcedureInfo pi)
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.GetByProcedure(pi);
- DoProcessROs(myRoUsages);
- }
- private AnnotationType _VolianCommentType = null; // Using this to flag ro value issues with byron to braidwood
- public AnnotationType VolianCommentType
- {
- get
- {
- if (_VolianCommentType == null)
- _VolianCommentType = AnnotationType.GetByName("Volian Comment");
- if (_VolianCommentType == null)
- _VolianCommentType = AnnotationType.MakeAnnotationType("Volian Comment",null);
- return _VolianCommentType;
- }
- }
- private void DoProcessROs(RoUsageInfoList myRoUsages)
- {
- int changeCount = 0;
- // get list of content records
- List myContentList = new List();
- Dictionary roFstLookups = new Dictionary();
- Dictionary oldRoFstLookups = null;
- ROFstInfo oldRoFst = null;
- if (frmMain.MySettings.SelectedROFst > 0)
- {
- oldRoFst = ROFstInfo.Get(frmMain.MySettings.SelectedROFst);
- oldRoFstLookups = new Dictionary();
- }
- foreach (RoUsageInfo rou in myRoUsages)
- {
- if (!myContentList.Contains(rou.ContentID))
- {
- myContentList.Add(rou.ContentID);
- }
- }
- int i = 0;
- foreach (int cid in myContentList)
- {
- Status = string.Format("Processing {0} of {1} steps", ++i, myContentList.Count);
- ContentInfo myContentInfo = ContentInfo.Get(cid);
- DocVersionInfo dvi = myContentInfo.ContentItems[0].MyProcedure.MyDocVersion;
- int versionId = dvi.VersionID;
- ROFstInfo myRoFst = dvi.DocVersionAssociations[0].MyROFst;
- if (!roFstLookups.ContainsKey(versionId))
- {
- roFstLookups.Add(versionId, myRoFst.GetROFSTLookup(dvi));
- }
- ROFSTLookup myLookup = roFstLookups[versionId];
- if (oldRoFstLookups != null && !oldRoFstLookups.ContainsKey(versionId))
- {
- oldRoFstLookups.Add(versionId, oldRoFst.GetROFSTLookup(dvi));
- }
- ROFSTLookup oldLookup = null;
- if(oldRoFstLookups != null)
- oldLookup = oldRoFstLookups[versionId];
- using (Content ctmp = myContentInfo.Get())
- {
- ItemInfo ii = myContentInfo.ContentItems[0];
- foreach (RoUsageInfo ru in myContentInfo.ContentRoUsages)
- {
- string sameMsg = string.Empty;
- bool theSame = false;
- if (oldLookup != null)
- theSame = CheckIfTheSame(ii, ru.ROID, myLookup, oldLookup, dvi, ref sameMsg);
- ROFSTLookup.rochild rocc = myLookup.GetRoChild12(ru.ROID);
- if (rocc.value == null)
- rocc = myLookup.GetRoChild(ru.ROID);
- int myType = rocc.type;
- string myValue = myLookup.GetTranslatedRoValue(ru.ROID, ii.ActiveFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta);
- myValue = myValue.Replace(@"\up2 \u8209?", @"\up2\u8209?");// Remove space between superscript command and non-breaking hyphen
- string fileNameOnly = null;
- if (myType == 8 && myValue.Contains("\n"))
- {
- fileNameOnly = myValue.Split("\n".ToCharArray())[0];
- myValue = myValue.Replace("\n", "");// Remove newlines in Figure data
- }
- string textB4 = ctmp.Text;
- myRoFst.ROTableUpdate += new ROFstInfoROTableUpdateEvent(myRoFst_ROTableUpdate);
- string oldval;
- switch (frmMain.MySettings.WhatROsToConvert)
- {
- case ROUpdateMode.None:
- oldval = ctmp.FixContentText(ru, myValue, myType, myRoFst, fileNameOnly,"");
- if(myValue == "?" && frmMain.MySettings.AnnotateWhenShowingMissingRO)
- Annotation.MakeAnnotation(ctmp.ContentItems[0].MyItem, VolianCommentType, "", string.Format("RO value ({0}) missing", ItemInfo.ConvertToDisplayText(oldval)), null);
- else if (ctmp.Text != textB4 && frmMain.MySettings.AnnotateWhenShowingDifferentRO)
- Annotation.MakeAnnotation(ctmp.ContentItems[0].MyItem, VolianCommentType, "", string.Format("Old RO value ({0}) different than new RO value({1})", ItemInfo.ConvertToDisplayText(oldval), ItemInfo.ConvertToDisplayText(myValue)), null);
- break;
- case ROUpdateMode.All:
- oldval = ctmp.ConvertROToText(ru, myValue, myType, myRoFst);
- if (frmMain.MySettings.AnnotateWhenConvertingToText)
- Annotation.MakeAnnotation(ctmp.ContentItems[0].MyItem, VolianCommentType, "", string.Format("RO value ({0}) converted to text", ItemInfo.ConvertToDisplayText(oldval)), null);
- break;
- default:
- if (myValue == "?")
- {
- oldval = ctmp.ConvertROToText(ru, myValue, myType, myRoFst);
- if (frmMain.MySettings.AnnotateWhenConvertingToText)
- Annotation.MakeAnnotation(ctmp.ContentItems[0].MyItem, VolianCommentType, "", string.Format("RO value ({0}) converted to text" + sameMsg, ItemInfo.ConvertToDisplayText(oldval)), null);
- }
- else
- {
- oldval = ctmp.FixContentText(ru, myValue, myType, myRoFst, fileNameOnly,"");
- if (ctmp.Text != textB4 && frmMain.MySettings.AnnotateWhenShowingDifferentRO)
- Annotation.MakeAnnotation(ctmp.ContentItems[0].MyItem, VolianCommentType, "", string.Format("Old RO value ({0}) different than new RO value({1})" + sameMsg, ItemInfo.ConvertToDisplayText(oldval), ItemInfo.ConvertToDisplayText(myValue)), null);
- }
- break;
- }
- myRoFst.ROTableUpdate -= new ROFstInfoROTableUpdateEvent(myRoFst_ROTableUpdate);
- if (ctmp.Text != textB4)
- {
- changeCount++;
- //Console.WriteLine("'{0}', '{1}', '{2}', '{3}'", replace(oldval, @"\u8209?", "-"), replace(myValue, @"\u8209?", "-"), ru.ROID, rocc.appid);
- frmMain.AddInfo("'{0}','{1}','{2}','{3}','R{4}','{5}','{6}'", ii.MyDocVersion.MyFolder.Name, ii.ShortPath,
- (oldval ?? "").Replace(@"\u8209?", "-").Replace("'", "''"), myValue.Replace(@"\u8209?", "-").Replace("'", "''"), ru.ROID, myLookup.GetAccPageID(ru.ROID), sameMsg);
- }
- else if (sameMsg != string.Empty && sameMsg != ", Exact Match")
- {
- frmMain.AddInfo("'{0}','{1}','{2}','{3}','R{4}','{5}','{6}'", ii.MyDocVersion.MyFolder.Name, ii.ShortPath,
- (oldval ?? "").Replace(@"\u8209?", "-").Replace("'", "''"), myValue.Replace(@"\u8209?", "-").Replace("'", "''"), ru.ROID, myLookup.GetAccPageID(ru.ROID), sameMsg);
- }
- }
- if (ctmp.IsDirty)
- {
- //ctmp.DTS = DateTime.Now;
- ctmp.Save();
- ContentInfo.Refresh(ctmp);
- }
- }
- }
- frmMain.AddInfo("{0} RO Values Updated", changeCount);
- MessageBox.Show(String.Format("{0} RO Values Updated", changeCount), "RO Value Update Complete", MessageBoxButtons.OK, MessageBoxIcon.Information);
- }
-
- private bool CheckIfTheSame(ItemInfo ii, string roid, ROFSTLookup myLookup, ROFSTLookup oldLookup, DocVersionInfo dvi, ref string sameMsg)
- {
- /*
- ROFSTLookup.rochild rocc = myLookup.GetRoChild12(ru.ROID);
- if (rocc.value == null)
- rocc = myLookup.GetRoChild(ru.ROID);
- int myType = rocc.type;
- */
- ROFSTLookup.rochild roc = myLookup.GetRoChild12(roid);
- if (roc.value == null) roc = myLookup.GetRoChild(roid);
- ROFSTLookup.rochild oroc = oldLookup.GetRoChild12(roid);
- if (oroc.value == null) oroc = oldLookup.GetRoChild(roid);
- string myValue = myLookup.GetTranslatedRoValue(roid, ii.ActiveFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta);
- myValue = myValue.Replace(@"\up2 \u8209?", @"\up2\u8209?");// Remove space between superscript command and non-breaking hyphen
- string oldValue = oldLookup.GetTranslatedRoValue(roid, ii.ActiveFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta);
- oldValue = oldValue.Replace(@"\up2 \u8209?", @"\up2\u8209?");// Remove space between superscript command and non-breaking hyphen
- string myAccPageID = myLookup.GetAccPageID(roid);
- string oldAccPageID = oldLookup.GetAccPageID(roid);
- if (myValue == oldValue && roc.type == oroc.type && ((myAccPageID ?? "null") == (oldAccPageID ?? "null")))
- {
- sameMsg = ", Exact Match";
- return true;
- }
- if (myValue != oldValue && roc.type == oroc.type && ((myAccPageID ?? "null") == (oldAccPageID ?? "null")))
- {
- sameMsg = ", Different Value, Same RO";
- return false;
- }
- if ((myAccPageID ?? "null") != (oldAccPageID ?? "null"))
- {
- ROFSTLookup.rochild? myroc = myLookup.GetROChildByAccPageID(oldAccPageID, dvi.DocVersionConfig.RODefaults_setpointprefix, dvi.DocVersionConfig.RODefaults_graphicsprefix);
- if (myroc != null)
- {
- string myValueNew = myLookup.GetTranslatedRoValue(((ROFSTLookup.rochild)myroc).roid, ii.ActiveFormat.PlantFormat.FormatData.SectData.ConvertCaretToDelta);
- if(myValueNew == oldValue)
- sameMsg = ", Same Value, Different RO";
- else
- sameMsg = ", Different Value, Different RO";
- }
- else
- sameMsg = ", Missing RO";
- return false;
- }
- sameMsg = ", Unknown";
-
- //if (myLookup.GetAccPageID(roid) == oldLookup.GetAccPageID(roid))
- //{
- // sameMsg = string.Format("ROID: {0}, AccPageID: {1}, OldAccPageID: {2}", roid, myLookup.GetAccPageID(roid), oldLookup.GetAccPageID(roid));
- // return false;
- //}
- //sameMsg = "Values and AccPageIDs are different for ROID: " + roid;
- return false;
- }
-
- private List myRoFst_ROTableUpdate(object sender, ROFstInfoROTableUpdateEventArgs args)
- {
- return Volian.Controls.Library.VlnFlexGrid.ROTableUpdate(sender,args);
- }
- }
-}
diff --git a/PROMS/DataLoader/ROFixer.cs.bak b/PROMS/DataLoader/ROFixer.cs.bak
deleted file mode 100644
index f5622e33..00000000
--- a/PROMS/DataLoader/ROFixer.cs.bak
+++ /dev/null
@@ -1,290 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Text;
-using VEPROMS.CSLA.Library;
-using System.Windows.Forms;
-
-namespace DataLoader
-{
- public delegate void ROFixerEvent(object sender, ROFixerEventArgs args);
- public class ROFixerEventArgs
- {
- private string _MyStatus;
-
- public string MyStatus
- {
- get { return _MyStatus; }
- set { _MyStatus = value; }
- }
- public ROFixerEventArgs(string myStatus)
- {
- _MyStatus = myStatus;
- }
- }
- class ROFixer
- {
- public static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
- public event ROFixerEvent StatusChanged;
- private void OnStatusChanged(object sender, ROFixerEventArgs args)
- {
- if (StatusChanged != null)
- StatusChanged(sender, args);
- }
- private string _Status;
-
- public string Status
- {
- get { return _Status; }
- set
- {
- _Status = value;
- OnStatusChanged(this, new ROFixerEventArgs(_Status));
- }
- }
- private int _ErrorCount = 0;
-
- public int ErrorCount
- {
- get { return _ErrorCount; }
- set { _ErrorCount = value; }
- }
- private string _LogPath;
- private frmLoader frmMain;
- public ROFixer(string logpath, frmLoader myfrmMain)
- {
- _LogPath = logpath;
- frmMain = myfrmMain;
- }
- public TimeSpan Process()
- {
- DateTime tstart = DateTime.Now;
- ProcessROs();
- return DateTime.Now - tstart;
- }
- public TimeSpan Process(DocVersionInfo dvi)
- {
- DateTime tstart = DateTime.Now;
- ProcessROs(dvi);
- return DateTime.Now - tstart;
- }
- public TimeSpan Process(ProcedureInfo pi)
- {
- DateTime tstart = DateTime.Now;
- ProcessROs(pi);
- return DateTime.Now - tstart;
- }
- private void ProcessROs()
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.Get();
- DoProcessROs(myRoUsages);
- }
- //private void ProcessROs(FolderInfo fi)
- //{
- // Status = "Getting List...";
- // RoUsageInfoList myRoUsages = RoUsageInfoList.GetByFolder(fi);
- // DoProcessROs(myRoUsages);
- //}
- private void ProcessROs(DocVersionInfo dvi)
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.GetByDocVersion(dvi);
- DoProcessROs(myRoUsages);
- }
- private void ProcessROs(ProcedureInfo pi)
- {
- Status = "Getting List...";
- RoUsageInfoList myRoUsages = RoUsageInfoList.GetByProcedure(pi);
- DoProcessROs(myRoUsages);
- }
- private AnnotationType _VolianCommentType = null; // Using this to flag ro value issues with byron to braidwood
- public AnnotationType VolianCommentType
- {
- get
- {
- if (_VolianCommentType == null)
- _VolianCommentType = AnnotationType.GetByName("Volian Comment");
- if (_VolianCommentType == null)
- _VolianCommentType = AnnotationType.MakeAnnotationType("Volian Comment",null);
- return _VolianCommentType;
- }
- }
- private void DoProcessROs(RoUsageInfoList myRoUsages)
- {
- int changeCount = 0;
- // get list of content records
- List myContentList = new List();
- Dictionary roFstLookups = new Dictionary();
- Dictionary