abap教程subroutine的代碼就在調用它程式里

一.SubroutineInternalSubroutines:Subroutines的代碼就在調用它的程式里ExternalSubroutines:SubroutinesABAP/4Subroutine的呼叫可分成InternalCall和ExternalCall,前者撰寫在程式中,後者存在另一程式中,通常為專存放Subroutine的公用程式集,可提供Subroutine的FORM<subr><subroutinestatementblock>(1).InternalCall語法PERFORM<subr>[<pass>]NUM1=100. NUM2=200. SUM=NUM1+WRITE:/‘NUM1+NUM2=‘,SUM.執(zhí)行結果 NUM1+NUM2=(2).ExternalCall語法

<subr>(<prog>)[<pass>][IFIFFOUND:找到才執(zhí)行 WRITE:/‘USERNAME:‘,SY-UNAME.HEADER (3).ExternalCall另一專存放副程式的程式檔,所CALL的Subroutine和存放該Subroutine的副程式名都存放在變量中

PROGRAM(<fprog>)[<pass>][IF WRITE:/‘USERNAME:’,SY-UNAME. 在程式中呼叫FORMPOOL中的SUB2SUBNAME=‘SUB2’.PROGNAME=‘FORMPOOL’. IN(PROGNAME)IFABAP/4CallBy傳參數(shù)時將資料的存放位址(address)傳至參數(shù)中,也就是副程式中的參數(shù)變變數(shù)共用位址內的值,又稱為CallByAddress,若在副程式中位址中的值改變了,外部實際變數(shù)的值也會跟著改變語法

[USING<f1><f2>…][CHANGING<f1>…] [USING<f1><f2>…][CHANGING<f1>…]Using之後接在副程式中不會改變的變數(shù),CHANGINGUSINGSUM=NUM1= WRITE:/NUM1,NUM2,SUM “SUM由0變成300 執(zhí)行結果 CallBy傳參數(shù)時將資料的值複製一份至另一位址中,所以在副程式中參數(shù)變數(shù)值改變,並不會影響外部實際變數(shù)的值語法 使用VALUE(<f1>)表示<f1>是CallByValue SUM=NUM1= WRITE:/ “NUM1值還是 SUM由0變成 SUM= NUM1> SUM*NUM1.NUM1=NUM1–1.執(zhí)行結果 CallByValueandReturn傳入?yún)?shù)值的方式同CallByValue,但在副程式結束執(zhí)行時會將傳入的參數(shù)一份傳回給外部實際變數(shù).執(zhí)行過程中外部實際參數(shù)不變語法 …..CHANGING ….CHANGING….<f1>SUM=NUM1= WRITE:/NUM1,NUM2,SUM “SUM由0變成300 0

WRITE:/ “得到結果為 執(zhí)行結果 “在副程式中SUM “返回程式時,將變數(shù)S給“所以SUM值變成1,PASSINGWITHUSI