Rexx - 子程式

---

---

在任何程式語言中，整個程式都被分解成邏輯模組。這使得編寫易於維護的程式碼變得更容易。這是任何程式語言的基本要求。

在 Rexx 中，可以使用子程式和函式編寫模組。讓我們詳細瞭解子程式。

定義子程式

函式宣告的語法如下：

FunctionName: 
   Statement#1 
   Statement#2 
   …. 
   Statement#N

其中，

• FunctionName - 這是分配給子程式的名稱。

• Statement#1 .. Statement#N - 這些是構成子程式的語句列表。

以下程式是一個簡單的示例，展示了子程式的使用。

/* Main program */ 
call add 
exit 
add: 
a = 5 
b = 10 
c = a + b 
say c 

關於上述程式，應注意以下幾點：

• 我們正在定義一個名為 add 的子程式。

• 子程式執行簡單的加法功能。

• 必須使用 exit 語句來表示主程式的結束。

上述程式的輸出如下：

15

使用引數

也可以在 Rexx 中使用引數。以下示例演示瞭如何實現這一點。

/* Main program */ 
call add 1,2 
exit 
add: 
PARSE ARG a,b 
c = a + b 
say c

關於上述程式，應注意以下幾點：

• 我們正在定義一個名為 add 的子程式，它接收 2 個引數。

• 在子程式中，使用 PARSE 和 ARG 關鍵字解析這兩個引數。

上述程式的輸出如下：

3

引數的不同方法

讓我們看看其他一些可用於引數的方法。

arg

此方法用於返回為子程式定義的引數數量。

語法 -

arg() 

引數 - 無

返回值 - 此方法返回為子程式定義的引數數量。

示例 -

/* Main program */ 
call add 1,2 
exit 
add: 
PARSE ARG a,b 

say arg() 
c = a + b 
say c 

執行上述程式時，我們將得到以下結果。

2 
3 

arg(index)

此方法用於返回特定位置的引數值。

語法 -

arg(index)

引數

• Index - 要返回的引數的索引位置。

返回值 - 此方法返回特定位置的引數值。

示例 -

/* Main program */ 
call add 1,2 
exit 
add: 
PARSE ARG a,b 

say arg(1) 
c = a + b 
say c 

執行上述程式時，我們將得到以下結果。

1 
3