End control of character string – FUJITSU J Adapter Class Generator User Manual

Page 27

Advertising
background image

Chapter 3. Developing Programs 27

When the -s option or the "Option String" parameter is specified, the conversion

between the String object and the COBOL data items is not necessary since an

alphanumeric item can be specified as the String type argument and returns a value

directly.

REPOSITORY.
CLASS J-Date AS "java-util-Date"
CLASS J-DateFormat AS "java-text-DateFormat"

WORKING-STORAGE SECTION

01 aDateFormat OBJECT REFERENCE J-DateFormat.
01 aDate OBJECT REFERENCE J-Date.
01 dateValue PIC X(30).

PROCEDURE DIVISION.

MOVE "2000/01/01" & X"00" TO dateValue.
INVOKE aDateFormat "parse" USING dateValue RETURNING aDate.

INVOKE aDate "toString" RETURNING dateValue.

Notes:

• The return value of the java.lang.String class constructor is the java.lang.String

class

• When the String object method is used, the creation of the object (calling the

String constructor or calling the NEW-STRING-X method) is necessary.

• To refer/set the java.lang.String type field (class variable or instance variable),

specify its size using -s option or "Option String" parameter.

• When you want to handle the String type NULL object, do not use the -s option

and "Option String" parameter.

End Control of Character String

When passing a character string that is shorter than the data item length to an

ordinary adapter class, the end of string (X”00”) must be set. The following example

shows that "ABC" is copied to alphanumeric item initialValue having length of 50

characters and is passed to the NEW-STRING-X method:

REPOSITORY.
CLASS J-String AS "java-lang-String"

WORKING-STORAGE SECTION.
01 initialValue PIC X(50).
01 aString OBJECT REFERENCE J-String.

PROCEDURE DIVISION.

MOVE "ABC" & X"00" TO initialValue.
INVOKE J-String "NEW-STRING-X" USING initialValue RETURNING aString.

Advertising