i_marray_nVersion=0.256;
/* 2006 Intelygenz - www.intelygenz.com
[VER] M:\ig_intelygenz\ig05_intranet\desarrollo\areas\dev\docs\i_marray.txt
[UPDATE] M:\ig_intelygenz\ig05_intranet\desarrollo\areas\dev\libs\js\i_marray.js
Open -> i_core.js, i_igz.js
*/
if (!oCore.m_bIsServer){
oIGZ.f_loadLib("i_marray", i_marray_nVersion);
}
var i_marray_nInstances = 0;
function MArray(a_sCOLs, a_aROWs){
i_marray_nInstances++;
this.m_sObj = "[NotAnObject] MArray_instance_"+i_marray_nInstances;
this.m_nVersion = i_marray_nVersion;
this.m_sKeyName = "[MArray v"+this.m_nVersion+"]";
this.m_a_sCOLs = a_sCOLs; //Campos (Strings)
if(!a_aROWs) a_aROWs = []
this.m_a_aROWs = a_aROWs; //Valores (Arrays)
if (this.m_a_aROWs.length && this.m_a_sCOLs.length!=this.m_a_aROWs[0].length && !(this.m_a_aROWs.length==1 && this.m_a_aROWs[0].length==0) ) {
ErrorJS("["+this.m_sKeyName +"] MArray invalido: número de campos ("+this.m_a_sCOLs.length+") distinto del número de valores de cada campo ("+this.m_a_aROWs[0].length+")\n\nCOLs:\n"+ this.m_a_sCOLs + "\nVALs:\n"+this.m_a_aROWs[0]+ "\n")
}
// TOOLs (Utilidades)
//
this.f_fillFromOldMArray = function (maOldMArray, bDelete){
if(bDelete) this.m_a_aROWs = [];
this.m_a_sCOLs = maOldMArray[0];
var nCols = this.m_a_sCOLs.length;
var f = -1, F = maOldMArray.f_maGetRegs();
while ( ++f < F ) {
this.f_addRow( maOldMArray[1].slice(f*nCols, (f*nCols)+nCols) );
}
}
this.f_debug = function (bHTML, bAll){
var sReg="COLs.\n ["+this.m_a_sCOLs+"]\nROWs.\n";
if(bAll || this.f_length()<6){
for (var f=0; f");
return (sReg);
}
this.f_getColPos = function (sColName){
var nCol = this.m_a_sCOLs.f_indexOf(sColName)
//if (nCol==-1) ErrorJS(FunCaller()+"["+this.m_sKeyName+".f_getColPos] no existe el campo ["+sColName+"] en el MArray ["+this.m_a_sCOLs+"]");
return (nCol);
}
this.f_getColName = function (nColPos){
var sCol = this.m_a_sCOLs [nColPos]
//if (nCol==-1) ErrorJS(FunCaller()+"["+this.m_sKeyName+".f_getColPos] no existe el campo ["+sColName+"] en el MArray ["+this.m_a_sCOLs+"]");
return (sCol);
}
this.f_getCols = function (){ return (this.m_a_sCOLs.length); }
// Devuelve una copia del array de columnas
this.f_subCols = function (){ return ([].concat(this.m_a_sCOLs)); }
// Vacia el MArray
this.f_clean = function (){ this.m_a_aROWs=[]; }
this.f_subColsPos = function (a_sColName){
var nColPos, a_nCols=[];
for(var f=0; f=this.f_length()) {
this.m_a_aROWs=this.m_a_aROWs.concat(a_aRows);
}
else {
var a_vArray = this.m_a_aROWs.slice(0, nReg);
a_vArray = a_vArray.concat(a_aRows);
a_vArray = a_vArray.concat(this.m_a_aROWs.slice(nReg, this.f_length()));
this.m_a_aROWs=a_vArray;
}
}
this.f_addCol = function(sColName, a_vVALs){
if (IsArray(a_vVALs)) {
if (a_vVALs.length!=this.f_length()) ErrorJS("["+this.m_sKeyName+".f_addCol] Número incorrecto de valores. ["+a_vVALs+"]("+a_vVALs.length+") -> ("+this.f_length+")");
}
else {
if (IsNull(a_vVALs)) {
a_vVALs=new Array(this.f_length());
}
else {
var sVal = a_vVALs
a_vVALs=new Array();
for (var f=0; f=0) {
a_vCol.push(this.m_a_aROWs[f][nColPos]);
}
return (a_vCol.reverse());
}
this.f_getVal = function (sColName, nReg, sReturn){
if (isNaN(nReg) || nReg<0 || nReg>=this.f_length() ) {
if (IsUndefined(sReturn)) ErrorJS (FunCaller()+"["+this.m_sKeyName+".f_getVal] no existe el registro "+nReg+".El MArray tiene "+this.f_length() +". Campo: ("+this.m_a_sCOLs+")")
}
else {
var nCol = this.f_getColPos(sColName);
if(nCol!=-1) sReturn = this.m_a_aROWs[nReg][nCol];
else if (IsUndefined(sReturn)) ErrorJS ("["+this.m_sKeyName+".f_getVal] no existe la columna '"+sColName+"' en el MArray ("+this.m_a_sCOLs+")");
}
return (sReturn);
}
this.f_getValIf = function (sColIf, sValIf, sColReturn, vValReturn, bLast){
var nReg = this.f_getReg(sColIf, sValIf, bLast);
if(nReg!=-1) vValReturn = this.f_getVal(sColReturn, nReg);
return (vValReturn);
}
this.f_subDistinctSub = function (a_nRegs,sCampo,bIndices) {
var a_sRegs = this.f_subVals (sCampo, a_nRegs)
var a_nRegsF = a_sRegs.f_subDistinct(1);
if (bIndices) {
a_nRegsF = a_nRegs.f_getVals (a_nRegsF)
}
else {
a_nRegsF = a_sRegs.f_getVals (a_nRegsF);
}
return (a_nRegsF);
}
this.f_subDistinct = function(sCampo,bIndices,bCaseDependiente,bRepetidos,bOrdenados){
var a_vDistinct = []
var a_vCol = this.f_getCol (sCampo)
if (a_vCol.length) a_vDistinct = a_vCol.f_subDistinct (bIndices,!bCaseDependiente,bRepetidos,!bOrdenados)
return (a_vDistinct)
}
this.f_subVals = function (a_sColName, a_nRegs, bReturnMA){
if (bReturnMA) a_sColName = this.m_a_sCOLs;
else if (!IsArray(a_sColName)) a_sColName = [a_sColName];
if (!a_nRegs) a_nRegs = [0];
else if (!IsArray(a_nRegs)) a_nRegs = [a_nRegs];
var a_vROWs = [];
var a_vVals = [];
var a_nColPos = this.f_subColsPos(a_sColName);
var nREGs = a_nRegs.length;
var nCOLs = a_nColPos.length;
for(var f=0; f-1 && nRegPos==-1){
if(this.m_a_aROWs[nReg][nColPos]==vVal) nRegPos = nReg;
nReg--;
}
}
else {
while (nReg=0) {
if(a_vCol[n]!=vColVal) a_nRegs.push(n);
}
}
else {
if (bLike){
while(--n>=0) {
if (a_vCol[n].indexOf(vColVal)!=-1) a_nRegs.push(n);
}
}
else {
while(--n>=0) {
if(a_vCol[n]==vColVal) a_nRegs.push(n);
}
}
}
if (a_sColName.length>1){ // Busqueda múltiple
var a_nRegs_tmp;
while(++nCol=0) {
if(a_vCol[a_nRegs[n]]!=vColVal) a_nRegs_tmp.push(a_nRegs[n]);
}
}
else {
if (bLike) {
while(--n>=0) {
if(a_vCol[a_nRegs[n]].indexOf(vColVal)!=-1) a_nRegs_tmp.push(a_nRegs[n]);
}
}
else {
while(--n>=0) {
if(a_vCol[a_nRegs[n]]==vColVal) a_nRegs_tmp.push(a_nRegs[n]);
}
}
}
a_nRegs=a_nRegs_tmp;
}
}
// if(a_nRegs.length==0) a_nRegs = -1 // v0.217
// else
if(a_nRegs.length && (a_sColName.length & 1)) a_nRegs = a_nRegs.reverse();
return (a_nRegs);
}
else {
var a_vSub = [];
var a_vCol = this.f_getCol(a_sColName);
if (a_vCol.length) {
if(!IsArray(a_vColVal)) a_vColVal = [a_vColVal];
for (var f=0;f1 && !bRepetidos) a_vSub = a_vSub.f_subDistinct (0,!bCaseDep,bRepetidos,1);
}
return (a_vSub);
}
}
this.f_getClone = function (){
return ( new MArray([].concat(this.m_a_sCOLs), [].concat(this.m_a_aROWs)) );
}
this.f_sumaCampos = function (a_sCampos,a_nRegs){
if(!IsArray(a_nRegs)) a_nRegs = [a_nRegs];
var maValores = this.f_subValByRegs (a_sCampos, a_nRegs)
var a_sValores = new Array()
for (var f=0;f1){
a_sSub=this.f_subValByRegs(sCampo, a_nSub); //subarray con los valores del nuevo campo de cada uno de esos indices
a_nSub=a_sSub.f_sort(1, bDesc); //subarray ordenado de indices
sTrace+="---ordenando subarrays de elementos repetidos: "+a_vValores[g]+"\n"
sTrace+="-----a_nSub["+a_nSub+"]\n"
a_nSubInd=a_nIndices.slice(g, g+a_nSub.length); //Ordeno subarray de indices a partir del orden de a_nSub
sTrace+="-----creando subarray de indices a_nIndices de ("+g+" a "+(a_nSub.length+1)+"\n";
a_nSubNew=new Array(a_nSubInd.length);
sTrace+="---aplicando suborden de a_nSub["+a_nSub+"] a a_nSubInd["+a_nSubInd+"]\n";
for(h=0; hthis.f_length()) nRegs = 1;
this.m_a_aROWs = this.m_a_aROWs.f_delete(nRegPos, nRegs)
}
else {
a_nRegPos = a_nRegPos.sort().reverse();
for ( var f=0, F=a_nRegPos.length; f//-->