引数の説明
記述された語 |
例
// custom-attribute
using System;
[AttributeUsage(AttributeTargets.Method,Inherited=true,)]
public class atcls : System.Attribute
{
public const string L1 = "literal";
string title;
string number = "1";
public atcls(string a):base() {}
public string prop1 {
get { return title;}
set { title = number;}
}
}
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C5258.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS C1 AS "atcls"
000007 .
000008 SPECIAL-NAMES.
000009 CUSTOM-ATTRIBUTE ATTR1
000010 CLASS C1 USING "COBOL"
000011 PROPERTY L1 IS "PROPERTY"
000012 .
000003 STATIC.
000014 PROCEDURE DIVISION.
000015 END STATIC.
000016 END CLASS C5258.
C5258.cob (9) : JMN5258I-S CUSTOM-ATTRIBUTE句に指定されたL1は,プロパティ名,またはフィールド名でなければなりません.