FIELD-SYMBOLS.docVIP

下载本文档

4
0
约8.25千字
约 12页
2016-12-29 发布于重庆
举报
版权申诉

FIELD-SYMBOLS.doc

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

(一)定义1 . FIELD-SYMBOLS: fs [type]为内部字段定义field-symbols .????当不输入type时﹐fs继承赋给它的变量的所有属性????当输入type时﹐赋给它的变量必须与fs同类型例如﹕ (说明﹕用户日期格式为dd.mm.yyyy)FIELD-SYMBOLS: f1 .DATA: dat(8) VALUE.ASSIGN dat TO f1 .WRITE:/ f1 .f1继承dat属性﹐为C型﹐输出为:FIELD-SYMBOLS: f1 TYPE d.DATA: dat(8) VALUE.ASSIGN dat TO f1 .WRITE:/ f1 .f1类型为D型﹐而dat为C型﹐类型不匹配﹐出现语法错误FIELD-SYMBOLS: f1 TYPE d.DATA: dat(8) VALUE.ASSIGN dat TO f1 TYPE D .WRITE:/ f1 .f1类型为D型﹐而dat为C型﹐类型不匹配﹐但TYPE ‘D’是将dat类型转换成D型再分配给f1?????输出为2.定义结构化的field-symbols??? FIELD-SYMBOLS: fs STRUCTURE s DEFAULT f .首先将f指派给fs ,然后fs继承结构s的属性注意点: a. s中不包涵类型为I或F字段时﹐f的定义长度= s所有字段长度之和﹐否则语法错误????????? b. s中包涵类型为I或F字段时﹐f最好为结构类型﹐且结构应该同与s ﹐否则容易出错例如﹕DATA: wa(100) VALUE 001LH 123419950627 .DATA: BEGIN OF line1 ,????????? col1(6) TYPE c,????????? col2(4) TYPE c,????????? col3(8) TYPE c,?????? END OF line1.FIELD-SYMBOLS: f1 STRUCTURE sbook DEFAULT wa . “sbook为SAP现存结构FIELD-SYMBOLS: f2 STRUCTURE line1 DEFAULT wa .WRITE:/ f1-mandt, f1-carrid, f1-connid, f1-fldate .WRITE:/ f2-col1, f2-col2, f2-col3 .输出结果﹕ 001 LH 1234 27.06.1995001LH 1234如果下列代码就会出错﹕ (原因wa没有line1长)DATA: wa(17) VALUE 001LH 123419950627 .DATA: BEGIN OF line1 ,????????? col1(6) TYPE c,????????? col2(4) TYPE c,????????? col3(8) TYPE c,?????? END OF line1.FIELD-SYMBOLS: f2 STRUCTURE line1 DEFAULT wa .结构中含有I, F类型的结构例如﹕DATA: BEGIN OF line1 ,????????? col1 TYPE i,????????? col2(4) TYPE c,?????? END OF line1.DATA: BEGIN OF line2,????????? col1 TYPE i,????????? col2(4) TYPE c ,?????? END OF line2 .line2-col1 = 8 . line2-col2 = test .FIELD-SYMBOLS: f2 STRUCTURE line1 DEFAULT line2 .WRITE:/ f2-col1, f2-col2 .输出结果﹕ 8 test如果如下则错误(因为line2长度 line1 )DATA: BEGIN OF line1 ,????????? col1 TYPE i,????????? col2(5) TYPE c,?????? END OF line1.DATA: BEGIN OF line2,????????? col1 TYPE i,????????? col2(4) TYPE c ,?????? END OF line2 .line2-col1 = 8 . line2-col2 = test .FIELD-SYMBOLS: f2 STRUCTURE line