• ABAP FIELD-SYMBOLS 有大作用- 将没有可改參数的增强出口变得也能改主程序的值了


     

    看下图代码:

    report  z_xul_test2 中 定义了 全局变量 G_DATA1 , 分别调用了 z_xul_tes1 中的 form  和 function zbapi_test , 这两个调用都没有将

    G_DATA1 作为參数,但在两个子程序中通过 field-symbol 成功改动了其值。

    打印结果例如以下:

    假设直接把 G_DATA1 作为一个普通变量来改,在语法检查时就通只是的,但假设利用 field-symbol 在执行期来改动就能够成功改动。

    相同在 function 中也能够改动。 这个function 没有不论什么參数。

    非常有意思,假设碰到增强出口都是不带改动功能的,没法实现通过出口来改程序中的值,这时候,利用这个特点,说不定将不可能变成可能。

    。。

     

    http://blog.csdn.net/fangkailove/article/details/39695519

     測试代码,大家能够自己试试。

    源码:
    *&---------------------------------------------------------------------*
    *& Report  Z_XUL_TEST2
    *&
    *&---------------------------------------------------------------------*
    *&
    *&
    *&---------------------------------------------------------------------*
    
    REPORT  Z_XUL_TEST2.
    
    
    
    DATA:G_DATA1(100).  "定义全局变量
    
    
    G_DATA1 = '111111111111'. "初始值
    WRITE: / , ' REPORT  Z_XUL_TEST2 初始值:' ,G_DATA1.
    
    
    PERFORM TEST1_FORM1 IN PROGRAM ('Z_XUL_TEST1')  . "调用其他程序的 FORM
    WRITE: / , ' 经过Z_XUL_TEST1.TEST1_FORM1改动后:' ,G_DATA1.
    
    
    CALL FUNCTION 'ZBAPI_TEST' . "调用 function module
    WRITE: / , ' 经过 ZBAPI_TEST改动后:' ,G_DATA1.
    
    
    
    
    
    
    *&---------------------------------------------------------------------*
    *& Report  Z_XUL_TEST1
    *&
    *&---------------------------------------------------------------------*
    *& 没有不论什么參数,却改变了主程序里的变量。

    *& *&---------------------------------------------------------------------* REPORT Z_XUL_TEST1. form test1_form1 . "(Z_XUL_TEST2)G_DATA1 = '尝试1'. "G_DATA1 = '尝试1'. FIELD-SYMBOLS:<f1> TYPE any. data fieldname(50). fieldname = '(Z_XUL_TEST2)G_DATA1' . ASSIGN (fieldname) to <f1> . <f1> = '2222222222222222'. ENDFORM. FUNCTION ZBAPI_TEST . FIELD-SYMBOLS:<f1> TYPE any. data fieldname(50). fieldname = '(Z_XUL_TEST2)G_DATA1' . ASSIGN (fieldname) to <f1> . <f1> = '333333333'. ENDFUNCTION.


     

  • 相关阅读:
    zoj 2165
    zoj 1005 Jugs
    谈如何使用c中的qsort快速排序库函数 按主次关键字正确排序
    zoj 3197 Google Book
    zoj 3710 Friends
    IOS编程中比较两个日期的大小
    iOS中常用的四种数据持久化方法简介
    iphone开发基础:loadView/viewDidLoad/initWithNibName/awakeFromNib/initWithCoder的用法
    不通过AppStore发布iOS应用教程
    iOS之视频播放MPMoviePlayerViewController
  • 原文地址:https://www.cnblogs.com/clnchanpin/p/7057648.html
Copyright © 2020-2023  润新知