SAP ABAP 互动报表 鼠标手形 颜色字体
来源:互联网 发布:js 动态修改input样式 编辑:程序博客网 时间:2024/04/30 09:24
原文地址:http://space.itpub.net/html/42/332542-53678.html
REPORT ZRL003.
TABLES: EKKO.
**---Initial table ekko
TYPES: BEGIN OF STR_EKKO,
EBELN LIKE EKKO-EBELN,
BUKRS LIKE EKKO-BUKRS,
EKGRP LIKE EKKO-EKGRP,
END OF STR_EKKO.
DATA: WA_EKKO TYPE STR_EKKO,
IT_EKKO TYPE TABLE OF STR_EKKO.
**---Initial table ekpo
TYPES: BEGIN OF STR_EKPO,
EBELN LIKE EKPO-EBELN,
NETPR LIKE EKPO-NETPR,
END OF STR_EKPO.
DATA: WA_EKPO TYPE STR_EKPO,
IT_EKPO TYPE TABLE OF STR_EKPO.
**---selection screen
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS:P_BUKRS LIKE EKKO-BUKRS OBLIGATORY DEFAULT '1000'.
SELECT-OPTIONS: S_EKGRP FOR EKKO-EKGRP.
SELECTION-SCREEN END OF BLOCK B1.
**---Start-of-selection
PERFORM GET_DATA.
**---End-of-selection
PERFORM DISPLAY_HEADER.
PERFORM DISPLAY_DATA.
**---at line-selection
AT LINE-SELECTION.
CHECK NOT WA_EKKO-EBELN IS INITIAL.
PERFORM SELECT_DATA.
PERFORM GET_MYDATA.
*&---------------------------------------------------------------------*
*& Form get_data
*&---------------------------------------------------------------------*
* Get data from database
*----------------------------------------------------------------------*
FORM GET_DATA .
SELECT EBELN BUKRS EKGRP
INTO CORRESPONDING FIELDS OF TABLE IT_EKKO
FROM EKKO
WHERE BUKRS = P_BUKRS
AND EKGRP IN S_EKGRP.
ENDFORM. " get_data
*&---------------------------------------------------------------------*
*& Form display_data
*&---------------------------------------------------------------------*
* Display data
*----------------------------------------------------------------------*
FORM DISPLAY_DATA .
LOOP AT IT_EKKO INTO WA_EKKO.
**鼠标变成手型
FORMAT HOTSPOT ON.
**格式化字体
FORMAT COLOR COL_KEY INTENSIFIED ON.
WRITE: AT /5 WA_EKKO-EBELN.
FORMAT RESET.
WRITE: AT 16 WA_EKKO-BUKRS,
21 WA_EKKO-EKGRP.
**Hide数据
HIDE: WA_EKKO-EBELN.
ENDLOOP.
ENDFORM. " display_data
*&---------------------------------------------------------------------*
*& Form display_header
*&---------------------------------------------------------------------*
* Display header
*----------------------------------------------------------------------*
FORM DISPLAY_HEADER .
WRITE: AT /5 '采购凭证号',
16 '工厂',
21 '采购组'.
ENDFORM. " display_header
*&---------------------------------------------------------------------*
*& Form select_data
*&---------------------------------------------------------------------*
* Select Data from database
*----------------------------------------------------------------------*
FORM SELECT_DATA .
SELECT EBELN NETPR
INTO CORRESPONDING FIELDS OF TABLE IT_EKPO
FROM EKPO
WHERE EBELN = WA_EKKO-EBELN.
ENDFORM. " select_data
*&---------------------------------------------------------------------*
*& Form get_mydata
*&---------------------------------------------------------------------*
* Display ekpo data
*----------------------------------------------------------------------*
FORM GET_MYDATA .
***---Write header
WRITE: AT /5 '采购凭证号',
AT 16 '采购凭证中的净价格'.
LOOP AT IT_EKPO INTO WA_EKPO.
WRITE: AT /5 WA_EKPO-EBELN.
WRITE: AT 16 WA_EKPO-NETPR.
ENDLOOP.
ENDFORM. " get_mydata
- SAP ABAP 互动报表 鼠标手形 颜色字体
- SAP ABAP编程 报表篇
- SAP ABAP上传下载报表程序
- html添加下划线,下划线颜色,字体颜色,下移,且鼠标为手型
- ABAP:SAP报表性能的优化
- ABAP:SAP报表性能的优化
- ABAP:SAP报表性能的优化
- SAP ABAP OALV单元格颜色设置
- SAP ABAP OALV单元格颜色设置
- 手形鼠标
- 鼠标变为手形
- 手形鼠标
- SAP ABAP/4学习---报表分析分组显示
- ABAP--在SAP中设计自动刷新的报表代码
- ABAP--在SAP中设计自动刷新的报表代码
- ABAP--在SAP中设计自动刷新的报表代码
- ABAP--在SAP中设计自动刷新的报表代码
- 为ABAP程序拷贝一个标准SAP报表执行菜单
- 文本相似度计算--余弦定理和广义Jaccard系数
- Tomcat服务器html页面乱码
- django管理功能POST提交数据总是出现错误,而实际是提交成功的
- 石门县西北乡的路是全国最烂的省级公路
- 校内的技术架构
- SAP ABAP 互动报表 鼠标手形 颜色字体
- 新浪的新闻发布规范
- 电容的作用和分类
- struts1 与 struts2 比较
- Swing 改变观感 UIManager.setLookAndFeel UIManager.update.updateLookAndFeel(..)
- 设置Netbeans的用户界面语言(Set Netbeans user interface language)
- 使用jQuery在Div中加载其他页面
- Swing 概述入门
- Godaddy美国主机推荐