次の例は、インスタンス・メソッド getBalance の Account クラスの定義を示しており、これによってインスタンス変数 AccountBalance の値をクライアントに戻します。 Account クラス定義の OBJECT 段落で、getBalance および AccountBalance が定義されます。
Identification Division.
Class-id. Account inherits Base.
* (ENVIRONMENT DIVISION not shown)
* (FACTORY paragraph not shown)
*
Identification division.
Object.
Data division.
Working-storage section.
01 AccountBalance pic S9(9) value zero.
* (Other instance data not shown)
*
Procedure Division.
*
Identification Division.
Method-id. “getBalance”.
Data division.
Linkage section.
01 outBalance pic S9(9) binary.
*
Procedure Division returning outBalance.
Move AccountBalance to outBalance.
End method “getBalance”.
*
* (Other instance methods not shown)
End Object.
*
End class Account.