mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-25 16:40:07 +00:00
Version: 4:11:02
Se arrglo el resumen dia, ahora puedes entrar sin necesidad de hacer algun pedido sin que truene, se muestra la cantidad de clientes visitados sin importar si tienen o no tienen venta y tambien se le agrego la cantidad de clientes que si tienen venta.
This commit is contained in:
IsR0d
@@ -10,7 +10,7 @@ public class b4xformatter extends B4AClass.ImplB4AClass implements BA.SubDelegat
|
||||
private static java.util.HashMap<String, java.lang.reflect.Method> htSubs;
|
||||
private void innerInitialize(BA _ba) throws Exception {
|
||||
if (ba == null) {
|
||||
ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xformatter");
|
||||
ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xformatter");
|
||||
if (htSubs == null) {
|
||||
ba.loadHtSubs(this.getClass());
|
||||
htSubs = ba.htSubs;
|
||||
@@ -23,13 +23,23 @@ public class b4xformatter extends B4AClass.ImplB4AClass implements BA.SubDelegat
|
||||
ba.raiseEvent2(null, true, "class_globals", false);
|
||||
}
|
||||
|
||||
|
||||
public void innerInitializeHelper(anywheresoftware.b4a.BA _ba) throws Exception{
|
||||
innerInitialize(_ba);
|
||||
}
|
||||
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
|
||||
return BA.SubDelegator.SubNotFound;
|
||||
}
|
||||
public anywheresoftware.b4a.keywords.Common __c = null;
|
||||
public anywheresoftware.b4a.objects.collections.List _formats = null;
|
||||
public int _max_value = 0;
|
||||
public int _min_value = 0;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null;
|
||||
public b4a.example.dateutils _dateutils = null;
|
||||
public keymon.lat.medicomed.main _main = null;
|
||||
public keymon.lat.medicomed.starter _starter = null;
|
||||
public keymon.lat.medicomed.subs _subs = null;
|
||||
public keymon.lat.medicomed.appupdater _appupdater = null;
|
||||
public keymon.lat.medicomed.mapa_rutas _mapa_rutas = null;
|
||||
public keymon.lat.medicomed.tracker _tracker = null;
|
||||
public keymon.lat.medicomed.newinst2 _newinst2 = null;
|
||||
public keymon.lat.medicomed.b4xpages _b4xpages = null;
|
||||
public keymon.lat.medicomed.b4xcollections _b4xcollections = null;
|
||||
public keymon.lat.medicomed.httputils2service _httputils2service = null;
|
||||
public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null;
|
||||
public static class _b4xformatdata{
|
||||
public boolean IsInitialized;
|
||||
public String Prefix;
|
||||
@@ -67,42 +77,113 @@ FractionPaddingChar = "";
|
||||
public String toString() {
|
||||
return BA.TypeToString(this, false);
|
||||
}}
|
||||
public anywheresoftware.b4a.keywords.Common __c = null;
|
||||
public anywheresoftware.b4a.objects.collections.List _formats = null;
|
||||
public int _max_value = 0;
|
||||
public int _min_value = 0;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null;
|
||||
public b4a.example.dateutils _dateutils = null;
|
||||
public keymon.lat.medicomed.main _main = null;
|
||||
public keymon.lat.medicomed.starter _starter = null;
|
||||
public keymon.lat.medicomed.subs _subs = null;
|
||||
public keymon.lat.medicomed.appupdater _appupdater = null;
|
||||
public keymon.lat.medicomed.mapa_rutas _mapa_rutas = null;
|
||||
public keymon.lat.medicomed.tracker _tracker = null;
|
||||
public keymon.lat.medicomed.newinst2 _newinst2 = null;
|
||||
public keymon.lat.medicomed.b4xpages _b4xpages = null;
|
||||
public keymon.lat.medicomed.b4xcollections _b4xcollections = null;
|
||||
public keymon.lat.medicomed.httputils2service _httputils2service = null;
|
||||
public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null;
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _getdefaultformat(keymon.lat.medicomed.b4xformatter __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "getdefaultformat", true))
|
||||
{return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "getdefaultformat", null));}
|
||||
RDebugUtils.currentLine=62259200;
|
||||
//BA.debugLineNum = 62259200;BA.debugLine="Public Sub GetDefaultFormat As B4XFormatData";
|
||||
RDebugUtils.currentLine=62259201;
|
||||
//BA.debugLineNum = 62259201;BA.debugLine="Return formats.Get(0)";
|
||||
if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (0)));
|
||||
RDebugUtils.currentLine=62259202;
|
||||
//BA.debugLineNum = 62259202;BA.debugLine="End Sub";
|
||||
public String _addformatdata(keymon.lat.medicomed.b4xformatter._b4xformatdata _data,double _rangestart,double _rangeend,boolean _includeedges) throws Exception{
|
||||
double _factor = 0;
|
||||
//BA.debugLineNum = 65;BA.debugLine="Public Sub AddFormatData (Data As B4XFormatData, R";
|
||||
//BA.debugLineNum = 66;BA.debugLine="Dim factor As Double = Power(10, -Data.MaximumFra";
|
||||
_factor = __c.Power(10,-_data.MaximumFractions /*int*/ );
|
||||
//BA.debugLineNum = 67;BA.debugLine="If IncludeEdges = False Then";
|
||||
if (_includeedges==__c.False) {
|
||||
//BA.debugLineNum = 68;BA.debugLine="RangeStart = RangeStart + factor";
|
||||
_rangestart = _rangestart+_factor;
|
||||
//BA.debugLineNum = 69;BA.debugLine="RangeEnd = RangeEnd - factor";
|
||||
_rangeend = _rangeend-_factor;
|
||||
};
|
||||
//BA.debugLineNum = 71;BA.debugLine="RangeStart = RangeStart - factor / 2";
|
||||
_rangestart = _rangestart-_factor/(double)2;
|
||||
//BA.debugLineNum = 72;BA.debugLine="RangeEnd = RangeEnd + factor / 2";
|
||||
_rangeend = _rangeend+_factor/(double)2;
|
||||
//BA.debugLineNum = 73;BA.debugLine="Data.RangeStart = RangeStart";
|
||||
_data.RangeStart /*double*/ = _rangestart;
|
||||
//BA.debugLineNum = 74;BA.debugLine="Data.RangeEnd = RangeEnd";
|
||||
_data.RangeEnd /*double*/ = _rangeend;
|
||||
//BA.debugLineNum = 75;BA.debugLine="formats.Add(Data)";
|
||||
_formats.Add((Object)(_data));
|
||||
//BA.debugLineNum = 76;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _class_globals() throws Exception{
|
||||
//BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals";
|
||||
//BA.debugLineNum = 2;BA.debugLine="Type B4XFormatData (Prefix As String, Postfix As";
|
||||
;
|
||||
//BA.debugLineNum = 6;BA.debugLine="Private formats As List";
|
||||
_formats = new anywheresoftware.b4a.objects.collections.List();
|
||||
//BA.debugLineNum = 7;BA.debugLine="Public Const MAX_VALUE = 0x7fffffff, MIN_VALUE =";
|
||||
_max_value = ((int)0x7fffffff);
|
||||
_min_value = ((int)0x80000000);
|
||||
//BA.debugLineNum = 9;BA.debugLine="Private xui As XUI";
|
||||
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
|
||||
//BA.debugLineNum = 11;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _copyformatdata(keymon.lat.medicomed.b4xformatter._b4xformatdata _data) throws Exception{
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
//BA.debugLineNum = 38;BA.debugLine="Public Sub CopyFormatData (Data As B4XFormatData)";
|
||||
//BA.debugLineNum = 39;BA.debugLine="Dim d As B4XFormatData";
|
||||
_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata();
|
||||
//BA.debugLineNum = 40;BA.debugLine="d.Initialize";
|
||||
_d.Initialize();
|
||||
//BA.debugLineNum = 41;BA.debugLine="d.DecimalPoint = Data.DecimalPoint";
|
||||
_d.DecimalPoint /*String*/ = _data.DecimalPoint /*String*/ ;
|
||||
//BA.debugLineNum = 42;BA.debugLine="If Data.FormatFont.IsInitialized Then";
|
||||
if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) {
|
||||
//BA.debugLineNum = 44;BA.debugLine="d.FormatFont = xui.CreateFont(Data.FormatFont.To";
|
||||
_d.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _xui.CreateFont((android.graphics.Typeface)(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .ToNativeFont().getObject()),_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getSize());
|
||||
};
|
||||
//BA.debugLineNum = 47;BA.debugLine="d.GroupingCharacter = Data.GroupingCharacter";
|
||||
_d.GroupingCharacter /*String*/ = _data.GroupingCharacter /*String*/ ;
|
||||
//BA.debugLineNum = 48;BA.debugLine="d.MaximumFractions = Data.MaximumFractions";
|
||||
_d.MaximumFractions /*int*/ = _data.MaximumFractions /*int*/ ;
|
||||
//BA.debugLineNum = 49;BA.debugLine="d.MinimumFractions = Data.MinimumFractions";
|
||||
_d.MinimumFractions /*int*/ = _data.MinimumFractions /*int*/ ;
|
||||
//BA.debugLineNum = 50;BA.debugLine="d.MinimumIntegers = Data.MinimumIntegers";
|
||||
_d.MinimumIntegers /*int*/ = _data.MinimumIntegers /*int*/ ;
|
||||
//BA.debugLineNum = 51;BA.debugLine="d.Postfix = Data.Postfix";
|
||||
_d.Postfix /*String*/ = _data.Postfix /*String*/ ;
|
||||
//BA.debugLineNum = 52;BA.debugLine="d.Prefix = Data.Prefix";
|
||||
_d.Prefix /*String*/ = _data.Prefix /*String*/ ;
|
||||
//BA.debugLineNum = 53;BA.debugLine="d.RangeEnd = Data.RangeEnd";
|
||||
_d.RangeEnd /*double*/ = _data.RangeEnd /*double*/ ;
|
||||
//BA.debugLineNum = 54;BA.debugLine="d.RangeStart = Data.RangeStart";
|
||||
_d.RangeStart /*double*/ = _data.RangeStart /*double*/ ;
|
||||
//BA.debugLineNum = 55;BA.debugLine="d.RemoveMinusSign = Data.RemoveMinusSign";
|
||||
_d.RemoveMinusSign /*boolean*/ = _data.RemoveMinusSign /*boolean*/ ;
|
||||
//BA.debugLineNum = 56;BA.debugLine="d.TextColor = Data.TextColor";
|
||||
_d.TextColor /*int*/ = _data.TextColor /*int*/ ;
|
||||
//BA.debugLineNum = 57;BA.debugLine="d.FractionPaddingChar = Data.FractionPaddingChar";
|
||||
_d.FractionPaddingChar /*String*/ = _data.FractionPaddingChar /*String*/ ;
|
||||
//BA.debugLineNum = 58;BA.debugLine="d.IntegerPaddingChar = Data.IntegerPaddingChar";
|
||||
_d.IntegerPaddingChar /*String*/ = _data.IntegerPaddingChar /*String*/ ;
|
||||
//BA.debugLineNum = 59;BA.debugLine="Return d";
|
||||
if (true) return _d;
|
||||
//BA.debugLineNum = 60;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
public String _format(keymon.lat.medicomed.b4xformatter __ref,double _number) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "format", true))
|
||||
{return ((String) Debug.delegate(ba, "format", new Object[] {_number}));}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _createdefaultformat() throws Exception{
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
//BA.debugLineNum = 19;BA.debugLine="Private Sub CreateDefaultFormat As B4XFormatData";
|
||||
//BA.debugLineNum = 20;BA.debugLine="Dim d As B4XFormatData";
|
||||
_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata();
|
||||
//BA.debugLineNum = 21;BA.debugLine="d.Initialize";
|
||||
_d.Initialize();
|
||||
//BA.debugLineNum = 22;BA.debugLine="d.GroupingCharacter = \",\"";
|
||||
_d.GroupingCharacter /*String*/ = ",";
|
||||
//BA.debugLineNum = 23;BA.debugLine="d.DecimalPoint = \".\"";
|
||||
_d.DecimalPoint /*String*/ = ".";
|
||||
//BA.debugLineNum = 24;BA.debugLine="d.MaximumFractions = 3";
|
||||
_d.MaximumFractions /*int*/ = (int) (3);
|
||||
//BA.debugLineNum = 25;BA.debugLine="d.MinimumIntegers = 1";
|
||||
_d.MinimumIntegers /*int*/ = (int) (1);
|
||||
//BA.debugLineNum = 26;BA.debugLine="d.IntegerPaddingChar = \"0\"";
|
||||
_d.IntegerPaddingChar /*String*/ = "0";
|
||||
//BA.debugLineNum = 27;BA.debugLine="d.FractionPaddingChar = \"0\"";
|
||||
_d.FractionPaddingChar /*String*/ = "0";
|
||||
//BA.debugLineNum = 28;BA.debugLine="Return d";
|
||||
if (true) return _d;
|
||||
//BA.debugLineNum = 29;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
public String _format(double _number) throws Exception{
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null;
|
||||
anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null;
|
||||
int _numberstartindex = 0;
|
||||
@@ -114,422 +195,183 @@ int _fracstartindex = 0;
|
||||
int _lastzerocount = 0;
|
||||
int _multipler = 0;
|
||||
int _w = 0;
|
||||
RDebugUtils.currentLine=62390272;
|
||||
//BA.debugLineNum = 62390272;BA.debugLine="Public Sub Format (Number As Double) As String";
|
||||
RDebugUtils.currentLine=62390273;
|
||||
//BA.debugLineNum = 62390273;BA.debugLine="If Number < MIN_VALUE Or Number > MAX_VALUE Then";
|
||||
if (_number<__ref._min_value /*int*/ || _number>__ref._max_value /*int*/ ) {
|
||||
//BA.debugLineNum = 92;BA.debugLine="Public Sub Format (Number As Double) As String";
|
||||
//BA.debugLineNum = 93;BA.debugLine="If Number < MIN_VALUE Or Number > MAX_VALUE Then";
|
||||
if (_number<_min_value || _number>_max_value) {
|
||||
if (true) return "OVERFLOW";};
|
||||
RDebugUtils.currentLine=62390274;
|
||||
//BA.debugLineNum = 62390274;BA.debugLine="Dim data As B4XFormatData = GetFormatData (Number";
|
||||
_data = __ref._getformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,_number);
|
||||
RDebugUtils.currentLine=62390275;
|
||||
//BA.debugLineNum = 62390275;BA.debugLine="Dim sb As StringBuilder";
|
||||
//BA.debugLineNum = 94;BA.debugLine="Dim data As B4XFormatData = GetFormatData (Number";
|
||||
_data = _getformatdata(_number);
|
||||
//BA.debugLineNum = 95;BA.debugLine="Dim sb As StringBuilder";
|
||||
_sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper();
|
||||
RDebugUtils.currentLine=62390276;
|
||||
//BA.debugLineNum = 62390276;BA.debugLine="sb.Initialize";
|
||||
//BA.debugLineNum = 96;BA.debugLine="sb.Initialize";
|
||||
_sb.Initialize();
|
||||
RDebugUtils.currentLine=62390277;
|
||||
//BA.debugLineNum = 62390277;BA.debugLine="sb.Append(data.Prefix)";
|
||||
//BA.debugLineNum = 97;BA.debugLine="sb.Append(data.Prefix)";
|
||||
_sb.Append(_data.Prefix /*String*/ );
|
||||
RDebugUtils.currentLine=62390278;
|
||||
//BA.debugLineNum = 62390278;BA.debugLine="Dim NumberStartIndex As Int = sb.Length";
|
||||
//BA.debugLineNum = 98;BA.debugLine="Dim NumberStartIndex As Int = sb.Length";
|
||||
_numberstartindex = _sb.getLength();
|
||||
RDebugUtils.currentLine=62390279;
|
||||
//BA.debugLineNum = 62390279;BA.debugLine="Dim factor As Double = Power(10, -data.MaximumFra";
|
||||
//BA.debugLineNum = 99;BA.debugLine="Dim factor As Double = Power(10, -data.MaximumFra";
|
||||
_factor = __c.Power(10,-_data.MaximumFractions /*int*/ -1)*5;
|
||||
RDebugUtils.currentLine=62390280;
|
||||
//BA.debugLineNum = 62390280;BA.debugLine="If Number < -factor And data.RemoveMinusSign = Fa";
|
||||
//BA.debugLineNum = 100;BA.debugLine="If Number < -factor And data.RemoveMinusSign = Fa";
|
||||
if (_number<-_factor && _data.RemoveMinusSign /*boolean*/ ==__c.False) {
|
||||
RDebugUtils.currentLine=62390281;
|
||||
//BA.debugLineNum = 62390281;BA.debugLine="sb.Append(\"-\")";
|
||||
//BA.debugLineNum = 101;BA.debugLine="sb.Append(\"-\")";
|
||||
_sb.Append("-");
|
||||
RDebugUtils.currentLine=62390282;
|
||||
//BA.debugLineNum = 62390282;BA.debugLine="NumberStartIndex = NumberStartIndex + 1";
|
||||
//BA.debugLineNum = 102;BA.debugLine="NumberStartIndex = NumberStartIndex + 1";
|
||||
_numberstartindex = (int) (_numberstartindex+1);
|
||||
};
|
||||
RDebugUtils.currentLine=62390284;
|
||||
//BA.debugLineNum = 62390284;BA.debugLine="Number = Abs(Number) + factor";
|
||||
//BA.debugLineNum = 104;BA.debugLine="Number = Abs(Number) + factor";
|
||||
_number = __c.Abs(_number)+_factor;
|
||||
RDebugUtils.currentLine=62390285;
|
||||
//BA.debugLineNum = 62390285;BA.debugLine="Dim whole As Int = Number";
|
||||
//BA.debugLineNum = 105;BA.debugLine="Dim whole As Int = Number";
|
||||
_whole = (int) (_number);
|
||||
RDebugUtils.currentLine=62390286;
|
||||
//BA.debugLineNum = 62390286;BA.debugLine="Dim frac As Double = Number - whole";
|
||||
//BA.debugLineNum = 106;BA.debugLine="Dim frac As Double = Number - whole";
|
||||
_frac = _number-_whole;
|
||||
RDebugUtils.currentLine=62390287;
|
||||
//BA.debugLineNum = 62390287;BA.debugLine="Dim g As Int";
|
||||
//BA.debugLineNum = 107;BA.debugLine="Dim g As Int";
|
||||
_g = 0;
|
||||
RDebugUtils.currentLine=62390288;
|
||||
//BA.debugLineNum = 62390288;BA.debugLine="Do While whole > 0";
|
||||
//BA.debugLineNum = 108;BA.debugLine="Do While whole > 0";
|
||||
while (_whole>0) {
|
||||
RDebugUtils.currentLine=62390289;
|
||||
//BA.debugLineNum = 62390289;BA.debugLine="If g > 0 And g Mod 3 = 0 And data.GroupingCharac";
|
||||
//BA.debugLineNum = 109;BA.debugLine="If g > 0 And g Mod 3 = 0 And data.GroupingCharac";
|
||||
if (_g>0 && _g%3==0 && _data.GroupingCharacter /*String*/ .length()>0) {
|
||||
RDebugUtils.currentLine=62390290;
|
||||
//BA.debugLineNum = 62390290;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac";
|
||||
//BA.debugLineNum = 110;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac";
|
||||
_sb.Insert(_numberstartindex,_data.GroupingCharacter /*String*/ );
|
||||
};
|
||||
RDebugUtils.currentLine=62390292;
|
||||
//BA.debugLineNum = 62390292;BA.debugLine="g = g + 1";
|
||||
//BA.debugLineNum = 112;BA.debugLine="g = g + 1";
|
||||
_g = (int) (_g+1);
|
||||
RDebugUtils.currentLine=62390293;
|
||||
//BA.debugLineNum = 62390293;BA.debugLine="sb.Insert(NumberStartIndex, whole Mod 10)";
|
||||
//BA.debugLineNum = 113;BA.debugLine="sb.Insert(NumberStartIndex, whole Mod 10)";
|
||||
_sb.Insert(_numberstartindex,BA.NumberToString(_whole%10));
|
||||
RDebugUtils.currentLine=62390294;
|
||||
//BA.debugLineNum = 62390294;BA.debugLine="whole = whole / 10";
|
||||
//BA.debugLineNum = 114;BA.debugLine="whole = whole / 10";
|
||||
_whole = (int) (_whole/(double)10);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390296;
|
||||
//BA.debugLineNum = 62390296;BA.debugLine="Do While sb.Length - NumberStartIndex < data.Mini";
|
||||
//BA.debugLineNum = 116;BA.debugLine="Do While sb.Length - NumberStartIndex < data.Mini";
|
||||
while (_sb.getLength()-_numberstartindex<_data.MinimumIntegers /*int*/ ) {
|
||||
RDebugUtils.currentLine=62390297;
|
||||
//BA.debugLineNum = 62390297;BA.debugLine="sb.Insert(NumberStartIndex, data.IntegerPaddingC";
|
||||
//BA.debugLineNum = 117;BA.debugLine="sb.Insert(NumberStartIndex, data.IntegerPaddingC";
|
||||
_sb.Insert(_numberstartindex,_data.IntegerPaddingChar /*String*/ );
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390299;
|
||||
//BA.debugLineNum = 62390299;BA.debugLine="If data.MaximumFractions > 0 And (data.MinimumFra";
|
||||
//BA.debugLineNum = 119;BA.debugLine="If data.MaximumFractions > 0 And (data.MinimumFra";
|
||||
if (_data.MaximumFractions /*int*/ >0 && (_data.MinimumFractions /*int*/ >0 || _frac>0)) {
|
||||
RDebugUtils.currentLine=62390300;
|
||||
//BA.debugLineNum = 62390300;BA.debugLine="Dim FracStartIndex As Int = sb.Length";
|
||||
//BA.debugLineNum = 120;BA.debugLine="Dim FracStartIndex As Int = sb.Length";
|
||||
_fracstartindex = _sb.getLength();
|
||||
RDebugUtils.currentLine=62390301;
|
||||
//BA.debugLineNum = 62390301;BA.debugLine="Dim LastZeroCount As Int";
|
||||
//BA.debugLineNum = 121;BA.debugLine="Dim LastZeroCount As Int";
|
||||
_lastzerocount = 0;
|
||||
RDebugUtils.currentLine=62390302;
|
||||
//BA.debugLineNum = 62390302;BA.debugLine="Dim Multipler As Int = 10";
|
||||
//BA.debugLineNum = 122;BA.debugLine="Dim Multipler As Int = 10";
|
||||
_multipler = (int) (10);
|
||||
RDebugUtils.currentLine=62390303;
|
||||
//BA.debugLineNum = 62390303;BA.debugLine="Do While frac >= 2 * factor And sb.Length - Frac";
|
||||
//BA.debugLineNum = 123;BA.debugLine="Do While frac >= 2 * factor And sb.Length - Frac";
|
||||
while (_frac>=2*_factor && _sb.getLength()-_fracstartindex<_data.MaximumFractions /*int*/ ) {
|
||||
RDebugUtils.currentLine=62390304;
|
||||
//BA.debugLineNum = 62390304;BA.debugLine="Dim w As Int = (frac * Multipler)";
|
||||
//BA.debugLineNum = 124;BA.debugLine="Dim w As Int = (frac * Multipler)";
|
||||
_w = (int) ((_frac*_multipler));
|
||||
RDebugUtils.currentLine=62390305;
|
||||
//BA.debugLineNum = 62390305;BA.debugLine="w = w Mod 10";
|
||||
//BA.debugLineNum = 125;BA.debugLine="w = w Mod 10";
|
||||
_w = (int) (_w%10);
|
||||
RDebugUtils.currentLine=62390306;
|
||||
//BA.debugLineNum = 62390306;BA.debugLine="If w = 0 Then LastZeroCount = LastZeroCount + 1";
|
||||
//BA.debugLineNum = 126;BA.debugLine="If w = 0 Then LastZeroCount = LastZeroCount + 1";
|
||||
if (_w==0) {
|
||||
_lastzerocount = (int) (_lastzerocount+1);}
|
||||
else {
|
||||
_lastzerocount = (int) (0);};
|
||||
RDebugUtils.currentLine=62390307;
|
||||
//BA.debugLineNum = 62390307;BA.debugLine="sb.Append(w)";
|
||||
//BA.debugLineNum = 127;BA.debugLine="sb.Append(w)";
|
||||
_sb.Append(BA.NumberToString(_w));
|
||||
RDebugUtils.currentLine=62390308;
|
||||
//BA.debugLineNum = 62390308;BA.debugLine="Multipler = Multipler * 10";
|
||||
//BA.debugLineNum = 128;BA.debugLine="Multipler = Multipler * 10";
|
||||
_multipler = (int) (_multipler*10);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390310;
|
||||
//BA.debugLineNum = 62390310;BA.debugLine="If data.FractionPaddingChar <> \"0\" And LastZeroC";
|
||||
//BA.debugLineNum = 130;BA.debugLine="If data.FractionPaddingChar <> \"0\" And LastZeroC";
|
||||
if ((_data.FractionPaddingChar /*String*/ ).equals("0") == false && _lastzerocount>0) {
|
||||
RDebugUtils.currentLine=62390311;
|
||||
//BA.debugLineNum = 62390311;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)";
|
||||
//BA.debugLineNum = 131;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)";
|
||||
_sb.Remove((int) (_sb.getLength()-_lastzerocount),_sb.getLength());
|
||||
RDebugUtils.currentLine=62390312;
|
||||
//BA.debugLineNum = 62390312;BA.debugLine="LastZeroCount = 0";
|
||||
//BA.debugLineNum = 132;BA.debugLine="LastZeroCount = 0";
|
||||
_lastzerocount = (int) (0);
|
||||
};
|
||||
RDebugUtils.currentLine=62390314;
|
||||
//BA.debugLineNum = 62390314;BA.debugLine="Do While sb.Length - FracStartIndex < data.Minim";
|
||||
//BA.debugLineNum = 134;BA.debugLine="Do While sb.Length - FracStartIndex < data.Minim";
|
||||
while (_sb.getLength()-_fracstartindex<_data.MinimumFractions /*int*/ ) {
|
||||
RDebugUtils.currentLine=62390315;
|
||||
//BA.debugLineNum = 62390315;BA.debugLine="sb.Append(data.FractionPaddingChar)";
|
||||
//BA.debugLineNum = 135;BA.debugLine="sb.Append(data.FractionPaddingChar)";
|
||||
_sb.Append(_data.FractionPaddingChar /*String*/ );
|
||||
RDebugUtils.currentLine=62390316;
|
||||
//BA.debugLineNum = 62390316;BA.debugLine="LastZeroCount = 0";
|
||||
//BA.debugLineNum = 136;BA.debugLine="LastZeroCount = 0";
|
||||
_lastzerocount = (int) (0);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390318;
|
||||
//BA.debugLineNum = 62390318;BA.debugLine="LastZeroCount = Min(LastZeroCount, sb.Length - F";
|
||||
//BA.debugLineNum = 138;BA.debugLine="LastZeroCount = Min(LastZeroCount, sb.Length - F";
|
||||
_lastzerocount = (int) (__c.Min(_lastzerocount,_sb.getLength()-_fracstartindex-_data.MinimumFractions /*int*/ ));
|
||||
RDebugUtils.currentLine=62390319;
|
||||
//BA.debugLineNum = 62390319;BA.debugLine="If LastZeroCount > 0 Then";
|
||||
//BA.debugLineNum = 139;BA.debugLine="If LastZeroCount > 0 Then";
|
||||
if (_lastzerocount>0) {
|
||||
RDebugUtils.currentLine=62390320;
|
||||
//BA.debugLineNum = 62390320;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)";
|
||||
//BA.debugLineNum = 140;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)";
|
||||
_sb.Remove((int) (_sb.getLength()-_lastzerocount),_sb.getLength());
|
||||
};
|
||||
RDebugUtils.currentLine=62390322;
|
||||
//BA.debugLineNum = 62390322;BA.debugLine="If sb.Length > FracStartIndex Then sb.Insert(Fra";
|
||||
//BA.debugLineNum = 142;BA.debugLine="If sb.Length > FracStartIndex Then sb.Insert(Fra";
|
||||
if (_sb.getLength()>_fracstartindex) {
|
||||
_sb.Insert(_fracstartindex,_data.DecimalPoint /*String*/ );};
|
||||
};
|
||||
RDebugUtils.currentLine=62390324;
|
||||
//BA.debugLineNum = 62390324;BA.debugLine="sb.Append(data.Postfix)";
|
||||
//BA.debugLineNum = 144;BA.debugLine="sb.Append(data.Postfix)";
|
||||
_sb.Append(_data.Postfix /*String*/ );
|
||||
RDebugUtils.currentLine=62390325;
|
||||
//BA.debugLineNum = 62390325;BA.debugLine="Return sb.ToString";
|
||||
//BA.debugLineNum = 145;BA.debugLine="Return sb.ToString";
|
||||
if (true) return _sb.ToString();
|
||||
RDebugUtils.currentLine=62390326;
|
||||
//BA.debugLineNum = 62390326;BA.debugLine="End Sub";
|
||||
//BA.debugLineNum = 146;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _initialize(keymon.lat.medicomed.b4xformatter __ref,anywheresoftware.b4a.BA _ba) throws Exception{
|
||||
__ref = this;
|
||||
innerInitialize(_ba);
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "initialize", true))
|
||||
{return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));}
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
RDebugUtils.currentLine=61931520;
|
||||
//BA.debugLineNum = 61931520;BA.debugLine="Public Sub Initialize";
|
||||
RDebugUtils.currentLine=61931521;
|
||||
//BA.debugLineNum = 61931521;BA.debugLine="formats.Initialize";
|
||||
__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Initialize();
|
||||
RDebugUtils.currentLine=61931522;
|
||||
//BA.debugLineNum = 61931522;BA.debugLine="Dim d As B4XFormatData = CreateDefaultFormat";
|
||||
_d = __ref._createdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null);
|
||||
RDebugUtils.currentLine=61931523;
|
||||
//BA.debugLineNum = 61931523;BA.debugLine="AddFormatData(d, MIN_VALUE, MAX_VALUE, True)";
|
||||
__ref._addformatdata /*String*/ (null,_d,__ref._min_value /*int*/ ,__ref._max_value /*int*/ ,__c.True);
|
||||
RDebugUtils.currentLine=61931524;
|
||||
//BA.debugLineNum = 61931524;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _addformatdata(keymon.lat.medicomed.b4xformatter __ref,keymon.lat.medicomed.b4xformatter._b4xformatdata _data,double _rangestart,double _rangeend,boolean _includeedges) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "addformatdata", true))
|
||||
{return ((String) Debug.delegate(ba, "addformatdata", new Object[] {_data,_rangestart,_rangeend,_includeedges}));}
|
||||
double _factor = 0;
|
||||
RDebugUtils.currentLine=62193664;
|
||||
//BA.debugLineNum = 62193664;BA.debugLine="Public Sub AddFormatData (Data As B4XFormatData, R";
|
||||
RDebugUtils.currentLine=62193665;
|
||||
//BA.debugLineNum = 62193665;BA.debugLine="Dim factor As Double = Power(10, -Data.MaximumFra";
|
||||
_factor = __c.Power(10,-_data.MaximumFractions /*int*/ );
|
||||
RDebugUtils.currentLine=62193666;
|
||||
//BA.debugLineNum = 62193666;BA.debugLine="If IncludeEdges = False Then";
|
||||
if (_includeedges==__c.False) {
|
||||
RDebugUtils.currentLine=62193667;
|
||||
//BA.debugLineNum = 62193667;BA.debugLine="RangeStart = RangeStart + factor";
|
||||
_rangestart = _rangestart+_factor;
|
||||
RDebugUtils.currentLine=62193668;
|
||||
//BA.debugLineNum = 62193668;BA.debugLine="RangeEnd = RangeEnd - factor";
|
||||
_rangeend = _rangeend-_factor;
|
||||
};
|
||||
RDebugUtils.currentLine=62193670;
|
||||
//BA.debugLineNum = 62193670;BA.debugLine="RangeStart = RangeStart - factor / 2";
|
||||
_rangestart = _rangestart-_factor/(double)2;
|
||||
RDebugUtils.currentLine=62193671;
|
||||
//BA.debugLineNum = 62193671;BA.debugLine="RangeEnd = RangeEnd + factor / 2";
|
||||
_rangeend = _rangeend+_factor/(double)2;
|
||||
RDebugUtils.currentLine=62193672;
|
||||
//BA.debugLineNum = 62193672;BA.debugLine="Data.RangeStart = RangeStart";
|
||||
_data.RangeStart /*double*/ = _rangestart;
|
||||
RDebugUtils.currentLine=62193673;
|
||||
//BA.debugLineNum = 62193673;BA.debugLine="Data.RangeEnd = RangeEnd";
|
||||
_data.RangeEnd /*double*/ = _rangeend;
|
||||
RDebugUtils.currentLine=62193674;
|
||||
//BA.debugLineNum = 62193674;BA.debugLine="formats.Add(Data)";
|
||||
__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_data));
|
||||
RDebugUtils.currentLine=62193675;
|
||||
//BA.debugLineNum = 62193675;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _class_globals(keymon.lat.medicomed.b4xformatter __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
RDebugUtils.currentLine=61865984;
|
||||
//BA.debugLineNum = 61865984;BA.debugLine="Sub Class_Globals";
|
||||
RDebugUtils.currentLine=61865985;
|
||||
//BA.debugLineNum = 61865985;BA.debugLine="Type B4XFormatData (Prefix As String, Postfix As";
|
||||
;
|
||||
RDebugUtils.currentLine=61865989;
|
||||
//BA.debugLineNum = 61865989;BA.debugLine="Private formats As List";
|
||||
_formats = new anywheresoftware.b4a.objects.collections.List();
|
||||
RDebugUtils.currentLine=61865990;
|
||||
//BA.debugLineNum = 61865990;BA.debugLine="Public Const MAX_VALUE = 0x7fffffff, MIN_VALUE =";
|
||||
_max_value = ((int)0x7fffffff);
|
||||
_min_value = ((int)0x80000000);
|
||||
RDebugUtils.currentLine=61865992;
|
||||
//BA.debugLineNum = 61865992;BA.debugLine="Private xui As XUI";
|
||||
_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI();
|
||||
RDebugUtils.currentLine=61865994;
|
||||
//BA.debugLineNum = 61865994;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _copyformatdata(keymon.lat.medicomed.b4xformatter __ref,keymon.lat.medicomed.b4xformatter._b4xformatdata _data) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "copyformatdata", true))
|
||||
{return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "copyformatdata", new Object[] {_data}));}
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
RDebugUtils.currentLine=62128128;
|
||||
//BA.debugLineNum = 62128128;BA.debugLine="Public Sub CopyFormatData (Data As B4XFormatData)";
|
||||
RDebugUtils.currentLine=62128129;
|
||||
//BA.debugLineNum = 62128129;BA.debugLine="Dim d As B4XFormatData";
|
||||
_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata();
|
||||
RDebugUtils.currentLine=62128130;
|
||||
//BA.debugLineNum = 62128130;BA.debugLine="d.Initialize";
|
||||
_d.Initialize();
|
||||
RDebugUtils.currentLine=62128131;
|
||||
//BA.debugLineNum = 62128131;BA.debugLine="d.DecimalPoint = Data.DecimalPoint";
|
||||
_d.DecimalPoint /*String*/ = _data.DecimalPoint /*String*/ ;
|
||||
RDebugUtils.currentLine=62128132;
|
||||
//BA.debugLineNum = 62128132;BA.debugLine="If Data.FormatFont.IsInitialized Then";
|
||||
public String _formatlabel(double _number,anywheresoftware.b4a.objects.B4XViewWrapper _label) throws Exception{
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null;
|
||||
//BA.debugLineNum = 150;BA.debugLine="Public Sub FormatLabel (Number As Double, Label As";
|
||||
//BA.debugLineNum = 151;BA.debugLine="Label.Text = Format(Number)";
|
||||
_label.setText(BA.ObjectToCharSequence(_format(_number)));
|
||||
//BA.debugLineNum = 152;BA.debugLine="Dim data As B4XFormatData = GetFormatData(Number)";
|
||||
_data = _getformatdata(_number);
|
||||
//BA.debugLineNum = 153;BA.debugLine="If data.TextColor <> 0 Then Label.TextColor = dat";
|
||||
if (_data.TextColor /*int*/ !=0) {
|
||||
_label.setTextColor(_data.TextColor /*int*/ );};
|
||||
//BA.debugLineNum = 154;BA.debugLine="If data.FormatFont.IsInitialized Then Label.Font";
|
||||
if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) {
|
||||
RDebugUtils.currentLine=62128134;
|
||||
//BA.debugLineNum = 62128134;BA.debugLine="d.FormatFont = xui.CreateFont(Data.FormatFont.To";
|
||||
_d.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateFont((android.graphics.Typeface)(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .ToNativeFont().getObject()),_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getSize());
|
||||
};
|
||||
RDebugUtils.currentLine=62128137;
|
||||
//BA.debugLineNum = 62128137;BA.debugLine="d.GroupingCharacter = Data.GroupingCharacter";
|
||||
_d.GroupingCharacter /*String*/ = _data.GroupingCharacter /*String*/ ;
|
||||
RDebugUtils.currentLine=62128138;
|
||||
//BA.debugLineNum = 62128138;BA.debugLine="d.MaximumFractions = Data.MaximumFractions";
|
||||
_d.MaximumFractions /*int*/ = _data.MaximumFractions /*int*/ ;
|
||||
RDebugUtils.currentLine=62128139;
|
||||
//BA.debugLineNum = 62128139;BA.debugLine="d.MinimumFractions = Data.MinimumFractions";
|
||||
_d.MinimumFractions /*int*/ = _data.MinimumFractions /*int*/ ;
|
||||
RDebugUtils.currentLine=62128140;
|
||||
//BA.debugLineNum = 62128140;BA.debugLine="d.MinimumIntegers = Data.MinimumIntegers";
|
||||
_d.MinimumIntegers /*int*/ = _data.MinimumIntegers /*int*/ ;
|
||||
RDebugUtils.currentLine=62128141;
|
||||
//BA.debugLineNum = 62128141;BA.debugLine="d.Postfix = Data.Postfix";
|
||||
_d.Postfix /*String*/ = _data.Postfix /*String*/ ;
|
||||
RDebugUtils.currentLine=62128142;
|
||||
//BA.debugLineNum = 62128142;BA.debugLine="d.Prefix = Data.Prefix";
|
||||
_d.Prefix /*String*/ = _data.Prefix /*String*/ ;
|
||||
RDebugUtils.currentLine=62128143;
|
||||
//BA.debugLineNum = 62128143;BA.debugLine="d.RangeEnd = Data.RangeEnd";
|
||||
_d.RangeEnd /*double*/ = _data.RangeEnd /*double*/ ;
|
||||
RDebugUtils.currentLine=62128144;
|
||||
//BA.debugLineNum = 62128144;BA.debugLine="d.RangeStart = Data.RangeStart";
|
||||
_d.RangeStart /*double*/ = _data.RangeStart /*double*/ ;
|
||||
RDebugUtils.currentLine=62128145;
|
||||
//BA.debugLineNum = 62128145;BA.debugLine="d.RemoveMinusSign = Data.RemoveMinusSign";
|
||||
_d.RemoveMinusSign /*boolean*/ = _data.RemoveMinusSign /*boolean*/ ;
|
||||
RDebugUtils.currentLine=62128146;
|
||||
//BA.debugLineNum = 62128146;BA.debugLine="d.TextColor = Data.TextColor";
|
||||
_d.TextColor /*int*/ = _data.TextColor /*int*/ ;
|
||||
RDebugUtils.currentLine=62128147;
|
||||
//BA.debugLineNum = 62128147;BA.debugLine="d.FractionPaddingChar = Data.FractionPaddingChar";
|
||||
_d.FractionPaddingChar /*String*/ = _data.FractionPaddingChar /*String*/ ;
|
||||
RDebugUtils.currentLine=62128148;
|
||||
//BA.debugLineNum = 62128148;BA.debugLine="d.IntegerPaddingChar = Data.IntegerPaddingChar";
|
||||
_d.IntegerPaddingChar /*String*/ = _data.IntegerPaddingChar /*String*/ ;
|
||||
RDebugUtils.currentLine=62128149;
|
||||
//BA.debugLineNum = 62128149;BA.debugLine="Return d";
|
||||
if (true) return _d;
|
||||
RDebugUtils.currentLine=62128150;
|
||||
//BA.debugLineNum = 62128150;BA.debugLine="End Sub";
|
||||
_label.setFont(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ );};
|
||||
//BA.debugLineNum = 155;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _getdefaultformat() throws Exception{
|
||||
//BA.debugLineNum = 78;BA.debugLine="Public Sub GetDefaultFormat As B4XFormatData";
|
||||
//BA.debugLineNum = 79;BA.debugLine="Return formats.Get(0)";
|
||||
if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get((int) (0)));
|
||||
//BA.debugLineNum = 80;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _createdefaultformat(keymon.lat.medicomed.b4xformatter __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "createdefaultformat", true))
|
||||
{return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "createdefaultformat", null));}
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
RDebugUtils.currentLine=61997056;
|
||||
//BA.debugLineNum = 61997056;BA.debugLine="Private Sub CreateDefaultFormat As B4XFormatData";
|
||||
RDebugUtils.currentLine=61997057;
|
||||
//BA.debugLineNum = 61997057;BA.debugLine="Dim d As B4XFormatData";
|
||||
_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata();
|
||||
RDebugUtils.currentLine=61997058;
|
||||
//BA.debugLineNum = 61997058;BA.debugLine="d.Initialize";
|
||||
_d.Initialize();
|
||||
RDebugUtils.currentLine=61997059;
|
||||
//BA.debugLineNum = 61997059;BA.debugLine="d.GroupingCharacter = \",\"";
|
||||
_d.GroupingCharacter /*String*/ = ",";
|
||||
RDebugUtils.currentLine=61997060;
|
||||
//BA.debugLineNum = 61997060;BA.debugLine="d.DecimalPoint = \".\"";
|
||||
_d.DecimalPoint /*String*/ = ".";
|
||||
RDebugUtils.currentLine=61997061;
|
||||
//BA.debugLineNum = 61997061;BA.debugLine="d.MaximumFractions = 3";
|
||||
_d.MaximumFractions /*int*/ = (int) (3);
|
||||
RDebugUtils.currentLine=61997062;
|
||||
//BA.debugLineNum = 61997062;BA.debugLine="d.MinimumIntegers = 1";
|
||||
_d.MinimumIntegers /*int*/ = (int) (1);
|
||||
RDebugUtils.currentLine=61997063;
|
||||
//BA.debugLineNum = 61997063;BA.debugLine="d.IntegerPaddingChar = \"0\"";
|
||||
_d.IntegerPaddingChar /*String*/ = "0";
|
||||
RDebugUtils.currentLine=61997064;
|
||||
//BA.debugLineNum = 61997064;BA.debugLine="d.FractionPaddingChar = \"0\"";
|
||||
_d.FractionPaddingChar /*String*/ = "0";
|
||||
RDebugUtils.currentLine=61997065;
|
||||
//BA.debugLineNum = 61997065;BA.debugLine="Return d";
|
||||
if (true) return _d;
|
||||
RDebugUtils.currentLine=61997066;
|
||||
//BA.debugLineNum = 61997066;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _getformatdata(keymon.lat.medicomed.b4xformatter __ref,double _number) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "getformatdata", true))
|
||||
{return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "getformatdata", new Object[] {_number}));}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _getformatdata(double _number) throws Exception{
|
||||
int _i = 0;
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
RDebugUtils.currentLine=62324736;
|
||||
//BA.debugLineNum = 62324736;BA.debugLine="Public Sub GetFormatData (Number As Double) As B4X";
|
||||
RDebugUtils.currentLine=62324737;
|
||||
//BA.debugLineNum = 62324737;BA.debugLine="For i = formats.Size - 1 To 1 Step - 1";
|
||||
//BA.debugLineNum = 83;BA.debugLine="Public Sub GetFormatData (Number As Double) As B4X";
|
||||
//BA.debugLineNum = 84;BA.debugLine="For i = formats.Size - 1 To 1 Step - 1";
|
||||
{
|
||||
final int step1 = -1;
|
||||
final int limit1 = (int) (1);
|
||||
_i = (int) (__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1) ;
|
||||
_i = (int) (_formats.getSize()-1) ;
|
||||
for (;_i >= limit1 ;_i = _i + step1 ) {
|
||||
RDebugUtils.currentLine=62324738;
|
||||
//BA.debugLineNum = 62324738;BA.debugLine="Dim d As B4XFormatData = formats.Get(i)";
|
||||
_d = (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i));
|
||||
RDebugUtils.currentLine=62324739;
|
||||
//BA.debugLineNum = 62324739;BA.debugLine="If Number <= d.RangeEnd And Number >= d.RangeSta";
|
||||
//BA.debugLineNum = 85;BA.debugLine="Dim d As B4XFormatData = formats.Get(i)";
|
||||
_d = (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get(_i));
|
||||
//BA.debugLineNum = 86;BA.debugLine="If Number <= d.RangeEnd And Number >= d.RangeSta";
|
||||
if (_number<=_d.RangeEnd /*double*/ && _number>=_d.RangeStart /*double*/ ) {
|
||||
if (true) return _d;};
|
||||
}
|
||||
};
|
||||
RDebugUtils.currentLine=62324741;
|
||||
//BA.debugLineNum = 62324741;BA.debugLine="Return formats.Get(0)";
|
||||
if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (0)));
|
||||
RDebugUtils.currentLine=62324742;
|
||||
//BA.debugLineNum = 62324742;BA.debugLine="End Sub";
|
||||
//BA.debugLineNum = 88;BA.debugLine="Return formats.Get(0)";
|
||||
if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get((int) (0)));
|
||||
//BA.debugLineNum = 89;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
public String _formatlabel(keymon.lat.medicomed.b4xformatter __ref,double _number,anywheresoftware.b4a.objects.B4XViewWrapper _label) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "formatlabel", true))
|
||||
{return ((String) Debug.delegate(ba, "formatlabel", new Object[] {_number,_label}));}
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null;
|
||||
RDebugUtils.currentLine=62455808;
|
||||
//BA.debugLineNum = 62455808;BA.debugLine="Public Sub FormatLabel (Number As Double, Label As";
|
||||
RDebugUtils.currentLine=62455809;
|
||||
//BA.debugLineNum = 62455809;BA.debugLine="Label.Text = Format(Number)";
|
||||
_label.setText(BA.ObjectToCharSequence(__ref._format /*String*/ (null,_number)));
|
||||
RDebugUtils.currentLine=62455810;
|
||||
//BA.debugLineNum = 62455810;BA.debugLine="Dim data As B4XFormatData = GetFormatData(Number)";
|
||||
_data = __ref._getformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,_number);
|
||||
RDebugUtils.currentLine=62455811;
|
||||
//BA.debugLineNum = 62455811;BA.debugLine="If data.TextColor <> 0 Then Label.TextColor = dat";
|
||||
if (_data.TextColor /*int*/ !=0) {
|
||||
_label.setTextColor(_data.TextColor /*int*/ );};
|
||||
RDebugUtils.currentLine=62455812;
|
||||
//BA.debugLineNum = 62455812;BA.debugLine="If data.FormatFont.IsInitialized Then Label.Font";
|
||||
if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) {
|
||||
_label.setFont(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ );};
|
||||
RDebugUtils.currentLine=62455813;
|
||||
//BA.debugLineNum = 62455813;BA.debugLine="End Sub";
|
||||
public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{
|
||||
innerInitialize(_ba);
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null;
|
||||
//BA.debugLineNum = 13;BA.debugLine="Public Sub Initialize";
|
||||
//BA.debugLineNum = 14;BA.debugLine="formats.Initialize";
|
||||
_formats.Initialize();
|
||||
//BA.debugLineNum = 15;BA.debugLine="Dim d As B4XFormatData = CreateDefaultFormat";
|
||||
_d = _createdefaultformat();
|
||||
//BA.debugLineNum = 16;BA.debugLine="AddFormatData(d, MIN_VALUE, MAX_VALUE, True)";
|
||||
_addformatdata(_d,_min_value,_max_value,__c.True);
|
||||
//BA.debugLineNum = 17;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _newformatdata(keymon.lat.medicomed.b4xformatter __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xformatter";
|
||||
if (Debug.shouldDelegate(ba, "newformatdata", true))
|
||||
{return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "newformatdata", null));}
|
||||
RDebugUtils.currentLine=62062592;
|
||||
//BA.debugLineNum = 62062592;BA.debugLine="Public Sub NewFormatData As B4XFormatData";
|
||||
RDebugUtils.currentLine=62062593;
|
||||
//BA.debugLineNum = 62062593;BA.debugLine="Return CopyFormatData(GetDefaultFormat)";
|
||||
if (true) return __ref._copyformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,__ref._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null));
|
||||
RDebugUtils.currentLine=62062594;
|
||||
//BA.debugLineNum = 62062594;BA.debugLine="End Sub";
|
||||
public keymon.lat.medicomed.b4xformatter._b4xformatdata _newformatdata() throws Exception{
|
||||
//BA.debugLineNum = 32;BA.debugLine="Public Sub NewFormatData As B4XFormatData";
|
||||
//BA.debugLineNum = 33;BA.debugLine="Return CopyFormatData(GetDefaultFormat)";
|
||||
if (true) return _copyformatdata(_getdefaultformat());
|
||||
//BA.debugLineNum = 34;BA.debugLine="End Sub";
|
||||
return null;
|
||||
}
|
||||
}
|
||||
public Object callSub(String sub, Object sender, Object[] args) throws Exception {
|
||||
BA.senderHolder.set(sender);
|
||||
return BA.SubDelegator.SubNotFound;
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user