例
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回しか指定できません.