sanlu_new/program/SunRoxmServer/Form XML/FrmPrimaryAttendance.xml

<?xml version="1.0" encoding="utf-8"?>
<Forms>
  <Form Name="FrmPrimaryAttendance">
    <Client>
      <Events>
        <Load>
          <![CDATA[
					@Title="原始考勤资料";
					GetSchema();    
					ChangeMode("Search"); 
          
					]]>
        </Load>
        <Closing>
          ;
        </Closing>
        <Closed>
          ;
        </Closed>
      </Events>
      <Mode>
        <Search>
          <Lable name="Search"/>
        </Search>
      </Mode>
      <Controls>
        <IKDateTimePicker name="dtStart">
          <Events>
            <CheckedChanged>
              dtEnd.Checked = dtStart.Checked;
            </CheckedChanged>
            <ValueChanged>
              dtEnd.CValue = dtStart.CValue;
            </ValueChanged>
          </Events>
        </IKDateTimePicker>
        <IKDateTimePicker name="dtEnd"/>

        <IKTextButton name="tbEmployee1"  DataSource="UI.StartNo_Employee">
          <Events>
            <Click>
              <![CDATA[
								@temp = ShowSearchBox("EmployeeSearch","INFOMATION",tbEmployee1.CValue);
								if( @temp == "" )
									return;
								tbEmployee1.CValue = @temp;	
									]]>
            </Click>
            <TextBoxButtonTextChanged>
              tbEmployee2.CValue = tbEmployee1.CValue;
            </TextBoxButtonTextChanged>
          </Events>
        </IKTextButton>
        <IKTextButton name="tbEmployee2" DataSource="UI.EndNo_Employee" >
          <Events>
            <Click>
              <![CDATA[
								@temp = ShowSearchBox("EmployeeSearch","INFOMATION",tbEmployee2.CValue);
								if( @temp == "" )
									return;
								tbEmployee2.CValue = @temp;	
									]]>
            </Click>
          </Events>
        </IKTextButton>
        
        
        
        <IKButton name="btnSearch">
          <Events>
            <Click>
              Search("SearchAttendanceRecordList",tbEmployee1.CValue!=""?tbEmployee1.CValue:DBNull(),tbEmployee2.CValue!=""?tbEmployee2.CValue:DBNull(),dtStart.CValue,dtEnd.CValue);
            </Click>
          </Events>
        </IKButton>
        
      <IKButton name="btnSearch2">
          <Events>
            <Click>
              Search("SearchDiningRecordList",tbEmployee1.CValue!=""?tbEmployee1.CValue:DBNull(),tbEmployee2.CValue!=""?tbEmployee2.CValue:DBNull(),dtStart.CValue,dtEnd.CValue);
            </Click>
          </Events>
        </IKButton>
        
        <IKButton name="btnEmpty">
          <Events>
            <Click>
              tbEmployee1.CValue="";
              tbEmployee2.CValue="";
              
              Empty();
            </Click>
          </Events>
        </IKButton>

        <IKButton name ="btnPrint">
          <Events>
            <Click>
              PrintReport();
            </Click>
          </Events>
        </IKButton>
        <IKDataGridEx name="dgAttendanceRecordList" DataSource="AttendanceRecordList" TableStyleIndex="0">
          <DataColumn Index="0" DataSource="AttendanceRecordList.Name_Employee" />
          <DataColumn Index="1" DataSource="AttendanceRecordList.Date_AttendanceRecord" />
        </IKDataGridEx>

        <IKFormToolBar name="toolBar">
          <Events>
            <ClickFirst>
              ;
            </ClickFirst>
            <ClickPrev>
              ;
            </ClickPrev>
            <ClickNext>
              ;
            </ClickNext>
            <ClickLast>
              ;
            </ClickLast>
            <ClickNew>
              ;
            </ClickNew>
            <ClickEmpty>
              ;
            </ClickEmpty>
            <ClickSubmit>
              ;
            </ClickSubmit>
            <ClickModify>
              ;
            </ClickModify>
            <ClickDelete>
              ;
            </ClickDelete>
            <ClickPrint>
              ;
            </ClickPrint>
            <ClickAudit>
              ;
            </ClickAudit>
            <ClickUnAudit>
              ;
            </ClickUnAudit>
            <ClickImport>
              ;
            </ClickImport>
            <ClickExport>
              ;
            </ClickExport>
            <ClickClose>
              ;
            </ClickClose>
            <ClickExpand>
              ;
            </ClickExpand>
          </Events>
        </IKFormToolBar>
      </Controls>
      <ChildForms>
        <ChildForm name="EmployeeSearch" DataSource="Employee" SearchFunction="SearchAllEmployee" SearchFunctionByNo="" MappingName="员工" >
          <DataColumn Index="0" MappingName="#Employee.No_Employee"			HeaderText="员工编号" Width="90" ColumnType="IKDataGridTextBoxColumn" />
          <DataColumn Index="1" MappingName="#Employee.Name_Employee"		HeaderText="员工名称" Width="90" ColumnType="IKDataGridTextBoxColumn"/>
        </ChildForm>
      </ChildForms>
    </Client>
    <Server>
      <Tables>
        <Table name="AttendanceRecordList" Type="Child">
          <GetSchema CmdType="Text" CmdText="	SELECT Top 0 Employee.Name_Employee,AttendanceRecord.Date_AttendanceRecord 
                                              FROM AttendanceRecord
                                              Join Employee On Employee.CardNo_Employee=AttendanceRecord.No_Card  ">
            
          </GetSchema>
        </Table>
      </Tables>
      <Search>
        <SearchAllEmployee CmdType="Text" CmdText="SELECT Employee.No_Employee,Employee.Name_Employee FROM Employee ">
          <Tables>
            <Table name="AllEmployee" />
          </Tables>
        </SearchAllEmployee>
        <SearchAttendanceRecordList CmdType="Text" CmdText="
                                                            SELECT Employee.Name_Employee,AttendanceRecord.Date_AttendanceRecord 
                                                            FROM AttendanceRecord
                                                            Join Employee On Employee.CardNo_Employee=AttendanceRecord.No_Card
                                                            Where No_Employee Between IsNull(@StartNo_Employee,No_Employee) And IsNull(@EndNo_Employee,No_Employee)
		                                                        AND Date_AttendanceRecord Between isnull(DateAdd(day,DateDiff(day,0,@StartDate),0),Date_AttendanceRecord) AND Isnull(DateAdd(day,DateDiff(day,0,@EndDate),1),Date_AttendanceRecord)
                                                            Order By Date_AttendanceRecord,Name_Employee
                                                            ">
          <Params>
            <Param name="@StartNo_Employee"				      type="Employee.No_Employee"			                  index="0"/>
            <Param name="@EndNo_Employee"				        type="Employee.No_Employee"			                  index="1"/>
            <Param name="@StartDate"				            type="SaleBill.Date_SaleBill"			      index="2"/>
            <Param name="@EndDate"				              type="SaleBill.Date_SaleBill"			      index="3"/>
          </Params>
          <Tables>
            <Table name="AttendanceRecordList" />
          </Tables>
        </SearchAttendanceRecordList>

        <SearchDiningRecordList CmdType="Text" CmdText="
                                                            SELECT Employee.Name_Employee,Date_AttendanceRecord 
                                                            FROM DiningRecord
                                                            Join Employee On Employee.CardNo_Employee=DiningRecord.No_Card
                                                            Where No_Employee Between IsNull(@StartNo_Employee,No_Employee) And IsNull(@EndNo_Employee,No_Employee)
		                                                        AND Date_AttendanceRecord Between isnull(DateAdd(day,DateDiff(day,0,@StartDate),0),Date_AttendanceRecord) AND Isnull(DateAdd(day,DateDiff(day,0,@EndDate),1),Date_AttendanceRecord)
                                                            Order By Date_AttendanceRecord,Name_Employee
                                                            ">
          <Params>
            <Param name="@StartNo_Employee"				      type="Employee.No_Employee"			                  index="0"/>
            <Param name="@EndNo_Employee"				        type="Employee.No_Employee"			                  index="1"/>
            <Param name="@StartDate"				            type="SaleBill.Date_SaleBill"			      index="2"/>
            <Param name="@EndDate"				              type="SaleBill.Date_SaleBill"			      index="3"/>
          </Params>
          <Tables>
            <Table name="AttendanceRecordList" />
          </Tables>
        </SearchDiningRecordList>

      </Search>

    </Server>
    <Lables>
      <Search>
        ;
      </Search>
    </Lables>
  </Form>
</Forms>