Package com.softwaremining.wrappers

Class CBLString

java.lang.Object
com.softwaremining.wrappers.AbstractCBLField
com.softwaremining.wrappers.AbstractCBLPrimitive
com.softwaremining.wrappers.CBLString
All Implemented Interfaces:
AbstractDataObject, IFormatTypes, ICBLContainer, ICBLDataType, IFieldContainer, ISMDataType, ISMObject, ISMString
Direct Known Subclasses:
BMSBlankString, BMSString, CBLBlankString, CBLFiller
public class CBLString extends AbstractCBLPrimitive implements ISMString
data type for representation of COBOL String formats.
Support packed decimals, redefines, occurs depending , ...

  • Constructor Details

    • CBLString

      protected CBLString()
      for internal use only. Do not use.

    • CBLString

      public CBLString(String name, String picture, CBLBean wrapper)

    • CBLString

      public CBLString(String name, String picture, CBLBean wrapper, int mode)

    • CBLString

      public CBLString(String name, int[] theDim, String picture, CBLBean wrapper, int mode)

    • CBLString

      public CBLString(String name, int[] theDim, String picture, CBLBean wrapper)

    • CBLString

      public CBLString(AbstractCBLPrimitive parent, int[] index)

  • Method Details

    • createSubField

      protected AbstractCBLField createSubField(int[] index)
      Specified by:
      createSubField in class AbstractCBLField

    • setJustifiedRight

      public final void setJustifiedRight(boolean justifiedRight)
      Deprecated.
      - use assignJustifiedRight
      Parameters:
      justifiedRight -

    • assignJustifiedRight

      public final void assignJustifiedRight(boolean justifiedRight)

    • isJustifiedRight

      public final boolean isJustifiedRight()
      Specified by:
      isJustifiedRight in interface ISMString

    • getObject

      public final Object getObject(String value)

    • retrieveSQLObject

      public final Object retrieveSQLObject(int[] indexes)
      Description copied from class: AbstractCBLPrimitive
      method used internally by framework Get values from an SQL table and then caches it.
      Specified by:
      retrieveSQLObject in interface ISMObject
      Overrides:
      retrieveSQLObject in class AbstractCBLPrimitive

    • getDefaultSpecialValue

      public final int getDefaultSpecialValue()

    • assignValue

      public final void assignValue(AbstractCBLField field)
      Description copied from class: AbstractCBLField
      Set value of the object
      Overrides:
      assignValue in class AbstractCBLField

    • assignValue

      public final void assignValue(AbstractCBLField field, int[] indexes)
      Description copied from class: AbstractCBLField
      Method Used internally by framework Set value of the object
      Overrides:
      assignValue in class AbstractCBLField

    • equals

      public boolean equals(RangeItem[] value)
      check against 88-RangeItems
      Overrides:
      equals in class AbstractCBLField

    • isLessThanAll

      public boolean isLessThanAll(char value)
      SAS 03.03.2009 Lexicographical comparison operator

    • equalsAll

      public boolean equalsAll(char value)
      SAS 03.03.2009 Lexicographical comparison operator

    • isLessThanAll

      public boolean isLessThanAll(String value)
      SAS 03.03.2009 Lexicographical comparison operator

    • equalsAll

      public boolean equalsAll(String value)
      SAS 03.03.2009 Lexicographical comparison operator

    • retrieveAsString

      public String retrieveAsString()
      For a group item - it returns the fully expanded String representing the group. Ie if Group contains FIELD-1 PIC (X) OCCURS 4 time. field1[0].set("A"); group.stringValue() returns : "A " ; FOr a field - it returnes the value. Ie for an integer (PIC X(5)) value 10 it would return "10" , Please also see retrieveAsStringFormatted which would return "10 "
      Specified by:
      retrieveAsString in interface AbstractDataObject
      Specified by:
      retrieveAsString in interface ISMDataType
      Specified by:
      retrieveAsString in interface ISMObject
      Overrides:
      retrieveAsString in class AbstractCBLField
      Returns:
      String representation of a group

    • getValue

      public String getValue(int idx)
      Arrayed Accessor - for single dimenSion arrays ... Eg
      Parameters:
      arrayElement - - arrayElement
      Returns:

    • getAsArray

      public final String[] getAsArray()
      SAS 11.03.2009 returns table as an array of values
      Returns:
      array of field values

    • createBlank

      public AbstractCBLField createBlank()
      For internal use only.
      Specified by:
      createBlank in class AbstractCBLField

    • isFiller

      public boolean isFiller()
      Description copied from class: AbstractCBLField
      used internally by the framework to indicate if a field represents COBOL FILLER
      Specified by:
      isFiller in interface ISMObject
      Overrides:
      isFiller in class AbstractCBLField
      Returns:

    • assignNewSize

      public void assignNewSize(int newSize)