CharsetAttribute Class

MicroFocus.COBOL.RuntimeServices

Character set attribute to allow per-program encodings eg ANSI, UTF8, OEM or ASCII

Restriction:
MicroFocus.COBOL.RuntimeServices are supported for .NET managed code only.

Inheritance Hierarchy

SystemObject
  SystemAttribute
    CharsetAttribute
      MicroFocus.COBOL.RuntimeServicesCharsetAttribute

Namespace: MicroFocus.COBOL.RuntimeServices
Assembly: MicroFocus.COBOL.RuntimeServices (in MicroFocus.COBOL.RuntimeServices.dll) Version: 1.2.3.4

Syntax

C++

Copy

[AttributeUsageAttribute(AttributeTargets.Class)]
public sealed class CharsetAttribute : CharsetAttribute

<AttributeUsageAttribute(AttributeTargets.Class)>
Public NotInheritable Class CharsetAttribute
	Inherits CharsetAttribute

[AttributeUsageAttribute(AttributeTargets::Class)]
public ref class CharsetAttribute sealed : public CharsetAttribute

[<SealedAttribute>]
[<AttributeUsageAttribute(AttributeTargets.Class)>]
type CharsetAttribute =  
    class
        inherit CharsetAttribute
    end

The CharsetAttribute type exposes the following members.

Constructors

	Name	Description
	CharsetAttribute	Specifies the character set used by the program, such as ANSI, OEM, UTF8 or ASCII.

Top

Remarks

This attribute ensures that characters are converted correctly when these characters are used in displays, case folding and so on.

Examples

cobol

Copy

program-id. Program1 as "Program1".
environment division.
configuration section.
repository.
class cls-MessageBox as "System.Windows.Forms.MessageBox"
class cls-CharacterSet as
    "MicroFocus.COBOL.RuntimeServices.CharsetAttribute"
.

class-attributes.
custom-attribute is cls-CharacterSet("ANSI")
.
 data division.
 procedure division.
 main.
  invoke cls-MessageBox :: "Show" ("This is a Euro-Symbol: €")

Reference

MicroFocus.COBOL.RuntimeServices Namespace