}//fin FormEvent
private void Distribuir()
{
Int64 iFolio;
Int64 iDesde;
Int64 iHasta;
Int32 i;
SAPbouiCOM.EditText oEditText;
try
{
oMtx.Clear();
oMtx.FlushToDataSource();
oEditText = (EditText)(oForm.Items.Item("Desde").Specific);
iDesde = Convert.ToInt64((System.String)(oEditText.Value), _nf);
oEditText = (EditText)(oForm.Items.Item("Hasta").Specific);
iHasta = Convert.ToInt64((System.String)(oEditText.Value), _nf);
if (iDesde <= 0)
{
FSBOApp.StatusBar.SetText("Debe ingresar Folio desde", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error);
}
else if (iHasta <= 0)
{
FSBOApp.StatusBar.SetText("Debe ingresar Folio hasta", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error);
}
else if (iDesde >= iHasta)
{
FSBOApp.StatusBar.SetText("Ingrese rango Folio correcto", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error);
}
else
{
i = 0;
for (iFolio = iDesde; iFolio <= iHasta; iFolio++)
{
oDBDSD.InsertRecord(i);
oDBDSD.SetValue("U_Folio", i, Convert.ToString(iFolio));
oDBDSD.SetValue("U_Estado", i, "D");
i++;
}
if (Convert.ToDouble((System.String)(oDBDSD.GetValue("U_Folio", i)), _nf) == 0)
{
oDBDSD.RemoveRecord(i);
}
oMtx.LoadFromDataSource();
oColumn = oMtx.Columns.Item("Folio");
oColumn.TitleObject.Sortable = true;
oColumn.TitleObject.Sort(SAPbouiCOM.BoGridSortType.gst_Ascending);
}
}
catch (Exception e)
{
FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", "");
OutLog("Distribuir: " + e.Message + " ** Trace: " + e.StackTrace);
}
}//fin Distribuir
private bool GetMonth()
{
int iRow;
bool bModify = false;
try
{
oForm.Freeze(true);
oDB_M = oForm.DataSources.DBDataSources.Item("@KIS_FI0020M_HRD");
oDB_1 = oForm.DataSources.DBDataSources.Item("@KIS_FI00201_HRD");
oMatrix = (SAPbouiCOM.Matrix)oForm.Items.Item("mtx").Specific;
//oMatrix.LoadFromDataSource();
oMatrix.Clear();
string Year = oForm.Items.Item("Code").Specific.value.Trim();
YYYYCode = Year;
int Month = 1;
string YYYYMM = "";
iRow = oMatrix.VisualRowCount;
for (int i = 0; i < 12; i++)
{
if (Month.ToString().Length == 1)
{
YYYYMM = Year + "0" + Month.ToString();
}
else
{
YYYYMM = Year + Month.ToString();
}
oDB_1.InsertRecord(iRow);
oDB_1.SetValue("U_YYYYMM", iRow, YYYYMM);
Month = Month + 1;
iRow += 1;
bModify = true;
if (i == 11)
oDB_1.RemoveRecord(iRow);
}
if (bModify)
{
oMatrix.LoadFromDataSource();
}
//B1Connections.theAppl.StatusBar.SetText("저장이 완료 되었습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다
}
catch (Exception ex)
{
oForm.Freeze(false);
B1Connections.theAppl.StatusBar.SetText("GetCostCenterList " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
return false;
}
finally
{
oForm.Freeze(false);
oRS = null;
}
return true;
}
