屏幕序列Screen Sequences

声明：原创作品，转载时请注明文章来自SAP师太技术博客（ 博/客/园ｗｗｗ.ｃｎｂｌｏｇｓ.ｃｏｍ）：www.cnblogs.com/jiangzhengjun，并以超链接形式标明文章原始出处，否则将追究法律责任！原文链接：http://www.cnblogs.com/jiangzhengjun/p/4292556.html

CALL TRANSACTION/LEAVE TO TRANSACTION/SUBMIT… AND RETURN/ SUBMIT

屏幕序列Screen Sequences

SY-DYNNR系统变量存储了当前屏幕的屏号

ABAP program中的dialog modules 仅仅只能在同一程序中的screens中调用

可以在同一程序中从一个屏幕导航到别一个屏幕，也可以重复某个屏幕序列中某个屏幕N次

如果要开启一个屏幕序列，你可以调用它的第一个屏幕。开启屏幕序列的方法有两种：通过Tcode（在事务码中设置序列中的首屏幕），或者在ABAP program中通过CALLSCREEN语句。如果是通过CALLSCREEN语句来开启的，则会将新开启的屏幕序列嵌套到当前屏幕序列中去。

可能在Screen Painter中为每一个屏幕设置它的nextscreen，这是一种static screen sequence。但是，可以在处理块中重写statically-defined next screen，这就是dynamic screensequences

如果不想让屏幕序列中的某个屏幕显示，则可以在该屏幕是的PBO中使用SUPPRESS DIALOG语句阻止它们的显示。当使用SUPPRESS DIALOG语句时，虽然屏幕不会显示，但PBO 与 PAI块还是会被处理。当你在屏幕序列中显示一个List是很有用的（屏幕与List之间的切换实例可以参考这里）

，则会执行下一屏幕的PBO事件块。

Static Next Screen

所有的屏幕都有Next screen静态属性，但这个静态属性可以在程序中动态的绕过这个静态的Next screen。

如果静态属性next screen没有设置或设置为0，且在程序运行时没有重写它，则当前屏幕就是它所在屏幕序列的最后一个屏幕。当屏幕处理完后，控件权将返回到屏幕序列调用处（即屏幕序列的启始处）：如果屏幕序列是嵌套的，系统将返回到前一个屏幕序列中开启（调用）当前屏幕序列的CALL SCREEN语句处（注意：每调用一次CALL SCREEN语句就会开启一个新的屏幕序列，如果是在某个屏幕的PBO或是PAI块里调用的CALL SCREEN语句，则就会形成嵌套的屏幕序列）。

注：默认选择屏幕1000的Next Screen默认是自己，即1000

Dynamic Next Screen

可以动态的使用SET SCREEN 语句来重新设置静态定义的next screen：

SET SCREEN <next screen>.

该语句只是暂的修改静态定义的next screen，静态next screen会保持。如果<next screen>为0，则当前屏幕将会是屏幕序列中的最后一个屏幕。

注：此语句不会终止当前屏幕后续语句的执行，如是要立即离开当前屏幕不执行该语句后续语句，则要使用LEAVE语句。

Leaving a Screen from a Program

如果要离开屏幕，则可能使用下面词句：

LEAVE SCREEN.

or

LEAVE TO SCREEN <next screen>.

LEAVE SCREEN语句会结束当前屏幕并调用下一屏幕，next scree可以是static next screen，或者是dynamic next screen，如果是动态的，你必须在使用LEAVE SCREEN语句前使用SET SCREEN语句来重写static next screen。

LEAVE TO SCREEN语句会结束当前屏幕并跳转到指定的下一屏幕<next screen>，其作用等效于下面两条语句：

SET SCREEN <next screen>.

LEAVE SCREEN.

这两个语句不会结束屏幕序列，它们或者next screen是否设置为0。

Starting a Screen Sequence

以下情况都可以开启一个新的屏幕序列

Using a Transaction Code

From an ABAP Program

CALL SCREEN <dynnr>.

Inserting Screen Sequences（嵌套屏幕序列）

Calling Modal Dialog Boxes（以弹出对话框显示，非全屏幕）

CALL SCREEN<scrn>

STARTING AT <X1><Y1>

ENDING AT <X2><Y2>.

x1、y1、x2、y2分别表示选择屏幕显示的左上角和右下角的列号、行号

CALL SCREEN的误用

最近一个网友提到他在做SCREEN编程时，一旦屏幕之间切换次数过多就会出现堆栈溢出的错误。经过分析他提供的信息，我得出错误的原因是他错误地使用CALL SCREEN语句来做屏幕之间的切换。由于SAP系统每次碰到CALL SCREEN语句就会产生新的SCREEN SEQUENCE（参见下图），而且SAP系统设置了SCREEN SEQUENCE堆栈个，一旦超过就会出溢出错误。网友就是错误的使用CALL SCREEN 100 和 CALL SCREEN 200进行屏幕切换，不断地产生新的SCREEN SEQUENCE，可想而知溢出是必然的。时，SCREEN SEQUENCE的才会结束，程序在这个时候才回到CALL SCREEN的调用之处（也就是说我们可以用LEAVE TO SCREEN 0来结束当前SCREEN SEQUENCE）。

注：如果某个选择屏幕是被其他屏幕通过CALL SELECTION-SCREEN XXX调用显示的，则按此选择屏幕上标准工具栏中的 Back 按钮时，会结束掉该选择屏幕所在的屏幕序列，返回到调用CALL SELECTION-SCREEN XXX语句所在的屏幕序列（即选择屏幕所在序列的上一屏幕序列）。注：如果所按的Back按钮不是最上层屏幕，则Back按钮还是会返回到同一屏幕序列中的上一个屏幕，所以Back按钮要想结束掉当前屏幕所在的序列，则要求Back按钮所在的屏幕为当前屏幕序列中的第一个屏幕。

为了避免产生新的SCREEN SEQUENCE，我们常常使用静态下一屏幕或动态下一屏幕来进行屏幕之间的切换。

方法如下：

1）静态制定下一屏幕

在进行屏幕设计时制定下一个屏幕；

2）动态设置下一屏幕

SET SCREEN 200. "该语句只是动态制定下一个屏幕，但不结束当前屏幕处理（即不立即跳转下一屏幕），只有LEAVE SCREEN才会结束屏幕的处理（后面的语句才不会执行）
LEAVE SCREEN.

或者

LEAVE TO SCREEN 200."相当于上面两包的组合：SET SCREEN 200. LEAVE SCREEN.

请使用SET SCREEN XXX / LEAVE SCREEN，LEAVE TO SCREEN XXX来在同一屏幕序列里动态的进行屏幕切换跳转，而不要使用CALL SCREEN XXX来进行屏幕序列的跳转与切换

CALL SCREEN/SET SCREEN/LEAVE TO SCREEN区别

1、CALL SCREEN XXXX将在Screen调用栈（CALL STACK）上面添加一层调用（进栈，，那么将继续其Next Screen的PBO和PAI，如此继续~~~当最后碰到Next Screen为0时，该层调用将从调用栈中退出（出栈），然后系统将继续执行CALL SCREEN XXXX之后的语句。

2、SET SCREEN XXXX设置调用栈当前层次的Next Screen为XXXX，它并不影响调用栈的层数，那将导致调用栈退掉一层（出栈）。要注意的是，PAI中SET SCREEN XXXX后的语句，系统将照样执行，只有执行完毕该PAI整个逻辑后，才考虑Next Screen的PBO和PAI。

3、LEAVE TO SCREEN XXX与SET SCREENXXX比较类似（也不会重新开启一个新的屏幕序列，只是做屏幕序列方向的扭转换，只做屏幕之间的切换，而不是屏幕序列之间的切换），所不同的是，LEAVE TO SCREEN XXXX将强行中断当前SCREEN的PAI，直接执行XXXX的PBO和PAI。换言之，PAI中LEAVE TO SCREEN XXXX后面的语句，系统将不会执行到。

4、LEAVE SCREEN. 后面的语句也不会执行

注：上面语句的XXX也可以是选择屏幕的屏幕号，而不只是对话屏幕号

CALL SCREEN与LEAVE TO SCREEN的区别？

CALL SCREEN是将正在运行的画面挂起，进入所调用的画面，当使用LEAVE TO SCREEN 0时，能够返回原主调画面，可理解为嵌套调用；而LEAVE TO SCREEN是立即结束本画面的执行，调用所指定的画面，在调用画面中，无法再返回原主调画面。

CALL TRANSACTION/LEAVE TO TRANSACTION/SUBMIT… AND RETURN/ SUBMIT

在ABAP中，CALL TRANSACTION和SUBMIT report_nameAND RETURN语句，也都是在调用栈上添加一层调用，与CALL SCREEN有点类似。而LEAVE TO TRANSACTION以及SUBMIT report_name则是在调用栈当前层次的一个跳转（调用语句后面的语句不在执行），与LEAVE TO SCREEN类似。