第一篇:2013清单报表中主要材料设备价格表没有数据显示范文
主要材料设备价格表没有数据显示
2016费用定额的招投标中的主要材料设备价格表显示的是对工程主体质量安全有影响的材料设备。因此,在软件中,用户需要根据工程实际情况将当前工程的主要材料设备进行标记,报表才会体现数据。
1、直接点击
直接将材料设备的【主要材料】的属性勾选起来
2、批量操作
批量选中主要材料设备,右键鼠标选择【批量修改】-【主要材料】-【勾选】即可。
第二篇:ABAP中使用TABLE CONTROL 显示数据以及操作要点小结:
TABLE CONTROL操作要点小结
1.屏幕号:100 2.在屏幕100中应用table control *声明control T1应用于屏幕100 CONTROLS T1 TYPE TABLEVIEW USING SCREEN 100.“T1代表自定义的table control的名字
3.要想给table control中自动赋值,则需把table control中的字段名定义为:WA_SPFLI-CARRID格式。
主程序代码:
*&-------*
*& Report ZTABLECONTROL02_
*&-------* *&CREATOR:
*&-------*
REPORT ZTABLECONTROL02_LIUMING.*引入表spfli TABLES:SPFLI.*定义结构体
TYPES:BEGIN OF TY_DATA, CARRID LIKE SPFLI-CARRID, CONNID LIKE SPFLI-CONNID, COUNTRYFR LIKE SPFLI-COUNTRYFR, CITYFROM LIKE SPFLI-CITYFROM, AIRPFROM LIKE SPFLI-AIRPFROM, FLAG TYPE C, END OF TY_DATA.*定义内表和工作区
DATA:IT_SPFLI TYPE TABLE OF TY_DATA, WA_SPFLI LIKE LINE OF IT_SPFLI.*获取数据
SELECT * FROM SPFLI INTO CORRESPONDING FIELDS OF TABLE IT_SPFLI.*定义分页所需参数
DATA: PAGESIZE TYPE I VALUE 23, “每页条数 NUM TYPE I, ”判断是否刚好是整页
COUNT TYPE I, “总条数
AFTER TYPE I, ”下一页的第一条 PAGECOUNT TYPE I, “总共有几页 PAGENUM TYPE I VALUE 1.”第几页 DESCRIBE TABLE IT_SPFLI LINES COUNT.NUM = COUNT MOD PAGESIZE.IF NUM <> 0.PAGECOUNT = COUNT DIV PAGESIZE + 1.ELSE.PAGECOUNT = COUNT DIV PAGESIZE.ENDIF.*声明变量
DATA:OK_CODE TYPE SY-UCOMM, SAVE_OK TYPE SY-UCOMM.*声明control T1应用于屏幕100
CONTROLS T1 TYPE TABLEVIEW USING SCREEN 100.*调用屏幕100 CALL SCREEN 100.*打印数据
IF NOT IT_SPFLI IS INITIAL.LOOP AT IT_SPFLI INTO WA_SPFLI.WRITE:/2 WA_SPFLI-CARRID,10 WA_SPFLI-CONNID,18 WA_SPFLI-COUNTRYFR, 26 WA_SPFLI-CITYFROM,34 WA_SPFLI-AIRPFROM.ENDLOOP.ENDIF.*&-------*
*& Module STATUS_0100 OUTPUT
*&--------------------* 退出图标
*--------*
MODULE STATUS_0100 OUTPUT.SET PF-STATUS 'STATUS01'.* SET TITLEBAR 'xxx'.ENDMODULE.“ STATUS_0100 OUTPUT
*&-------*
*& Module USER_COMMAND_0100 INPUT
*&-------* * 实现用户命令
*--------*
MODULE USER_COMMAND_0100 INPUT.SAVE_OK = OK_CODE.CLEAR OK_CODE.CASE SAVE_OK.WHEN 'ISWRITE'.”读写转换
PERFORM ISWRITE.WHEN 'ASC'.“升序处理 SORT IT_SPFLI BY CARRID CONNID ASCENDING.WHEN 'DES'.”降序处理
SORT IT_SPFLI BY CARRID DESCENDING CONNID DESCENDING.WHEN 'SHOW'.“用弹出框显示选中行信息
PERFORM SHOW.WHEN 'FIRSTPAGE'.”显示首页
PERFORM FIRSTPAGE.WHEN 'PREVIOUS'.“上一页
PERFORM PREVIOUS.WHEN 'NEXT'.”下一页
PERFORM NEXT.WHEN 'LAST'.“最后一页
PERFORM LAST.WHEN 'SELECTALL'.”选中全部
PERFORM SELECTALL.WHEN 'SELBLOCK'.“选中光标所在行
PERFORM SELBLOCK.WHEN 'DESELALL'.” 取消全选
PERFORM DESELALL.WHEN 'INSERTROW'.“插入一行(内表)
PERFORM INSERTROW.WHEN 'DELETEROW'.”删除选中行(未成功)
PERFORM DELETEROW.WHEN 'LEAVE'.“回到初始屏幕 SELECT * FROM SPFLI INTO CORRESPONDING FIELDS OF TABLE IT_SPFLI.LEAVE TO SCREEN 0.ENDCASE.ENDMODULE.” USER_COMMAND_0100 INPUT *&-------* *& Form ISWRITE
*&-------* * text
*--------* *--> “读写转换
*--------* FORM ISWRITE.DATA COL LIKE LINE OF T1-COLS.LOOP AT T1-COLS INTO COL.IF SY-TABIX = 1 OR SY-TABIX = 2.COL-SCREEN-INPUT = 1.ELSE.IF COL-SCREEN-INPUT = 0.COL-SCREEN-INPUT = 1.ELSE.COL-SCREEN-INPUT = 0.ENDIF.ENDIF.MODIFY T1-COLS FROM COL.ENDLOOP.ENDFORM.” ISWRITE
*&-------* *& Form SHOW
*&-------* * text
*--------*
*--> “用弹出框显示选中行信息
*--------* FORM SHOW.DATA:C_LINE TYPE I, ”定义点击的行id C_INDEX TYPE I.“定义对应的内表中的id
GET CURSOR LINE C_LINE.”鼠标所在的行 C_INDEX = T1-TOP_LINE + C_LINE2)* PAGESIZE.“上两页的最后一条 DELETE IT_SPFLI FROM 1 TO AFTER.PAGENUM = PAGENUM1.ELSEIF PAGENUM = 1.PAGENUM = 1.MESSAGE S000(Z001)WITH '该页是第一页'.ENDIF.ENDFORM.” PREVIOUS
*&-------* *& Form NEXT
*&-------* * text
*--------* *--> “下一页
*--------* FORM NEXT.SELECT * FROM SPFLI INTO CORRESPONDING FIELDS OF TABLE IT_SPFLI.AFTER = PAGENUM * PAGESIZE.”该页的最后一条 DATA AFTER1 TYPE I.AFTER1 =(PAGENUM1.AFTER = P * PAGESIZE.IF PAGENUM = PAGECOUNT.DATA AFTER1 TYPE I.AFTER1 =(PAGENUM1.“TOP_LINE对应第一条数据
READ TABLE IT_SPFLI INTO WA_SPFLI INDEX S_INDEX.WA_SPFLI-FLAG = 'X'.MODIFY IT_SPFLI FROM WA_SPFLI INDEX S_INDEX.ENDFORM.” SELBLOCK
*&-------* *& Form DESELALL
*&-------* * text
*--------* *--> “ 取消全选
*--------* FORM DESELALL.LOOP AT IT_SPFLI INTO WA_SPFLI.IF WA_SPFLI-FLAG = 'X'.WA_SPFLI-FLAG = ''.MODIFY IT_SPFLI FROM WA_SPFLI.ENDIF.ENDLOOP.ENDFORM.” DESELALL
*&-------*
*& Form INSERTROW
*&-------* * text
*--------* *--> “插入一行(内表)
*--------* FORM INSERTROW.CLEAR WA_SPFLI.DATA: I_LINE TYPE I, I_INDEX TYPE I.GET CURSOR LINE I_LINE.INSERT WA_SPFLI INTO IT_SPFLI INDEX I_LINE.ENDFORM.” INSERTROW
*&-------*
*& Form DELETEROW
*&-------* * text
*--------* *--> “删除选中行
*--------* FORM DELETEROW.LOOP AT IT_SPFLI INTO WA_SPFLI.IF WA_SPFLI-FLAG = 'X'.DELETE IT_SPFLI INDEX SY-TABIX.ENDIF.ENDLOOP.ENDFORM.” DELETEROW
*&-------*
*& Module MODI INPUT
*&-------* * text
*--------* MODULE MODI INPUT.MODIFY IT_SPFLI FROM WA_SPFLI INDEX T1-CURRENT_LINE.ENDMODULE." MODI INPUT
屏幕100中的代码:
PROCESS BEFORE OUTPUT.MODULE STATUS_0100.LOOP AT IT_SPFLI INTO WA_SPFLI WITH CONTROL T1.ENDLOOP.PROCESS AFTER INPUT.*MODULE CANCEL AT EXIT-COMMAND.LOOP AT IT_SPFLI.MODULE MODI.ENDLOOP.MODULE USER_COMMAND_0100.
第三篇:科密A1考勤管理系统的问题集锦(十二)日考勤报表没有数据
A1考勤管理系统使用
(五)日考勤报表没有数据
日考勤报表没有数据
首先按照A1考勤系统的简明教程的步骤检查下,看有哪些步骤没有做。正常情况下按步骤操作后,日考勤报表就会有数据了,那么如果还没有数据呢,可能是什么原因?下面先说下A1考勤系统中的日考勤报表的数据是怎么来的,然后再列举下各种可能的原因。
日考勤明细表显示员工当月每一天的考勤刷卡时间,考勤结果明细信息。它是根据人员的考勤信息(班次、公休类别),公司的考勤制度,员工的打卡时间,补签到记录,请假公休加班登记等等这些数据,再做考勤处理后得到的。A1考勤系统对于员工入职日期前、离职日期后的日期不做任何处理,也就是没有记录。因为员工没有在职,就不存在考勤的问题。A1考勤系统的班次设置非常灵活,有班次设置、固定轮班设置、班组设置、员工排班,对于班次唯一的员工还可以设置默认班次,班次定义可以是出勤、公休、加班。班次处理的优先级是:排班>默认班次,也就是可以先设置默认班次,一般的日期都按默认班次处理,当有些天特殊时,才特殊进行排班处理。默认班次可以设置班次、班组、按单周的固定轮班。不管是否有默认班次,某天只要排了班的按排班的班次处理;对于有默认班次,没有排班的日期按默认班次处理;对于没有默认班次,也没有排班的,A1考勤系统无法判断当天是休息还是上班,几点上班,所以不做处理,在考勤处理时会提示出来。
所以,当日考勤报表没有数据时,原因大致如下:
1、没有对查询的日期范围做考勤处理;
2、查询的日期范围内没有人员任职,也就是日期在所有员工入职日期之前、或离职日期之后(很多都是由于人员资料导入后,入职日期为当天,又没有做修改造成;或者不小心对人员做了离职操作);
3、没有设置员工的默认班次也没有排班,导致查询日期范围内员工无班次;