tfoman/CobXml
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Some events on head-window , save-procedure

Browse Source
This commit is contained in:
tfoman
2015-07-19 23:21:20 +02:00
parent 59efd6f425
commit 89fedaec3f
2 changed files with 11 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
CobXmlSupport/GenCobCode.cs
View File

@ -1385,6 +1385,13 @@ namespace CobXmlSupport
genMoves.Parent = this;
genMoves.Labeltext = "Creating \"move to\" Code";
// CreateComment(genMoves.CodeShower, "Moves to", "Tommy Öman", "Fordonsdata Nordic AB");
savedFile SF = new savedFile();
SF.idConnect = "6EFF8B31-7F88-4A81-B94E-41D54A3D3197";
SF.usageName = S.ettingActualFile.Substring(0, S.ettingActualFile.LastIndexOf(".")) + "_Load";
SF.fNameSaved = "Load_" + S.ettingActualFile.Substring(0, S.ettingActualFile.LastIndexOf(".")) + ".cbl";
genMoves.SavedFile = SF;
foreach (CobRow cr in rowList)
{
string occParRows = "";
@ -1430,7 +1437,8 @@ namespace CobXmlSupport
savedFile SF = new savedFile();
SF.idConnect = "6EFF8B31-7F88-4A81-B94E-41D54A3D3197";
SF.usageName = "Usage001.cpy";
SF.usageName = S.ettingActualFile.Substring(0, S.ettingActualFile.LastIndexOf(".")) + "_Load";
SF.fNameSaved = "Load_" + S.ettingActualFile.Substring(0, S.ettingActualFile.LastIndexOf(".")) + ".cbl";
genExtMoves.SavedFile = SF;
bool adj = false;