原文：Small Fire · ABAP Form&Function · ABAP 子专栏 · Small Fire 技术笔记

全局变量，局部变量

局部变量：报表程序中选择屏幕事件块(AT SELECTION-SCREEN)、逻辑数据库事件块，以及methods、subroutines (FORM子过程)、Function Modules 中声明的变量为局部变量。

全局变量：其他功能块里声明的变量属于全局变量（报表事件块、列表事件块、对话 module），效果与在程序开头定义的变量一样。

Form & Function

Form中的参数解析

TABLES：Type 和 like 只能参照标准内表类型或标准内表对象

  • FORM <name> TABLES itab1...itabn. ：以表的方式传输数据

USING：值传递，则对形参的修改不会改变实参

  • FORM <name> USING [p1....pn].

CHANGING：使用排序表或则哈希表，如果 CHANGE 值传递，对形参的修改还是会改变实参，在 Form 或则 Function 执行完后才去修改

  • FORM <name> CHANGING [p1....pn].

调用方式

调用指定程序中的子程序：不同的ABAP程序中的子程序是可以共用的

  • PERFORM <sub_name> [CHANGING p1..pn] IN PROFRAM <prog_name>.

通过TCode调用指定程序中的子程序

  • CALL TRANSACTION <TCode>.

使用SUBMIT调用另一个程序：

  • SUBMIT <program_name>.
  • …USING SELECTION-SCREEN <SCR>. 调用子屏幕
  • …VIA SELECTION-SCREEN. 显示所调用程序的初始屏幕
  • …AND RETURN. 调用指定程序执行后可返回上一屏幕

Function Group （SE37）

创建 Function Group 时，系统会自动创建 Main program 与相应的 include 程序。

  • SAPL<fgrp>：主程序名，将Function Group里的所有的Include文件包括进来，只有Include语句
  • L<fgrp>TOP：有FUNCTION-POOL语句，以及所有Function model都可以使用的全局数据定义
  • L<fgrp>UXX：只有 include 语句，为相应具体 Function Model 所对应的 Include 文件名：L<fgrp>U01...包含了对应的 FM 代码。
  • L<fgrp>U01：01,02编号对应 UXX，代表其创建先后的序号。
  • L<fgrp>FXX：用来存放一些 Form 子程序，可以被所有 Function Modules 所使用。
  • L<fgrp>PAI L<fgrp>PBO：PAI,PBO事件。

AT…END (SUM)

AT…END：中的组件名不一定要是结构中的关键字段，但是需要在声明结构时按调用顺序排序。

  • f1，f2，fn. f1，f2，fn

SUM：根据结构中对应的字段进行分组求和，且指定字段之前的依次分组。

事件终止

RETURN

用来退出当前执行的程序块，而不仅仅是退出循环。如FORM，METHOD，报表事件块

STOP

  • INITIALIZATION 中 STOP 会导致跳转到 AT SELECTION-SCREEN OUTPUT 事件块
  • 如果 STOP 在 AT SELECTION-SCREEN OUTPUT 块里，则只是退出当前块，STOP 后面语句不执行而已
  • 如果 STOP 在循环中，FORM、METHOD 直接从被调用的点退出所在事件块

EXIT

INITIALIZATION 中的 EXIT 会跳转到 AT SELECTION-SCREEN OUTPUT 事件

  • 如果 EXIT 在 AT SELECTION-SCREEN OUTPUT 块里，则只是退出当前块，EXIT 后面语句不执行而已
  • 如果 EXIT 在循环中，只是跳出当前循环而已；循环之外的模块则与 RETURN 类似

CHECK

  • CHECK 只是跳出当前事件块，继续下个事件块的处理，相当于方法的 RETURN
  • CHECK 在循环中，只是跳出循环（DO,WHILE,LOOP）类似于 CONTINUE，在循环外则跳出当前执行的程序块

LEAVE

  • LEAVE PROGRAM.：退出整个程序
  • LEAVE TO TRANSACTION <tcode>.：跳转到另外的 TCode
  • LEAVE LIST-PROCESSING.：从 List Processor 回到 Dialog processor
  • LEAVE TO LIST-PROCESSING. ：控制权从 Dialog processor 转交到 List processor
  • LEAVE {SCREEN | {TO SCREEN dynnr}}

REJECT

用在逻辑数据库 GET event blocks 中，可以从循环或则一个 FORM 中直接跳出所在的 GET 事件块。