mirror of
https://github.com/KeymonSoft/Medicomed_Preventa.git
synced 2026-04-21 06:49:14 +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
178
B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java
Normal file
178
B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java
Normal file
@@ -0,0 +1,178 @@
|
||||
package keymon.lat.medicomed;
|
||||
|
||||
|
||||
import anywheresoftware.b4a.BA;
|
||||
import anywheresoftware.b4a.B4AClass;
|
||||
import anywheresoftware.b4a.BALayout;
|
||||
import anywheresoftware.b4a.debug.*;
|
||||
|
||||
public class b4xbitset 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.b4xbitset");
|
||||
if (htSubs == null) {
|
||||
ba.loadHtSubs(this.getClass());
|
||||
htSubs = ba.htSubs;
|
||||
}
|
||||
|
||||
}
|
||||
if (BA.isShellModeRuntimeCheck(ba))
|
||||
this.getClass().getMethod("_class_globals", keymon.lat.medicomed.b4xbitset.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 anywheresoftware.b4a.keywords.Common __c = null;
|
||||
public int[] _data = null;
|
||||
public int _msize = 0;
|
||||
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 String _class_globals(keymon.lat.medicomed.b4xbitset __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
RDebugUtils.currentLine=33947648;
|
||||
//BA.debugLineNum = 33947648;BA.debugLine="Sub Class_Globals";
|
||||
RDebugUtils.currentLine=33947652;
|
||||
//BA.debugLineNum = 33947652;BA.debugLine="Private data() As Int";
|
||||
_data = new int[(int) (0)];
|
||||
;
|
||||
RDebugUtils.currentLine=33947654;
|
||||
//BA.debugLineNum = 33947654;BA.debugLine="Private mSize As Int";
|
||||
_msize = 0;
|
||||
RDebugUtils.currentLine=33947655;
|
||||
//BA.debugLineNum = 33947655;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _clear(keymon.lat.medicomed.b4xbitset __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
if (Debug.shouldDelegate(ba, "clear", true))
|
||||
{return ((String) Debug.delegate(ba, "clear", null));}
|
||||
RDebugUtils.currentLine=34275328;
|
||||
//BA.debugLineNum = 34275328;BA.debugLine="Public Sub Clear";
|
||||
RDebugUtils.currentLine=34275332;
|
||||
//BA.debugLineNum = 34275332;BA.debugLine="Dim data(Bit.ShiftRight(mSize, 5) + 1) As Int";
|
||||
_data = new int[(int) (__c.Bit.ShiftRight(__ref._msize /*int*/ ,(int) (5))+1)];
|
||||
;
|
||||
RDebugUtils.currentLine=34275334;
|
||||
//BA.debugLineNum = 34275334;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public boolean _get(keymon.lat.medicomed.b4xbitset __ref,int _index) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
if (Debug.shouldDelegate(ba, "get", true))
|
||||
{return ((Boolean) Debug.delegate(ba, "get", new Object[] {_index}));}
|
||||
int _dindex = 0;
|
||||
int _offset = 0;
|
||||
int _blockvalue = 0;
|
||||
RDebugUtils.currentLine=34144256;
|
||||
//BA.debugLineNum = 34144256;BA.debugLine="Public Sub Get(Index As Int) As Boolean";
|
||||
RDebugUtils.currentLine=34144257;
|
||||
//BA.debugLineNum = 34144257;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)";
|
||||
_dindex = __c.Bit.ShiftRight(_index,(int) (5));
|
||||
RDebugUtils.currentLine=34144258;
|
||||
//BA.debugLineNum = 34144258;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)";
|
||||
_offset = __c.Bit.And(((int)0x0000001f),_index);
|
||||
RDebugUtils.currentLine=34144262;
|
||||
//BA.debugLineNum = 34144262;BA.debugLine="Dim BlockValue As Int = data(dindex)";
|
||||
_blockvalue = __ref._data /*int[]*/ [_dindex];
|
||||
RDebugUtils.currentLine=34144264;
|
||||
//BA.debugLineNum = 34144264;BA.debugLine="Return Bit.And(BlockValue, Bit.ShiftLeft(1, offse";
|
||||
if (true) return __c.Bit.And(_blockvalue,__c.Bit.ShiftLeft((int) (1),_offset))!=0;
|
||||
RDebugUtils.currentLine=34144265;
|
||||
//BA.debugLineNum = 34144265;BA.debugLine="End Sub";
|
||||
return false;
|
||||
}
|
||||
public int _getsize(keymon.lat.medicomed.b4xbitset __ref) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
if (Debug.shouldDelegate(ba, "getsize", true))
|
||||
{return ((Integer) Debug.delegate(ba, "getsize", null));}
|
||||
RDebugUtils.currentLine=34209792;
|
||||
//BA.debugLineNum = 34209792;BA.debugLine="Public Sub getSize As Int";
|
||||
RDebugUtils.currentLine=34209793;
|
||||
//BA.debugLineNum = 34209793;BA.debugLine="Return mSize";
|
||||
if (true) return __ref._msize /*int*/ ;
|
||||
RDebugUtils.currentLine=34209794;
|
||||
//BA.debugLineNum = 34209794;BA.debugLine="End Sub";
|
||||
return 0;
|
||||
}
|
||||
public String _initialize(keymon.lat.medicomed.b4xbitset __ref,anywheresoftware.b4a.BA _ba,int _size) throws Exception{
|
||||
__ref = this;
|
||||
innerInitialize(_ba);
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
if (Debug.shouldDelegate(ba, "initialize", true))
|
||||
{return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_size}));}
|
||||
RDebugUtils.currentLine=34013184;
|
||||
//BA.debugLineNum = 34013184;BA.debugLine="Public Sub Initialize (Size As Int)";
|
||||
RDebugUtils.currentLine=34013185;
|
||||
//BA.debugLineNum = 34013185;BA.debugLine="mSize = Size";
|
||||
__ref._msize /*int*/ = _size;
|
||||
RDebugUtils.currentLine=34013186;
|
||||
//BA.debugLineNum = 34013186;BA.debugLine="Clear";
|
||||
__ref._clear /*String*/ (null);
|
||||
RDebugUtils.currentLine=34013187;
|
||||
//BA.debugLineNum = 34013187;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
public String _set(keymon.lat.medicomed.b4xbitset __ref,int _index,boolean _value) throws Exception{
|
||||
__ref = this;
|
||||
RDebugUtils.currentModule="b4xbitset";
|
||||
if (Debug.shouldDelegate(ba, "set", true))
|
||||
{return ((String) Debug.delegate(ba, "set", new Object[] {_index,_value}));}
|
||||
int _dindex = 0;
|
||||
int _offset = 0;
|
||||
int _blockvalue = 0;
|
||||
int _newblockvalue = 0;
|
||||
RDebugUtils.currentLine=34078720;
|
||||
//BA.debugLineNum = 34078720;BA.debugLine="Public Sub Set(Index As Int, Value As Boolean)";
|
||||
RDebugUtils.currentLine=34078721;
|
||||
//BA.debugLineNum = 34078721;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)";
|
||||
_dindex = __c.Bit.ShiftRight(_index,(int) (5));
|
||||
RDebugUtils.currentLine=34078722;
|
||||
//BA.debugLineNum = 34078722;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)";
|
||||
_offset = __c.Bit.And(((int)0x0000001f),_index);
|
||||
RDebugUtils.currentLine=34078726;
|
||||
//BA.debugLineNum = 34078726;BA.debugLine="Dim BlockValue As Int = data(dindex)";
|
||||
_blockvalue = __ref._data /*int[]*/ [_dindex];
|
||||
RDebugUtils.currentLine=34078728;
|
||||
//BA.debugLineNum = 34078728;BA.debugLine="Dim NewBlockValue As Int";
|
||||
_newblockvalue = 0;
|
||||
RDebugUtils.currentLine=34078729;
|
||||
//BA.debugLineNum = 34078729;BA.debugLine="If Value Then";
|
||||
if (_value) {
|
||||
RDebugUtils.currentLine=34078730;
|
||||
//BA.debugLineNum = 34078730;BA.debugLine="NewBlockValue = Bit.Or(BlockValue, Bit.ShiftLeft";
|
||||
_newblockvalue = __c.Bit.Or(_blockvalue,__c.Bit.ShiftLeft((int) (1),_offset));
|
||||
}else {
|
||||
RDebugUtils.currentLine=34078732;
|
||||
//BA.debugLineNum = 34078732;BA.debugLine="NewBlockValue = Bit.And(BlockValue, Bit.Not(Bit.";
|
||||
_newblockvalue = __c.Bit.And(_blockvalue,__c.Bit.Not(__c.Bit.ShiftLeft((int) (1),_offset)));
|
||||
};
|
||||
RDebugUtils.currentLine=34078737;
|
||||
//BA.debugLineNum = 34078737;BA.debugLine="data(dindex) = NewBlockValue";
|
||||
__ref._data /*int[]*/ [_dindex] = _newblockvalue;
|
||||
RDebugUtils.currentLine=34078739;
|
||||
//BA.debugLineNum = 34078739;BA.debugLine="End Sub";
|
||||
return "";
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user