/// <summary> /// Carga el grid de las series escaneadas /// </summary> private void CargarGridArqueo() { try { _oForma = _Application.Forms.Item(formID); _oForma.Freeze(true);// _oForma.DataSources.DataTables.Item(DT_ARQUEOS) .ExecuteQuery(@"SELECT CAST('' AS INT) AS #, CAST('' AS NVARCHAR(MAX)) AS CodigoAsistente , CAST('' AS NVARCHAR(MAX)) AS NombreAsistente , CAST('' AS NVARCHAR(MAX)) AS CodigoOficina , CAST('' AS NVARCHAR(MAX)) AS Empresa , CAST('' AS NVARCHAR(MAX)) AS 'Plan' , CAST('' AS NVARCHAR(MAX)) AS Solicitud , CAST('' AS DATETIME) AS FechaArqueo "); _oGridArqueos = (SAPbouiCOM.Grid)_oForma.Items.Item(GRD_ARQUEOS).Specific; _oGridArqueos.DataTable = _oForma.DataSources.DataTables.Item(DT_ARQUEOS); FormatoGrid(_oGridArqueos, ""); _oGridArqueos.AutoResizeColumns(); } catch (Exception ex) { throw new Exception("Error al cargar grid de arqueo *CargarGridArqueo* : " + ex.Message); } finally { _oForma.Freeze(false); } }
}//fin MenuEvent private void Query(String Proc) { try { if (GlobalSettings.RunningUnderSQLServer) { s = "exec " + Proc + " '" + Desde + "', '" + Hasta + "'"; } else { s = "CALL " + Proc + " ('" + Desde + "', '" + Hasta + "')"; } oDataTable.ExecuteQuery(s); if (oDataTable.Rows.Count > 0) { ogrid.AutoResizeColumns(); } } catch (Exception e) { OutLog("Query: " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); } }
private void CargarGrid() { try { ogrid = ((Grid)oForm.Items.Item("ogrid").Specific); odt = ogrid.DataTable; if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT DocEntry, U_CardCode, U_CardName, U_Activado FROM [@VID_FELISTANE]"; } else { s = @"SELECT ""DocEntry"", ""U_CardCode"", ""U_CardName"", ""U_Activado"" FROM ""@VID_FELISTANE"" "; } ogrid.DataTable.ExecuteQuery(s); ogrid.Columns.Item("DocEntry").Type = BoGridColumnType.gct_EditText; var oColumn = ((GridColumn)ogrid.Columns.Item("DocEntry")); ((EditTextColumn)oColumn).Editable = false; ((EditTextColumn)oColumn).TitleObject.Caption = "DocEntry"; ((EditTextColumn)oColumn).Visible = false; ogrid.Columns.Item("U_CardCode").Type = BoGridColumnType.gct_EditText; oColumn = ((GridColumn)ogrid.Columns.Item("U_CardCode")); ((EditTextColumn)oColumn).Editable = true; ((EditTextColumn)oColumn).TitleObject.Caption = "Codigo SN"; ((EditTextColumn)oColumn).Visible = true; ((EditTextColumn)oColumn).LinkedObjectType = "2"; ((EditTextColumn)oColumn).ChooseFromListUID = "CFL0"; ((EditTextColumn)oColumn).ChooseFromListAlias = "CardCode"; ogrid.Columns.Item("U_CardName").Type = BoGridColumnType.gct_EditText; oColumn = ((GridColumn)ogrid.Columns.Item("U_CardName")); ((EditTextColumn)oColumn).Editable = false; ((EditTextColumn)oColumn).TitleObject.Caption = "Razón Social"; ((EditTextColumn)oColumn).Visible = true; ogrid.Columns.Item("U_Activado").Type = BoGridColumnType.gct_CheckBox; var oColumnchx = ((GridColumn)ogrid.Columns.Item("U_Activado")); ((CheckBoxColumn)oColumnchx).Editable = true; ((CheckBoxColumn)oColumnchx).TitleObject.Caption = "Activo"; ((CheckBoxColumn)oColumnchx).Visible = true; ogrid.AutoResizeColumns(); if (((System.String)odt.GetValue("U_CardCode", 0)).Trim() != "") { odt.Rows.Add(); } FSBOApp.StatusBar.SetText("Lista Negra cargada", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Success); } catch (Exception e) { FSBOApp.StatusBar.SetText(e.Message, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("CargarGrid: " + e.Message + " ** Trace: " + e.StackTrace); } }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = "CHK,LINEID,U_RECVDT,CODE,NAME,U_DELVCD,U_RDEPT,U_CALLTP,U_TEL,U_PAYNM,U_CENTNM,U_COMMENT,U_PROCOMM,U_RECVNM,U_PROCDT,U_PROCNM"; string cv_ColumnsNAM_s = "체크,라인번호,상담일,독자코드,독자이름,배달코드,구독부서,콜유형,전화번호,요금제,분국,접수내용,처리결과,작업자,처리일자,처리자"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); //string expr = "BackColor=#DBE4F6&Width(ZIP_CD=80,ADDR_KOR=345)"; //FN.SetColumnProperty(oForm, "grd", expr); }
private void FindData(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Grid oGrid; StringBuilder sb; string strYYYYMM_FR = string.Empty; string strYYYYMM_TO = string.Empty; string strCENTCD_FR = string.Empty; string strCENTCD_TO = string.Empty; string strPERSON = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; strYYYYMM_FR = oUDS.Item("cboYYYYMM1").ValueEx; strYYYYMM_TO = oUDS.Item("cboYYYYMM2").ValueEx; sb = new StringBuilder(); //조회 sb.AppendLine(" SELECT CONVERT (VARCHAR (10), ROW_NUMBER () OVER (ORDER BY T0.Code)) AS ROWSEQ "); sb.AppendLine(" , T0.Code AS READCD "); sb.AppendLine(" , T0.[Name] AS READNM "); sb.AppendLine(" , ISNULL(T0.U_SUMCNT, 0) AS READCNT "); sb.AppendLine(" , T1.U_SAILCD "); sb.AppendLine(" , T1.U_SAILNM "); sb.AppendLine(" , T1.U_METHOD "); sb.AppendLine(" , T1.U_PAPERTP "); sb.AppendLine(" , U_EXPRYM "); sb.AppendLine(" FROM [@KIS_SO0030M_HRD] T0 "); sb.AppendLine(" INNER JOIN (SELECT ROW_NUMBER () OVER (PARTITION BY Code ORDER BY LineId) AS SEQ "); sb.AppendLine(" , Code "); sb.AppendLine(" , U_PAPERTP "); sb.AppendLine(" , U_SAILCD "); sb.AppendLine(" , U_SAILNM "); sb.AppendLine(" , U_METHOD "); sb.AppendLine(" FROM [@KIS_SO00301_HRD]) T1 "); sb.AppendLine(" ON T0.Code = T1.Code AND T1.Seq = 1 "); sb.AppendLine(" WHERE CONVERT(NVARCHAR(6), ISNULL(U_EXPRYM,''), 112) BETWEEN '{0}' AND '{1}' "); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").ExecuteQuery(string.Format( sb.ToString(), strYYYYMM_FR, strYYYYMM_TO) ); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //1. 지종 FN.SetComboBoxValidValues(oGrid, "U_PAPERTP", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO01' ", FN.Enum_WholeTp.m_Nothing); //2. 가입방법 FN.SetComboBoxValidValues(oGrid, "U_METHOD", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO14' ", FN.Enum_WholeTp.m_Nothing); // 지국 링크버튼추가 FN.SetGirdColumnLinkedObjec(ref oGrid, "READCD", BoLinkedObject.lf_BusinessPartner); //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && (oGrid.DataTable.GetValue("READCD", 0).ToString() == null || oGrid.DataTable.GetValue("READCD", 0).ToString() == "")) { FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); } else { FN.BindGrid(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , "" , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.AlignRight)); //FN.SetColoumnColor(oForm, "grd3", "#E0ECF8", "ETAX_YN,DTINO,DTSTAT"); //그리드 BG 기본색(#E6E6FA) oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_btnFind_AFItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd1"); string cv_ColumnsUID_s = "U_LINENUM, U_EMPNO, U_EMPNM, U_DEPTCD, U_DEPTNM, U_PASSYNL, U_PASSYNT, U_HEADER, U_LINE"; string cv_ColumnsNAM_s = "#,사번,사원명,부서코드,부서명,본인고과,고과자,헤더정보,라인정보"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid2 = (SAPbouiCOM.Grid)oForm.Items.Item("grd2").Specific; oGrid2.DataTable = oForm.DataSources.DataTables.Item("grd2"); string cv_ColumnsUID_s = "Code,U_DTCD, U_ABILCD, U_COMPOCD, U_BASESC, U_CONTENTS,U_GRADE4,U_GRADE1,U_GRADE2,U_GRADE3,U_LASTGAF"; string cv_ColumnsNAM_s = "코드,구분,역량,구성요소,배점,구성요소내용,평가등급,1차고과등급,2차고과등급,3차고과등급,최종등급"; string cv_No_Visible_s = "Code"; FN.SetGridTitle(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid2.RowHeaders.Width = 0; oGrid2.AutoResizeColumns(); }
internal static void Veiw_Grid1_DataTable(SAPbouiCOM.Form oForm, int SelectedRow = -1) { #region 그리드 조회 SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.Freeze(true); try { SAPbouiCOM.UserDataSources UDSs = oForm.DataSources.UserDataSources; string SITE_CD = TR_COMMON_HRD.GetSITE_CD(); string edtCARDNO = UDSs.Item("edtCARDNO").Value;//카드번호 string edtFDATE = UDSs.Item("edtFDATE").Value;//승인일자 : 시작 string edtTDATE = UDSs.Item("edtTDATE").Value;//승인일자 : 종료 //대량이체 대상 리포트 헤더 조회조건값기준으로 데이터 채우기 #region 그리드 DataTable 실행문 System.Text.StringBuilder isb = new System.Text.StringBuilder(); isb.Append("EXEC [KIS_SP_TR0100F1_HRD] "); isb.AppendFormat(" @SITE_CD = '{0}' ", SITE_CD); isb.AppendFormat(",@edtCARDNO = '{0}' ", edtCARDNO); isb.AppendFormat(",@edtFDATE = '{0}' ", edtFDATE); isb.AppendFormat(",@edtTDATE = '{0}' ", edtTDATE); oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").ExecuteQuery(isb.ToString()); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display isb = null; #endregion #region 컬럼 설정 FN.SetGridColumnTypeToNumber(ref oGrid, "", "APPR_AMT,SUPPLY_AMT", "", ""); System.Text.StringBuilder isb_ColCode = new System.Text.StringBuilder(); isb_ColCode.Append("SITE_CD,CARD_NO,APPR_DATE,APPR_SEQ,APPR_TIME,APPR_NO,CANCEL_YN,USE_GB,CHAIN_NM,CHAIN_ID,CHAIN_CD,APPR_AMT,SUPPLY_AMT,APPR_TAX,HALBU,RECO_HALBU_NO,CHAIN_TYPE,WS_STATUS"); System.Text.StringBuilder isb_ColName = new System.Text.StringBuilder(); isb_ColName.Append("금융기관코드,카드번호,승인월,승인일별 일련번호,승인시간,승인번호,승인취소여부,사용구분,가맹점명,가맹점사업자번호,가맹점번호,승인금액,공급가액,부가가치세,할부기간,청구내역할부회차,과세정보가맹점유형코드,WEB 처리상태"); System.Text.StringBuilder isb_Editable = new System.Text.StringBuilder(); isb_Editable.Append("SITE_CD,CARD_NO,APPR_DATE,APPR_SEQ,APPR_TIME,APPR_NO,CANCEL_YN,USE_GB,CHAIN_NM,CHAIN_ID,CHAIN_CD,APPR_AMT,SUPPLY_AMT,APPR_TAX,HALBU,RECO_HALBU_NO,CHAIN_TYPE,WS_STATUS"); System.Text.StringBuilder isb_Visible = new System.Text.StringBuilder(); isb_Visible.Append(""); System.Text.StringBuilder isb_RightAlign = new System.Text.StringBuilder(); isb_RightAlign.Append("APPR_AMT,SUPPLY_AMT"); FN.BindGrid(oGrid, isb_ColCode.ToString(), isb_ColName.ToString(), isb_Editable.ToString(), isb_Visible.ToString(), "", isb_RightAlign.ToString(), false); oGrid.CommonSetting.FixedColumnsCount = 2; //* 링크버튼 조작 */ //FN.SetGirdColumnLinkedObjec(ref oGrid, "U_CARDCD", BoLinkedObject.lf_BusinessPartner);//비즈니스 파트너 마스터 /*그리드 정결 조작*/ FN.SetGirdSort(ref oGrid); /*그리드 합계컬럼 조작*/ TR_COMMON_HRD.SetGridSumField(ref oGrid, "APPR_AMT,SUPPLY_AMT", BoColumnSumType.bst_Auto); /* 콤보박스 컬럼 조작*/ FN.SetComboBoxValidValues(oGrid, "CHAIN_TYPE", "SELECT U_RMK1,U_SMLNM FROM [@KIS_AD00201] WHERE Code = 'TR08' AND U_USEYN = 'Y'", FN.Enum_WholeTp.m_Nothing); //대량이체 파일유형 isb_ColCode = null; isb_ColName = null; isb_Editable = null; isb_Visible = null; #endregion if (oGrid.DataTable.Rows.Count == 1) { if (oGrid.DataTable.Columns.Item("CARD_NO").Cells.Item(0).Value.ToString().Trim() == "") { oGrid.DataTable.Rows.Clear(); } } oGrid.AutoResizeColumns(); /*컬럼 길이 조작*/ oGrid.RowHeaders.Width = 0; } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText(ex.Message, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); } #endregion }
private void FindData(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; StringBuilder sb = new StringBuilder(); string cboTAKEYM = string.Empty; string edtTAKEDT = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; cboTAKEYM = oUDS.Item("cboTAKEYM").ValueEx.Trim(); edtTAKEDT = oUDS.Item("edtTAKEDT").ValueEx; oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; cv_ColumnsUID_s = " DocEntry, U_TAKEYM, U_TAKEDT, U_SFILE, U_EFILE, U_TOTCNT, U_NEWCNT, U_MODCNT, U_CLOCNT, U_RCLCNT, CreateDate, CreateTime, USER_CODE "; cv_NoEditable_s = " DocEntry, U_TAKEYM, U_TAKEDT, U_SFILE, U_EFILE, U_TOTCNT, U_NEWCNT, U_MODCNT, U_CLOCNT, U_RCLCNT, CreateDate, CreateTime, USER_CODE "; cv_ColumnsNAM_s = " 문서번호, 신청접수년월, 신청접수일자, 신청파일이름, 결과파일이름, 총건수, 신규등록건수, 변경등록건수, 해지등록건수, 임의해지건수, 실행일자, 실행시간, 실행자 "; cv_Right_Just_s = " DocEntry, U_TOTCNT, U_NEWCNT, U_MODCNT, U_CLOCNT, U_RCLCNT "; cv_No_Visible_s = " "; sb.AppendLine(" SELECT T0.DocEntry "); sb.AppendLine(" , T0.U_TAKEYM "); sb.AppendLine(" , T0.U_TAKEDT "); //sb.AppendLine(" , T0.U_DESC "); sb.AppendLine(" , T0.U_SFILE "); sb.AppendLine(" , T0.U_EFILE "); sb.AppendLine(" , T0.U_TOTCNT "); sb.AppendLine(" , T0.U_NEWCNT "); sb.AppendLine(" , T0.U_MODCNT "); sb.AppendLine(" , T0.U_CLOCNT "); sb.AppendLine(" , T0.U_RCLCNT "); sb.AppendLine(" , T0.CreateDate "); sb.AppendLine(" , T0.CreateTime "); sb.AppendLine(" , (SELECT F.USER_CODE FROM OUSR F WHERE F.USERID = T0.UserSign) AS USER_CODE "); sb.AppendLine(" FROM [@KIS_SO0390T_HRD] T0 "); sb.AppendLine(" WHERE (ISNULL('{0}','') = '' OR (T0.U_TAKEYM = '{0}')) "); sb.AppendLine(" AND (ISNULL('{1}','') = '' OR (T0.U_TAKEDT = '{1}')) "); sb.AppendLine(" ORDER BY T0.U_TAKEYM, T0.U_TAKEDT "); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(string.Format(sb.ToString(), cboTAKEYM, edtTAKEDT)); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display if (oGrid.DataTable.Rows.Count == 1) { if (oGrid.DataTable.Columns.Item("DocEntry").Cells.Item(0).Value.ToString().Trim() == "0") { oGrid.DataTable.Rows.Clear(); } } FN.SetGirdColumnLinkedObjec(ref oGrid, "DocEntry", BoLinkedObject.lf_ProfitCenter); FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } catch (Exception) { //oForm.Freeze(false); throw; } finally { oForm.Freeze(false); oGrid = null; } }
public new bool InitForm(string uid, string xmlPath, ref Application application, ref SAPbobsCOM.Company company, ref CSBOFunctions SBOFunctions, ref TGlobalVid _GlobalSettings) { bool Result = base.InitForm(uid, xmlPath, ref application, ref company, ref SBOFunctions, ref _GlobalSettings); try { oRecordSet = (SAPbobsCOM.Recordset)(FCmpny.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)); FSBOf.LoadForm(xmlPath, "FM_NOTES.srf", uid); oForm = FSBOApp.Forms.Item(uid); oForm.AutoManaged = false; oForm.SupportedModes = -1; // afm_All Flag = false; oForm.Freeze(true); if (GlobalSettings.RunningUnderSQLServer) { s = @"select count(*) Cont from [@FM_NOTES]"; } else { s = @"select count(*) ""Cont"" from ""@FM_NOTES"" "; } oRecordSet.DoQuery(s); if ((System.Int32)(oRecordSet.Fields.Item("Cont").Value) > 0) { oForm.Mode = BoFormMode.fm_UPDATE_MODE; } else { oForm.Mode = BoFormMode.fm_ADD_MODE; } oGrid = (Grid)(oForm.Items.Item("3").Specific); oDBDSHeader = oForm.DataSources.DBDataSources.Add("@FM_NOTES"); oDataTable = oForm.DataSources.DataTables.Add("Notes"); if (GlobalSettings.RunningUnderSQLServer) { s = @"select Code, Name, U_TypeCode from [@FM_NOTES] UNION ALL select CAST('' as varchar(20)), CAST('' as varchar(20)), CAST('' as varchar(50))"; } else { s = @"select ""Code"", ""Name"", ""U_TypeCode"" from ""@FM_NOTES"" UNION ALL select CAST('' as varchar(20)), CAST('' as varchar(20)), CAST('' as varchar(50)) FROM DUMMY "; } oDataTable.ExecuteQuery(s); oGrid.DataTable = oDataTable; oGrid.Columns.Item("Code").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Code")); var oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Codigo"; oGrid.Columns.Item("Name").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Name")); oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Descripción"; oGrid.Columns.Item("U_TypeCode").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("U_TypeCode")); oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Codigo SUNAT"; oGrid.AutoResizeColumns(); } catch (Exception e) { OutLog("InitForm: " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); } oForm.Freeze(false); return(Result); }//fin InitForm
private void FindData1(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; EXAMCD = oForm.Items.Item("cboYEAR").Specific.Value; string EMPNO = oForm.Items.Item("edtEMPNO").Specific.Value; string DEPT = oForm.Items.Item("cboDEPT").Specific.Value; StringBuilder pQuery = new StringBuilder(); string sQry = string.Empty; try { oGrid1 = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oGrid1.SelectionMode = BoMatrixSelect.ms_Single; cv_ColumnsUID_s = "U_EMPNM, U_DEPTNM, U_EMPNO, U_JIKCHNM, U_JIKGBNM, Code"; cv_NoEditable_s = "U_EMPNM, U_DEPTNM, U_EMPNO, U_JIKCHNM, U_JIKGBNM, Code"; cv_ColumnsNAM_s = "사원명,부서명,사원코드,직책,직급,코드"; cv_Right_Just_s = " "; cv_No_Visible_s = "U_EMPNO,U_JIKCHNM,U_JIKGBNM,Code"; #region 조회Query pQuery.Clear(); pQuery.Append(" EXEC KIS_SP_HR0060B0_HRD '{0}','{1}','{2}'"); //pQuery.AppendLine(" SELECT "); //pQuery.AppendLine(" A.U_EMPNM AS U_EMPNM "); //pQuery.AppendLine(" ,C.U_DEPTNM AS U_DEPTNM "); //pQuery.AppendLine(" ,A.U_EMPNO AS U_EMPNO "); //pQuery.AppendLine(" ,B.U_JIKCHNM AS U_JIKCHNM "); //pQuery.AppendLine(" ,B.U_JIKGBNM AS U_JIKGBNM "); //pQuery.AppendLine(" ,A.Code AS Code "); //pQuery.AppendLine(" FROM [@KIS_HR0020M_HRD] A "); //pQuery.AppendLine(" INNER JOIN [@KIS_HR0120M] B ON A.U_EMPNO = B.U_EMPNO "); //pQuery.AppendLine(" INNER JOIN [@KIS_HR01202] C ON B.Code = C.Code "); //pQuery.AppendLine(" INNER JOIN [@KIS_AD00201] D ON A.U_EXAMCD = D.U_SMLCD AND D.Code = 'HR01' AND D.U_RMK2 = 'U03' "); //pQuery.AppendLine(" WHERE A.U_EXAMCD = '{0}' "); //pQuery.AppendLine(" AND (A.U_STATUS = 'Y') "); //pQuery.AppendLine(" AND (A.U_DEPTCD = '{1}' OR '{1}' = '') "); //pQuery.AppendLine(" AND (A.U_EMPNO = '{2}' OR '{2}' = '') "); sQry = string.Format(pQuery.ToString(), EXAMCD, DEPT, EMPNO); #endregion B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd1").ExecuteQuery(sQry); oGrid1.DataTable = oForm.DataSources.DataTables.Item("grd1"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid1.DataTable.Rows.Count == 1 && oGrid1.DataTable.GetValue("U_EMPNM", 0).ToString() == "") { FN.SetGridTitle(oGrid1, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid1, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid1.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid1.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid1 = null; } }
}//fin MenuEvent private void BuscarDatos() { String FechaD; String FechaH; String TipoDTE; try { oForm.Freeze(true); FechaD = ((System.String)((EditText)oForm.Items.Item("FechaD").Specific).Value); FechaH = ((System.String)((EditText)oForm.Items.Item("FechaH").Specific).Value); TipoDTE = ((System.String)((ComboBox)oForm.Items.Item("TipoDTE").Specific).Selected.Value).Trim(); if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT T0.DocEntry ,T0.U_TipoDoc TipoDoc ,T0.U_Folio Folio ,T0.U_RUT RUT ,T0.U_Razon Razon ,T0.U_FechaEmi FechaEmi ,CAST(REPLACE(CONVERT(CHAR(10), T0.U_FechaRecep, 102),'.','-') +' '+ CASE WHEN LEN(T0.U_HoraRecep) = 4 THEN LEFT(CAST(T0.U_HoraRecep AS VARCHAR(10)),2) + ':' + RIGHT(CAST(T0.U_HoraRecep AS VARCHAR(10)),2) + ':00' WHEN LEN(T0.U_HoraRecep) = 3 THEN '0' + LEFT(CAST(T0.U_HoraRecep AS VARCHAR(10)),1) + ':' + RIGHT(CAST(T0.U_HoraRecep AS VARCHAR(10)),2) + ':00' WHEN LEN(T0.U_HoraRecep) = 2 THEN '00:'+ CAST(T0.U_HoraRecep AS VARCHAR(10)) + ':00' WHEN LEN(T0.U_HoraRecep) = 1 THEN '00:0' + CAST(T0.U_HoraRecep AS VARCHAR(10)) + ':00' ELSE '00:00:00' END AS VARCHAR(50)) FechaRecep ,T0.U_Monto Monto ,T0.U_IVA IVA ,T0.U_EstadoC EstadoC ,T0.U_EstadoSII EstadoSII ,T0.U_EstadoLey EstadoLey ,CAST(T0.U_DocEntry AS INT) DocEntryDoc ,{4} 'xml' FROM [{2}] T0 WHERE 1 = 1 AND T0.{3} BETWEEN '{0}' AND '{1}'"; } else { s = @"SELECT T0.""DocEntry"" ,T0.""U_TipoDoc"" ""TipoDoc"" ,T0.""U_Folio"" ""Folio"" ,T0.""U_RUT"" ""RUT"" ,T0.""U_Razon"" ""Razon"" ,T0.""U_FechaEmi"" ""FechaEmi"" ,CAST(TO_VARCHAR(T0.""U_FechaRecep"", 'yyyy-MM-dd') ||' '|| CASE WHEN LENGTH(T0.""U_HoraRecep"") = 4 THEN LEFT(CAST(T0.""U_HoraRecep"" AS VARCHAR(10)),2) || ':' || RIGHT(CAST(T0.""U_HoraRecep"" AS VARCHAR(10)),2) || ':00' WHEN LENGTH(T0.""U_HoraRecep"") = 3 THEN '0' || LEFT(CAST(T0.""U_HoraRecep"" AS VARCHAR(10)),1) || ':' || RIGHT(CAST(T0.""U_HoraRecep"" AS VARCHAR(10)),2) || ':00' WHEN LENGTH(T0.""U_HoraRecep"") = 2 THEN '00:' || CAST(T0.""U_HoraRecep"" AS VARCHAR(10)) || ':00' WHEN LENGTH(T0.""U_HoraRecep"") = 1 THEN '00:0' || CAST(T0.""U_HoraRecep"" AS VARCHAR(10)) || ':00' ELSE '00:00:00' END AS VARCHAR(50)) ""FechaRecep"" ,T0.""U_Monto"" ""Monto"" ,T0.""U_IVA"" ""IVA"" ,T0.""U_EstadoC"" ""EstadoC"" ,T0.""U_EstadoSII"" ""EstadoSII"" ,T0.""U_EstadoLey"" ""EstadoLey"" ,TO_INT(T0.""U_DocEntry"") ""DocEntryDoc"" ,{4} ""xml"" FROM ""{2}"" T0 WHERE 1 = 1 AND T0.""{3}"" BETWEEN '{0}' AND '{1}'"; } s = String.Format(s, FechaD, FechaH, (TipoDTE == "V" ? "@VID_FEDTEVTA" : "@VID_FEDTECPRA"), (DSOpFec.Value == "1" ? "U_FechaEmi" : "U_FechaRecep"), (TipoDTE == "C" ? (GlobalSettings.RunningUnderSQLServer ? @"T0.U_Xml" : @"T0.""U_Xml"" ") : "''")); if (((System.String)((ComboBox)oForm.Items.Item("Cliente").Specific).Selected.Value).Trim() != "Todos") { if (GlobalSettings.RunningUnderSQLServer) { s = s + @" AND T0.U_EstadoC = '{0}'"; } else { s = s + @" AND T0.""U_EstadoC"" = '{0}'"; } s = String.Format(s, ((System.String)((ComboBox)oForm.Items.Item("Cliente").Specific).Selected.Value).Trim()); } if (((System.String)((ComboBox)oForm.Items.Item("SII").Specific).Selected.Value).Trim() != "Todos") { if (GlobalSettings.RunningUnderSQLServer) { s = s + @" AND T0.U_EstadoSII = '{0}'"; } else { s = s + @" AND T0.""U_EstadoSII"" = '{0}'"; } s = String.Format(s, ((System.String)((ComboBox)oForm.Items.Item("SII").Specific).Selected.Value).Trim()); } if (((System.String)((ComboBox)oForm.Items.Item("Ley").Specific).Selected.Value).Trim() != "Todos") { if (GlobalSettings.RunningUnderSQLServer) { s = s + @" AND T0.U_EstadoLey = '{0}'"; } else { s = s + @" AND T0.""U_EstadoLey"" = '{0}'"; } s = String.Format(s, ((System.String)((ComboBox)oForm.Items.Item("Ley").Specific).Selected.Value).Trim()); } oDataTable.ExecuteQuery(s); oGrid.Columns.Item("DocEntry").Type = BoGridColumnType.gct_EditText; var col = (EditTextColumn)(oGrid.Columns.Item("DocEntry")); col.Visible = false; oGrid.Columns.Item("TipoDoc").Type = BoGridColumnType.gct_EditText; col = (EditTextColumn)(oGrid.Columns.Item("TipoDoc")); col.Editable = false; col.TitleObject.Caption = "Tipo DTE"; col.TitleObject.Sortable = true; oGrid.Columns.Item("Folio").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("Folio")); col.Editable = false; col.RightJustified = true; col.TitleObject.Sortable = true; col.TitleObject.Caption = "Nro Folio"; oGrid.Columns.Item("RUT").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("RUT")); col.Editable = false; col.TitleObject.Sortable = true; col.TitleObject.Caption = "RUT"; if (TipoDTE == "C") { col.Visible = true; } else { col.Visible = false; } oGrid.Columns.Item("Razon").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("Razon")); col.Editable = false; col.TitleObject.Sortable = true; col.TitleObject.Caption = "Razon Social"; oGrid.Columns.Item("FechaEmi").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("FechaEmi")); col.Editable = false; col.TitleObject.Sortable = true; col.TitleObject.Caption = "Fecha Emisión"; oGrid.Columns.Item("FechaRecep").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("FechaRecep")); col.Editable = false; col.TitleObject.Sortable = true; col.TitleObject.Caption = "Fecha Recepción"; oGrid.Columns.Item("Monto").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("Monto")); col.Editable = false; col.RightJustified = true; col.TitleObject.Sortable = true; col.TitleObject.Caption = "Monto"; oGrid.Columns.Item("IVA").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("IVA")); col.Editable = false; col.RightJustified = true; col.TitleObject.Sortable = true; col.TitleObject.Caption = "IVA"; oGrid.Columns.Item("EstadoC").Type = BoGridColumnType.gct_ComboBox; var colCombo = ((ComboBoxColumn)oGrid.Columns.Item("EstadoC")); colCombo.Editable = false; colCombo.DisplayType = BoComboDisplayType.cdt_both; colCombo.TitleObject.Sortable = true; colCombo.TitleObject.Caption = "Estado Cliente"; if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT T1.FldValue Code, T1.Descr Name FROM CUFD T0 JOIN UFD1 T1 ON T1.TableID = T0.TableID AND T1.FieldID = T0.FieldID WHERE T0.TableID = '{0}' AND T0.AliasID = 'EstadoC'"; } else { s = @"SELECT T1.""FldValue"" ""Code"", T1.""Descr"" ""Name"" FROM ""CUFD"" T0 JOIN ""UFD1"" T1 ON T1.""TableID"" = T0.""TableID"" AND T1.""FieldID"" = T0.""FieldID"" WHERE T0.""TableID"" = '{0}' AND T0.""AliasID"" = 'EstadoC'"; } s = String.Format(s, (TipoDTE == "V" ? "@VID_FEDTEVTA" : "@VID_FEDTECPRA")); oRecordSet.DoQuery(s); FSBOf.FillComboGrid(((GridColumn)oGrid.Columns.Item("EstadoC")), ref oRecordSet, false); oGrid.Columns.Item("EstadoSII").Type = BoGridColumnType.gct_ComboBox; colCombo = ((ComboBoxColumn)oGrid.Columns.Item("EstadoSII")); colCombo.Editable = false; colCombo.DisplayType = BoComboDisplayType.cdt_both; colCombo.TitleObject.Sortable = true; colCombo.TitleObject.Caption = "Estado SII"; if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT T1.FldValue Code, T1.Descr Name FROM CUFD T0 JOIN UFD1 T1 ON T1.TableID = T0.TableID AND T1.FieldID = T0.FieldID WHERE T0.TableID = '{0}' AND T0.AliasID = 'EstadoSII'"; } else { s = @"SELECT T1.""FldValue"" ""Code"", T1.""Descr"" ""Name"" FROM ""CUFD"" T0 JOIN ""UFD1"" T1 ON T1.""TableID"" = T0.""TableID"" AND T1.""FieldID"" = T0.""FieldID"" WHERE T0.""TableID"" = '{0}' AND T0.""AliasID"" = 'EstadoSII'"; } s = String.Format(s, (TipoDTE == "V" ? "@VID_FEDTEVTA" : "@VID_FEDTECPRA")); oRecordSet.DoQuery(s); FSBOf.FillComboGrid(((GridColumn)oGrid.Columns.Item("EstadoSII")), ref oRecordSet, false); oGrid.Columns.Item("EstadoLey").Type = BoGridColumnType.gct_ComboBox; colCombo = ((ComboBoxColumn)oGrid.Columns.Item("EstadoLey")); colCombo.Editable = false; colCombo.DisplayType = BoComboDisplayType.cdt_both; colCombo.TitleObject.Sortable = true; colCombo.TitleObject.Caption = "Estado Ley 20.956"; if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT T1.FldValue Code, T1.Descr Name FROM CUFD T0 JOIN UFD1 T1 ON T1.TableID = T0.TableID AND T1.FieldID = T0.FieldID WHERE T0.TableID = '{0}' AND T0.AliasID = 'EstadoLey'"; } else { s = @"SELECT T1.""FldValue"" ""Code"", T1.""Descr"" ""Name"" FROM ""CUFD"" T0 JOIN ""UFD1"" T1 ON T1.""TableID"" = T0.""TableID"" AND T1.""FieldID"" = T0.""FieldID"" WHERE T0.""TableID"" = '{0}' AND T0.""AliasID"" = 'EstadoLey'"; } s = String.Format(s, (TipoDTE == "V" ? "@VID_FEDTEVTA" : "@VID_FEDTECPRA")); oRecordSet.DoQuery(s); FSBOf.FillComboGrid(((GridColumn)oGrid.Columns.Item("EstadoLey")), ref oRecordSet, false); oGrid.Columns.Item("DocEntryDoc").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("DocEntryDoc")); col.Editable = false; col.RightJustified = true; if (TipoDTE == "V") { col.Visible = false; } else { col.Visible = true; } col.TitleObject.Sortable = false; col.TitleObject.Caption = "Factura en SAP"; col.LinkedObjectType = "18"; oGrid.Columns.Item("xml").Type = BoGridColumnType.gct_EditText; col = ((EditTextColumn)oGrid.Columns.Item("xml")); col.Editable = false; col.Visible = false; oGrid.AutoResizeColumns(); } catch (Exception x) { FSBOApp.StatusBar.SetText(x.Message + " ** Trace: " + x.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("BuscarDatos: " + x.Message + " ** Trace: " + x.StackTrace); } finally { oForm.Freeze(false); } }
public new bool InitForm(string uid, string xmlPath, ref Application application, ref SAPbobsCOM.Company company, ref CSBOFunctions SBOFunctions, ref TGlobalVid _GlobalSettings) { bool Result = base.InitForm(uid, xmlPath, ref application, ref company, ref SBOFunctions, ref _GlobalSettings); try { oRecordSet = (SAPbobsCOM.Recordset)(FCmpny.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)); //Lista := New list<string>; FSBOf.LoadForm(xmlPath, "VID_FEDetalleLog.srf", uid); //EnableCrystal := true; oForm = FSBOApp.Forms.Item(uid); oForm.Freeze(true); oForm.AutoManaged = false; oForm.SupportedModes = -1; // afm_All oForm.EnableMenu("1282", false); //Crear oForm.EnableMenu("1281", false); //Actualizar //oForm.DataBrowser.BrowseBy := "DocNum"; // Ok Ad Fnd Vw Rq Sec //Lista.Add('DocNum , f, f, t, f, n, 1'); //Lista.Add('DocDate , f, t, f, f, r, 1'); //Lista.Add('CardCode , f, t, t, f, r, 1'); //FSBOf.SetAutoManaged(var oForm, Lista); //s := '1'; //oCombo.Select(s, BoSearchKey.psk_ByValue); oForm.Items.Item("grid").Enabled = false; ogrid = (Grid)(oForm.Items.Item("grid").Specific); dt = oForm.DataSources.DataTables.Add("dt"); ogrid.DataTable = dt; if (GlobalSettings.RunningUnderSQLServer) { s = @"select U_TipoDoc ,LTRIM(STR(U_FolioNum,18,0)) 'U_FolioNum' ,U_ID_Log ,U_Glosa ,U_FechaIn from [@VID_FELOG] T0 join [@VID_FELOGD] T1 ON T1.DocEntry = T0.DocEntry where T0.DocEntry = {0} order by T1.LineId DESC"; } else { s = @"select ""U_TipoDoc"" ,LTRIM(ROUND(""U_FolioNum"",0)) ""U_FolioNum"" ,""U_ID_Log"" ,""U_Glosa"" ,""U_FechaIn"" from ""@VID_FELOG"" T0 join ""@VID_FELOGD"" T1 ON T1.""DocEntry"" = T0.""DocEntry"" where T0.""DocEntry"" = {0} order by T1.""LineId"" DESC "; } s = String.Format(s, prmKey); dt.ExecuteQuery(s); ogrid.AutoResizeColumns(); ogrid.Columns.Item("U_TipoDoc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_TipoDoc")); var oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Tipo Documento"; oEditColumn.RightJustified = true; ogrid.Columns.Item("U_FolioNum").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_FolioNum")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Número Folio"; oEditColumn.RightJustified = true; ogrid.Columns.Item("U_ID_Log").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_ID_Log")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "ID Log Portal"; oEditColumn.RightJustified = true; ogrid.Columns.Item("U_Glosa").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Glosa")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Glosa"; oEditColumn.RightJustified = false; ogrid.Columns.Item("U_FechaIn").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_FechaIn")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Fecha Movimiento"; oEditColumn.RightJustified = false; oForm.Mode = BoFormMode.fm_OK_MODE; } catch (Exception e) { OutLog("InitForm: " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); } oForm.Freeze(false); return(Result); }//fin InitForm
/// <summary> /// Busca la información de acuerdo a los filtros capturados /// </summary> /// <param name="efiscal"></param> /// <param name="codigo"></param> /// <param name="descripcion"></param> /// <param name="combos"></param> public void BuscarDatos(string codeCobrador, string nameCobrador) { try { _oForma.Freeze(true); string qryCobrador = null; qryCobrador = " and REPLACE(LOWER( " + "REPLACE(LOWER( " + "REPLACE(LOWER( " + "REPLACE(LOWER( " + "REPLACE(LOWER( " + "U_Cobrador),'á','a') ), " + "'é','e') ), " + "'í','i') ), " + "'ó','o') ), " + "'ú','u') LIKE '%" + nameCobrador.ToLower().Replace('á', 'a'). Replace('é', 'e'). Replace('í', 'i'). Replace('ó', 'o'). Replace('ú', 'u') + "%' "; _oGridComisionesCobradores = _oForma.Items.Item(GRD_COMISIONES_COBRADORES).Specific; _oGridComisionesCobradores.DataTable = _oForma.DataSources.DataTables.Item(DT_COMISIONES_COBRADORES); _oGridComisionesCobradores.DataTable.ExecuteQuery(@"SELECT T1.empID AS CodigoID, T0.U_Codigo_Cobrador AS CodCobrador, T0.U_Cobrador AS NomCobrador, T0.U_Serie_Programa AS SeriePrograma, --T0.U_Serie_Malba AS SerieMalba, T0.U_Serie_Cooperativa AS SerieCooperativa, T0.U_Serie_Panteon AS SeriePanteon, ISNULL(T0.U_Comision_Panteon, 0.00) AS ComisionPanteon, ISNULL(T0.U_Sueldo_Cooperativa, 0.00) AS SueldoCooperativa, ISNULL(T0.U_Sueldo_Apoyo, 0.00) AS SueldoApoyo, ISNULL(T0.U_Comision_Coop, 0.00) AS ComisionCooperativa, ISNULL(T0.U_Comision_Apoyo, 0.00) AS ComisionApoyo, ISNULL(T0.U_Efectividad, 0.00) AS Efectividad, T0.U_SueldoBase AS SueldoBase FROM dbo.[@COMISION_COBRADORES] T0 LEFT JOIN dbo.OHEM T1 ON T1.firstName = T0.U_Codigo_Cobrador --AND ( T1.middleName + ' ' + T1.lastName ) = T0.U_Cobrador WHERE --( T1.middleName + ' ' + T1.lastName ) = T0.U_Cobrador -- AND T0.U_Codigo_Cobrador LIKE '%" + codeCobrador + "%' " + qryCobrador + "ORDER BY T0.U_Codigo_Cobrador, " + "T1.empID ASC "); if (_oGridComisionesCobradores.DataTable.IsEmpty) { _Application.MessageBox("No se encontraron registros"); _oGridComisionesCobradores.DataTable.Clear(); _oForma.Update(); } else { //_oGridComisionesCobradores.AutoResizeColumns(); FormatoGrid(_oGridComisionesCobradores); _oGridComisionesCobradores.AutoResizeColumns(); } _oBotonUpdate.Caption = "Ok"; } catch (Exception ex) { throw new Exception("Error al buscar datos *BuscarDatos* : " + ex.Message); } finally { _oForma.Freeze(false); } }
/// <summary> /// Agrega la solicitud escaneada /// </summary> private void AgregarSolicitud() { try { _oForma.Freeze(true); string empresa = null; string plan = null; int code = 0; if (ValidarNoExistaSolicitud()) { _oRec = null; _oRec = (SAPbobsCOM.Recordset)_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); _oRec.DoQuery("SELECT U_Empresa,U_Descripcion_Plan FROM dbo.[@COMISIONES] WHERE U_Prefijo_Sol = SUBSTRING('" + _oTxtCodigoSolicitud.Value.ToString() + "', 1,6)"); empresa = _oRec.Fields.Item("U_Empresa").Value; plan = _oRec.Fields.Item("U_Descripcion_Plan").Value; _oGridArqueos.DataTable.Rows.Add(); int lastRow = _oGridArqueos.DataTable.Rows.Count - 1; _oGridArqueos.DataTable.SetValue("#", lastRow, _oGridArqueos.Rows.Count); _oGridArqueos.DataTable.SetValue("CodigoAsistente", lastRow, _oTxtCodigoAsociado.Value.ToString()); _oGridArqueos.DataTable.SetValue("NombreAsistente", lastRow, _oTxtNombreAsociado.Value.ToString()); _oGridArqueos.DataTable.SetValue("CodigoOficina", lastRow, _oTxtCodigoOficina.Value.ToString()); //_oGridArqueos.DataTable.SetValue("FechaArqueo", lastRow, DateTime.Now); _oGridArqueos.DataTable.SetValue("Empresa", lastRow, empresa); _oGridArqueos.DataTable.SetValue("Plan", lastRow, plan); _oGridArqueos.DataTable.SetValue("Solicitud", lastRow, _oTxtCodigoSolicitud.Value.ToString()); _oGridArqueos.AutoResizeColumns(); verificar = false; _oRec = null; _oRec = _Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); _oRec.DoQuery(@"SELECT ISNULL(MAX(CONVERT(INT, Code)), 0) + 1 AS Code FROM dbo.[@ARQUEOS]"); code = Convert.ToInt32(_oRec.Fields.Item("Code").Value); _oRec = null; _oRec = (SAPbobsCOM.Recordset)_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); _oRec.DoQuery(@"INSERT INTO dbo.[@ARQUEOS] ( Code , Name , U_CodigoAsistente , U_NombreAsistente , U_CodigoOficina , U_Empresa , U_Plan , U_Solicitud ) VALUES ( '" + code + "' ," + "'" + code + "' ," + "'" + _oTxtCodigoAsociado.Value.ToString().ToUpper() + "' ," + "'" + _oTxtNombreAsociado.Value.ToString() + "' ," + "'" + _oTxtCodigoOficina.Value.ToString() + "' ," + "'" + empresa + "' ," + "'" + plan + "' ," + "'" + _oTxtCodigoSolicitud.Value.ToString() + "'" + ")"); } } catch (Exception ex) { throw new Exception("Error al agregar solicitud escaneada *AgregarSolicitud* : " + ex.Message); } finally { try { if (_oRec != null) { System.Runtime.InteropServices.Marshal.ReleaseComObject(_oRec); } _oForma.Freeze(false); } catch (Exception) { } } }
}//fin InitForm public new void FormEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, ref Boolean BubbleEvent) { SAPbouiCOM.DataTable oDataTable; SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; String sValue; String sValue2; base.FormEvent(FormUID, ref pVal, ref BubbleEvent); try { if ((pVal.ItemUID == "1") && (pVal.BeforeAction) && (pVal.EventType == BoEventTypes.et_ITEM_PRESSED)) { if ((oForm.Mode == BoFormMode.fm_ADD_MODE) || (oForm.Mode == BoFormMode.fm_UPDATE_MODE)) { BubbleEvent = false; if (ValidarDatos()) { GuardarDatos(); } } } if ((pVal.EventType == BoEventTypes.et_CHOOSE_FROM_LIST) && (!pVal.BeforeAction)) { oForm.Freeze(true); if (pVal.ColUID == "U_CtaSAP") { oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)(pVal); oDataTable = oCFLEvento.SelectedObjects; if (oDataTable != null) { sValue = ((System.String)oDataTable.GetValue("FormatCode", 0)).Trim(); sValue2 = ((System.String)oDataTable.GetValue("AcctName", 0)).Trim(); if (ValidarDataTable(sValue)) { odt.SetValue("U_CtaSAP", pVal.Row, sValue); odt.SetValue("U_DescSAP", pVal.Row, sValue2); if ((odt.Rows.Count - 1 == pVal.Row) && (sValue != "")) { odt.Rows.Add(1); } oGrid.AutoResizeColumns(); if (oForm.Mode == BoFormMode.fm_OK_MODE) { oForm.Mode = BoFormMode.fm_UPDATE_MODE; } } } } } } catch (Exception e) { if (FCmpny.InTransaction) { FCmpny.EndTransaction(BoWfTransOpt.wf_RollBack); } FSBOApp.StatusBar.SetText(e.Message + " ** Trace: " + e.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("FormEvent: " + e.Message + " ** Trace: " + e.StackTrace); } finally { oForm.Freeze(false); } }//fin FormEvent
/// <summary> /// Se le da el formato al grid para visualizarlo /// </summary> /// <param name="grid">Nombre del grid</param> public void FormatoGrid(Grid grid) { try { _oForma.Freeze(true); if (!grid.DataTable.IsEmpty) { grid.RowHeaders.TitleObject.Caption = "#"; for (int noLinea = 0; noLinea < grid.Rows.Count; noLinea++) { grid.RowHeaders.SetText(noLinea, (noLinea + 1).ToString()); } grid.Columns.Item("DocEntry").Editable = false; grid.Columns.Item("DocEntry").TitleObject.Caption = "DocEntry"; SAPbouiCOM.EditTextColumn oColTransferStock = grid.Columns.Item("DocEntry") as SAPbouiCOM.EditTextColumn; oColTransferStock.LinkedObjectType = LINK_TRANSFERENCIA_STOCK; grid.Columns.Item("DocEntry").Width = 60; grid.Columns.Item("Crear").Editable = true; grid.Columns.Item("Crear").TitleObject.Caption = "Crear"; grid.Columns.Item("Crear").Width = 90; if (!grid.DataTable.IsEmpty) { grid.Columns.Item("Crear").Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox; } grid.Columns.Item("DocNum").Editable = false; grid.Columns.Item("DocNum").TitleObject.Caption = "Número traspaso"; grid.Columns.Item("DocNum").Width = 90; grid.Columns.Item("CodigoUsuario").Editable = false; grid.Columns.Item("CodigoUsuario").TitleObject.Caption = "Usuario"; grid.Columns.Item("Serie").Editable = false; grid.Columns.Item("Serie").TitleObject.Caption = "Solicitud"; grid.Columns.Item("CodigoPromotor").Editable = false; grid.Columns.Item("CodigoPromotor").TitleObject.Caption = "Código promotor"; grid.Columns.Item("NombrePromotor").Editable = false; grid.Columns.Item("NombrePromotor").TitleObject.Caption = "Nombre promotor"; grid.Columns.Item("CodigoPlan").Editable = false; grid.Columns.Item("CodigoPlan").TitleObject.Caption = "Código plan"; SAPbouiCOM.EditTextColumn oColPlan = grid.Columns.Item("CodigoPlan") as SAPbouiCOM.EditTextColumn; oColPlan.LinkedObjectType = LINK_ARTICULO; grid.Columns.Item("NombrePlan").Editable = false; grid.Columns.Item("NombrePlan").TitleObject.Caption = "Nombre plan"; grid.Columns.Item("NombrePlan").Width = 120; grid.Columns.Item("FormaDePago").Editable = false; grid.Columns.Item("FormaDePago").TitleObject.Caption = "Forma de pago"; grid.Columns.Item("FormaDePago").Width = 90; grid.Columns.Item("OrigenSolicitud").Editable = false; grid.Columns.Item("OrigenSolicitud").TitleObject.Caption = "Origen de solicitud"; grid.Columns.Item("OrigenSolicitud").Width = 90; grid.Columns.Item("InversionInicial").Editable = false; grid.Columns.Item("InversionInicial").TitleObject.Caption = "Inversión inicial"; grid.Columns.Item("InversionInicial").Width = 80; grid.Columns.Item("Comision").Editable = false; grid.Columns.Item("Comision").TitleObject.Caption = "Comisión"; grid.Columns.Item("Comision").Width = 80; grid.Columns.Item("ImportePapeleria").Editable = false; grid.Columns.Item("ImportePapeleria").TitleObject.Caption = "Importe papelería"; grid.Columns.Item("ImportePapeleria").Width = 80; grid.Columns.Item("ImporteRecibido").Editable = false; grid.Columns.Item("ImporteRecibido").TitleObject.Caption = "Importe recibido"; grid.Columns.Item("ImporteRecibido").Width = 80; grid.Columns.Item("ExcedenteInvIni").Visible = false; grid.Columns.Item("ExcedenteInvIni").TitleObject.Caption = "Excedente individual. inicial"; grid.Columns.Item("ExcedenteInvIni").Width = 90; grid.Columns.Item("Bono").Visible = false; grid.Columns.Item("Bono").TitleObject.Caption = "Bono"; grid.Columns.Item("Bono").Width = 80; grid.CollapseLevel = 1; _oGridPrecontratos.AutoResizeColumns(); } else { _Application.MessageBox("No se encontraron registros"); grid.DataTable.Clear(); } } catch (Exception ex) { throw new Exception("Error al dar formato al grid *FormatoGrid* : " + ex.Message); } finally { _oForma.Freeze(false); _oForma.Update(); } }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid2 = (SAPbouiCOM.Grid)oForm.Items.Item("grd2").Specific; oGrid2.DataTable = oForm.DataSources.DataTables.Item("grd2"); string cv_ColumnsUID_s = "U_CHEKER, U_EMPNM, U_DEPTCD, U_JIKGBCD, U_JIKCHKCD, U_PASSYN, Code"; string cv_ColumnsNAM_s = "고과,사원,부서,직급,직책,상태,코드"; string cv_No_Visible_s = "Code"; FN.SetGridTitle(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid2.RowHeaders.Width = 0; oGrid2.AutoResizeColumns(); }
}//fin FormEvent private void CargarDatosPE() { SAPbouiCOM.EditTextColumn oEditColumn; SAPbouiCOM.CheckBox oChkRechazados; SAPbouiCOM.CheckBox oChkPendientes; SAPbouiCOM.CheckBox oChkAceptados; SAPbouiCOM.CheckBox oChkDadoBaja; SAPbouiCOM.CheckBox oChkErrores; String FechaD, FechaH, Status; try { oForm.Freeze(true); oChkRechazados = (CheckBox)(oForm.Items.Item("Rechazados").Specific); oChkPendientes = (CheckBox)(oForm.Items.Item("Pendientes").Specific); oChkAceptados = (CheckBox)(oForm.Items.Item("Aceptados").Specific); oChkDadoBaja = (CheckBox)(oForm.Items.Item("DadoBaja").Specific); oChkErrores = (CheckBox)(oForm.Items.Item("Errores").Specific); if ((oChkRechazados.Checked) || (oChkPendientes.Checked) || (oChkAceptados.Checked) || (oChkErrores.Checked)) { if (GlobalSettings.RunningUnderSQLServer) { Status = "and T0.U_Status in ("; Status = Status + (oChkRechazados.Checked ? "'RZ'," : ""); Status = Status + (oChkPendientes.Checked ? "'EC'," : ""); Status = Status + (oChkAceptados.Checked ? "'RR'," : ""); Status = Status + (oChkDadoBaja.Checked ? "'DB'," : ""); Status = Status + (oChkErrores.Checked ? "'EE'," : ""); Status = Status.Substring(0, Status.Length - 1); Status = Status + ")"; } else { Status = @"and T0.""U_Status"" in ("; Status = Status + (oChkRechazados.Checked ? "'RZ'," : ""); Status = Status + (oChkPendientes.Checked ? "'EC'," : ""); Status = Status + (oChkAceptados.Checked ? "'RR'," : ""); Status = Status + (oChkDadoBaja.Checked ? "'DB'," : ""); Status = Status + (oChkErrores.Checked ? "'EE'," : ""); Status = Status.Substring(0, Status.Length - 1); Status = Status + ")"; } } else if ((!oChkRechazados.Checked) && (!oChkPendientes.Checked) && (!oChkAceptados.Checked) && (!oChkDadoBaja.Checked) && (!oChkErrores.Checked)) { //en caso de no encontrar ninguno marcado sale de la funcion oForm.Freeze(false); return; } else { Status = ""; } if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT LTRIM(STR(T0.U_DocEntry,18,0)) 'DocEntry' ,CASE U_ObjType WHEN '13' THEN (SELECT DocNum FROM OINV WHERE DocEntry = T0.U_DocEntry) WHEN '14' THEN (SELECT DocNum FROM ORIN WHERE DocEntry = T0.U_DocEntry) WHEN '15' THEN (SELECT DocNum FROM ODLN WHERE DocEntry = T0.U_DocEntry) WHEN '67' THEN (SELECT DocNum FROM OWTR WHERE DocEntry = T0.U_DocEntry) WHEN '21' THEN (SELECT DocNum FROM ORPD WHERE DocEntry = T0.U_DocEntry) END 'DocNum' ,T0.U_TipoDoc 'TipoDoc' ,ISNULL(T0.U_SeriePE,'') 'SeriePE' ,LTRIM(STR(T0.U_FolioNum,18,0)) 'Folio' ,(SELECT C1.Descr FROM CUFD C0 JOIN UFD1 C1 ON C1.TableID=C0.TableID AND C1.FieldID=C0.FieldID WHERE C0.TableID = '@VID_FELOG' AND C0.AliasID='Status' AND C1.FldValue= T0.U_Status) 'Estado' ,T0.U_Status ,T0.U_Message 'Mensaje' ,T0.U_ObjType 'ObjType' ,T0.U_Path 'Path' ,T0.U_ExtFolio 'ExtFolio' ,T0.DocEntry 'Key' ,ISNULL(T0.U_Id,'0') 'Id' ,ISNULL(T0.U_Validation,'') 'Validation' FROM [@vid_felog] T0 WITH (NOLOCK) JOIN OUSR T2 ON T2.USER_CODE = T0.U_UserCode WHERE {0} {3} AND ISNULL(T0.U_DocDate, T0.CreateDate) BETWEEN '{1}' AND '{2}' ORDER BY T0.DocEntry DESC"; } else { s = @"SELECT LTRIM(TO_ALPHANUM(T0.""U_DocEntry"")) ""DocEntry"" ,CASE ""U_ObjType"" WHEN '13' THEN (SELECT ""DocNum"" FROM ""OINV"" WHERE ""DocEntry"" = T0.""U_DocEntry"") WHEN '14' THEN (SELECT ""DocNum"" FROM ""ORIN"" WHERE ""DocEntry"" = T0.""U_DocEntry"") WHEN '15' THEN (SELECT ""DocNum"" FROM ""ODLN"" WHERE ""DocEntry"" = T0.""U_DocEntry"") WHEN '67' THEN (SELECT ""DocNum"" FROM ""OWTR"" WHERE ""DocEntry"" = T0.""U_DocEntry"") WHEN '21' THEN (SELECT ""DocNum"" FROM ""ORPD"" WHERE ""DocEntry"" = T0.""U_DocEntry"") END ""DocNum"" ,T0.""U_TipoDoc"" ""TipoDoc"" ,IFNULL(T0.""U_SeriePE"",'') ""SeriePE"" ,LTRIM(TO_ALPHANUM(T0.""U_FolioNum"")) ""Folio"" ,(SELECT C1.""Descr"" FROM ""CUFD"" C0 JOIN ""UFD1"" C1 ON C1.""TableID""=C0.""TableID"" AND C1.""FieldID""=C0.""FieldID"" WHERE C0.""TableID"" = '@VID_FELOG' AND C0.""AliasID""='Status' AND C1.""FldValue""= T0.""U_Status"") ""Estado"" ,T0.""U_Status"" ,T0.""U_Message"" ""Mensaje"" ,T0.""U_ObjType"" ""ObjType"" ,T0.""U_Path"" ""Path"" ,T0.""U_ExtFolio"" ""ExtFolio"" ,T0.""DocEntry"" ""Key"" ,IFNULL(T0.""U_Id"",'0') ""Id"" ,IFNULL(T0.""U_Validation"",'') ""Validation"" FROM ""@VID_FELOG"" T0 JOIN ""OUSR"" T2 on T2.""USER_CODE"" = T0.""U_UserCode"" WHERE {0} {3} AND IFNULL(T0.""U_DocDate"", T0.""CreateDate"") BETWEEN '{1}' AND '{2}' ORDER BY T0.""DocEntry"" DESC "; } oCheckBox = (CheckBox)(oForm.Items.Item("chk_Todo").Specific); oEditText = (EditText)(oForm.Items.Item("FechaD").Specific); FechaD = (System.String)(oEditText.Value).Trim(); oEditText = (EditText)(oForm.Items.Item("FechaH").Specific); FechaH = (System.String)(oEditText.Value).Trim(); if (GlobalSettings.RunningUnderSQLServer) { s = String.Format(s, !oCheckBox.Checked ? "T0.U_UserCode = '" + FSBOApp.Company.UserName + "'" : "1=1", FechaD, FechaH, Status); } else { s = String.Format(s, !oCheckBox.Checked ? @"T0.""U_UserCode"" = '" + FSBOApp.Company.UserName + "'" : "1=1", FechaD, FechaH, Status); } oDataTable.ExecuteQuery(s); oGrid.Columns.Item("TipoDoc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("TipoDoc")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Tipo Documento"; oGrid.Columns.Item("DocEntry").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("DocEntry")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Llave SAP"; oEditColumn.LinkedObjectType = "13"; oEditColumn.RightJustified = true; oGrid.Columns.Item("DocNum").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("DocNum")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Número SAP"; oEditColumn.RightJustified = true; oGrid.Columns.Item("SeriePE").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("SeriePE")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Número Serie"; oEditColumn.RightJustified = true; oGrid.Columns.Item("Folio").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Folio")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Número Correlativo"; oEditColumn.RightJustified = true; oGrid.Columns.Item("Estado").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Estado")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Estado"; oGrid.Columns.Item("U_Status").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("U_Status")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "U_Status"; oEditColumn.Visible = false; oGrid.Columns.Item("Mensaje").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Mensaje")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Comentario"; oGrid.Columns.Item("ObjType").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("ObjType")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "ObjType"; oEditColumn.Visible = false; oGrid.Columns.Item("Path").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Path")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Documento"; oEditColumn.Visible = false; oGrid.Columns.Item("ExtFolio").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("ExtFolio")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "IdDocumento"; oEditColumn.Visible = true; oGrid.Columns.Item("Key").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Key")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Key"; oEditColumn.Visible = false; oGrid.Columns.Item("Id").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Id")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Id"; oEditColumn.Visible = false; oGrid.Columns.Item("Validation").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("Validation")); oEditColumn = (EditTextColumn)(oColumn); oEditColumn.Editable = false; oEditColumn.TitleObject.Caption = "Validation"; oEditColumn.Visible = false; oGrid.AutoResizeColumns(); } catch (Exception e) { OutLog("CargarDatosPE : " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.StatusBar.SetText("CargarDatosPE : " + e.Message + " ** Trace: " + e.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); } oForm.Freeze(false); } //fin CargarDatosPE
internal static void FindData(SAPbouiCOM.Form oForm) { string pFORMUID = oForm.DataSources.UserDataSources.Item("pFORMUID").ValueEx; SAPbouiCOM.Form pForm = (SAPbouiCOM.Form)B1Connections.theAppl.Forms.Item(pFORMUID); SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; string cboBPLID = string.Empty; string edtFRDT = string.Empty; string edtTODT = string.Empty; string edtFRPRCCD = string.Empty; string edtTOPRCCD = string.Empty; string cboTRANSTY = string.Empty; string strReportFiles = string.Empty; StringBuilder pQuery = new StringBuilder(); string query = string.Empty; try { oForm.Items.Item("grd").Enabled = false; cboBPLID = pForm.DataSources.UserDataSources.Item("cboBPLID").Value; edtFRDT = pForm.DataSources.UserDataSources.Item("edtFRDT").Value; edtTODT = pForm.DataSources.UserDataSources.Item("edtTODT").Value; edtFRPRCCD = pForm.DataSources.UserDataSources.Item("edtFRPRCCD").Value; edtTOPRCCD = pForm.DataSources.UserDataSources.Item("edtTOPRCCD").Value; cboTRANSTY = pForm.DataSources.UserDataSources.Item("cboTRANSTY").Value; oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; pQuery.Append(" EXEC KIS_SP_FI0050F1_HRD @cboBPLID = '{0}' "); pQuery.Append(" , @edtFRDT = '{1}' "); pQuery.Append(" , @edtTODT = '{2}' "); pQuery.Append(" , @edtFRPRCCD = '{3}' "); pQuery.Append(" , @edtTOPRCCD = '{4}' "); pQuery.Append(" , @cboTRANSTY = '{5}' "); string cv_ColumnsUID_s = "ROWSID,U_BPLID,RefDate,TransId,U_PRCNM,Debit,Credit,JEDT,U_PRCCD,BatchNum,TransType,TransNM,CreateDate"; string cv_NoEditable_s = "ROWSID,U_BPLID,RefDate,TransId,U_PRCNM,Debit,Credit,JEDT,U_PRCCD,BatchNum,TransType,TransNM,CreateDate"; string cv_ColumnsNAM_s = "#,사업장,전기일자,분개번호,코스트센터명,차변,대변,분개장 전기일,코스트센터,분개장 번호,입력경로코드,입력경로,분개 생성일"; string cv_Right_Just_s = "Debit,Credit"; string cv_No_Visible_s = "TransType"; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); string sQry = (string.Format(pQuery.ToString() , cboBPLID , edtFRDT , edtTODT , edtFRPRCCD , edtTOPRCCD , cboTRANSTY )); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sQry); //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 0) { FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); /* 링크버튼 조작 */ FN.SetGirdColumnLinkedObjec(ref oGrid, "TransId", BoLinkedObject.lf_JournalPosting);//분개 FN.SetGirdColumnLinkedObjec(ref oGrid, "BatchNum", BoLinkedObject.lf_JournalVoucher);//분개장 /* 자동정렬 */ oGrid.AutoResizeColumns(); /*컬럼 길이 조작*/ oGrid.RowHeaders.Width = 0; B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid = null; } }
private static void FindData(SAPbouiCOM.Form oForm) { SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; string cboYEAR = oForm.DataSources.UserDataSources.Item("cboYEAR").Value; string cboDEPTCD = oForm.DataSources.UserDataSources.Item("cboDEPTCD").Value; StringBuilder pQuery = new StringBuilder(); string query = string.Empty; pQuery.AppendLine(" exec [KIS_SP_PIVOT] @SQL = N' "); pQuery.AppendLine(" SELECT "); pQuery.AppendLine(" U_EMPNM AS ''피고과자'' "); pQuery.AppendLine(" ,U_DEPTCD AS ''현부서'' "); pQuery.AppendLine(" ,U_COMPONM "); pQuery.AppendLine(" ,NM "); pQuery.AppendLine(" FROM "); pQuery.AppendLine(" ( "); pQuery.AppendLine(" SELECT "); pQuery.AppendLine(" B.U_EMPNM AS U_EMPNM "); pQuery.AppendLine(" ,B.U_DEPTCD AS U_DEPTCD "); pQuery.AppendLine(" ,A.U_COMPONM AS U_COMPONM "); pQuery.AppendLine(" ,MAX(A.U_SELVALNM) AS NM "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" LEFT JOIN [@KIS_HR0020M_HRD] B ON A.Code = B.Code "); pQuery.AppendLine(" WHERE A.U_ABILCD = ''U04'' "); pQuery.AppendLine(" AND (B.U_EXAMCD = ''{0}'') "); pQuery.AppendLine(" AND (B.U_DEPTCD = ''{1}'' OR ''{1}'' = '''') "); pQuery.AppendLine(" GROUP BY A.Code,B.U_EMPNM,B.U_DEPTCD,A.U_COMPONM "); pQuery.AppendLine(" UNION ALL "); pQuery.AppendLine(" SELECT "); pQuery.AppendLine(" B.U_EMPNM AS U_EMPNM "); pQuery.AppendLine(" ,B.U_DEPTCD AS U_DEPTCD "); pQuery.AppendLine(" ,A.U_COMPONM AS U_COMPONM "); pQuery.AppendLine(" ,MAX(CONVERT(NVARCHAR(MAX),A.U_CONTENT1)) AS NM "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" LEFT JOIN [@KIS_HR0020M_HRD] B ON A.Code = B.Code "); pQuery.AppendLine(" WHERE A.U_ABILCD = ''U03'' AND U_COMPOCD = ''U03'' "); pQuery.AppendLine(" AND (B.U_EXAMCD = ''{0}'') "); pQuery.AppendLine(" AND (B.U_DEPTCD = ''{1}'' OR ''{1}'' = '''') "); pQuery.AppendLine(" GROUP BY A.Code,B.U_EMPNM,B.U_DEPTCD,A.U_COMPONM "); pQuery.AppendLine(" )A' "); pQuery.AppendLine(" , @FrontGroup = N'피고과자,현부서' "); pQuery.AppendLine(" , @Pivot = N'U_COMPONM' "); pQuery.AppendLine(" , @Value = N'MAX(NM)' "); pQuery.AppendLine(" , @PivotSort = N'CASE U_COMPONM WHEN ''희망직무'' THEN 1 "); pQuery.AppendLine(" WHEN ''희망부서'' THEN 2 "); pQuery.AppendLine(" WHEN ''변경시기'' THEN 3 "); pQuery.AppendLine(" WHEN ''전환희망사유'' THEN 4 "); pQuery.AppendLine(" WHEN ''전환배치의견'' THEN 999999 "); pQuery.AppendLine(" ELSE 5 END' "); string sQry = string.Format(pQuery.ToString(), cboYEAR, cboDEPTCD); try { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; //string cv_ColumnsUID_s = "U_EMPNM,U_DEPTCD "; //string cv_NoEditable_s = "U_EMPNM,U_DEPTCD"; //string cv_ColumnsNAM_s = "피고과자,현부서"; //string cv_Right_Just_s = ""; //string cv_No_Visible_s = " "; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sQry); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && oGrid.DataTable.GetValue(1, 0).ToString() == "") { //FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { //FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridCombo(ref oGrid, "현부서", "", " SELECT U_DEPTCD,U_DEPTNM FROM [@KIS_HR00401] WHERE U_USEYN = 'Y'", ""); oForm.Items.Item("grd").Enabled = false; B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid = null; } }
private void FindRequestData(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Grid oGrid; StringBuilder sb; string strREADCD = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; oDB_M = oForm.DataSources.DBDataSources.Item("@KIS_SO0030M_HRD"); strREADCD = oDB_M.GetValue("Code", 0).Trim(); sb = new StringBuilder(); //조회 /* sb.AppendLine(" SELECT M.U_REQYM AS U_YYYYMM "); sb.AppendLine(" , M.U_AMT AS REQAMT "); sb.AppendLine(" , M.U_DATE AS DEPO_DATE "); sb.AppendLine(" , M.U_INAMT AS DEPO_AMT "); sb.AppendLine(" , M.U_SMLNM + ' ' + M.U_SMLNM2 AS U_PMETHOD "); sb.AppendLine(" , M.U_STATUS AS U_STATUS "); sb.AppendLine(" FROM ( "); sb.AppendLine(" SELECT A.U_READCD "); sb.AppendLine(" , A.U_REQYM "); sb.AppendLine(" , (SELECT SUM(CASE ISNULL(F.U_TYPE, '') WHEN '110' THEN ISNULL(F.U_DEBIT, 0) "); sb.AppendLine(" WHEN '120' THEN (-1) * ISNULL(F.U_CREDIT, 0) "); sb.AppendLine(" ELSE 0 END) "); sb.AppendLine(" FROM [@KIS_SO01403_HRD] F "); sb.AppendLine(" WHERE A.DocEntry = F.DocEntry "); sb.AppendLine(" AND A.LineId = F.U_UPLINEID "); sb.AppendLine(" AND F.U_TYPE IN ('110', '120') ) AS U_AMT "); sb.AppendLine(" , CASE WHEN ISNULL(B.U_TYPE, '') NOT IN ('110', '120','150') THEN ISNULL(B.U_CREDIT, 0) ELSE 0 END AS U_INAMT "); sb.AppendLine(" , B.U_DATE "); sb.AppendLine(" , ISNULL(B.U_DEBIT,0) AS U_DEBIT "); sb.AppendLine(" , ISNULL(B.U_CREDIT,0) AS U_CREDIT "); sb.AppendLine(" , B.U_TYPE "); sb.AppendLine(" , (SELECT F.U_SMLNM FROM [@KIS_AD00201] F WHERE F.Code = 'SO54' AND F.U_CD = B.U_TYPE) AS U_SMLNM "); sb.AppendLine(" , (SELECT F.U_SMLNM FROM [@KIS_AD00201] F WHERE F.Code = 'SO51' AND F.U_SMLCD = B.U_SUBTYPE) AS U_SMLNM2 "); sb.AppendLine(" , A.U_STATUS "); sb.AppendLine(" FROM [@KIS_SO01401_HRD] A "); sb.AppendLine(" LEFT OUTER JOIN [@KIS_SO01403_HRD] B ON A.DocEntry = B.DocEntry "); sb.AppendLine(" AND A.LineId = B.U_UPLINEID "); sb.AppendLine(" AND B.U_TYPE NOT IN ('110', '120', '150') "); sb.AppendLine(" ) M "); sb.AppendLine(" WHERE M.U_AMT <> 0 AND M.U_READCD = '{0}' "); sb.AppendLine(" ORDER BY M.U_READCD, M.U_REQYM "); */ sb.AppendLine(" SELECT CASE WHEN ROW_NUMBER() OVER (PARTITION BY M.U_READCD, M.U_REQYM ORDER BY M.U_READCD, M.U_REQYM, M.U_AMT, M.DocEntry, M.LineId, M.U_DATE) = 1 THEN M.U_REQYM ELSE NULL END AS U_YYYYMM "); sb.AppendLine(" , CASE WHEN ROW_NUMBER() OVER (PARTITION BY M.U_READCD, M.U_REQYM ORDER BY M.U_READCD, M.U_REQYM, M.U_AMT, M.DocEntry, M.LineId, M.U_DATE) = 1 THEN M.U_AMT ELSE NULL END AS REQAMT "); sb.AppendLine(" , M.U_DATE AS DEPO_DATE "); sb.AppendLine(" , M.U_INAMT AS DEPO_AMT "); sb.AppendLine(" , M.U_SMLNM + (CASE ISNULL(M.U_SMLNM2,'') WHEN '' THEN '' ELSE ' ' + M.U_SMLNM2 END) AS U_PMETHOD "); sb.AppendLine(" , M.U_STATUS AS U_STATUS "); sb.AppendLine(" FROM ( "); sb.AppendLine(" SELECT A.U_READCD "); sb.AppendLine(" , A.U_REQYM "); sb.AppendLine(" , A.DocEntry "); sb.AppendLine(" , A.LineId "); sb.AppendLine(" , ISNULL((SELECT SUM(ISNULL(F.U_DEBIT, 0)) "); sb.AppendLine(" FROM [@KIS_SO01403_HRD] F "); sb.AppendLine(" WHERE A.DocEntry = F.DocEntry "); sb.AppendLine(" AND A.LineId = F.U_UPLINEID "); sb.AppendLine(" AND F.U_TYPE IN ('110') ), 0) AS U_AMT "); sb.AppendLine(" , CASE WHEN ISNULL(B.U_TYPE, '') NOT IN ('110','150','910','920','000') THEN ISNULL(B.U_CREDIT, 0) ELSE 0 END AS U_INAMT "); sb.AppendLine(" , B.U_DATE "); sb.AppendLine(" , ISNULL(B.U_DEBIT,0) AS U_DEBIT "); sb.AppendLine(" , ISNULL(B.U_CREDIT,0) AS U_CREDIT "); sb.AppendLine(" , B.U_TYPE "); sb.AppendLine(" , (SELECT F.U_SMLNM FROM [@KIS_AD00201] F WHERE F.Code = 'SO54' AND F.U_CD = B.U_TYPE) AS U_SMLNM "); sb.AppendLine(" , (SELECT F.U_SMLNM FROM [@KIS_AD00201] F WHERE F.Code = 'SO51' AND F.U_SMLCD = B.U_SUBTYPE) AS U_SMLNM2 "); sb.AppendLine(" , A.U_STATUS "); sb.AppendLine(" FROM [@KIS_SO01401_HRD] A "); sb.AppendLine(" LEFT OUTER JOIN [@KIS_SO01403_HRD] B ON A.DocEntry = B.DocEntry "); sb.AppendLine(" AND A.LineId = B.U_UPLINEID "); sb.AppendLine(" AND B.U_TYPE NOT IN ('110','150','910','920','000') "); sb.AppendLine(" ) M "); sb.AppendLine(" WHERE M.U_AMT <> 0 AND M.U_READCD = '{0}' "); sb.AppendLine(" ORDER BY M.U_READCD, M.U_REQYM "); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").ExecuteQuery(string.Format(sb.ToString(), strREADCD)); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //1. 납부방법 //FN.SetComboBoxValidValues(oGrid, "U_PMETHOD", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO09' ", FN.Enum_WholeTp.m_Nothing); //2. 상태 FN.SetComboBoxValidValues(oGrid, "U_STATUS", " SELECT 'O' [Code], '미납' AS [Name] UNION ALL SELECT 'C' [Code], '완납' AS [Name] ", FN.Enum_WholeTp.m_Nothing); //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && (oGrid.DataTable.GetValue("U_YYYYMM", 0).ToString() == null || oGrid.DataTable.GetValue("U_YYYYMM", 0).ToString() == "")) { FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); } else { FN.BindGrid(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , "" , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.AlignRight)); //FN.SetColoumnColor(oForm, "grd3", "#E0ECF8", "ETAX_YN,DTINO,DTSTAT"); //그리드 BG 기본색(#E6E6FA) oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("FindRequestData " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = "피고과자,현부서,희망직무,희망부서,변경시기,전환희망사유,고과자의견"; string cv_ColumnsNAM_s = "피고과자,현부서,희망직무,희망부서,변경시기,전환희망사유,고과자의견"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); }
private void FindData4(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; oGrid4 = (SAPbouiCOM.Grid)oForm.Items.Item("grd4").Specific; oGrid4.SelectionMode = BoMatrixSelect.ms_None; oForm.Freeze(true); //고과항목 그리드호출 try { StringBuilder pQuery = new StringBuilder(); string query = string.Empty; pQuery.AppendLine(" SELECT 1 AS ROWSID, U_COMPOCD,U_COMPONM "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" WHERE U_ABILCD = 'U03' AND A.Code = '{0}' "); pQuery.AppendLine(" UNION ALL "); pQuery.AppendLine(" SELECT 2, U_COMPOCD,U_RMK1 "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" INNER JOIN [@KIS_AD00201] B ON A.U_COMPOCD = B.U_SMLCD AND B.Code = 'HR14' AND U_USEYN = 'Y' "); pQuery.AppendLine(" WHERE U_ABILCD = 'U03' AND A.Code = '{0}' "); pQuery.AppendLine(" UNION ALL "); pQuery.AppendLine(" SELECT 3, U_COMPOCD,U_CONTENT1 "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" WHERE U_ABILCD = 'U03' AND A.Code = '{0}' "); pQuery.AppendLine(" UNION ALL "); pQuery.AppendLine(" SELECT 4, U_COMPOCD,U_CONTENT2 "); pQuery.AppendLine(" FROM [@KIS_HR00202_HRD] A "); pQuery.AppendLine(" WHERE U_ABILCD = 'U03' AND A.Code = '{0}' "); pQuery.AppendLine(" ORDER BY U_COMPOCD, ROWSID "); string sQry = string.Format(pQuery.ToString(), GRIDCODE); cv_ColumnsUID_s = "ROWSID,U_COMPOCD,U_COMPONM"; cv_NoEditable_s = "ROWSID,U_COMPOCD,U_COMPONM"; cv_ColumnsNAM_s = "ROWSID,구분코드,내용"; cv_Right_Just_s = " "; cv_No_Visible_s = "ROWSID,U_COMPOCD"; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.DataSources.DataTables.Item("grd4").ExecuteQuery(sQry); oGrid4.DataTable = oForm.DataSources.DataTables.Item("grd4"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid4.DataTable.Rows.Count == 1 && oGrid4.DataTable.GetValue(0, 0).ToString() == "") { FN.SetGridTitle(oGrid4, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid4, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid4.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); for (int i = 0; i < oGrid4.DataTable.Rows.Count; i++) { if (oGrid4.DataTable.GetValue("ROWSID", i) == 1) { oGrid4.CommonSetting.SetRowBackColor(i + 1, 8684676); } } oGrid4.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oGrid4 = null; } oForm.Freeze(false); }
private static void FindData(SAPbouiCOM.Form oForm) { SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; string edtDATE = oForm.DataSources.UserDataSources.Item("edtDATE").Value; string cboGROUP = oForm.DataSources.UserDataSources.Item("cboGROUP").Value; string GrdTitle = string.Empty; int BDATE = Convert.ToInt16(edtDATE) -1; StringBuilder pQuery = new StringBuilder(); string query = string.Empty; pQuery.AppendLine(" EXEC [KIS_SP_SD0180F1_HRD] "); pQuery.AppendLine(" @DATE = '{0}' "); pQuery.AppendLine(" ,@GROUP = '{1}' "); string sQry = string.Format(pQuery.ToString(), edtDATE, cboGROUP); try { GrdTitle = string.Format("{0}년1월,{1}년1월,{0}년2월,{1}년2월,{0}년3월,{1}년3월,{0}년4월,{1}년4월,{0}년5월,{1}년5월,{0}년6월,{1}년6월,{0}년7월,{1}년7월,{0}년8월,{1}년8월,{0}년9월,{1}년9월,{0}년10월,{1}년10월,{0}년11월,{1}년11월,{0}년12월,{1}년12월,{0}년합계,{1}년합계,ROWSID", BDATE, edtDATE); oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; string cv_ColumnsUID_s = "LINENUM,GROUP1,CARDNM,BMON1,MON1,BMON2,MON2,BMON3,MON3,BMON4,MON4,BMON5,MON5,BMON6,MON6,BMON7,MON7,BMON8,MON8,BMON9,MON9,BMON10,MON10,BMON11,MON11,BMON12,MON12,BAMTSUM,AMTSUM,ROWSID"; string cv_NoEditable_s = "LINENUM,GROUP1,CARDNM,BMON1,MON1,BMON2,MON2,BMON3,MON3,BMON4,MON4,BMON5,MON5,BMON6,MON6,BMON7,MON7,BMON8,MON8,BMON9,MON9,BMON10,MON10,BMON11,MON11,BMON12,MON12,BAMTSUM,AMTSUM,ROWSID"; string cv_ColumnsNAM_s = string.Format("#,고객그룹-기업,BP명,{0}",GrdTitle); string cv_Right_Just_s = "BMON1,MON1,BMON2,MON2,BMON3,MON3,BMON4,MON4,BMON5,MON5,BMON6,MON6,BMON7,MON7,BMON8,MON8,BMON9,MON9,BMON10,MON10,BMON11,MON11,BMON12,MON12,BAMTSUM,AMTSUM"; string cv_No_Visible_s = "LINENUM,ROWSID"; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sQry); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && oGrid.DataTable.GetValue("GROUP1", 0).ToString() == "") { FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); //FN.SetGridSumField(ref oGrid, cv_Right_Just_s); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid.RowHeaders.Width = 0; #region Color Setting Color newRGBColor = Color.FromArgb(100, 100, 200); //int rowForeColor = newRGBColor.R | (newRGBColor.G << 8) | (newRGBColor.B << 16); string DefultFontColor = "#000000"; Color systemBackColor = Color.FromArgb(217, 229, 242); int rowBackColor1 = Color.LightYellow.R | Color.LightYellow.G << 8 | Color.LightYellow.B << 16; int rowBackColor2 = Color.LightCyan.R | Color.LightCyan.G << 8 | Color.LightCyan.B << 16; int blueForeColor = Color.Blue.R | (Color.Blue.G << 8) | (Color.Blue.B << 16); int redForeColor = Color.Red.R | Color.Red.G << 8 | Color.Red.B << 16; //int iDefultFontColor = setting.GetCellFontColor(-1, 1); int iDefultFontColor = Convert.ToInt32(System.Drawing.ColorTranslator.FromHtml(DefultFontColor).ToArgb()); int iDefultBackColor = systemBackColor.R | (systemBackColor.G << 8) | (systemBackColor.B << 16); #endregion #region GridColorSet FN.SetColumnProperty(oForm, "grd", "BackColor=#DCDCDC"); XDocument root = XDocument.Parse(oGrid.DataTable.SerializeAsXML(BoDataTableXmlSelect.dxs_DataOnly)); //필터링 : 선택된 행의 컬랙션을 조회합니다. var rows = from c in root.Descendants("Row") where c.Elements("Cells").Elements("Cell").Any(o => o.Element("ColumnUid").Value == "ROWSID" && o.Element("Value").Value != "0") select c; string Row = string.Empty; foreach (XElement r in rows) { foreach (XElement c in r.Descendants("Cell")) { string ColumnUid = c.Element("ColumnUid").Value; string Value = c.Element("Value").Value; if (ColumnUid == "LINENUM") { Row = c.Element("Value").Value; } else if (ColumnUid == "CARDNM") { if (Value == "소계") oGrid.CommonSetting.SetRowBackColor(Convert.ToInt32(Row), rowBackColor1); else oGrid.CommonSetting.SetRowBackColor(Convert.ToInt32(Row), rowBackColor2); } } } #endregion //for (int i = 0; i < oGrid.Rows.Count; i++) //{ // if (oGrid.DataTable.GetValue("CARDNM", i) == "소계") // { // oGrid.CommonSetting.SetRowBackColor(i + 1, rowBackColor1); // } // else if(oGrid.DataTable.GetValue("CARDNM", i) == "합계") // { // oGrid.CommonSetting.SetRowBackColor(i + 1, rowBackColor2); // } // else // { // oGrid.CommonSetting.SetRowBackColor(i + 1, iDefultBackColor); // } //} oGrid.CommonSetting.FixedColumnsCount = 3; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid = null; } }
}//fin MenuEvent private void Grilla() { try { if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT T0.U_Sucursal ,T0.U_TipoDoc ,COUNT(*) 'Asignados' ,SUM(CASE WHEN T1.U_Estado = 'D' THEN 1 ELSE 0 END) 'Disponibles' ,SUM(CASE WHEN T1.U_Estado = 'U' THEN 1 ELSE 0 END) 'Utilizados' FROM [@VID_FEDIST] T0 WITH(nolock) JOIN [@VID_FEDISTD] T1 WITH(nolock) ON T1.DocEntry = T0.DocEntry GROUP BY T0.U_Sucursal ,T0.U_TipoDoc ORDER BY T0.U_Sucursal, T0.U_TipoDoc"; } else { s = @"SELECT T0.""U_Sucursal"" ,T0.""U_TipoDoc"" ,COUNT(*) ""Asignados"" ,SUM(CASE WHEN T1.""U_Estado"" = 'D' THEN 1 ELSE 0 END) ""Disponibles"" ,SUM(CASE WHEN T1.""U_Estado"" = 'U' THEN 1 ELSE 0 END) ""Utilizados"" FROM ""@VID_FEDIST"" T0 JOIN ""@VID_FEDISTD"" T1 ON T1.""DocEntry"" = T0.""DocEntry"" GROUP BY T0.""U_Sucursal"" ,T0.""U_TipoDoc"" ORDER BY T0.""U_Sucursal"", T0.""U_TipoDoc"" "; } oDataTable.ExecuteQuery(s); ogrid.Columns.Item("U_Sucursal").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Sucursal")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.Visible = false; oColumn.TitleObject.Caption = "Código"; ogrid.Columns.Item("U_TipoDoc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_TipoDoc")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Tipo Documento"; ogrid.Columns.Item("Asignados").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("Asignados")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Total Asignados"; ogrid.Columns.Item("Disponibles").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("Disponibles")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Total Disponibles"; ogrid.Columns.Item("Utilizados").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("Utilizados")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Total Utilizados"; ogrid.AutoResizeColumns(); } catch (Exception e) { FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); OutLog("Grilla: " + e.Message + " ** Trace: " + e.StackTrace); } }//fin Grilla
public void SetGridTitle(SAPbouiCOM.Form oForm) { oForm.Freeze(true); oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").Clear(); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = "GROUP1,CARDNM,BMON1,MON1,BMON2,MON2,BMON3,MON3,BMON4,MON4,BMON5,MON5,BMON6,MON6,BMON7,MON7,BMON8,MON8,BMON9,MON9,BMON10,MON10,BMON11,MON11,BMON12,MON12,BAMTSUM,AMTSUM"; string cv_ColumnsNAM_s = "고객그룹-기업,BP명,전년도1월,조회년도1월,전년도2월,조회년도2월,전년도3월,조회년도3월,전년도4월,조회년도4월,전년도5월,조회년도5월,전년도6월,조회년도6월,전년도7월,조회년도7월,전년도8월,조회년도8월,전년도9월,조회년도9월,전년도10월,조회년도10월,전년도11월,조회년도11월,전년도12월,조회년도12월,전년도합계,조회년도합계"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); oForm.Freeze(false); }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = "SITE_CD,CARD_NO,APPR_DATE,APPR_SEQ,APPR_TIME,APPR_NO,CANCEL_YN,USE_GB,CHAIN_NM,CHAIN_ID,CHAIN_CD,APPR_AMT,SUPPLY_AMT,APPR_TAX,HALBU,RECO_HALBU_NO,CHAIN_TYPE,WS_STATUS"; string cv_ColumnsNAM_s = "금융기관코드,카드번호,승인월,승인일별 일련번호,승인시간,승인번호,승인취소여부,사용구분,가맹점명,가맹점사업자번호,가맹점번호,승인금액,공급가액,부가가치세,할부기간,청구내역할부회차,과세정보가맹점유형코드,WEB 처리상태"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); }
private SAPbouiCOM.DataTable FindData(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Grid oGrid; StringBuilder sb; string strREQDT_FR = string.Empty; string strREQDT_TO = string.Empty; string strREADCD_FR = string.Empty; string strREADCD_TO = string.Empty; string strPAPERTP = string.Empty; string strBRANCHCD = string.Empty; string strSALECD = string.Empty; string strSTATUS = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; strREQDT_FR = oUDS.Item("edtREQDT1").ValueEx; strREQDT_TO = oUDS.Item("edtREQDT2").ValueEx; strREADCD_FR = oUDS.Item("edtREADCD1").ValueEx; strREADCD_TO = oUDS.Item("edtREADCD2").ValueEx; strPAPERTP = oUDS.Item("cboPAPERTP").ValueEx; strBRANCHCD = oUDS.Item("edtBRCHCD").ValueEx; strSALECD = oUDS.Item("edtSALECD").ValueEx; strSTATUS = oUDS.Item("cboSTATUS").ValueEx; sb = new StringBuilder(); //조회 sb.AppendFormat(" EXEC KIS_SP_SO0130F1_HRD @pREQDT_FR = '{0}' ", strREQDT_FR); sb.AppendFormat(" , @pREQDT_TO = '{0}' ", strREQDT_TO); sb.AppendFormat(" , @pREADCD_FR = '{0}' ", strREADCD_FR); sb.AppendFormat(" , @pREADCD_TO = '{0}' ", strREADCD_TO); sb.AppendFormat(" , @pPAPERTP = '{0}' ", strPAPERTP); sb.AppendFormat(" , @pBRANCHCD = '{0}' ", strBRANCHCD); sb.AppendFormat(" , @pSALECD = '{0}' ", strSALECD); sb.AppendFormat(" , @pSTATUS = '{0}' ", strSTATUS); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sb.ToString()); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //1. 지종 //FN.SetComboBoxValidValues(oGrid, "U_PAPERTP", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO01' ", FN.Enum_WholeTp.m_Nothing); //2. 상태 //FN.SetComboBoxValidValues(oGrid, "U_STATUS", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO13' ", FN.Enum_WholeTp.m_Nothing); // 독자 링크버튼추가 FN.SetGirdColumnLinkedObjec(ref oGrid, "READCD", BoLinkedObject.lf_BusinessPartner); //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && (oGrid.DataTable.GetValue("READCD", 0).ToString() == null || oGrid.DataTable.GetValue("READCD", 0).ToString() == "")) { FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); } else { FN.BindGrid(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , "" , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.AlignRight)); //FN.SetColoumnColor(oForm, "grd3", "#E0ECF8", "ETAX_YN,DTINO,DTSTAT"); //그리드 BG 기본색(#E6E6FA) oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_btnFind_AFItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } SAPbouiCOM.DataTable dt = oForm.DataSources.DataTables.Item("grd"); return dt; }
private void FindData(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; oRS = (SAPbobsCOM.Recordset)B1Connections.diCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); EXAMCD = oForm.Items.Item("cboYEAR").Specific.Value; try { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; cv_ColumnsUID_s = "U_LINENUM, U_EMPNO, U_EMPNM, U_DEPTCD, U_DEPTNM, U_PASSYNL, U_PASSYNT, U_HEADER, U_LINE,RANK,LASTG"; cv_NoEditable_s = "U_LINENUM, U_EMPNO, U_EMPNM, U_DEPTCD, U_DEPTNM, U_PASSYNL, U_PASSYNT, U_HEADER, U_LINE,RANK,LASTG"; cv_ColumnsNAM_s = "#,사번,사원명,부서코드,부서명,본인고과,고과자,헤더정보,라인정보,순위,최종등급"; cv_Right_Just_s = " "; cv_No_Visible_s = "U_HEADER, U_LINE,RANK,LASTG"; string sQry = ""; sQry = string.Format(" EXEC [KIS_SP_HR0010B2_HRD] '1','{0}'",EXAMCD); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd1").ExecuteQuery(sQry); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd1"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && oGrid.DataTable.GetValue("U_EMPNO", 0).ToString() == "") { FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oForm.Items.Item("edtCREATE").Specific.Value = oGrid.DataTable.Rows.Count; oForm.Items.Item("edtCOMPL").Specific.Value = 0; oForm.Items.Item("edtINCOMPL").Specific.value = oForm.Items.Item("edtPERSON").Specific.Value; B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridCombo(ref oGrid, "U_PASSYNL", "", " SELECT U_SMLCD,U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR11' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid, "U_PASSYNT", "", " SELECT U_SMLCD,U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR11' AND U_USEYN = 'Y'", ""); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); sQry = string.Format(" EXEC [KIS_SP_HR0010B2_HRD] '2','{0}'",EXAMCD); oRS.DoQuery(sQry); oForm.Items.Item("edtCREATE").Specific.Value = oGrid.DataTable.Rows.Count; oForm.Items.Item("edtCOMPL").Specific.Value = oRS.Fields.Item(0).Value; oForm.Items.Item("edtINCOMPL").Specific.value = Convert.ToInt16(oForm.Items.Item("edtCREATE").Specific.Value) - Convert.ToInt16(oForm.Items.Item("edtCOMPL").Specific.Value); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Items.Item("btnSAVE").Enabled = true; STATE = true; oGrid = null; } }
}//fin MenuEvent private void CargarGrilla() { try { if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT DocEntry, ISNULL(U_Cuenta,'') Cuenta, ISNULL(U_Desc,'') Descripcion, ISNULL(U_Clasif,'') Clasificacion FROM [@VID_FEPLANCTA]"; } else { s = @"SELECT ""DocEntry"", IFNULL(""U_Cuenta"",'') ""Cuenta"", IFNULL(""U_Desc"",'') ""Descripcion"", IFNULL(""U_Clasif"",'') ""Clasificacion"" FROM ""@VID_FEPLANCTA"" "; } oDataTable.ExecuteQuery(s); if (oDataTable.IsEmpty) { oForm.Items.Item("btnCtaSAP").Enabled = false; //oForm.Mode = BoFormMode.fm_ADD_MODE; } else { oForm.Mode = BoFormMode.fm_UPDATE_MODE; oDataTable.Rows.Add(1); } var col = ((EditTextColumn)oGrid.Columns.Item("DocEntry")); col.Editable = false; col.Visible = false; col.TitleObject.Caption = "DocEntry"; col = ((EditTextColumn)oGrid.Columns.Item("Cuenta")); //col.LinkedObjectType = "171"; // Link to Employee col.Editable = false; col.Visible = true; col.TitleObject.Caption = "Código Cuenta"; col = ((EditTextColumn)oGrid.Columns.Item("Descripcion")); col.Editable = true; col.Visible = true; col.TitleObject.Caption = "Descripción Cuenta"; oGrid.Columns.Item("Clasificacion").Type = BoGridColumnType.gct_ComboBox; var colC = ((ComboBoxColumn)oGrid.Columns.Item("Clasificacion")); colC.Editable = true; colC.Visible = true; colC.DisplayType = BoComboDisplayType.cdt_Description; colC.TitleObject.Caption = "Clasificación"; var Combo = ((ComboBoxColumn)oGrid.Columns.Item("Clasificacion")); Combo.ValidValues.Add("1", "Activo"); Combo.ValidValues.Add("2", "Pasivo"); Combo.ValidValues.Add("3", "Patrimonio"); Combo.ValidValues.Add("4", "Pérdidas y Ganancias"); Combo.ValidValues.Add("5", "Orden"); oGrid.AutoResizeColumns(); } catch (Exception x) { FSBOApp.StatusBar.SetText("CargarGrilla: " + x.Message + " ** Trace: " + x.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("CargarGrilla: " + x.Message + " ** Trace: " + x.StackTrace); } }
private static void FindData(SAPbouiCOM.Form oForm) { SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; string FRRDCD = oForm.DataSources.UserDataSources.Item("edtFRRDCD").ValueEx; string TORDCD = oForm.DataSources.UserDataSources.Item("edtTORDCD").ValueEx; string FRRECDT = oForm.DataSources.UserDataSources.Item("edtFRRECDT").ValueEx; string TORECDT = oForm.DataSources.UserDataSources.Item("edtTORECDT").ValueEx; string FRDELCD = oForm.DataSources.UserDataSources.Item("edtFRDELCD").ValueEx; string TODELCD = oForm.DataSources.UserDataSources.Item("edtTODELCD").ValueEx; string CALLTP = oForm.DataSources.UserDataSources.Item("cboCALLTP").ValueEx; string RECVID = oForm.DataSources.UserDataSources.Item("edtRECVID").ValueEx; string PROSTAT = oForm.DataSources.UserDataSources.Item("cboPROSTAT").ValueEx; string SPROCNM = B1Connections.theAppl.Company.UserName; StringBuilder pQuery = new StringBuilder(); string query = string.Empty; pQuery.AppendLine(" EXEC [KIS_SP_SO0080A_HRD] "); pQuery.AppendLine(" @TYPE='FIND' "); pQuery.AppendLine(" , @FRRDCD='{0}' "); pQuery.AppendLine(" , @TORDCD='{1}' "); pQuery.AppendLine(" , @FRRECVDT='{2}' "); pQuery.AppendLine(" , @TORECVDT='{3}' "); pQuery.AppendLine(" , @FRDELVCD='{4}' "); pQuery.AppendLine(" , @TODELVCD='{5}' "); pQuery.AppendLine(" , @CALLTP='{6}' "); pQuery.AppendLine(" , @RECVID='{7}' "); pQuery.AppendLine(" , @PROSTAT='{8}' "); pQuery.AppendLine(" , @SDELVCD='' "); pQuery.AppendLine(" , @SLINEID='' "); pQuery.AppendLine(" , @SPROCOMM='' "); pQuery.AppendLine(" , @SPROCNM='{9}' "); pQuery.AppendLine(" , @SPROCDT='' "); string sQry = string.Format(pQuery.ToString(), FRRDCD, TORDCD, FRRECDT, TORECDT, FRDELCD, TODELCD, CALLTP, RECVID, PROSTAT, SPROCNM); try { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; string cv_ColumnsUID_s = "CHK,LINEID,U_RECVDT,CODE,NAME,U_DELVCD,U_RDEPT,U_CALLTP,U_TEL,U_PAYNM,U_CENTNM,U_COMMENT,U_PROCOMM,U_RECVNM,U_PROCDT,U_PROCNM,U_MEMO"; string cv_NoEditable_s = "LINEID,U_RECVDT,CODE,NAME,U_DELVCD,U_RDEPT,U_CALLTP,U_TEL,U_PAYNM,U_CENTNM,U_COMMENT,U_RECVNM,U_PROCDT,U_PROCNM,U_MEMO"; string cv_ColumnsNAM_s = "체크,라인번호,상담일,독자코드,독자이름,배달코드,구독부서,콜유형,전화번호,요금제,분국,접수내용,처리결과,작업자,처리일자,처리자,U_MEMO"; string cv_Right_Just_s = " "; string cv_No_Visible_s = "U_MEMO "; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sQry); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && oGrid.DataTable.GetValue("LINEID", 0).ToString() == "") { FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); oGrid.Columns.Item(0).Type = BoGridColumnType.gct_CheckBox; B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid = null; } }
private static void FindData(SAPbouiCOM.Form oForm) { SAPbouiCOM.Grid oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; string edtDOCDTF = oForm.DataSources.UserDataSources.Item("edtDOCDTF").Value; string edtDOCDTT = oForm.DataSources.UserDataSources.Item("edtDOCDTT").Value; string cboPRCCD = oForm.DataSources.UserDataSources.Item("cboPRCCD").Value; string cboSLPCD = oForm.DataSources.UserDataSources.Item("cboSLPCD").Value; string edtCARDCDF = oForm.DataSources.UserDataSources.Item("edtCARDCDF").Value; string edtBPCDF = oForm.DataSources.UserDataSources.Item("edtBPCDF").Value; string cboPUBLICA = oForm.DataSources.UserDataSources.Item("cboPUBLICA").Value; StringBuilder pQuery = new StringBuilder(); string query = string.Empty; pQuery.AppendLine(" EXEC [KIS_SP_SD0150F_HRD] "); pQuery.AppendLine(" @edtDOCDTF = '{0}' "); pQuery.AppendLine(" ,@edtDOCDTT = '{1}' "); pQuery.AppendLine(" ,@cboPRCCD = '{2}' "); pQuery.AppendLine(" ,@cboSLPCD = '{3}' "); pQuery.AppendLine(" ,@edtCARDCDF = '{4}' "); pQuery.AppendLine(" ,@edtBPCDF = '{5}' "); pQuery.AppendLine(" ,@cboPUBLICA = '{6}' "); string sQry = string.Format(pQuery.ToString(), edtDOCDTF, edtDOCDTT, cboPRCCD, cboSLPCD, edtCARDCDF, edtBPCDF, cboPUBLICA); try { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.SelectionMode = BoMatrixSelect.ms_Single; string cv_ColumnsUID_s = "U_DOCDT,U_PUBLICA,U_CARDCD,U_CARDNM,U_AMTSUM,U_VATSUM,U_DOCTOT,DPMSUM,U_SLPNM,U_BPCD,U_BPNM"; string cv_NoEditable_s = "U_DOCDT,U_PUBLICA,U_CARDCD,U_CARDNM,U_AMTSUM,U_VATSUM,U_DOCTOT,DPMSUM,U_SLPNM,U_BPCD,U_BPNM"; string cv_ColumnsNAM_s = "전기일,간행물,매출처,매출처명,매출액,매출부가세,매출합계,미수금,영업사원,대행사,대행사명"; string cv_Right_Just_s = "U_AMTSUM,U_VATSUM,U_DOCTOT,DPMSUM"; string cv_No_Visible_s = " "; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd").ExecuteQuery(sQry); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && oGrid.DataTable.GetValue(1, 0).ToString() == "") { FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridSumField(ref oGrid, cv_Right_Just_s); FN.SetGirdColumnLinkedObjec(ref oGrid, "U_CARDCD", BoLinkedObject.lf_BusinessPartner); FN.SetGirdColumnLinkedObjec(ref oGrid, "U_BPCD", BoLinkedObject.lf_BusinessPartner); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid.RowHeaders.Width = 0; FN.SetGirdSort(ref oGrid); oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oGrid = null; } }
public new bool InitForm(string uid, string xmlPath, ref Application application, ref SAPbobsCOM.Company company, ref CSBOFunctions SBOFunctions, ref TGlobalVid _GlobalSettings) { bool Result = base.InitForm(uid, xmlPath, ref application, ref company, ref SBOFunctions, ref _GlobalSettings); try { oRecordSet = (SAPbobsCOM.Recordset)(FCmpny.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)); FSBOf.LoadForm(xmlPath, "VID_FEIMPADIC.srf", uid); oForm = FSBOApp.Forms.Item(uid); oForm.AutoManaged = false; oForm.SupportedModes = -1; // afm_All Flag = false; oForm.Freeze(true); if (GlobalSettings.RunningUnderSQLServer) { s = @"select count(*) Cont from [@VID_FEIMPADIC]"; } else { s = @"select count(*) ""Cont"" from ""@VID_FEIMPADIC"" "; } oRecordSet.DoQuery(s); if ((System.Int32)(oRecordSet.Fields.Item("Cont").Value) > 0) { oForm.Mode = BoFormMode.fm_UPDATE_MODE; } else { oForm.Mode = BoFormMode.fm_ADD_MODE; } oGrid = (Grid)(oForm.Items.Item("3").Specific); oDBDSHeader = oForm.DataSources.DBDataSources.Add("@VID_FEIMPADIC"); oDataTable = oForm.DataSources.DataTables.Add("Tax"); if (GlobalSettings.RunningUnderSQLServer) { s = @"select Code, U_CodImpto, U_Desc, U_Porc from [@VID_FEIMPADIC] UNION ALL select CAST('' as varchar(20)), CAST('' as varchar(20)), CAST('' as varchar(50)), 0"; } else { s = @"select ""Code"", ""U_CodImpto"", ""U_Desc"", ""U_Porc"" from ""@VID_FEIMPADIC"" UNION ALL select CAST('' as varchar(20)), CAST('' as varchar(20)), CAST('' as varchar(50)), 0 FROM DUMMY "; } oDataTable.ExecuteQuery(s); oGrid.DataTable = oDataTable; oGrid.Columns.Item("Code").Type = BoGridColumnType.gct_ComboBox; oColumn = (GridColumn)(oGrid.Columns.Item("Code")); var oComboCol = (ComboBoxColumn)(oColumn); oComboCol.Editable = true; oComboCol.TitleObject.Caption = "Impuesto SAP"; if (GlobalSettings.RunningUnderSQLServer) { s = @"select Code, Name from OSTA UNION ALL select WTCode 'Code', WTName 'Name' from OWHT where Inactive = 'N'"; } else { s = @"select ""Code"", ""Name"" from ""OSTA"" UNION ALL select ""WTCode"" ""Code"", ""WTName"" ""Name"" from ""OWHT"" where ""Inactive"" = 'N' "; } oRecordSet.DoQuery(s); FSBOf.FillComboGrid((GridColumn)(oGrid.Columns.Item("Code")), ref oRecordSet, true); oGrid.Columns.Item("U_CodImpto").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("U_CodImpto")); var oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Código Impto. SII"; oGrid.Columns.Item("U_Desc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("U_Desc")); oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Descripción Impuesto"; oGrid.Columns.Item("U_Porc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(oGrid.Columns.Item("U_Porc")); oEditCol = (EditTextColumn)(oColumn); oEditCol.Editable = true; oEditCol.TitleObject.Caption = "Porcentaje Retencion"; oEditCol.RightJustified = true; oGrid.AutoResizeColumns(); } catch (Exception e) { OutLog("InitForm: " + e.Message + " ** Trace: " + e.StackTrace); FSBOApp.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); } oForm.Freeze(false); return(Result); }//fin InitForm
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = "U_DOCDT,U_CARDCD,U_CARDNM,U_AMTSUM,U_VATSUM,U_DOCTOT,DPMSUM,U_SLPNM,U_BPCD,U_BPNM"; string cv_ColumnsNAM_s = "전기일,매출처,매출처명,매출액,매출부가세,매출합계,미수금,영업사원,대행사,대행사명"; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); }
private void FindData2(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; oGrid1 = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oGrid2 = (SAPbouiCOM.Grid)oForm.Items.Item("grd2").Specific; oGrid2.SelectionMode = BoMatrixSelect.ms_None; StringBuilder pQuery = new StringBuilder(); string sQry = string.Empty; if (iROW != -1) { oForm.Items.Item("edtEMPNO2").Specific.value = oGrid1.DataTable.GetValue("U_EMPNO", iROW); oForm.Items.Item("edtDEPTNM").Specific.value = oGrid1.DataTable.GetValue("U_DEPTNM", iROW); oForm.Items.Item("edtJIKGBNM").Specific.value = oGrid1.DataTable.GetValue("U_JIKGBNM", iROW); oForm.Items.Item("edtJIKCHNM").Specific.value = oGrid1.DataTable.GetValue("U_JIKCHNM", iROW); } //고과항목 그리드호출 try { cv_ColumnsUID_s = "U_CHEKER, U_EMPNM, U_DEPTCD, U_JIKGBCD, U_JIKCHKCD, U_PASSYN, Code"; cv_NoEditable_s = "U_CHEKER, U_EMPNM, U_DEPTCD, U_JIKGBCD, U_JIKCHKCD, Code"; cv_ColumnsNAM_s = "고과,사원,부서,직급,직책,상태,코드"; cv_Right_Just_s = " "; cv_No_Visible_s = "Code"; #region 조회Query pQuery.Clear(); pQuery.AppendLine(" SELECT "); pQuery.AppendLine(" U_CHEKER "); pQuery.AppendLine(" ,U_EMPNM "); pQuery.AppendLine(" ,U_DEPTCD "); pQuery.AppendLine(" ,U_JIKGBCD "); pQuery.AppendLine(" ,U_JIKCHKCD "); pQuery.AppendLine(" ,U_PASSYN "); pQuery.AppendLine(" ,Code "); pQuery.AppendLine(" FROM [@KIS_HR00203_HRD] "); pQuery.AppendLine(" WHERE Code = '{0}' "); sQry = string.Format(pQuery.ToString(), GRIDCODE); #endregion B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd2").ExecuteQuery(sQry); oGrid2.DataTable = oForm.DataSources.DataTables.Item("grd2"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid2.DataTable.Rows.Count == 1 && oGrid2.DataTable.GetValue("U_CHEKER", 0).ToString() == "") { FN.SetGridTitle(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridCombo(ref oGrid2, "U_CHEKER", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR12' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_DEPTCD", "", " SELECT U_DEPTCD,U_DEPTNM FROM [@KIS_HR00401] WHERE U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_JIKGBCD", "", " SELECT U_SMLCD,U_SMLNM FROM [@KIS_AD00101] WHERE CODE = 'HR11' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_JIKCHKCD", "", " SELECT U_SMLCD,U_SMLNM FROM [@KIS_AD00101] WHERE CODE = 'HR14' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_PASSYN", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR11' AND U_USEYN = 'Y'", ""); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid2.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid2.AutoResizeColumns(); } } catch (Exception ex) { oForm.Freeze(false); B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); iROW = -1; GRIDCODE = "SAVE"; oGrid2 = null; } }
}//fin InitForm public new void FormEvent(String FormUID, ref SAPbouiCOM.ItemEvent pVal, ref Boolean BubbleEvent) { SAPbouiCOM.DataTable oDataTable; SAPbouiCOM.IChooseFromListEvent oCFLEvento = null; String sValue; String sValue2; base.FormEvent(FormUID, ref pVal, ref BubbleEvent); try { if (pVal.EventType == BoEventTypes.et_ITEM_PRESSED) { if (pVal.BeforeAction == true) { if (((oForm.Mode == BoFormMode.fm_ADD_MODE) || (oForm.Mode == BoFormMode.fm_UPDATE_MODE)) && (pVal.ItemUID == "1")) { BubbleEvent = false; if (Validar()) { Guardar_Registros(); } } } if ((pVal.BeforeAction == false) && (pVal.ItemUID == "btn_Borrar")) { BorrarLinea(); } } if ((pVal.EventType == BoEventTypes.et_CHOOSE_FROM_LIST) && (!pVal.BeforeAction)) { oForm.Freeze(true); if (pVal.ColUID == "U_CardCode") { oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)(pVal); oDataTable = oCFLEvento.SelectedObjects; if (oDataTable != null) { sValue = ((System.String)oDataTable.GetValue("CardCode", 0)).Trim(); sValue2 = ((System.String)oDataTable.GetValue("CardName", 0)).Trim(); for (Int32 iCont_1 = 0; iCont_1 < odt.Rows.Count; iCont_1++) { if (((System.String)odt.GetValue("U_CardCode", iCont_1)).Length > 0) { var CardCode = ((System.String)odt.GetValue("U_CardCode", iCont_1)); if (CardCode == sValue) { FSBOApp.StatusBar.SetText("Proveedor ya se encuentra en la lista Negra", BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Warning); return; } } } if (GlobalSettings.RunningUnderSQLServer) { s = @"SELECT COUNT(*) 'count' FROM [@VID_FELISTABL] WHERE U_CardCode = '{0}'"; } else { s = @"SELECT COUNT(*) ""count"" FROM ""@VID_FELISTABL"" WHERE ""U_CardCode"" = '{0}'"; } s = String.Format(s, sValue); oRecordSet.DoQuery(s); if (((System.Int32)oRecordSet.Fields.Item("count").Value) > 0) { FSBOApp.StatusBar.SetText("Codigo Proveedor se encuentra en la lista blanca, no se puede seleccionar -> Codigo " + sValue, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Warning); return; } odt.SetValue("U_CardCode", pVal.Row, sValue); odt.SetValue("U_CardName", pVal.Row, sValue2); odt.SetValue("U_Activado", pVal.Row, "Y"); if ((odt.Rows.Count - 1 == pVal.Row) && (sValue != "")) { odt.Rows.Add(1); } ogrid.AutoResizeColumns(); if (oForm.Mode == BoFormMode.fm_OK_MODE) { oForm.Mode = BoFormMode.fm_UPDATE_MODE; } } } } } catch (Exception e) { if (FCmpny.InTransaction) { FCmpny.EndTransaction(BoWfTransOpt.wf_RollBack); } FSBOApp.StatusBar.SetText(e.Message + " ** Trace: " + e.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("FormEvent: " + e.Message + " ** Trace: " + e.StackTrace); } finally { if (oForm != null) { oForm.Freeze(false); } } }//fin FormEvent
}//fin ActualizarRegistros private void ActualizarGrilla() { SAPbouiCOM.GridColumn oColumn; try { //Actualiza grilla if (GlobalSettings.RunningUnderSQLServer) { s = @"select Code, CAST(U_BaseMul AS VARCHAR(11)) U_BaseMul, U_TipoDoc, U_Fecha, U_Desde, U_Hasta, U_Utilizados, U_Asignables, U_CAF from [@VID_FECAF]"; } else { s = @"select ""Code"", TO_VARCHAR(""U_BaseMul"") ""U_BaseMul"", ""U_TipoDoc"", ""U_Fecha"", ""U_Desde"", ""U_Hasta"", ""U_Utilizados"", ""U_Asignables"", ""U_CAF"" from ""@VID_FECAF"" "; } oDataTable.ExecuteQuery(s); ogrid.Columns.Item("Code").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("Code")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.Visible = false; oColumn.TitleObject.Caption = "Código"; ogrid.Columns.Item("U_BaseMul").Type = BoGridColumnType.gct_ComboBox; var colCombo = (ComboBoxColumn)(ogrid.Columns.Item("U_BaseMul")); colCombo.DisplayType = BoComboDisplayType.cdt_Description; colCombo.TitleObject.Caption = "Sociedad"; colCombo.Editable = false; if (bMultiSoc) { colCombo.Visible = true; if (GlobalSettings.RunningUnderSQLServer) { s = @"select DocEntry, U_Sociedad 'Sociedad' from [@VID_FEMULTISOC]"; } else { s = @"select ""DocEntry"", ""U_Sociedad"" ""Sociedad"" from ""@VID_FEMULTISOC"" "; } oRecordSet.DoQuery(s); while (!oRecordSet.EoF) { colCombo.ValidValues.Add(((System.Int32)oRecordSet.Fields.Item("DocEntry").Value).ToString(), ((System.String)oRecordSet.Fields.Item("Sociedad").Value).Trim()); oRecordSet.MoveNext(); } } else { colCombo.Visible = false; } ogrid.Columns.Item("U_TipoDoc").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_TipoDoc")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Tipo Documento"; ogrid.Columns.Item("U_Fecha").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Fecha")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.TitleObject.Caption = "Fecha CAF"; ogrid.Columns.Item("U_Desde").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Desde")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Desde"; ogrid.Columns.Item("U_Hasta").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Hasta")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Hasta"; ogrid.Columns.Item("U_Utilizados").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Utilizados")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "CAF Utilizados"; ogrid.Columns.Item("U_Asignables").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_Asignables")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.RightJustified = true; oColumn.TitleObject.Caption = "Asignables"; ogrid.Columns.Item("U_CAF").Type = BoGridColumnType.gct_EditText; oColumn = (GridColumn)(ogrid.Columns.Item("U_CAF")); //EditTextColumn(oColumn).LinkedObjectType := '86'; oColumn.Editable = false; oColumn.TitleObject.Caption = "XML CAF"; ogrid.AutoResizeColumns(); } catch (Exception x) { FSBOApp.StatusBar.SetText(x.Message + " ** Trace: " + x.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("ActualizarGrilla: " + x.Message + " ** Trace: " + x.StackTrace); } }
private void FindData(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Grid oGrid; StringBuilder sb; string strQueryTp = string.Empty; string strYyyyMm_F = string.Empty; string strYyyyMm_T = string.Empty; string strReadCd_F = string.Empty; string strReadCd_T = string.Empty; string strCentCd_F = string.Empty; string strCentCd_T = string.Empty; string strBillTp = string.Empty; string strISSUEDT_F = string.Empty; string strISSUEDT_T = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; strQueryTp = oUDS.Item("optALL").ValueEx; strYyyyMm_F = oUDS.Item("cboREQYM_F").ValueEx; strYyyyMm_T = oUDS.Item("cboREQYM_T").ValueEx; strReadCd_F = oUDS.Item("edtREAD_F").ValueEx; strReadCd_T = oUDS.Item("edtREAD_T").ValueEx; strCentCd_F = oUDS.Item("edtCENT_F").ValueEx; strCentCd_T = oUDS.Item("edtCENT_T").ValueEx; strBillTp = oUDS.Item("cboBILLTP").ValueEx; strISSUEDT_F = oUDS.Item("edtISSUDT1").ValueEx; strISSUEDT_T = oUDS.Item("edtISSUDT2").ValueEx; sb = new StringBuilder(); //조회 sb.AppendFormat(" EXEC KIS_SP_SO0230F1_HRD @pFOLDLEV = '{0}' ", oForm.PaneLevel.ToString()); sb.AppendFormat(" , @pQUERYTP = '{0}' ", strQueryTp); sb.AppendFormat(" , @pDATE_FR = '{0}' ", strYyyyMm_F); sb.AppendFormat(" , @pDATE_TO = '{0}' ", strYyyyMm_T); sb.AppendFormat(" , @pREAD_FR = '{0}' ", strReadCd_F); sb.AppendFormat(" , @pREAD_TO = '{0}' ", strReadCd_T); sb.AppendFormat(" , @pCENT_FR = '{0}' ", strCentCd_F); sb.AppendFormat(" , @pCENT_TO = '{0}' ", strCentCd_T); sb.AppendFormat(" , @pBILLTP = '{0}' ", strBillTp); sb.AppendFormat(" , @pISSUDT1 = '{0}' ", strISSUEDT_F); sb.AppendFormat(" , @pISSUDT2 = '{0}' ", strISSUEDT_T); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 switch (oForm.PaneLevel) { case 1: oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oForm.DataSources.DataTables.Item("grd1").ExecuteQuery(sb.ToString()); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd1"); //데이터 그리드에 Display FN.SetGirdSort(ref oGrid); FN.SetSumField(ref oGrid, "SUPPAMT"); break; case 2: oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd2").Specific; oForm.DataSources.DataTables.Item("grd2").ExecuteQuery(sb.ToString()); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd2"); //데이터 그리드에 Display FN.SetGirdSort(ref oGrid); FN.SetSumField(ref oGrid, "SUPPAMT"); break; case 3: oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd3").Specific; oForm.DataSources.DataTables.Item("grd3").ExecuteQuery(sb.ToString()); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd3"); //데이터 그리드에 Display FN.SetSumField(ref oGrid, "PRICE,QTY,SUPPAMT"); break; default: oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; break; } //그리드 컬럼셋팅 FN.SetGridCheckBox(ref oGrid, "CHK", true); //그리드 컬럼셋팅 FN.SetGridComboDataBind(ref oGrid, "DOCTP", "R:독자,C:지국", BoComboDisplayType.cdt_Description); //2. 세금그룹 FN.SetComboBoxValidValues(oGrid, "VATGRUP", "SELECT Code, Name FROM OVTG WHERE Code = 'A0' ", FN.Enum_WholeTp.m_Nothing); //3. 계산서발행구분 FN.SetComboBoxValidValues(oGrid, "BILLGBN", "SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE Code ='SO15' ", FN.Enum_WholeTp.m_Nothing); //링크컬럼셋팅 FN.SetGirdColumnLinkedObjec(ref oGrid, "CODE", BoLinkedObject.lf_BusinessPartner); // 독자/지국링크 FN.SetGirdColumnLinkedObjec(ref oGrid, "CARDCODE", BoLinkedObject.lf_BusinessPartner); //FN.SetGirdColumnLinkedObjec(ref oGrid, "VATGRUP", BoLinkedObject.lf_VatGroup); if (oForm.PaneLevel == 3) { FN.SetGridCheckBox(ref oGrid, "ETAX_YN", true); FN.SetGridComboDataBind(ref oGrid, "INPUTP", "A:자동,M:수기", BoComboDisplayType.cdt_Description); FN.SetComboBoxValidValues(oGrid, "DTSTAT", " SELECT U_CD, U_SMLNM FROM [@KIS_AD00101] WHERE Code ='VT14' ", FN.Enum_WholeTp.m_Nothing); } //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && (oGrid.DataTable.GetValue("CODE", 0).ToString() == null || oGrid.DataTable.GetValue("CODE", 0).ToString() == "")) { FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); } else { FN.BindGrid(oGrid , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.NotEditable) , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , "" , GetGridFieldInfo(oForm, oForm.PaneLevel, SO.SO_COMMON_HRD.GridTitleType.AlignRight)); FN.SetColoumnColor(oForm, "grd3", "#E0ECF8", "ETAX_YN,DTINO,DTSTAT"); //그리드 BG 기본색(#E6E6FA) oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_btnFind_AFItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } }
private SAPbouiCOM.DataTable FindData(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Grid oGrid; StringBuilder sb; string strCALLPER = string.Empty; string strColYyyyMm = string.Empty; string strCENTCE_FR = string.Empty; string strCENTCE_TO = string.Empty; try { oForm.Freeze(true); oUDS = oForm.DataSources.UserDataSources; strCALLPER = oUDS.Item("edtCALLPER").ValueEx; strCENTCE_FR = oUDS.Item("edtCENTCD1").ValueEx; strCENTCE_TO = oUDS.Item("edtCENTCD2").ValueEx; sb = new StringBuilder(); //조회 sb.AppendLine(" EXEC KIS_SP_SO0260F1_HRD @pQUERY_TYPE = '{0}' "); sb.AppendLine(" , @pPERSON = '{1}' "); sb.AppendLine(" , @pCENTCD_FR = '{2}' "); sb.AppendLine(" , @pCENTCD_TO = '{3}' "); B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oForm.DataSources.DataTables.Item("grd").ExecuteQuery(string.Format(sb.ToString(), "Q", strCALLPER, strCENTCE_FR, strCENTCE_TO)); oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid.DataTable.Rows.Count == 1 && (oGrid.DataTable.GetValue("U_READCD", 0).ToString() == null || oGrid.DataTable.GetValue("U_READCD", 0).ToString() == "")) { FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); } else { strColYyyyMm = FN.GetRecordsetValue(string.Format(sb.ToString(), "C", "", "", "", "")).Replace("[", "").Replace("]", ""); FN.SetGrdColumnNumber(ref oGrid, "", GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.AlignRight) + "," + strColYyyyMm, "", ""); // 독자 링크버튼추가 FN.SetGirdColumnLinkedObjec(ref oGrid, "U_READCD", BoLinkedObject.lf_BusinessPartner); // 지국 링크버튼추가 FN.SetGirdColumnLinkedObjec(ref oGrid, "U_CENTCD", BoLinkedObject.lf_BusinessPartner); FN.BindGrid(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) + "," + strColYyyyMm , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) + "," + strColYyyyMm , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable) + "," + strColYyyyMm , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , "" , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.AlignRight) + "," + strColYyyyMm); //FN.SetColoumnColor(oForm, "grd3", "#E0ECF8", "ETAX_YN,DTINO,DTSTAT"); //그리드 BG 기본색(#E6E6FA) //oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("ET_btnFind_AFItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } SAPbouiCOM.DataTable dt = oForm.DataSources.DataTables.Item("grd"); return dt; }
private void FindData1(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; EXAMCD = oForm.Items.Item("cboYEAR").Specific.Value; string EMPNO = oForm.Items.Item("edtEMPNO").Specific.Value; string DEPT = oForm.Items.Item("cboDEPT").Specific.Value; try { oGrid1 = (SAPbouiCOM.Grid)oForm.Items.Item("grd1").Specific; oGrid1.SelectionMode = BoMatrixSelect.ms_Single; cv_ColumnsUID_s = "U_EMPNO, U_EMPNM, U_DEPTCD, U_SCORE4, U_GRADE4, U_SCORE1, U_GRADE1, U_SCORE2, U_GRADE2, U_SCORE3, U_GRADE3,U_LASTSAF,U_LASTGAF,Code"; cv_NoEditable_s = "U_EMPNO, U_EMPNM, U_DEPTCD, U_SCORE4, U_GRADE4, U_SCORE1, U_GRADE1, U_SCORE2, U_GRADE2, U_SCORE3, U_GRADE3,U_LASTSAF,U_LASTGAF,Code"; cv_ColumnsNAM_s = "사원코드,사원명,부서,본인점수,본인등급,1차고과점수,1차고과등급,2차고과점수,2차고과등급,3차고과점수,3차고과등급,최종점수,최종등급,코드"; cv_Right_Just_s = " "; cv_No_Visible_s = "Code"; string sQry = ""; sQry = " EXEC KIS_SP_HR0100F0_HRD '" + EXAMCD + "','" + EMPNO + "','" + DEPT + "'"; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.Freeze(true); oForm.DataSources.DataTables.Item("grd1").ExecuteQuery(sQry); oGrid1.DataTable = oForm.DataSources.DataTables.Item("grd1"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid1.DataTable.Rows.Count == 1 && oGrid1.DataTable.GetValue("U_EMPNO", 0).ToString() == "") { FN.SetGridTitle(oGrid1, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid1, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridCombo(ref oGrid1, "U_DEPTCD", "", " SELECT U_DEPTCD,U_DEPTNM FROM [@KIS_HR00401] WHERE U_USEYN = 'Y'", ""); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid1.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid1.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); GRIDCODE = ""; oGrid1 = null; } }
public void SetGridTitle(SAPbouiCOM.Form oForm) { oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); string cv_ColumnsUID_s = " DocEntry, U_TAKEYM, U_TAKEDT, U_SFILE, U_EFILE, U_TOTCNT, U_NEWCNT, U_MODCNT, U_CLOCNT, U_RCLCNT, CreateDate, CreateTime, USER_CODE "; string cv_ColumnsNAM_s = " 문서번호, 신청접수년월, 신청접수일자, 신청파일이름, 결과파일이름, 총건수, 신규등록건수, 변경등록건수, 해지등록건수, 임의해지건수, 실행일자, 실행시간, 실행자 "; string cv_No_Visible_s = " "; FN.SetGridTitle(oGrid, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); //string expr = "BackColor=#DBE4F6&Width(ZIP_CD=80,ADDR_KOR=345)"; //FN.SetColumnProperty(oForm, "grd", expr); }
private void FindData2(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; oGrid2 = (SAPbouiCOM.Grid)oForm.Items.Item("grd2").Specific; oGrid2.SelectionMode = BoMatrixSelect.ms_None; oForm.Freeze(true); //고과항목 그리드호출 try { cv_ColumnsUID_s = "Code,U_DTCD, U_ABILCD, U_COMPOCD, U_BASESC, U_CONTENTS,U_GRADE4,U_GRADE1,U_GRADE2,U_GRADE3,U_LASTGAF"; cv_NoEditable_s = "Code,U_DTCD, U_ABILCD, U_COMPOCD, U_BASESC, U_CONTENTS,U_GRADE4,U_GRADE1,U_GRADE2,U_GRADE3,U_LASTGAF"; cv_ColumnsNAM_s = "코드,구분,역량,구성요소,배점,구성요소내용,평가등급,1차고과등급,2차고과등급,3차고과등급,최종등급"; cv_Right_Just_s = "U_BASESC"; cv_No_Visible_s = "Code"; string sQry = ""; sQry = " EXEC KIS_SP_HR0100F1_HRD '" + EXAMCD + "','" + GRIDCODE + "'"; B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.DataSources.DataTables.Item("grd2").ExecuteQuery(sQry); oGrid2.DataTable = oForm.DataSources.DataTables.Item("grd2"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid2.DataTable.Rows.Count == 1 && oGrid2.DataTable.GetValue("U_DTCD", 0).ToString() == "") { FN.SetGridTitle(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid2, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); FN.SetGridCombo(ref oGrid2, "U_DTCD", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR02' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_ABILCD", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR03' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_COMPOCD", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR04' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_GRADE4", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR15' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_GRADE1", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR15' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_GRADE2", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR15' AND U_USEYN = 'Y'", ""); FN.SetGridCombo(ref oGrid2, "U_GRADE3", "", " SELECT U_SMLCD, U_SMLNM FROM [@KIS_AD00201] WHERE CODE = 'HR15' AND U_USEYN = 'Y'", ""); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid2.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid2.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oGrid2 = null; } oForm.Freeze(false); }
public void SetGridTitle(SAPbouiCOM.Form oForm) { //ADD YOUR ACTION CODE HERE ... try { oForm.Freeze(true); //* 미발행 그리드 초기화 */ oForm.DataSources.DataTables.Add("grd"); oGrid = (SAPbouiCOM.Grid)oForm.Items.Item("grd").Specific; oGrid.DataTable = oForm.DataSources.DataTables.Item("grd"); FN.SetGridTitle(oGrid , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnUid) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.ColumnName) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotVisible) , GetGridFieldInfo(oForm, SO.SO_COMMON_HRD.GridTitleType.NotEditable)); oGrid.RowHeaders.Width = 0; oGrid.AutoResizeColumns(); oGrid.SelectionMode = BoMatrixSelect.ms_NotSupported; } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("SetGridTitle " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oForm.Freeze(false); oForm.Refresh(); } }
private void FindData3(SAPbouiCOM.Form oForm) { string cv_ColumnsUID_s; string cv_NoEditable_s; string cv_ColumnsNAM_s; string cv_Right_Just_s; string cv_No_Visible_s; oGrid3 = (SAPbouiCOM.Grid)oForm.Items.Item("grd3").Specific; oGrid3.SelectionMode = BoMatrixSelect.ms_None; StringBuilder pQuery = new StringBuilder(); string sQry = string.Empty; oForm.Freeze(true); //고과항목 그리드호출 try { string MTCHO = oForm.Items.Item("cboMTCHO").Specific.value; sQry = " SELECT U_COMPOCD,U_COMPONM FROM [@KIS_HR00202_HRD] WHERE Code = '" + GRIDCODE + "' AND U_ABILCD = '" + MTCHO + "'"; oRS.DoQuery(sQry); cv_ColumnsUID_s = ""; cv_NoEditable_s = ""; cv_ColumnsNAM_s = ""; cv_Right_Just_s = " "; cv_No_Visible_s = " "; for (int i = 0; i < oRS.RecordCount; i++) { cv_ColumnsUID_s = cv_ColumnsUID_s + oRS.Fields.Item("U_COMPONM").Value + ","; cv_NoEditable_s = cv_NoEditable_s + oRS.Fields.Item("U_COMPONM").Value + ","; cv_ColumnsNAM_s = cv_ColumnsNAM_s + oRS.Fields.Item("U_COMPONM").Value + ","; oRS.MoveNext(); } cv_ColumnsUID_s = FN.Left(cv_ColumnsUID_s, cv_ColumnsUID_s.Length - 1); cv_NoEditable_s = FN.Left(cv_NoEditable_s, cv_NoEditable_s.Length - 1); cv_ColumnsNAM_s = FN.Left(cv_ColumnsNAM_s, cv_ColumnsNAM_s.Length - 1); #region 조회Query pQuery.Clear(); pQuery.AppendLine(" EXEC [KIS_SP_PIVOT] @SQL = N' "); pQuery.AppendLine(" SELECT U_COMPONM,U_SELVALNM FROM [@KIS_HR00202_HRD] "); pQuery.AppendLine(" WHERE Code = ''{0}'' AND U_ABILCD = ''{1}''' "); pQuery.AppendLine(" , @Pivot = N'U_COMPONM' "); pQuery.AppendLine(" , @Value = N'MAX(U_SELVALNM)' "); pQuery.AppendLine(" , @defaultPivot = NULL "); sQry = string.Format(pQuery.ToString(), GRIDCODE, MTCHO); #endregion B1Connections.theAppl.StatusBar.SetText("데이터 조회중입니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터 조회중입니다 oForm.DataSources.DataTables.Item("grd3").ExecuteQuery(sQry); oGrid3.DataTable = oForm.DataSources.DataTables.Item("grd3"); //데이터 그리드에 Display //조회된 내역이 없어도 1줄이 추가되므로 키값을 체크하여 조회안된 경우 1줄 삭제 if (oGrid3.DataTable.Rows.Count == 1 && oGrid3.DataTable.GetValue(0, 0).ToString() == "") { FN.SetGridTitle(oGrid3, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_No_Visible_s); B1Connections.theAppl.StatusBar.SetText("데이터가 없습니다.", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Warning); //데이터가 없습니다. } else { FN.BindGrid(oGrid3, cv_ColumnsUID_s, cv_ColumnsNAM_s, cv_NoEditable_s, cv_No_Visible_s, "", cv_Right_Just_s); B1Connections.theAppl.StatusBar.SetText("조회완료", SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success); //조회완료 oGrid3.RowHeaders.Width = 0; //FN.SetGirdSort(ref oGrid1); oGrid3.AutoResizeColumns(); } } catch (Exception ex) { B1Connections.theAppl.StatusBar.SetText("btnFIND_OnAfterItemPressed " + ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); } finally { oGrid3 = null; } oForm.Freeze(false); }
public virtual void ET_OnFormResize(ItemEvent pVal) { oForm = B1Connections.theAppl.Forms.Item(pVal.FormUID); // ADD YOUR ACTION CODE HERE ... SAPbouiCOM.Item oItemRet = oForm.Items.Item("retFOLD"); SAPbouiCOM.Item oItemGrd = oForm.Items.Item("grd"); oGrid = oForm.Items.Item("grd").Specific; SAPbouiCOM.Item oItem1Mtx = oForm.Items.Item("mtx1_DUMY"); SAPbouiCOM.Item oItem2Mtx = oForm.Items.Item("mtx2_DUMY"); SAPbouiCOM.Item oItem3Mtx = oForm.Items.Item("mtx1_ORIG"); SAPbouiCOM.Item oItem4Mtx = oForm.Items.Item("mtx2_ORIG"); // 폴더박스 리사이즈 oItemRet.Height = oForm.Height - 110; oItemRet.Width = oForm.Width - 30; // 상담이력 메트릭스 oItem2Mtx.Top = oItem1Mtx.Height + 200; oItem2Mtx.Width = oForm.Width - 425; oItem2Mtx.Height = 140; // 청구데이터(그리드) oItemGrd.Top = oItem1Mtx.Height + 200; oItemGrd.Width = 360; oItemGrd.Height = 140; // 안보이는 메트릭스 oItem3Mtx.Left = oForm.Width + 100; oItem4Mtx.Left = oForm.Width + 100; if (oGrid.Columns.Count > 0) oGrid.AutoResizeColumns(); ((SAPbouiCOM.Matrix)oForm.Items.Item("mtx1_DUMY").Specific).AutoResizeColumns(); ((SAPbouiCOM.Matrix)oForm.Items.Item("mtx2_DUMY").Specific).AutoResizeColumns(); }
private void CargarGrid() { String Periodo = ""; String PeriodoD = ""; String PeriodoH = ""; try { if (oForm.Title == "Libro Diario y Mayor") { Periodo = ((System.String)((ComboBox)oForm.Items.Item("Periodo").Specific).Selected.Value).Trim(); if (GlobalSettings.RunningUnderSQLServer) { s = @"EXEC VID_SP_FE_LibroDiario '{0}'"; } else { s = @"CALL VID_SP_FE_LibroDiario ('{0}')"; } s = String.Format(s, Periodo); odt.ExecuteQuery(s); if (GlobalSettings.RunningUnderSQLServer) { s = @"EXEC VID_SP_FE_LibroMayor '{0}'"; } else { s = @"CALL VID_SP_FE_LibroMayor ('{0}')"; } s = String.Format(s, Periodo); odt2.ExecuteQuery(s); } else if (oForm.Title == "Balance") { PeriodoD = ((System.String)((ComboBox)oForm.Items.Item("PeriodoD").Specific).Selected.Value).Trim(); PeriodoH = ((System.String)((ComboBox)oForm.Items.Item("PeriodoH").Specific).Selected.Value).Trim(); if (GlobalSettings.RunningUnderSQLServer) { s = @"EXEC VID_SP_FE_Balance '{0}', '{1}'"; } else { s = @"CALL VID_SP_FE_Balance ('{0}', '{1}')"; } s = String.Format(s, PeriodoD, PeriodoH); odt.ExecuteQuery(s); if (GlobalSettings.RunningUnderSQLServer) { s = @"EXEC VID_SP_FE_Diccionario '{0}' "; } else { s = @"CALL VID_SP_FE_Diccionario ('{0}')"; } s = String.Format(s, PeriodoD); odt2.ExecuteQuery(s); } else if (oForm.Title == "Diccionario") { Periodo = ((System.String)((ComboBox)oForm.Items.Item("Periodo").Specific).Selected.Value).Trim(); if (GlobalSettings.RunningUnderSQLServer) { s = @"EXEC VID_SP_FE_Diccionario '{0}' "; } else { s = @"CALL VID_SP_FE_Diccionario ('{0}')"; } s = String.Format(s, Periodo); odt.ExecuteQuery(s); } if (!odt.IsEmpty) { oForm.Items.Item("btnExp").Enabled = true; } else { oForm.Items.Item("btnExp").Enabled = false; } for (Int32 z = 0; z < grid.Columns.Count; z++) { grid.Columns.Item(z).Editable = false; } grid.AutoResizeColumns(); if ((oForm.Title == "Libro Diario y Mayor") || (oForm.Title == "Balance")) { if (!odt2.IsEmpty) { for (Int32 z = 0; z < grid2.Columns.Count; z++) { grid2.Columns.Item(z).Editable = false; } grid2.AutoResizeColumns(); } } } catch (Exception x) { FSBOApp.StatusBar.SetText(x.Message + " ** Trace: " + x.StackTrace, BoMessageTime.bmt_Short, BoStatusBarMessageType.smt_Error); OutLog("CargarGrid: " + x.Message + " ** Trace: " + x.StackTrace); } }