例
using System;
[AttributeUsage(AttributeTargets.Method)]
public class CAC1 : System.Attribute
{ }
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C5241.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS CAC1.
000007 SPECIAL-NAMES.
000008 CUSTOM-ATTRIBUTE CA1 CLASS CAC1
000009 CUSTOM-ATTRIBUTE CA2 CLASS CAC1
000010 .
000011 IDENTIFICATION DIVISION.
000012 OBJECT.
000013 PROCEDURE DIVISION.
000014 IDENTIFICATION DIVISION.
000015 METHOD-ID. M5241 CUSTOM-ATTRIBUTE IS CA1 CA1.
000016 DATA DIVISION.
000017 WORKING-STORAGE SECTION.
000018 LINKAGE SECTION.
000019 01 RVAL PIC S9(9) COMP-5.
000020 PROCEDURE DIVISION RETURNING RVAL.
000021 END METHOD M5241.
000022 END OBJECT.
000023 END CLASS C5241.
C5241.cob (15) : JMN5241I-S CUSTOM-ATTRIBUTE句に指定された同じアトリビュートクラスを持つカスタム属性名は,複数指定することはできません.
詳細な説明
指定したアトリビュートクラスは,シングルユース属性( プロパティの値がfalse)です.
この属性は,1つのプログラム要素に対して1回しか指定できません.