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

Change of button-places etc.

Browse Source
This commit is contained in:
tfoman
2015-07-25 16:53:57 +02:00
parent 6c5a99f59a
commit f9e257cfa5
7 changed files with 141 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
CobXmlSupport/GenCobCode.cs
View File

@ -240,8 +240,8 @@ namespace CobXmlSupport
//Debug.WriteLine("Upplagt fält: " + rw.FieldName);
}
}
if (rw.MoveCode == null) { rw.MoveCode = " "; }
Cc.WorkDicIn[rw.FieldName] = rw.MoveCode;
if (rw.Move_Code == null) { rw.MoveCode = " "; }
Cc.WorkDicIn[rw.FieldName] = rw.Move_Code;
if (Cc.WorkDicOut != null && Cc.WorkDicOut.Count > 0)
{
@ -254,8 +254,8 @@ namespace CobXmlSupport
Cc.WorkDicOut.Add(rw.FieldName, "");
}
}
if (rw.MoveFromCode == null) { rw.MoveFromCode = " "; }
Cc.WorkDicOut[rw.FieldName] = rw.MoveFromCode;
if (rw.Move_FromCode == null) { rw.MoveFromCode = " "; }
Cc.WorkDicOut[rw.FieldName] = rw.Move_FromCode;
}
// Prefill with possibly filled out code
if (chkWrap.Checked)
@ -1519,7 +1519,7 @@ namespace CobXmlSupport
genExtMoves.CodeShower.Text += "\r\n MOVE ";
if (cr.MoveCode == null || cr.MoveCode.Trim().Length < 1)
if (cr.Move_Code == null || cr.Move_Code.Trim().Length < 1)
genExtMoves.CodeShower.Text += "0";
else
genExtMoves.CodeShower.Text += "1";
@ -1548,7 +1548,7 @@ namespace CobXmlSupport
//---------------- Changed
//if (cr.MoveCode.Length > 1 && cr.MoveCode != " ")
if (cr.MoveCode == null || cr.MoveCode.Trim() == "")
if (cr.Move_Code == null || cr.Move_Code.Trim() == "")
{
if (cr.FieldDef.ToUpper().IndexOf("X") > -1)
{
@ -1771,7 +1771,7 @@ namespace CobXmlSupport
fromMoves.CodeShower.Text += "( " + occParRows + " )";
}
fromMoves.CodeShower.Text += "\r\n " + adjustIf(adj) + "TO ";
if (cr.MoveFromCode.Trim().Length > 0)
if (cr.Move_FromCode.Trim().Length > 0)
{
fromMoves.CodeShower.Text += cr.MoveFromCode;
}
@ -1795,7 +1795,7 @@ namespace CobXmlSupport
fromMoves.CodeShower.Text += "\r\n " + adjustIf(adj) + "Move space to " + S.ettingLogVarName + " ";
fromMoves.CodeShower.Text += "\r\n " + adjustIf(adj) + "String ";
if (cr.MoveFromCode.Trim().Length > 0)
if (cr.Move_FromCode.Trim().Length > 0)
{
fromMoves.CodeShower.Text += "\r\n " + adjustIf(adj) + cr.MoveFromCode + " delimited by \" \" ";
}