Author: alfonsojunior
(2012/01/12 01:37) 4 months ago
Alteracao de Alfonso
104
filename = filename + this.KBObject.Name + ".cob";
105
break;
106
case 12:
107
if (this.KBObject.Type == ObjClass.SDT || this.KBObject.Type == ObjClass.Procedure)
//MessageBox.Show("Objeto: " + this.KBObject.Name);
108
Artech.Common.Properties.PropertyManager.PropertySpecDescriptor prpSpDesc = this.KBObject.GetPropertyDescriptorByDisplayName("Main program");
109
//MessageBox.Show("Prop: " + prpSpDesc.Value.ToString());
110
if (this.KBObject.Type == ObjClass.SDT || (this.KBObject.Type == ObjClass.Procedure && prpSpDesc.Value.ToString().Equals("False")))
filename = filename + this.KBObject.Name + ".java";
111
else
112
filename = filename + this.KBObject.Name + "_impl.java";
113
if (this.KBObject.Type == ObjClass.Procedure && prpSpDesc.Value.ToString().Equals("True"))
114
filename = filename + "a" + this.KBObject.Name + "_impl.java";
115
116
117
case 15:
118
filename = filename + this.KBObject.Name + ".cs";
119
if (this.KBObject.Type == ObjClass.SDT || this.KBObject.Type == ObjClass.Procedure)//MessageBox.Show("Objeto: " + this.KBObject.Name);Artech.Common.Properties.PropertyManager.PropertySpecDescriptor prpSpDesc = this.KBObject.GetPropertyDescriptorByDisplayName("Main program");//MessageBox.Show("Prop: " + prpSpDesc.Value.ToString());if (this.KBObject.Type == ObjClass.SDT || (this.KBObject.Type == ObjClass.Procedure && prpSpDesc.Value.ToString().Equals("False")))filename = filename + this.KBObject.Name + "_impl.java";if (this.KBObject.Type == ObjClass.Procedure && prpSpDesc.Value.ToString().Equals("True"))filename = filename + "a" + this.KBObject.Name + "_impl.java";elsefilename = filename + this.KBObject.Name + "_impl.java";