/// <summary>
/// Checkea y descheckea todas las columnas de la matrix variedades
/// </summary>
public static void EjecutarChecking(SAPbouiCOM.Form oForm)
{
SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chk").Specific;
SAPbouiCOM.Matrix oMatrix = oForm.Items.Item("matrixVar").Specific;
SAPbouiCOM.Matrix oMatrixCrt = oForm.Items.Item("matrixCrt").Specific;
oForm.Freeze(true);
// Check
if (oButton.Caption.Equals("check"))
{
for (int i = 1; i <= oMatrix.RowCount; i++)
{
SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
chk.Checked = true;
}
DataBindCuarteles(oForm);
oButton.Caption = "uncheck";
}
// Uncheck
else
{
for (int i = 1; i <= oMatrix.RowCount; i++)
{
SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
chk.Checked = false;
}
oMatrixCrt.Clear();
oButton.Caption = "check";
}
oForm.Freeze(false);
}
public void GetItemReferences()
{
try
{
_oForm.Freeze(false);
_cbARINV = _oForm.Items.Item("cbARINV").Specific as SAPbouiCOM.CheckBox;
_cbARCN = _oForm.Items.Item("cbARCN").Specific as SAPbouiCOM.CheckBox;
_cbAPINV = _oForm.Items.Item("cbAPINV").Specific as SAPbouiCOM.CheckBox;
_cbAPCN = _oForm.Items.Item("cbAPCN").Specific as SAPbouiCOM.CheckBox;
_txtDTFRM = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
_txtDTTO = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
_btnView = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
_btnCP = _oForm.Items.Item("btnCP").Specific as SAPbouiCOM.Button;
_txtPath = _oForm.Items.Item("txtPath").Specific as SAPbouiCOM.EditText;
_btnExport = _oForm.Items.Item("btnExport").Specific as SAPbouiCOM.Button;
_grid_Trans = _oForm.Items.Item("grid_Trans").Specific as SAPbouiCOM.Grid;
_dt_grid_Trans = _oForm.DataSources.DataTables.Item("grid_Trans");
_btnView.PressedAfter += _btnView_PressedAfter;
_btnExport.PressedAfter += _btnExport_PressedAfter;
// Double click events
_grid_Trans.DoubleClickAfter += _grid_Trans_DoubleClickAfter;
_btnCP.PressedAfter += _btnCP_PressedAfter;
}
catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
}
internal void ForbiddenUncheck(int lIntActiveRow)
{
lObjCheckboxInv = ValidCheckinRow(lIntActiveRow);
if (lObjCheckboxInv != null)
{
lObjFormChargesXml.Freeze(true);
string lStrCorral = Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("colWhs").Cells.Item(lIntActiveRow).Specific).Value);
if (!AddedAlready(lStrCorral))
{
foreach (var item in lStrlstCorral)
{
if (lStrCorral == item)
{
lObjCheckboxInv.Caption = "Y";
}
}
}
else
{
lObjCheckboxInv.Caption = "N";
}
lObjFormChargesXml.Freeze(false);
}
}
/// <summary>
/// Initialize components. Called by framework after form created.
/// </summary>
public override void OnInitializeComponent()
{
this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_0").Specific));
this.StaticText1 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
this.StaticText2 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_2").Specific));
this.CheckBoxImpresion = ((SAPbouiCOM.CheckBox)(this.GetItem("chkImp").Specific));
this.StaticText3 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_4").Specific));
this.EditTextDocDesde = ((SAPbouiCOM.EditText)(this.GetItem("docDesde").Specific));
this.StaticText4 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_6").Specific));
this.EditTextDocHasta = ((SAPbouiCOM.EditText)(this.GetItem("docHasta").Specific));
this.CBoxTpoEstado = ((SAPbouiCOM.ComboBox)(this.GetItem("tpoEstado").Specific));
this.CBoxtpoRuta = ((SAPbouiCOM.ComboBox)(this.GetItem("tpoRuta").Specific));
this.CBoxtpoRuta.ClickBefore += new SAPbouiCOM._IComboBoxEvents_ClickBeforeEventHandler(this.CBoxtpoRuta_ClickBefore);
this.StaticText5 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_10").Specific));
this.StaticText6 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_11").Specific));
this.EditTextFechaDesde = ((SAPbouiCOM.EditText)(this.GetItem("FechaD").Specific));
this.StaticText7 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_13").Specific));
this.EditTextFechaHasta = ((SAPbouiCOM.EditText)(this.GetItem("FechaH").Specific));
this.oGrid = ((SAPbouiCOM.Grid)(this.GetItem("Grid").Specific));
this.oGrid.LinkPressedBefore += new SAPbouiCOM._IGridEvents_LinkPressedBeforeEventHandler(this.oGrid_LinkPressedBefore);
this.oGrid.LinkPressedAfter += new SAPbouiCOM._IGridEvents_LinkPressedAfterEventHandler(this.oGrid_LinkPressedAfter);
this.oGrid.DoubleClickBefore += new SAPbouiCOM._IGridEvents_DoubleClickBeforeEventHandler(this.oGrid_DoubleClickBefore);
this.oGrid.DoubleClickAfter += new SAPbouiCOM._IGridEvents_DoubleClickAfterEventHandler(this.oGrid_DoubleClickAfter);
this.ButtonBuscar = ((SAPbouiCOM.Button)(this.GetItem("bBuscar").Specific));
this.ButtonBuscar.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonBuscar_ClickBefore);
this.ButtonImprimir = ((SAPbouiCOM.Button)(this.GetItem("bImprimir").Specific));
this.ButtonImprimir.ClickAfter += new SAPbouiCOM._IButtonEvents_ClickAfterEventHandler(this.ButtonImprimir_ClickAfter);
this.ButtonImprimir.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonImprimir_ClickBefore);
this.ButtonCancelar = ((SAPbouiCOM.Button)(this.GetItem("bCancelar").Specific));
this.ButtonCancelar.ClickAfter += new SAPbouiCOM._IButtonEvents_ClickAfterEventHandler(this.ButtonCancelar_ClickAfter);
this.ButtonCancelar.ClickBefore += new SAPbouiCOM._IButtonEvents_ClickBeforeEventHandler(this.ButtonCancelar_ClickBefore);
this.CheckBox1 = ((SAPbouiCOM.CheckBox)(this.GetItem("chk_sel").Specific));
this.OnCustomInitialize();
}
/// <summary>
/// Revisa el estado de la matrix cuarteles para dar valor correcto al boton check cuarteles
/// </summary>
public static void SetButtonCheckCuarteles(SAPbouiCOM.Form oForm)
{
SAPbouiCOM.Matrix oMatrix = oForm.Items.Item("matrixCrt").Specific;
SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chkC").Specific;
bool Chekeados = false;
// Recorremos la matrix de cuarteles para saber si hay chekeados
for (int i = 1; i <= oMatrix.RowCount; i++)
{
SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
if (chk.Checked)
{
Chekeados = true;
break;
}
}
// si hay valores chekeados cambiar button
if (Chekeados)
{
oButton.Caption = "uncheck";
}
else
{
oButton.Caption = "check";
}
}
public void BatchPreauth(SAPbouiCOM.Form form)
{
try {
if (cfgBatchPreauth != "Y")
{
return;
}
if (SBO_Application.MessageBox("Run pre-auth on selected orders?", 1, "Yes", "No") != 1)
{
return;
}
SAPbouiCOM.Matrix oMatrix = (SAPbouiCOM.Matrix)form.Items.Item("10").Specific;
for (int i = 1; i <= oMatrix.RowCount; i++)
{
SAPbouiCOM.CheckBox check = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("1").Cells.Item(i).Specific;
if (check.Checked)
{
string docnum = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("11").Cells.Item(i).Specific).Value;
string customerid = ((SAPbouiCOM.EditText)oMatrix.Columns.Item("10").Cells.Item(i).Specific).Value;
int docentry = getDocEntry("17", docnum, customerid);
SAPbobsCOM.Documents oDoc = (SAPbobsCOM.Documents)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oOrders);
if (oDoc.GetByKey(docentry))
{
if (oDoc.DocumentStatus == SAPbobsCOM.BoStatus.bost_Close)
{
SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " is closed.", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
}
else
{
SAPCust sapcust = getCustomerByID(customerid, "");
if (sapcust == null)
{
SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " error customer: " + customerid + " has no payment method.", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
}
else
{
if (isOrderPreauthed(docentry.ToString()))
{
SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth sales order : " + docnum + " order already pre-authed", SAPbouiCOM.BoMessageTime.bmt_Medium, true);
}
else
{
BatchPreauth_PreAuthCustomer(oDoc, sapcust);
}
}
}
}
else
{
SBO_Application.SetStatusBarMessage("eBizCharge Batch pre-auth can not retrieve sales order : " + docnum + ". " + oCompany.GetLastErrorDescription(), SAPbouiCOM.BoMessageTime.bmt_Medium, true);
}
}
}
}
catch (Exception ex)
{
}
}
private void InitiallizeForm()
{
isForLoading = true;
oForm.Freeze(true);
tab1 = (SAPbouiCOM.Folder)oForm.Items.Item("21").Specific;
tab3 = (SAPbouiCOM.Folder)oForm.Items.Item("19").Specific;
tab4 = (SAPbouiCOM.Folder)oForm.Items.Item("35").Specific;
dtHead = oForm.DataSources.DataTables.Item("dtHead");
Animals = oForm.DataSources.DataTables.Item("Animals");
DTRpt = oForm.DataSources.DataTables.Item("DTRpt");
dtPro = oForm.DataSources.DataTables.Item("dtPro");
dtReqT = oForm.DataSources.DataTables.Item("dtReqT");
dtTypeS = oForm.DataSources.DataTables.Item("dtTypeS");
ocflCard = (SAPbouiCOM.ChooseFromList)oForm.ChooseFromLists.Item("cflCard");
cflcardcode(ocflCard, "cflCard");
mtAnimals = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAnimals").Specific;
mtReqT = (SAPbouiCOM.Matrix)oForm.Items.Item("mtReqT").Specific;
mtRpt = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRpt").Specific;
mtProd = (SAPbouiCOM.Matrix)oForm.Items.Item("mtProd").Specific;
mtTypePRO = (SAPbouiCOM.Matrix)oForm.Items.Item("mtTypePRO").Specific;
cbAT = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAT").Specific;
cbAC = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbAC").Specific;
txQtyT = (SAPbouiCOM.EditText)oForm.Items.Item("29").Specific;
txSupplier = (SAPbouiCOM.EditText)oForm.Items.Item("47").Specific;
chSO = (SAPbouiCOM.CheckBox)oForm.Items.Item("chSO").Specific;
chPRO = (SAPbouiCOM.CheckBox)oForm.Items.Item("crRPRO").Specific;
dtHead.Rows.Add(1);
dtHead.SetValue("DocDate", 0, DateTime.Now);
dtHead.SetValue("PoDate", 0, DateTime.Now);
dtHead.SetValue("stDate", 0, DateTime.Now.AddDays(1));
dtHead.SetValue("eDate", 0, DateTime.Now.AddDays(4));
oForm.Freeze(false);
fillCB();
txQtyT.Item.Enabled = false;
oForm.PaneLevel = 4;
tab4.Select();
isForLoading = false;
fillPO();
mtProd.Item.Visible = false;
fillAThash();
RefreshForm();
}
private void FindSameInspection(string lStrInspection, string lStrAction)
{
for (int i = 1; i <= lObjMatrix.RowCount; i++)
{
if (Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("ColID").Cells.Item(i).Specific).Value) == lStrInspection)
{
lObjCheckboxInsp = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("Col_0").Cells.Item(i).Specific;
lObjCheckboxInsp.Caption = lStrAction;
}
}
}
private SAPbouiCOM.CheckBox ValidCheckinRow(int lIntActiveRow)
{
SAPbouiCOM.CheckBox lObjCheckBoxT = null;
try
{
lObjCheckBoxT = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("colChck").Cells.Item(lIntActiveRow).Specific;
return(lObjCheckBoxT);
}
catch (Exception err)
{
return(lObjCheckBoxT = null);
}
}
private bool getMatrixSelect(SAPbouiCOM.Matrix oMatrix, string Col, int Row)
{
try
{
SAPbouiCOM.CheckBox oCB = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item(Col).Cells.Item(Row).Specific; //Cast the Cell of the matrix to the respective type , in this case EditText
return(oCB.Checked); //Get the value form the EditText
}
catch (Exception ex)
{
errorLog("Can't find row:" + Row.ToString() + ",col:" + Col + "\r\n" + ex.Message);
}
return(false);
}
private SAPbouiCOM.CheckBox ValidateRow(int lIntRow)
{
SAPbouiCOM.CheckBox lObjCheckBoxT = null;
try
{
lObjCheckBoxT = (SAPbouiCOM.CheckBox)lObjMatrix.Columns.Item("Col_0").Cells.Item(lIntRow).Specific;
return(lObjCheckBoxT);
}
catch (Exception ex)
{
return(lObjCheckBoxT = null);
}
}
private void InitiallizeForm()
{
oForm.Freeze(true);
initiallizing = true;
dtAtrr = oForm.DataSources.DataTables.Item("dtAtrr");
dtHead = oForm.DataSources.DataTables.Item("dtHead");
dtLOV = oForm.DataSources.DataTables.Item("dtLOV");
dtHead.Rows.Add(1);
mtAttr = (SAPbouiCOM.Matrix)oForm.Items.Item("mtAttr").Specific;
mtLOV = (SAPbouiCOM.Matrix)oForm.Items.Item("mtLOV").Specific;
cbType = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbType").Specific;
cbLOV = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbLOV").Specific;
cbType.Item.DisplayDesc = true;
cbLOV.Item.DisplayDesc = true;
txSAtt = (SAPbouiCOM.EditText)oForm.Items.Item("txSAtt").Specific;
txNCode = (SAPbouiCOM.EditText)oForm.Items.Item("txNCode").Specific;
txNName = (SAPbouiCOM.EditText)oForm.Items.Item("txNName").Specific;
txCode = (SAPbouiCOM.EditText)oForm.Items.Item("txCode").Specific;
txName = (SAPbouiCOM.EditText)oForm.Items.Item("txName").Specific;
txDef = (SAPbouiCOM.EditText)oForm.Items.Item("txDef").Specific;
txNV = (SAPbouiCOM.EditText)oForm.Items.Item("txNV").Specific;
txNDescr = (SAPbouiCOM.EditText)oForm.Items.Item("txNDescr").Specific;
txSQL = (SAPbouiCOM.EditText)oForm.Items.Item("txSQL").Specific;
txVD = (SAPbouiCOM.EditText)oForm.Items.Item("txVD").Specific;
btAddAttr = (SAPbouiCOM.Button)oForm.Items.Item("btAddAttr").Specific;
btDelAttr = (SAPbouiCOM.Button)oForm.Items.Item("btDelAttr").Specific;
btUPAtt = (SAPbouiCOM.Button)oForm.Items.Item("btUPAtt").Specific;
btDownAtt = (SAPbouiCOM.Button)oForm.Items.Item("btDownAtt").Specific;
btAddLOV = (SAPbouiCOM.Button)oForm.Items.Item("btAddLOV").Specific;
btDelLOV = (SAPbouiCOM.Button)oForm.Items.Item("btDelLOV").Specific;
btUpLOV = (SAPbouiCOM.Button)oForm.Items.Item("btUpLOV").Specific;
btDownLOV = (SAPbouiCOM.Button)oForm.Items.Item("btDownLOV").Specific;
btUpdate = (SAPbouiCOM.Button)oForm.Items.Item("btUpdate").Specific;
chActive = (SAPbouiCOM.CheckBox)oForm.Items.Item("chActive").Specific;
// oForm.Items.Item("btUpd").Enabled = false;
oForm.Freeze(false);
initiallizing = false;
txSAtt.Active = true;
fillCb();
getCodes();
}
/// <summary>
/// Initialize components. Called by framework after form created.
/// </summary>
public override void OnInitializeComponent()
{
this.lObjTxtClient = ((SAPbouiCOM.EditText)(this.GetItem("txtClient").Specific));
this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
this.lObjMtxRejectOut = ((SAPbouiCOM.Matrix)(this.GetItem("mtxReject").Specific));
this.lObjBtnSearch = ((SAPbouiCOM.Button)(this.GetItem("btnSearch").Specific));
this.lObjBtnExit = ((SAPbouiCOM.Button)(this.GetItem("btnOutput").Specific));
this.lObjBtnInvoice = ((SAPbouiCOM.Button)(this.GetItem("btnInvo").Specific));
// this.lObjChckBox = ((SAPbouiCOM.CheckBox)(this.GetItem("ChckP").Specific));
this.lObjChckBox = ((SAPbouiCOM.CheckBox)(this.UIAPIRawForm.Items.Item("ChckP").Specific));
this.lObjEdTxtDocDate = ((SAPbouiCOM.EditText)(this.GetItem("txtSpD").Specific));
this.lObjLbl = ((SAPbouiCOM.StaticText)(this.GetItem("lblSpd").Specific));
this.OnCustomInitialize();
}
public void GetItemReferences()
{
try
{
_txtPath = _oForm.Items.Item("txtPath").Specific as SAPbouiCOM.EditText;
_cbPO = _oForm.Items.Item("cbPO").Specific as SAPbouiCOM.CheckBox;
_cbSO = _oForm.Items.Item("cbSO").Specific as SAPbouiCOM.CheckBox;
_btnPath = _oForm.Items.Item("btnPath").Specific as SAPbouiCOM.Button;
_btnSave = _oForm.Items.Item("btnSave").Specific as SAPbouiCOM.Button;
_btnPath.PressedAfter += _btnPath_PressedAfter;
_btnSave.PressedAfter += _btnSave_PressedAfter;
}
catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
}
public void GetItemReferences()
{
try
{
_btnView = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
_txtCSTCD = _oForm.Items.Item("txtCSTCD").Specific as SAPbouiCOM.EditText;
_txtDTFRM = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
_txtDTTO = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
_txtSrchPO = _oForm.Items.Item("txtSrchPO").Specific as SAPbouiCOM.EditText;
_btnNext = _oForm.Items.Item("btnNext").Specific as SAPbouiCOM.Button;
_btnBack = _oForm.Items.Item("btnBack").Specific as SAPbouiCOM.Button;
_txtTTLAMT = _oForm.Items.Item("txtTtlAmt").Specific as SAPbouiCOM.EditText;
_txtTTLQTY = _oForm.Items.Item("txtTtlQty").Specific as SAPbouiCOM.EditText;
_txtTTLCBOX = _oForm.Items.Item("txtTtlCrt").Specific as SAPbouiCOM.EditText;
_txtNAME = _oForm.Items.Item("txtNAME").Specific as SAPbouiCOM.EditText;
_txtPSTDT = _oForm.Items.Item("txtPSTDT").Specific as SAPbouiCOM.EditText;
_txtDUEDT = _oForm.Items.Item("txtDUEDT").Specific as SAPbouiCOM.EditText;
_txtDOCDT = _oForm.Items.Item("txtDOCDT").Specific as SAPbouiCOM.EditText;
_txtRMK = _oForm.Items.Item("txtRMK").Specific as SAPbouiCOM.EditText;
_cbDraft = _oForm.Items.Item("cbDraft").Specific as SAPbouiCOM.CheckBox;
_btnPost = _oForm.Items.Item("btnPost").Specific as SAPbouiCOM.Button;
_mat_CST = _oForm.Items.Item("mat_CST").Specific as SAPbouiCOM.Matrix;
// Make the matrix fill the area
_mat_CST.AutoResizeColumns();
//initialize the data table first
_dt_CST = _oForm.DataSources.DataTables.Item("dt_SelectCusfromORDR");
_dt_LST = _oForm.DataSources.DataTables.Item("dtListLines");
_grid_CST = _oForm.Items.Item("grid_CST").Specific as SAPbouiCOM.Grid;
_btnPost.PressedAfter += _btnPost_PressedAfter;
_btnBack.PressedAfter += _btnBack_PressedAfter;
_btnNext.PressedAfter += _btnNext_PressedAfter;
_btnView.PressedBefore += _btnView_PressedBefore;
_txtCSTCD.ChooseFromListAfter += _txtCSTCD_ChooseFromListAfter;
_txtSrchPO.KeyDownAfter += _txtSrchPO_KeyDownAfter;
_grid_CST.ValidateAfter += _grid_CST_ValidateAfter;
_grid_CST.PressedAfter += _grid_CST_PressedAfter;
_mat_CST.LinkPressedBefore += _mat_CST_LinkPressedBefore;
// Double click events
_grid_CST.DoubleClickAfter += _grid_CST_DoubleClickAfter;
_mat_CST.DoubleClickAfter += _mat_CST_DoubleClickAfter;
}
catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
}
public void GetItemReferences()
{
try
{
_txtVendor = _oForm.Items.Item("txtVendor").Specific as SAPbouiCOM.EditText;
_txtDTFRM = _oForm.Items.Item("txtDTFRM").Specific as SAPbouiCOM.EditText;
_txtDTTO = _oForm.Items.Item("txtDTTO").Specific as SAPbouiCOM.EditText;
_btnView = _oForm.Items.Item("btnView").Specific as SAPbouiCOM.Button;
_txtSrchPO = _oForm.Items.Item("txtSrchPO").Specific as SAPbouiCOM.EditText;
_txtTTLAMT = _oForm.Items.Item("txtTtlAmt").Specific as SAPbouiCOM.EditText;
_txtTTLQTY = _oForm.Items.Item("txtTtlQty").Specific as SAPbouiCOM.EditText;
_txtNAME = _oForm.Items.Item("txtNAME").Specific as SAPbouiCOM.EditText;
_txtPSTDT = _oForm.Items.Item("txtPSTDT").Specific as SAPbouiCOM.EditText;
_txtDUEDT = _oForm.Items.Item("txtDUEDT").Specific as SAPbouiCOM.EditText;
_txtDOCDT = _oForm.Items.Item("txtDOCDT").Specific as SAPbouiCOM.EditText;
_txtRMK = _oForm.Items.Item("txtRMK").Specific as SAPbouiCOM.EditText;
_btnPost = _oForm.Items.Item("btnPost").Specific as SAPbouiCOM.Button;
_btnNext = _oForm.Items.Item("btnNext").Specific as SAPbouiCOM.Button;
_btnBack = _oForm.Items.Item("btnBack").Specific as SAPbouiCOM.Button;
_cbDraft = _oForm.Items.Item("cbDraft").Specific as SAPbouiCOM.CheckBox;
_mat_Vendor = _oForm.Items.Item("mat_Vendor").Specific as SAPbouiCOM.Matrix;
_mat_Vendor.AutoResizeColumns();
_dt_VendorMatrix = _oForm.DataSources.DataTables.Item("dt_VendorfromOPOR");
_grid_Vendor = _oForm.Items.Item("grid_Ven").Specific as SAPbouiCOM.Grid;
_dt_VendorGrid = _oForm.DataSources.DataTables.Item("dtListLines");
_mat_Vendor.LinkPressedBefore += _mat_Vendor_LinkPressedBefore;
_txtSrchPO.KeyDownAfter += _txtSrchPO_KeyDownAfter;
_txtVendor.ChooseFromListAfter += _txtVendor_ChooseFromListAfter;
_btnView.PressedBefore += _btnView_PressedBefore;
_btnNext.PressedAfter += _btnNext_PressedAfter;
_btnBack.PressedAfter += _btnBack_PressedAfter;
_grid_Vendor.PressedAfter += _grid_Vendor_PressedAfter;
_grid_Vendor.ValidateAfter += _grid_Vendor_ValidateAfter;
_btnPost.PressedAfter += _btnPost_PressedAfter;
// Double click events
_grid_Vendor.DoubleClickAfter += _grid_Vendor_DoubleClickAfter;
_mat_Vendor.DoubleClickAfter += _mat_Vendor_DoubleClickAfter;
}
catch (Exception Ex) { eCommon.SBO_Application.MessageBox(Ex.Message); }
}
private void checkSameInspections(int lIntActiveRow)
{
lObjCheckboxInsp = ValidateRow(lIntActiveRow);
if (lObjCheckboxInsp != null)
{
string lStrIdIspection = Convert.ToString(((SAPbouiCOM.EditText)lObjMatrix.Columns.Item("ColID").Cells.Item(lIntActiveRow).Specific).Value);
if (lStrIdIspection != "0")
{
if (lObjCheckboxInsp.Checked)
{
FindSameInspection(lStrIdIspection, "Y");
}
else
{
FindSameInspection(lStrIdIspection, "N");
}
}
}
}
public override void OnInitializeComponent()
{
this.StaticText0 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_0").Specific));
this.StaticText1 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_3").Specific));
this.StaticText2 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_5").Specific));
this.StaticText3 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_6").Specific));
this.StaticText4 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_10").Specific));
this.StaticText5 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_13").Specific));
this.StaticText6 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_14").Specific));
this.ComboBox0 = ((SAPbouiCOM.ComboBox)(this.GetItem("Item_2").Specific));
this.ComboBox0.ComboSelectAfter += new SAPbouiCOM._IComboBoxEvents_ComboSelectAfterEventHandler(this.ComboBox0_ComboSelectAfter);
this.ComboBox1 = ((SAPbouiCOM.ComboBox)(this.GetItem("cbo_btype").Specific));
this.ComboBox1.ComboSelectAfter += new SAPbouiCOM._IComboBoxEvents_ComboSelectAfterEventHandler(this.ComboBox1_ComboSelectAfter);
this.CheckBox0 = ((SAPbouiCOM.CheckBox)(this.GetItem("chk_new").Specific));
this.CheckBox0.PressedAfter += new SAPbouiCOM._ICheckBoxEvents_PressedAfterEventHandler(this.CheckBox0_PressedAfter);
this.EditText0 = ((SAPbouiCOM.EditText)(this.GetItem("txt_bpcode").Specific));
this.EditText0.LostFocusAfter += new SAPbouiCOM._IEditTextEvents_LostFocusAfterEventHandler(this.EditText0_LostFocusAfter);
this.EditText1 = ((SAPbouiCOM.EditText)(this.GetItem("txt_prjn").Specific));
this.EditText2 = ((SAPbouiCOM.EditText)(this.GetItem("txt_period").Specific));
this.EditText3 = ((SAPbouiCOM.EditText)(this.GetItem("txt_fr").Specific));
this.EditText4 = ((SAPbouiCOM.EditText)(this.GetItem("txt_to").Specific));
this.Grid0 = ((SAPbouiCOM.Grid)(this.GetItem("grd_lst").Specific));
this.Button0 = ((SAPbouiCOM.Button)(this.GetItem("bt_n").Specific));
this.Button0.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button0_PressedAfter);
this.Button1 = ((SAPbouiCOM.Button)(this.GetItem("bt_v").Specific));
this.Button1.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button1_PressedAfter);
this.Button2 = ((SAPbouiCOM.Button)(this.GetItem("bt_e").Specific));
this.Button2.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button2_PressedAfter);
this.Button3 = ((SAPbouiCOM.Button)(this.GetItem("bt_d").Specific));
this.Button3.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button3_PressedAfter);
this.Button4 = ((SAPbouiCOM.Button)(this.GetItem("bt_l").Specific));
this.Button4.PressedAfter += new SAPbouiCOM._IButtonEvents_PressedAfterEventHandler(this.Button4_PressedAfter);
this.StaticText7 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_1").Specific));
this.EditText5 = ((SAPbouiCOM.EditText)(this.GetItem("txt_tu").Specific));
this.StaticText8 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_4").Specific));
this.EditText6 = ((SAPbouiCOM.EditText)(this.GetItem("txt_ktu").Specific));
this.StaticText9 = ((SAPbouiCOM.StaticText)(this.GetItem("Item_8").Specific));
this.EditText7 = ((SAPbouiCOM.EditText)(this.GetItem("txt_note").Specific));
this.OnCustomInitialize();
}
private void InitiallizeForm()
{
oForm.Freeze(true);
initiallizing = true;
dtRM = oForm.DataSources.DataTables.Item("dtRM");
dtRD = oForm.DataSources.DataTables.Item("dtRD");
dtHeads = oForm.DataSources.DataTables.Item("dtHead");
dtHeads.Rows.Add(1);
mtR = (SAPbouiCOM.Matrix)oForm.Items.Item("mtR").Specific;
mtRD = (SAPbouiCOM.Matrix)oForm.Items.Item("mtRD").Specific;
cbCM = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbCM").Specific;
txAP = (SAPbouiCOM.EditText)oForm.Items.Item("txAP").Specific;
txnRN = (SAPbouiCOM.EditText)oForm.Items.Item("txnRN").Specific;
txRN = (SAPbouiCOM.EditText)oForm.Items.Item("txRN").Specific;
btAddR = (SAPbouiCOM.Button)oForm.Items.Item("btAddR").Specific;
btAddD = (SAPbouiCOM.Button)oForm.Items.Item("btAddD").Specific;
btDelD = (SAPbouiCOM.Button)oForm.Items.Item("btDelD").Specific;
btDelR = (SAPbouiCOM.Button)oForm.Items.Item("btDelR").Specific;
cbBU = (SAPbouiCOM.ComboBox)oForm.Items.Item("cbBU").Specific;
cbBU.ValidValues.Add("01", "Size / Area");
cbBU.ValidValues.Add("02", "Volume");
cbBU.ValidValues.Add("03", "Floors");
cbBU.Select(0, SAPbouiCOM.BoSearchKey.psk_Index);
cbBU.Item.DisplayDesc = true;
chActive = (SAPbouiCOM.CheckBox)oForm.Items.Item("chActive").Specific;
oForm.Items.Item("btUpd").Enabled = false;
oForm.Freeze(false);
initiallizing = false;
txnRN.Active = true;
fillCb();
getCodes();
}
private void Button0_ClickBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
{
BubbleEvent = true;
try
{
if (EditText1.Value == "")
{
Application.SBO_Application.MessageBox("Favor de capturar el Folio de la solicitud");
return;
}
SAPbobsCOM.StockTransfer lObjStockTrasnfer;
string lStrFolio = EditText1.Value;
SAPbobsCOM.SBObob lObjSBObob = (SAPbobsCOM.SBObob)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoBridge);
SAPbobsCOM.Recordset lObjRecordSet = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
lObjRecordSet = lObjSBObob.GetObjectKeyBySingleValue(SAPbobsCOM.BoObjectTypes.oInventoryTransferRequest, "DocNum", lStrFolio, SAPbobsCOM.BoQueryConditions.bqc_Equal);
SAPbobsCOM.StockTransfer lObjInventory = (SAPbobsCOM.StockTransfer)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInventoryTransferRequest);
if (lObjRecordSet.RecordCount == 1)
{
lObjInventory.GetByKey(int.Parse(lObjRecordSet.Fields.Item(0).Value.ToString()));
}
Memory.ReleaseComObject(lObjSBObob);
Memory.ReleaseComObject(lObjRecordSet);
SAPbobsCOM.Recordset lObjRecordSet2 = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
lObjRecordSet2.DoQuery("select T0.U_CR_Batch, T0.DocEntry,T0.LineNum, T0.OpenQty, T0.WhsCode, T0.FromWhsCod, T0.U_CR_CardCode, T0.ItemCode from WTQ1 T0 inner join OWTQ T1 on T1.DocEntry = T0.DocEntry Inner join OCRD T3 on T3.cardcode = T0.U_CR_CardCode where T1.DocNum = '" + lStrFolio + "' and T0.InvntSttus = 'O'");
lLstExtraData = new List <object>();
for (int i = 0; i < lObjRecordSet2.RecordCount; i++)
{
lLstExtraData.Add(new
{
Lote = lObjRecordSet2.Fields.Item(0).Value.ToString(),
DocEntry = lObjRecordSet2.Fields.Item(1).Value.ToString(),
LineNum = lObjRecordSet2.Fields.Item(2).Value.ToString(),
Quantity = lObjRecordSet2.Fields.Item(3).Value.ToString(),
Whscode = lObjRecordSet2.Fields.Item(4).Value.ToString(),
FromWhscode = lObjRecordSet2.Fields.Item(5).Value.ToString(),
CardCode = lObjRecordSet2.Fields.Item(6).Value.ToString(),
ItemCode = lObjRecordSet2.Fields.Item(7).Value.ToString()
});
lObjRecordSet2.MoveNext();
}
Memory.ReleaseComObject(lObjRecordSet2);
lObjStockTrasnfer = (SAPbobsCOM.StockTransfer)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oStockTransfer);
bool lBolIsSuccesss = false;
for (int i = 1; i <= Matrix1.RowCount; i++)
{
SAPbouiCOM.CheckBox lObjChk = (SAPbouiCOM.CheckBox)Matrix1.Columns.Item(0).Cells.Item(i).Specific;
if (lObjChk.Checked)
{
lObjStockTrasnfer.FromWarehouse = ((SAPbouiCOM.EditText)Matrix1.Columns.Item(3).Cells.Item(i).Specific).Value;
lObjStockTrasnfer.ToWarehouse = ((dynamic)lLstExtraData[i - 1]).Whscode;
string lStrCardCode = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_6").Cells.Item(i).Specific).Value;
string lStrAlmacen = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_3").Cells.Item(i).Specific).Value;
string lStrCantidad = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_4").Cells.Item(i).Specific).Value;
string lStrTrans = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_5").Cells.Item(i).Specific).Value;
string lStrItemCode = ((SAPbouiCOM.EditText)Matrix1.Columns.Item("Col_7").Cells.Item(i).Specific).Value;
var lObjData = new
{
CardCode = lStrCardCode,
Almacen = lStrAlmacen,
Cantidad = lStrCantidad,
Trans = lStrTrans,
ItemCode = lStrItemCode
};
if (lStrTrans.Trim() != "")
{
lObjStockTrasnfer = AddLines(lObjStockTrasnfer, lObjInventory, lObjData);
lBolIsSuccesss = true;
}
else
{
Application.SBO_Application.StatusBar.SetText("Capturar cantidad", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
}
}
}
if (lBolIsSuccesss)
{
lObjStockTrasnfer.DocDate = DateTime.Now;
if (lObjStockTrasnfer.Add() != 0)
{
int error = oCompany.GetLastErrorCode();
string strError = oCompany.GetLastErrorDescription();
Application.SBO_Application.MessageBox(strError);
}
else
{
EditText1.Value = "";
LoadMatrixPeticiones();
Application.SBO_Application.StatusBar.SetText("Traslado correctamente efectuado.", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Success);
}
}
else
{
Application.SBO_Application.StatusBar.SetText("No se ha seleccionado ningun almacen para el traslado.", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
}
}
catch (Exception ex)
{
Application.SBO_Application.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
}
}
/// <summary>
/// Trae los datos para grilla de cuarteles segun variedades asignadas (check)
/// </summary>
public static void DataBindCuarteles(SAPbouiCOM.Form oForm)
{
SAPbouiCOM.Matrix oMatrix = oForm.Items.Item("matrixVar").Specific;
string query = string.Empty;
List <string> Chekeados = new List <string>();
string Desc = string.Empty;
// Recorremos la matrix de variedades y obtenemos los valores con check
for (int i = 1; i <= oMatrix.RowCount; i++)
{
SAPbouiCOM.CheckBox chk = (SAPbouiCOM.CheckBox)oMatrix.Columns.Item("co_Chk").Cells.Item(i).Specific;
if (chk.Checked)
{
Chekeados.Add(oMatrix.Columns.Item("co_Cod").Cells.Item(i).Specific.Value);
Desc = oMatrix.Columns.Item("co_Desc").Cells.Item(i).Specific.Value.ToString();
}
}
// Si hay variedades chekeadas asignar cuarteles
if (Chekeados.Count > 0)
{
int index = 0;
foreach (string sCampo in Campo)
{
foreach (string var in Chekeados)
{
if (!index.Equals(0))
{
query += " UNION ";
}
switch (Conexion_SBO.m_oCompany.DbServerType)
{
case SAPbobsCOM.BoDataServerTypes.dst_HANADB:
query += @"SELECT 'Y' as ""check"", ""U_SEI_CRT"" as ""Cuartel"", ""U_SEI_VAR"" as ""Variedad"", ""U_SEI_HEC"" as ""Hec"", ""U_SEI_ESP"" as ""Esp"", ""Code"" as ""Campo"" FROM ""@SEI_DMDC"" WHERE ""Code"" = '" + sCampo + @"' AND ""U_SEI_VAR"" = '" + var + @"' AND ""U_SEI_EST""='Activo'";
break;
default:
query += @"SELECT 'Y' as check, U_SEI_CRT as Cuartel, U_SEI_VAR as Variedad, U_SEI_HEC as Hec, U_SEI_ESP as Esp, Code as Campo FROM @SEI_DMDC WHERE Code = '" + sCampo + @"' AND U_SEI_VAR = '" + var + @"' AND U_SEI_EST='Activo'";
break;
}
index++;
}
}
oForm.DataSources.DataTables.Item("CUARTELES").ExecuteQuery(query);
oMatrix = oForm.Items.Item("matrixCrt").Specific;
oMatrix.Columns.Item("co_Chk").DataBind.Bind("CUARTELES", "check");
oMatrix.Columns.Item("co_Crt").DataBind.Bind("CUARTELES", "Cuartel");
oMatrix.Columns.Item("co_Desc").DataBind.Bind("CUARTELES", "Variedad");
oMatrix.Columns.Item("co_Hec").DataBind.Bind("CUARTELES", "Hec");
oMatrix.Columns.Item("co_Esp").DataBind.Bind("CUARTELES", "Esp");
oMatrix.Columns.Item("co_Cpo").DataBind.Bind("CUARTELES", "Campo");
oMatrix.Clear();
oMatrix.LoadFromDataSource();
// Si hay variedades chekeades setear boton check variedades
SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chk").Specific;
oButton.Caption = "uncheck";
}
else
{
oMatrix = oForm.Items.Item("matrixCrt").Specific;
oMatrix.Clear();
// Si no hay variedades chekeades setear boton check variedades y cuarteles
SAPbouiCOM.Button oButton = oForm.Items.Item("bt_chk").Specific;
oButton.Caption = "check";
}
}
