- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
常量定义 CONSTANTS: cns_pi TYPE P DECIMALS 10 VALUE 3.1415926536‘, cns_flag(1) type c value ‘X’. CONSTANTS: BEGIN OF myaddress,?????????? name(20)????TYPE c??VALUE Fred Flintstone,?????????? street(20)??TYPE c??VALUE Cave Avenue,?????????? umber??????TYPE p??VALUE??11,????????? postcode(5) TYPE n??VALUE??98765,?????????? city(20)????TYPE c??VALUE??Bedrock,?????????? END OF myaddress. WRITE语句 按照指定的格式把变量里面的数据输出到屏幕 根据选项的不同,WRITE语句可以输出到屏幕、输出到变量、以复选框的形式输出、以图标的格式输出 语法: Write f. Write AT [/][pos][(len)] f . / : 先往下一行 pos : 屏幕X轴坐标 (len): 显示的长度 SKIP [n] .产生 n 个空白行 SKIP TO LINE [n]. 跳到指定行 Write f 显示格式参数. 划线 报表和表单中横线和竖线的输出 横线: Uline. “画一条长线,长度为整个屏幕的宽度 Write 30 (20)sy-uline. “在位置30开始画长度为20的横线 竖线: write 30 sy-vline. “在位置30点开始画竖线,长度为一行 write 60 ‘|’. “在位置60点开始画竖线,长度为一行 报表中常用的系统常量(结构:SYST) SY-UNAME: 报表生成者 SY-DATUM: 系统日期 SY-UZEIT: 系统时间 SY-PAGNO: 页码 SY-INDEX: 行索引 WRITE语句 LEFT-JUSTIFIED 资料靠左显示 CENTERED 资料靠中间显示 RIGHT-JUSTIFIED 资料靠右显示 UNDER g 在资料项g的X轴开始坐标显示 NO-GAP 紧接着显示, 不留空格 USING EDIT MASK m 使用内嵌字符显示, 如 11:20:30 USING NO EDIT MASK 不使用内嵌字符 NO-ZERO 数字前面0 的部分不显示 NO-SIGN 不显示正负号 DECIMALS d 显示 d 位小数字数 EXPONENT e F(浮点数) exponent 的值 ROUND r 四舍五入至小数位数下 r 位 CURRENCY c 币别显示 DD/MM/YY 日期显示格式 MM/DD/YY DD/MM/YYYY MM/DD/YYYY DDMMYY MMDDYY YYMMDD WRITE语句 WRITE ‘First Line ’. WRITE / 6 ‘Second Line’. 输出结果: First Line Second Line DATA: NUMBER TYPE I VALUE ‘1234567890’. TEXT(10) VALUE ‘ABCDEFGHIJ’. WRITE: (5) NUMBER, /(6) TEXT. 输出结果: 7890 ABCDEF DATA: X TYPE I VALUE ‘112030’. WRITE X USING EDIT MASK ‘__:__:__’. 输出结果为 11:20:30 WRITE X USING EDIT MASK ‘$___,___’ 输出结果为 $112,030 ABAP数据操作 字符串数据处理 1.字符串移位 语法: SHIFT c [BY n PLACES] [modes] modes : (1).空白, 字符串往左移一位 (2).LEFT, 字符串往左移 n 位
文档评论(0)