mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-25 16:40:07 +00:00
v: 5.10.24
Se hicieron invisibles normales de la venta, se agregaron 2 botones mas, uno indica que tieene venta y el otro que no tiene, tambien al boton que indica que tiene venta se le agrega una pequeña ventana para agregar la venta que se le indique.
This commit is contained in:
IsR0d
535
B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java
Normal file
535
B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java
Normal file
@@ -0,0 +1,535 @@
|
||||
package keymon.lat.medicomed;
|
||||
|
||||
|
||||
import anywheresoftware.b4a.BA;
|
||||
import anywheresoftware.b4a.B4AClass;
|
||||
import anywheresoftware.b4a.BALayout;
|
||||
import anywheresoftware.b4a.debug.*;
|
||||
|
||||
public class b4xformatter extends B4AClass.ImplB4AClass implements BA.SubDelegator{
|
||||
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");
|
||||
if (htSubs == null) {
|
||||
ba.loadHtSubs(this.getClass());
|
||||
htSubs = ba.htSubs;
|
||||
}
|
||||
|
||||
}
|
||||
if (BA.isShellModeRuntimeCheck(ba))
|
||||
this.getClass().getMethod("_class_globals", keymon.lat.medicomed.b4xformatter.class).invoke(this, new Object[] {null});
|
||||
else
|
||||
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 static class _b4xformatdata{
|
||||
public boolean IsInitialized;
|
||||
public String Prefix;
|
||||
public String Postfix;
|
||||
public int MinimumIntegers;
|
||||
public int MinimumFractions;
|
||||
public int MaximumFractions;
|
||||
public String GroupingCharacter;
|
||||
public String DecimalPoint;
|
||||
public int TextColor;
|
||||
public anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont FormatFont;
|
||||
public double RangeStart;
|
||||
public double RangeEnd;
|
||||
public boolean RemoveMinusSign;
|
||||
public String IntegerPaddingChar;
|
||||
public String FractionPaddingChar;
|
||||
public void Initialize() {
|
||||
IsInitialized = true;
|
||||
Prefix = "";
|
||||
Postfix = "";
|
||||
MinimumIntegers = 0;
|
||||
MinimumFractions = 0;
|
||||
MaximumFractions = 0;
|
||||
GroupingCharacter = "";
|
||||
DecimalPoint = "";
|
||||
TextColor = 0;
|
||||
FormatFont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont();
|
||||
RangeStart = 0;
|
||||
RangeEnd = 0;
|
||||
RemoveMinusSign = false;
|
||||
IntegerPaddingChar = "";
|
||||
FractionPaddingChar = "";
|
||||
}
|
||||
@Override
|
||||
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";
|
||||
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}));}
|
||||
keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null;
|
||||
anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null;
|
||||
int _numberstartindex = 0;
|
||||
double _factor = 0;
|
||||
int _whole = 0;
|
||||
double _frac = 0;
|
||||
int _g = 0;
|
||||
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*/ ) {
|
||||
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";
|
||||
_sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper();
|
||||
RDebugUtils.currentLine=62390276;
|
||||
//BA.debugLineNum = 62390276;BA.debugLine="sb.Initialize";
|
||||
_sb.Initialize();
|
||||
RDebugUtils.currentLine=62390277;
|
||||
//BA.debugLineNum = 62390277;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";
|
||||
_numberstartindex = _sb.getLength();
|
||||
RDebugUtils.currentLine=62390279;
|
||||
//BA.debugLineNum = 62390279;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";
|
||||
if (_number<-_factor && _data.RemoveMinusSign /*boolean*/ ==__c.False) {
|
||||
RDebugUtils.currentLine=62390281;
|
||||
//BA.debugLineNum = 62390281;BA.debugLine="sb.Append(\"-\")";
|
||||
_sb.Append("-");
|
||||
RDebugUtils.currentLine=62390282;
|
||||
//BA.debugLineNum = 62390282;BA.debugLine="NumberStartIndex = NumberStartIndex + 1";
|
||||
_numberstartindex = (int) (_numberstartindex+1);
|
||||
};
|
||||
RDebugUtils.currentLine=62390284;
|
||||
//BA.debugLineNum = 62390284;BA.debugLine="Number = Abs(Number) + factor";
|
||||
_number = __c.Abs(_number)+_factor;
|
||||
RDebugUtils.currentLine=62390285;
|
||||
//BA.debugLineNum = 62390285;BA.debugLine="Dim whole As Int = Number";
|
||||
_whole = (int) (_number);
|
||||
RDebugUtils.currentLine=62390286;
|
||||
//BA.debugLineNum = 62390286;BA.debugLine="Dim frac As Double = Number - whole";
|
||||
_frac = _number-_whole;
|
||||
RDebugUtils.currentLine=62390287;
|
||||
//BA.debugLineNum = 62390287;BA.debugLine="Dim g As Int";
|
||||
_g = 0;
|
||||
RDebugUtils.currentLine=62390288;
|
||||
//BA.debugLineNum = 62390288;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";
|
||||
if (_g>0 && _g%3==0 && _data.GroupingCharacter /*String*/ .length()>0) {
|
||||
RDebugUtils.currentLine=62390290;
|
||||
//BA.debugLineNum = 62390290;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac";
|
||||
_sb.Insert(_numberstartindex,_data.GroupingCharacter /*String*/ );
|
||||
};
|
||||
RDebugUtils.currentLine=62390292;
|
||||
//BA.debugLineNum = 62390292;BA.debugLine="g = g + 1";
|
||||
_g = (int) (_g+1);
|
||||
RDebugUtils.currentLine=62390293;
|
||||
//BA.debugLineNum = 62390293;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";
|
||||
_whole = (int) (_whole/(double)10);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390296;
|
||||
//BA.debugLineNum = 62390296;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";
|
||||
_sb.Insert(_numberstartindex,_data.IntegerPaddingChar /*String*/ );
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390299;
|
||||
//BA.debugLineNum = 62390299;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";
|
||||
_fracstartindex = _sb.getLength();
|
||||
RDebugUtils.currentLine=62390301;
|
||||
//BA.debugLineNum = 62390301;BA.debugLine="Dim LastZeroCount As Int";
|
||||
_lastzerocount = 0;
|
||||
RDebugUtils.currentLine=62390302;
|
||||
//BA.debugLineNum = 62390302;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";
|
||||
while (_frac>=2*_factor && _sb.getLength()-_fracstartindex<_data.MaximumFractions /*int*/ ) {
|
||||
RDebugUtils.currentLine=62390304;
|
||||
//BA.debugLineNum = 62390304;BA.debugLine="Dim w As Int = (frac * Multipler)";
|
||||
_w = (int) ((_frac*_multipler));
|
||||
RDebugUtils.currentLine=62390305;
|
||||
//BA.debugLineNum = 62390305;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";
|
||||
if (_w==0) {
|
||||
_lastzerocount = (int) (_lastzerocount+1);}
|
||||
else {
|
||||
_lastzerocount = (int) (0);};
|
||||
RDebugUtils.currentLine=62390307;
|
||||
//BA.debugLineNum = 62390307;BA.debugLine="sb.Append(w)";
|
||||
_sb.Append(BA.NumberToString(_w));
|
||||
RDebugUtils.currentLine=62390308;
|
||||
//BA.debugLineNum = 62390308;BA.debugLine="Multipler = Multipler * 10";
|
||||
_multipler = (int) (_multipler*10);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390310;
|
||||
//BA.debugLineNum = 62390310;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)";
|
||||
_sb.Remove((int) (_sb.getLength()-_lastzerocount),_sb.getLength());
|
||||
RDebugUtils.currentLine=62390312;
|
||||
//BA.debugLineNum = 62390312;BA.debugLine="LastZeroCount = 0";
|
||||
_lastzerocount = (int) (0);
|
||||
};
|
||||
RDebugUtils.currentLine=62390314;
|
||||
//BA.debugLineNum = 62390314;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)";
|
||||
_sb.Append(_data.FractionPaddingChar /*String*/ );
|
||||
RDebugUtils.currentLine=62390316;
|
||||
//BA.debugLineNum = 62390316;BA.debugLine="LastZeroCount = 0";
|
||||
_lastzerocount = (int) (0);
|
||||
}
|
||||
;
|
||||
RDebugUtils.currentLine=62390318;
|
||||
//BA.debugLineNum = 62390318;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";
|
||||
if (_lastzerocount>0) {
|
||||
RDebugUtils.currentLine=62390320;
|
||||
//BA.debugLineNum = 62390320;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";
|
||||
if (_sb.getLength()>_fracstartindex) {
|
||||
_sb.Insert(_fracstartindex,_data.DecimalPoint /*String*/ );};
|
||||
};
|
||||
RDebugUtils.currentLine=62390324;
|
||||
//BA.debugLineNum = 62390324;BA.debugLine="sb.Append(data.Postfix)";
|
||||
_sb.Append(_data.Postfix /*String*/ );
|
||||
RDebugUtils.currentLine=62390325;
|
||||
//BA.debugLineNum = 62390325;BA.debugLine="Return sb.ToString";
|
||||
if (true) return _sb.ToString();
|
||||
RDebugUtils.currentLine=62390326;
|
||||
//BA.debugLineNum = 62390326;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";
|
||||
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";
|
||||
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}));}
|
||||
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";
|
||||
{
|
||||
final int step1 = -1;
|
||||
final int limit1 = (int) (1);
|
||||
_i = (int) (__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .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";
|
||||
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";
|
||||
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";
|
||||
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";
|
||||
return null;
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user