2010-06-23 18:16:06 +00:00

871 lines
32 KiB
C#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Drawing.Imaging;
using System.Text;
using System.Windows.Forms;
using System.IO;
using VEPROMS.CSLA.Library;
using System.Text.RegularExpressions;
using LBWordLibrary;
using Volian.Controls.Library;
using Volian.Svg.Library;
namespace PrintMSWord
{
public partial class frmAnalyze : Form
{
public string MyStatus
{
get { return tsslStatus.Text; }
set { tsslStatus.Text = value; Application.DoEvents(); }
}
private PDFMethod _MyPDFMethod = PDFMethod.ToPDF;
internal PDFMethod MyPDFMethod
{
get { return _MyPDFMethod; }
set
{
_MyPDFMethod = value;
// Adjust Checked Status
toPDFToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF;
toPDF2003BGToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF2003BG;
toPDF2003FGToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.ToPDF2003FG;
toPDF2007ToolStripMenuItem.Checked = _MyPDFMethod == PDFMethod.toPDF2007;
}
}
public frmAnalyze()
{
InitializeComponent();
}
private LBApplicationClass _MyApp = null;
public LBApplicationClass MyApp
{
get
{
if (_MyApp == null)
_MyApp = new LBApplicationClass();
return _MyApp;
}
}
private frmInfo _MyInfo = null;
public frmInfo MyInfo
{
get
{
if (_MyInfo == null)
{
_MyInfo = new frmInfo(this);
_MyInfo.FormClosed += new FormClosedEventHandler(_MyInfo_FormClosed);
}
return _MyInfo;
}
}
private void _MyInfo_FormClosed(object sender, FormClosedEventArgs e)
{
_MyInfo = null;
}
public void AddInfo(string info, params object [] objs)
{
MyInfo.AddInfo(string.Format(info,objs));
}
public void AddInfo(string info)
{
MyInfo.AddInfo(info);
}
public void ClearInfo()
{
MyInfo.Clear();
}
void exitToolStripMenuItem_Click(object sender, EventArgs e)
{
this.Close();
}
private System.Diagnostics.Process [] WordProcesses
{
get
{
return System.Diagnostics.Process.GetProcessesByName("WINWORD");
}
}
private void frmPrintMsWord_Load(object sender, EventArgs e)
{
CleanupMSWordProcesses();
lbDocVersion.DataSource = DocVersionInfoList.Get();
toPDFToolStripMenuItem.Tag = PDFMethod.ToPDF;
toPDF2003BGToolStripMenuItem.Tag = PDFMethod.ToPDF2003BG;
toPDF2003FGToolStripMenuItem.Tag = PDFMethod.ToPDF2003FG;
toPDF2007ToolStripMenuItem.Tag = PDFMethod.toPDF2007;
FileInfo xmlFile = new FileInfo("Proms2010Print.xml");
if(xmlFile.Exists)
_MyProms2010Print = SvgSerializer<Proms2010Print>.ReadFile(xmlFile.FullName);
}
private void CleanupMSWordProcesses()
{
System.Diagnostics.Process[] wordProcesses = WordProcesses;
if (wordProcesses.Length > 0)
{
AddInfo("{0} copies of MS Word are running", wordProcesses.Length);
if (MessageBox.Show("MS Word is Running and must be stopped", "MS Word is Running", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
TerminateProcesses(wordProcesses);
ClearInfo();
}
}
}
private void TerminateProcesses(System.Diagnostics.Process[] wordProcesses)
{
foreach (System.Diagnostics.Process proc in wordProcesses)
proc.Kill();
}
private void lbDocVersion_SelectedValueChanged(object sender, EventArgs e)
{
lbProcedure.DataSource = MyDocVersion.Procedures;
}
private void lbProcedure_SelectedValueChanged(object sender, EventArgs e)
{
lbSections.DataSource = MyProcedure.Sections;
countToolStripMenuItem.Enabled = listSectionsToolStripMenuItem.Enabled = convertToPDFToolStripMenuItem.Enabled =
countROsToolStripMenuItem.Enabled = convertToPDFwithROsToolStripMenuItem.Enabled = MyProcedure.Sections != null;
}
private void countToolStripMenuItem_Click(object sender, EventArgs e)
{
ShowSectionCounts(MyProcedure);
}
private void ShowSectionCounts(ProcedureInfo procInfo)
{
int total = 0;
int totalLibraryDocs = 0;
// for each section in the active procedure
foreach (SectionInfo sect in procInfo.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
total++;
if (sect.MyContent.MyEntry.MyDocument.LibTitle != "")
totalLibraryDocs++;
}
}
AddInfo("Procedure {0} contains {1} MS Word Sections, and {2} Library Documents.", MyProcedure.DisplayNumber, total, totalLibraryDocs);
}
private void listSectionsToolStripMenuItem_Click(object sender, EventArgs e)
{
ListSections(MyProcedure);
}
private void ListSections(ProcedureInfo procInfo)
{
int total = 0;
// for each section in the active procedure
AddInfo("Procedure {0}:", procInfo.DisplayNumber);
foreach (SectionInfo sect in procInfo.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
total++;
AddInfo("\t section {0} - {1}", sect.DisplayNumber, sect.DisplayText);
}
}
AddInfo("Procedure {0} contains {1} MS Word Sections.", procInfo.DisplayNumber, total);
}
private void convertToPDFToolStripMenuItem_Click(object sender, EventArgs e)
{
// for each section in the active procedure
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
int i = 0;
foreach (SectionInfo sect in MyProcedure.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
AddInfo("\t section {0} - {1}", sect.DisplayNumber, sect.DisplayText);
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
{
MyApp.Documents.Open(myFile.FullName);
string fileName = string.Format("{0:00} ", ++i) + (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
CreatePDF(fileName,true);
MyApp.ActiveDocument.Close();
}
}
}
}
private string CreatePDF(string fileName, bool openPdf)
{
string pdfFileName = null;
switch (MyPDFMethod)
{
case PDFMethod.ToPDF:
pdfFileName = MyApp.CreatePDF(@"C:\Temp\" + fileName + ".pdf", openPdf);
break;
case PDFMethod.ToPDF2003BG:
pdfFileName = MyApp.CreatePDF2003BG(@"C:\Temp\" + fileName + ".pdf", openPdf);
break;
case PDFMethod.ToPDF2003FG:
pdfFileName = MyApp.CreatePDF2003FG(@"C:\Temp\" + fileName + ".pdf", openPdf);
break;
case PDFMethod.toPDF2007:
pdfFileName = MyApp.CreatePDF2007(@"C:\Temp\" + fileName + ".pdf", openPdf);
break;
}
_PDFFiles.Add(pdfFileName);
return pdfFileName;
}
private void countROsToolStripMenuItem_Click(object sender, EventArgs e)
{
// for each section in the active procedure
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
int i = 0;
foreach (SectionInfo sect in MyProcedure.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
AddInfo("\t section {0} - {1} - {2} ROs", sect.DisplayNumber, sect.DisplayText, ROCount(sect) );
}
}
}
private int ROCount(SectionInfo sect)
{
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
return matches.Count;
}
private void pDFToolStripMenuItem_Click(object sender, EventArgs e)
{
using (DSOFile myFile = new DSOFile(MySection.MyContent.MyEntry.MyDocument))
{
MyApp.Documents.Open(myFile.FullName);
string fileName = MySection.DisplayNumber == "" ? MySection.DisplayText : MySection.DisplayNumber;
CreatePDF(fileName,true);
MyApp.ActiveDocument.Close();
}
}
private void listROsToolStripMenuItem_Click(object sender, EventArgs e)
{
ListROs(MySection);
}
private void ListROs(SectionInfo sect)
{
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
ProcedureInfo proc = sect.ActiveParent as ProcedureInfo;
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
AddInfo("{0}:{1} contains {2} ROs", proc.DisplayNumber, (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber), matches.Count);
foreach (Match match in matches)
AddInfo("RO - '{0}'", match.Value);
}
private void findROsToolStripMenuItem_Click(object sender, EventArgs e)
{
ToPDFReplaceROs(MySection, true);
}
private string ToPDFReplaceROs(SectionInfo sect, bool openPdf)
{
int docStyleIndex = ((int)sect.MyContent.Type) % 10000;
DocStyle myDocStyle = sect.ActiveFormat.PlantFormat.DocStyles.DocStyleList[docStyleIndex];
PageStyle myPageStyle = myDocStyle.pagestyle;
ProcedureInfo proc = sect.ActiveParent as ProcedureInfo;
DocVersionInfo dvi = proc.ActiveParent as DocVersionInfo;
ROFstInfo rofst = dvi.DocVersionAssociations[0].MyROFst;
ROFSTLookup lookup = rofst.ROFSTLookup;
string igPrefix = dvi.DocVersionConfig.RODefaults_graphicsprefix;
string spPrefix = dvi.DocVersionConfig.RODefaults_setpointprefix;
// string AccPageID = string.Format("<{0}-{1}>", accPrefix, roch.appid);
//AddInfo("{0}:{1}", proc.DisplayNumber, (sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber));
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
{
LBDocumentClass myDoc = MyApp.Documents.Open(myFile.FullName);
float newTop = (float)myDocStyle.Layout.TopRow;
float newLeft = (float)myDocStyle.Layout.LeftMargin;
float newLength = (float)myDocStyle.Layout.PageLength;
float newWidth = (float)myDocStyle.Layout.PageWidth;
float oldTop = myDoc.PageSetup.TopMargin;
float oldLeft = myDoc.PageSetup.LeftMargin;
float oldBottom = myDoc.PageSetup.BottomMargin;
float oldRight = myDoc.PageSetup.RightMargin;
float oldHeight = myDoc.PageSetup.PageHeight;
float oldWidth = myDoc.PageSetup.PageWidth;
float newRight = oldWidth - (newWidth + newLeft);
if (newRight < 0) newRight = 0;
float newBottom = oldBottom - newTop;
//Console.WriteLine("{0},{1},{2},{3},{4},{5},{6},{7},{8},{9}", newTop, newLeft, newLength, newWidth, oldTop, oldLeft, oldBottom, oldRight,oldHeight,oldWidth);
myDoc.PageSetup.BottomMargin = 0;// 11 * 72 - (newTop + newLength);
myDoc.PageSetup.RightMargin = newRight;
myDoc.PageSetup.LeftMargin = newLeft;
myDoc.PageSetup.TopMargin = newTop;
LBSelection sel = FindRO();
while (sel != null)
{
string val = lookup.GetROValueByAccPagID(sel.Text, spPrefix, igPrefix);
int? type = lookup.GetROTypeByAccPagID(sel.Text, spPrefix, igPrefix);
if ((int)type == 8) // Image
{
//Console.WriteLine("Image: {0} - {1}", sect.MyContent.Number, sect.MyContent.Text);
bool imageROTokenReplaced = false;
string [] vals = val.Split("\n".ToCharArray());
ROImageInfo roImage = ROImageInfo.GetByROFstID_FileName(rofst.ROFstID, vals[0]);
if (roImage != null)
{
ROImageFile roImageFile = new ROImageFile(roImage);
float width = 72 * Int32.Parse(vals[3], System.Globalization.NumberStyles.AllowHexSpecifier) / 12.0F;
int lines = Int32.Parse(vals[2], System.Globalization.NumberStyles.AllowHexSpecifier);
float height = 72 * lines / 6.0F;
//sel.MoveEnd(LBWdUnits.wdLine, lines);// The number of lines depends on the third parameter
//sel.EndKey(LBWdUnits.wdLine, true);
//sel.MoveEnd(LBWdUnits.wdCharacter, -1);
//Console.WriteLine("Lines = {0}", lines);
sel.Text = "";
// TODO: Need to create a temporary file for printing.
// TODO: Need a way to eliminate the temporary file when done printing.
// LBInlineShape shape = sel.InlineShapes.AddPicture(@"C:\Plant\HLP\VEHLP\ro\No1Seal.bmp");
float x = (float)sel.get_Information(LBWdInformation.wdHorizontalPositionRelativeToPage);
float y = (float)sel.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
//LBInlineShape shape = sel.InlineShapes.AddPicture(pngFile);
LBRange myRange = sel.Paragraphs.First.Range;
float yTop = (float)myRange.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
LBShape shape = myDoc.Shapes.AddPicture(roImageFile.MyFile.FullName, x, y - yTop, sel.Range);
// LBInlineShape shape = sel.InlineShapes.AddPicture(roImageFile.MyFile.FullName);
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
shape.Width = width;
shape.Height = height;
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
imageROTokenReplaced = true;
}
if(!imageROTokenReplaced)
sel.Text = string.Format("Bad Image Link (Missing Image File:{0})",vals[0]);
}
else if ((int)type == 4) // X-Y Plot
{
val = val.Replace("`", "\xB0");
//AddInfo("\tRO Found {0} = '{1}'", sel.Text, val);
sel.Text = "";
//float width = 72 * Int32.Parse(vals[3], System.Globalization.NumberStyles.AllowHexSpecifier) / 12.0F;
//float height = 72 * lines / 6.0F;
string pngFile = @"C:\Temp\XYPlot1.png";
RectangleF plotRect = CreatePlot(pngFile, val, 600F);
//LBShape shape = myDoc.Shapes.AddPicture(@"C:\Temp\XYPlot.png", 0, 0, sel.Range);
float x = (float) sel.get_Information(LBWdInformation.wdHorizontalPositionRelativeToPage);
float y = (float) sel.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
//LBInlineShape shape = sel.InlineShapes.AddPicture(pngFile);
LBRange myRange = sel.Paragraphs.First.Range;
float yTop = (float)myRange.get_Information(LBWdInformation.wdVerticalPositionRelativeToPage);
float xAdjust = float.Parse(tbAdjustX.Text);
float yAdjust = float.Parse(tbAdjustY.Text);
LBShape shape = myDoc.Shapes.AddPicture(pngFile, x + xAdjust + plotRect.X, yAdjust + y - yTop + plotRect.Y, sel.Range);
//Console.WriteLine(",{0},{1},{2},{3}", x, y - yTop, xAdjust,yAdjust);
shape.LockAspectRatio = LBMsoTriState.msoTrue;
//shape.Width = .89F * shape.Width;
//shape.Width = float.Parse(tbAdjust.Text) * shape.Width;
shape.Width = plotRect.Width;
//shape.Height = .89F * shape.Height;
sel.WholeStory();
sel.Range.Font.Color = LBWdColor.wdColorRed;
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
//shape.Width = width;
//shape.Height = height;
//Console.WriteLine("{0} Shape Width {1} Height {2}", val.Replace("\n", "','"), shape.Width, shape.Height);
//imageROTokenReplaced = true;
}
else
{
val = val.Replace("`", "\xB0");
AddInfo("\tRO Found {0} = '{1}'", sel.Text, val);
InsertROValue(sel, val, sect.ActiveFormat.PlantFormat.FormatData.ROData.UpRoIfPrevUpper);
}
sel = FindRO();
}
sel = MyApp.Selection;
sel.WholeStory();
sel.Range.Font.Color = LBWdColor.wdColorRed;
sel.ParagraphFormat.LineSpacingRule = LBWdLineSpacing.wdLineSpaceExactly;
sel.ParagraphFormat.LineSpacing = 12;
//Console.WriteLine("{0},{1}", sel.ParagraphFormat.LineSpacing, sel.ParagraphFormat.LineSpacingRule);
string fileName = sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber;
//MyApp.Visible = true;
//MessageBox.Show("Ready to make PDF");
//MyApp.Visible = false;
fileName=CreatePDF(fileName, openPdf);
//MyApp.Visible = true;
MyApp.ActiveDocument.Close();
MyApp.Quit();
_MyApp = null;
return fileName;
}
}
private RectangleF CreatePlot(string pngFile, string xyPlot, float resolution)
{
RectangleF retval = new RectangleF(0, 0, 0, 0);
Graphics grfx = this.CreateGraphics();
string emfFile = pngFile.Replace(".png", ".emf");
Metafile mf = new Metafile(emfFile, grfx.GetHdc());
grfx.Dispose();
grfx = Graphics.FromImage(mf);
float dpi = grfx.DpiX;
//grfx.ScaleTransform(resolution / grfx.DpiX, (resolution +1F) / grfx.DpiY);
grfx.ScaleTransform(resolution / grfx.DpiX, resolution / grfx.DpiY);
grfx.InterpolationMode = System.Drawing.Drawing2D.InterpolationMode.NearestNeighbor;
grfx.SmoothingMode = System.Drawing.Drawing2D.SmoothingMode.HighQuality;
grfx.TextRenderingHint = System.Drawing.Text.TextRenderingHint.AntiAlias;
grfx.Clear(Color.Transparent);
XYPlots.XYPlot.BlackColor = Color.Red;
XYPlots.XYPlot myPlot = new XYPlots.XYPlot(xyPlot);
myPlot.SetMargins(0, 0, 0, 0);
myPlot.Process(new VG.VGOut_Graphics(grfx));
grfx.Dispose();
GraphicsUnit gu = new GraphicsUnit();
retval = mf.GetBounds(ref gu);
retval.Width *= dpi / resolution;
retval.Height *= dpi / resolution;
retval.X *= dpi / resolution;
retval.Y *= dpi / resolution;
//retval.X = myPlot.Width-retval.Width;
AddInfo("{0},{1},{2},{3},{4},{5}", myPlot.Width, myPlot.Height, retval.Width, retval.Height,retval.X,retval.Y);
//Console.Write("{0},{1},{2},{3}", myPlot.Width, myPlot.Height, retval.Width, retval.Height);
mf.Save(pngFile, ImageFormat.Png);
//Console.WriteLine("'pngfile','{0}'", pngFile);
mf.Dispose();
FileInfo myFile = new System.IO.FileInfo(emfFile);
myFile.Delete();
return retval;
}
private static void InsertROValue(LBSelection sel, string roValue, bool upRoIfPrevUpper)
{
if (roValue == null)
{
sel.Text = "RO Not Found";
sel.Font.Color = LBWdColor.wdColorRed;
}
else
{
if (upRoIfPrevUpper && sel.LastWasUpper) roValue = roValue.ToUpper();
// Convert fortran formatted numbers to scientific notation.
string tmp = DisplayRO.ConvertFortranFormatToScienctificNotation(roValue);
// Look for superscript or subscript and insert the appropriate commands
//Match roMatch = Regex.Match(tmp, @"(.*?)\\(super|sub) (.*?)\\nosupersub ");
Match roMatch = Regex.Match(tmp, @"(.*?)\\(up3|dn3) (.*?)\\(up0|dn0) ");
if (roMatch.Groups.Count == 4)// Superscript or subscript found
{
sel.Font.Color = LBWdColor.wdColorRed;
while (roMatch.Groups.Count == 4)
{
sel.TypeText(roMatch.Groups[1].Value); // output the text preceeding the super or sub command
//sel.Font.Position = roMatch.Groups[2].Value=="super" ? 2 : -2; // Shift the vertical position for super or sub
sel.Font.Position = roMatch.Groups[2].Value == "up3" ? 2 : -2; // Shift the vertical position for super or sub
sel.TypeText(roMatch.Groups[3].Value); // output the superscript or subscript
sel.Font.Position = 0; // restore the vertical position
tmp = tmp.Substring(roMatch.Length); // remove the processed text
//roMatch = Regex.Match(tmp, @"(.*?)\\(super|sub) (.*?)\\nosupersub "); // check to see if the text contain another super or sub
roMatch = Regex.Match(tmp, @"(.*?)\\(up3|dn3) (.*?)\\(up0|dn0) "); // check to see if the text contain another super or sub
}
if(tmp != "")// Add any remaining text
sel.TypeText(tmp);
sel.Font.Color = LBWdColor.wdColorAutomatic;
}
else // if no superscripts or subscripts just output the text
{
sel.Text = roValue;
sel.Font.Color = LBWdColor.wdColorRed;
}
}
}
private LBSelection FindRO()
{
LBSelection sel = MyApp.Selection;
LBFind find = sel.Find;
find.ClearFormatting();
find.Text = "[<](?@)-(?@)[>]";
//find.Wrap = LBWdFindWrap.wdFindStop;
find.Wrap = LBWdFindWrap.wdFindContinue;
find.MatchCase = false;
find.MatchWholeWord = false;
find.MatchWildcards = true;
find.MatchSoundsLike = false;
find.MatchAllWordForms = false;
if (find.Execute()) return sel;
return null;
}
private void frmPrintMsWord_FormClosing(object sender, FormClosingEventArgs e)
{
if (MyApp != null)
_MyApp.Quit();
//Console.WriteLine("Closing --- {0}", e.CloseReason);
LBApplicationClass.ClosePDFs();
RemovePDFFiles();
}
private void convertToPDFwithROsToolStripMenuItem_Click(object sender, EventArgs e)
{
// for each section in the active procedure
AddInfo("Procedure {0}:", MyProcedure.DisplayNumber);
int i = 0;
if (MyProcedure.Sections == null)
{
AddInfo(" No Sections", MyProcedure.DisplayNumber);
MessageBox.Show("No Sections");
return;
}
foreach (SectionInfo sect in MyProcedure.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
ToPDFReplaceROs(sect,true);
AddInfo("\t section {0} - {1} - {2} ROs", sect.DisplayNumber, sect.DisplayText, ROCount(sect));
}
}
}
private void closeAcrobatToolStripMenuItem_Click(object sender, EventArgs e)
{
LBApplicationClass.ClosePDFs();
}
List<string> _PDFFiles = new List<string>();
private void removePDFsToolStripMenuItem_Click(object sender, EventArgs e)
{
RemovePDFFiles();
}
private void RemovePDFFiles()
{
Application.DoEvents();
while (_PDFFiles.Count > 0)
{
string fileName = _PDFFiles[0];
//Console.WriteLine("Start==={0:s.ffff}==========={1}", DateTime.Now, fileName);
System.IO.FileInfo fi = new System.IO.FileInfo(fileName);
try
{
fi.Delete();
_PDFFiles.Remove(fileName);
}
catch (Exception ex)
{
AddInfo("RemovePDFFiles Error==={0:s.ffff}==========>{1} - {2}", DateTime.Now, ex.GetType().Name, ex.Message);
Application.DoEvents();
}
}
}
private void toPDFMethodToggle_Click(object sender, EventArgs e)
{
ToolStripMenuItem mi = sender as ToolStripMenuItem;
MyPDFMethod = (PDFMethod)mi.Tag;
}
private void rOTypesToolStripMenuItem_Click(object sender, EventArgs e)
{
}
private void FindROTypes(ProcedureInfo proc, Dictionary<int, int> roTypes, ROFSTLookup lookup, string igPrefix, string spPrefix)
{
foreach (SectionInfo sect in proc.Sections)
{
if (sect.MyContent.ContentEntryCount == 1)
{
MyStatus = string.Format("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
FindROTypes(proc, sect, roTypes, lookup, igPrefix, spPrefix);
}
}
}
private void FindROTypes(ProcedureInfo proc, SectionInfo sect, Dictionary<int, int> roTypes, ROFSTLookup lookup, string igPrefix, string spPrefix)
{
string searchText = sect.MyContent.MyEntry.MyDocument.DocAscii;
MatchCollection matches = Regex.Matches(searchText, @"\<[^>]*\>");
foreach (Match match in matches)
{
int? roType = lookup.GetROTypeByAccPagID(match.Value.Replace(" ",""), spPrefix, igPrefix);
if (roType != null)
{
if (roTypes.ContainsKey((int)roType))
{
roTypes[(int)roType]++;
if (roType == 8)
{
AddInfo("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
AddInfo("{0} Type '{1}' '{2}'\r\n", match.Value.Replace(" ", ""), roType,
lookup.GetROValueByAccPagID(match.Value.Replace(" ", ""), spPrefix, igPrefix).Replace("\n","','"));
}
}
else
{
roTypes.Add((int)roType, 1);
AddInfo("{0}:{1}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber);
AddInfo("{0} Type {1} \r\nValue '{2}'\r\n", match.Value.Replace(" ", ""), roType, lookup.GetROValueByAccPagID(match.Value.Replace(" ", ""), spPrefix, igPrefix));
}
}
else
{
AddInfo("{0}:{1} - {2}", proc.DisplayNumber, sect.DisplayNumber == "" ? sect.DisplayText : sect.DisplayNumber, match.Value);
}
}
}
private void getAllPlotsToolStripMenuItem_Click(object sender, EventArgs e)
{
if (MyDocVersion.DocVersionAssociationCount <= 0)
{
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
return;
}
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
ROFSTLookup lookup = rofst.ROFSTLookup;
List<ROFSTLookup.rochild> plots = lookup.GetRoChildrenByType(4);
foreach (ROFSTLookup.rochild plot in plots)
AddInfo("plots.Add(\"{0}\",\"{1}\");", plot.appid, ToCode(plot.value ?? "No Plot"));
}
private string ToCode(string text)
{
string retval = text.Replace("\"","\\\"");
retval = retval.Replace("\r\n", "\\r\\n\" +\r\n\t\"");
return retval;
}
private void getAllFortranNumbersToolStripMenuItem_Click(object sender, EventArgs e)
{
if (MyDocVersion.DocVersionAssociationCount <= 0)
{
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
return;
}
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
ROFSTLookup lookup = rofst.ROFSTLookup;
List<ROFSTLookup.rochild> roValues = lookup.GetRoChildrenByType(1);
foreach (ROFSTLookup.rochild roValue in roValues)
if(Regex.IsMatch(roValue.value,".*[0-9.]E[-+0-9].*"))
AddInfo("_Numbers.Add(new FortranNumber(\"{0}\"));", roValue.value);
}
private void getAllImagesToolStripMenuItem_Click(object sender, EventArgs e)
{
if (MyDocVersion.DocVersionAssociationCount <= 0)
{
MessageBox.Show("No RO data associations!", "No RO data", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
return;
}
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
ROFSTLookup lookup = rofst.ROFSTLookup;
List<ROFSTLookup.rochild> plots = lookup.GetRoChildrenByType(8);
foreach (ROFSTLookup.rochild plot in plots)
AddInfo("plots.Add(\"{0}\",\"{1}\");", plot.roid, plot.appid);
}
private void determineLengthToolStripMenuItem1_Click(object sender, EventArgs e)
{
AddInfo("Length of {0} = {1}", MySection.MyContent.Number ?? MySection.MyContent.Text, DetermineLength(MySection));
MyApp.Quit();
_MyApp = null;
}
private float DetermineLength(SectionInfo sect)
{
float retval=0;
using (DSOFile myFile = new DSOFile(sect.MyContent.MyEntry.MyDocument))
{
LBDocumentClass myDoc = MyApp.Documents.Open(myFile.FullName);
retval = myDoc.Length;
myDoc.Close();
}
//MyApp.Quit();
//_MyApp = null;
return retval;
}
private void determineLengthToolStripMenuItem_Click(object sender, EventArgs e)
{
AddInfo("{0}:", MyProcedure.DisplayNumber);
int i = 0;
if (MyProcedure.Sections == null)
{
AddInfo(" No Sections", MyProcedure.DisplayNumber);
return;
}
foreach (SectionInfo sect in MyProcedure.Sections)
{
// check to see if it contains a Word Document
if (sect.MyContent.ContentEntryCount > 0)
{
AddInfo("\t{0:00.00} pages - {1} - {2} ", DetermineLength(sect), sect.DisplayNumber, sect.DisplayText);
}
}
MyApp.Quit();
_MyApp = null;
}
private void WalkItems(ItemInfo itemInfo)
{
MyInfo.MyStatus = string.Format("Processing {0}", ShortPath(itemInfo));
WalkSteps(itemInfo);
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
}
private int testID = 442;
private void WalkSteps(ItemInfo itemInfo)
{
if(itemInfo.ItemID == testID)
AddInfo("Found TestID");
WalkSteps(itemInfo.Cautions);
WalkSteps(itemInfo.Notes);
MyInfo.AddInfoPartial("{0},'{1}','{2}','{3}'", itemInfo.ItemID, ShortPath(itemInfo), ShortPath(itemInfo.SearchNext), ShortPath(itemInfo.SearchPrev));
WalkSteps(itemInfo.RNOs);
WalkSteps(itemInfo.Tables);
WalkSteps(itemInfo.Procedures);
WalkSteps(itemInfo.Sections);
WalkSteps(itemInfo.Steps);
}
private string ShortPath(ItemInfo itemInfo)
{
if (itemInfo == null)
return "";
if (itemInfo.IsProcedure)
return itemInfo.DisplayNumber;
if (itemInfo.IsSection)
return itemInfo.DisplayNumber != "" ? itemInfo.DisplayNumber : itemInfo.DisplayText;
return itemInfo.Path.Substring(itemInfo.ActiveSection.Path.Length);
}
private void WalkSteps(ItemInfoList itemInfoList)
{
if(itemInfoList != null)
foreach (ItemInfo itemInfo in itemInfoList)
WalkSteps(itemInfo);
}
private void lbSections_DoubleClick(object sender, EventArgs e)
{
promsPrinterToolStripMenuItem1_Click(sender, e);
}
private void AddPageTemplate(string msWordPdf, SectionInfo sect)
{
// Create Page Template based upon PageList items and genmac
int docStyleIndex = ((int)sect.MyContent.Type) % 10000;
DocStyle myDocStyle = sect.ActiveFormat.PlantFormat.DocStyles.DocStyleList[docStyleIndex];
PageStyle myPageStyle = myDocStyle.pagestyle;
foreach (PageItem pageItem in myPageStyle.PageItems)
{
AddInfo("{0},{1},'{2}','{3}','{4}'", pageItem.Row, pageItem.Col, pageItem.Font, pageItem.Justify, pageItem.Token);
}
AddInfo("GenMac\r\n{0}",sect.ActiveFormat.GenMac);
}
private void promsPrinterToolStripMenuItem_Click(object sender, EventArgs e)
{
Proms2010Procedure prProc = _MyProms2010Print.GetProcedure(MyProcedure);
PromsPrinter pp = new PromsPrinter(MyProcedure,prProc.Rev,prProc.RevDate,"DRAFT");
pp.Print(@"C:\TEMP\32Bit",_MyProms2010Print, null,this);
}
private void promsPrinterToolStripMenuItem1_Click(object sender, EventArgs e)
{
Proms2010Procedure prProc = _MyProms2010Print.GetProcedure(MySection.MyProcedure);
string wordFile = null;
if(MySection.MyContent.ContentEntryCount == 1)
wordFile = ToPDFReplaceROs(MySection, false);
PromsPrinter pp = new PromsPrinter(MySection, prProc.Rev, prProc.RevDate,"DRAFT");
pp.Print(@"C:\TEMP\32Bit",_MyProms2010Print, wordFile,this);
}
Proms2010Print _MyProms2010Print;
private void buldXMLToolStripMenuItem_Click(object sender, EventArgs e)
{
// Walk through contents of the 16Bit Folder and create Proms2010 Structure
Proms2010Print _MyProms2010Print = new Proms2010Print();
_MyProms2010Print.PROMS16_Folder = @"C:\TEMP\16Bit";
_MyProms2010Print.Procedures = new Proms2010Procedures();
DirectoryInfo myDirectory = new DirectoryInfo(_MyProms2010Print.PROMS16_Folder);
foreach (FileInfo myFile in myDirectory.GetFiles("*.pdf"))
{
ProcedureInfo myProc = GetProcedure(myFile.Name.Replace(".pdf",""));
if (myProc != null)
{
Proms2010Procedure proc = new Proms2010Procedure(myProc);
proc.PageCount = VolianPdf.PageCount(myFile.FullName);
_MyProms2010Print.Procedures.Add(proc);
}
}
// Output xml to frmInfo
ClearInfo();
SvgSerializer<Proms2010Print>.WriteFile(_MyProms2010Print, "Proms2010Print.xml");
AddInfo(SvgSerializer<Proms2010Print>.StringSerialize(_MyProms2010Print));
}
private ProcedureInfo GetProcedure(string procNumber)
{
// Loop through the list looking for a matching number
foreach (ProcedureInfo proc in MyDocVersion.Procedures)
if (proc.DisplayNumber == procNumber)
return proc;
return null;
}
private void typesToolStripMenuItem_Click(object sender, EventArgs e)
{
// Initialize Dictionary
Dictionary<int, int> roTypes = new Dictionary<int, int>();
// Spin Through Procedures for selected DocVersion
if (MyDocVersion.DocVersionAssociationCount == 0)
{
MessageBox.Show("No associated ROFST");
return;
}
ROFstInfo rofst = MyDocVersion.DocVersionAssociations[0].MyROFst;
ROFSTLookup lookup = rofst.ROFSTLookup;
string igPrefix = MyDocVersion.DocVersionConfig.RODefaults_graphicsprefix;
string spPrefix = MyDocVersion.DocVersionConfig.RODefaults_setpointprefix;
foreach (ProcedureInfo proc in MyDocVersion.Procedures)
FindROTypes(proc, roTypes, lookup, igPrefix, spPrefix);
// Output Dictionary Results
foreach (int roType in roTypes.Keys)
AddInfo("Type {0}, Count {1}", roType, roTypes[roType]);
}
private void walkStepsToolStripMenuItem1_Click(object sender, EventArgs e)
{
MyInfo.MyStatus = string.Format("Processing");
if (MyDocVersion != null)
{
MyInfo.Clear();
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
ProcedureWalkSteps(procInfo);
MyInfo.CopyOutput();
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
}
}
private void walkStepsToolStripMenuItem2_Click(object sender, EventArgs e)
{
ProcedureWalkSteps(MyProcedure);
MyInfo.CopyOutput();
MyInfo.MyStatus = string.Format("Ready - Output copied to clipboard");
}
private void walkStepsToolStripMenuItem3_Click(object sender, EventArgs e)
{
if (MySection != null) WalkItems(MySection);
}
private void ProcedureWalkSteps(ProcedureInfo procInfo)
{
MyInfo.MyStatus = string.Format("Processing {0}", procInfo.MyContent.Number);
if (procInfo != null) WalkItems(procInfo);
}
public DocVersionInfo MyDocVersion
{
get { return lbDocVersion.SelectedValue as DocVersionInfo; }
}
public ProcedureInfo MyProcedure
{
get { return lbProcedure.SelectedValue as ProcedureInfo; }
}
public SectionInfo MySection
{
get { return lbSections.SelectedValue as SectionInfo; }
}
private void countToolStripMenuItem1_Click(object sender, EventArgs e)
{
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
ShowSectionCounts(procInfo);
}
private void listSectionsToolStripMenuItem1_Click(object sender, EventArgs e)
{
foreach (ProcedureInfo procInfo in MyDocVersion.Procedures)
ListSections(procInfo);
}
}
enum PDFMethod
{
ToPDF,
ToPDF2003BG,
ToPDF2003FG,
toPDF2007
}
}