屏幕序列Screen Sequences

屏幕序列Screen Sequences

image556

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之间的切换实例可以参考这里

某个屏幕的nextscreenzero时,所在的当前屏幕序列就会结束。如果该序列是通过CALL SCREEN开启的,则返回到该屏幕序列首屏幕被调用的地方(CALL SCREEN XXX的地方);如果该序列是通过Tcode开启的,将会返回到事务码执行处;如果Next Screen0,则会执行下一屏幕的PBO事件块。

Static Next Screen

image557image558

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

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

注:默认选择屏幕1000Next Screen默认是自己,即1000

Dynamic Next Screen

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

SET SCREEN <next screen>.

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

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

image559

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或者next screen是否设置为0

Starting a Screen Sequence

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

Using a Transaction Code

image560

From an ABAP Program

CALL SCREEN <dynnr>.

image561

Inserting Screen Sequences(嵌套屏幕序列)

image562

Calling Modal Dialog Boxes(以弹出对话框显示,非全屏幕)

CALL SCREEN<scrn>

STARTING AT <X1><Y1>

ENDING AT <X2><Y2>.

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

image563

CALL SCREEN的误用

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

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

image564

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

方法如下:

1)静态制定下一屏幕

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

2)动态设置下一屏幕

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

或者

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

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

CALL SCREEN/SET SCREEN/LEAVE TO SCREEN区别

1、CALL SCREEN XXXX将在Screen调用栈(CALL STACK)上面添加一层调用(进栈,即重新开启一个新的屏幕序列),调用XXXXPBOPAI,如果XXXXNext Screen不为0,那么将继续其Next ScreenPBOPAI,如此继续~~~当最后碰到Next Screen0时,该层调用将从调用栈中退出(出栈),然后系统将继续执行CALL SCREEN XXXX之后的语句。

2、SET SCREEN XXXX设置调用栈当前层次的Next ScreenXXXX,它并不影响调用栈的层数(即不会重新开启一个新的屏幕序列,只是做屏幕序列方向的扭转换,只做屏幕之间的切换,而不是屏幕序列之间的切换),除非XXXX0,那将导致调用栈退掉一层(出栈)。要注意的是,PAISET SCREEN XXXX后的语句,系统将照样执行,只有执行完毕该PAI整个逻辑后,才考虑Next ScreenPBOPAI

3、LEAVE TO SCREEN XXXSET SCREENXXX比较类似(也不会重新开启一个新的屏幕序列,只是做屏幕序列方向的扭转换,只做屏幕之间的切换,而不是屏幕序列之间的切换),所不同的是,LEAVE TO SCREEN XXXX将强行中断当前SCREENPAI,直接执行XXXXPBOPAI。换言之,PAILEAVE TO SCREEN XXXX后面的语句,系统将不会执行到。

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

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

CALL SCREENLEAVE TO SCREEN的区别?

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

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

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

原文地址:https://www.cnblogs.com/jiangzhengjun/p/4292556.html