Package com.softwaremining.ims

Class DliBaseService

java.lang.Object
com.softwaremining.logic.BaseService
com.softwaremining.sql.ESQLBaseService
com.softwaremining.cics.CicsBaseService
com.softwaremining.ims.DliBaseService
All Implemented Interfaces:
EIBFNCodes, ICicsBaseService, Keyboard, IBaseService, Service, SQLHandlerInterface, IDisplayable, Runnable
Direct Known Subclasses:
DcAppLauncherService
public abstract class DliBaseService extends CicsBaseService
Superclass of IMS classes - providing additional functionality such as initial loading PCB.property file containing DB and Segment
information E.g.: 
 PCB.[n]=TYPE=[type],NAME=[name]
       where
    TYPE is
      "TP" refers to SCREEN (Transction-Processor) - 
      "DB" refers to database- 
    NAME is
      for a DB  name refers to database
      for a Screen  name refers to LogicalTerminal
 

 PCB.[n+1]=TYPE=DB,DBDNAME=PARTMSTR,PROCOPT=A,KEYLEN=100
       n[+1] PCB's typically define child segment properties
 PCB.[n+1].SENSEG.1=NAME=abcd,PARENT=parentSegment,PROCOPT=A
     SENSEG : Sensitive-Segment definitions
        Name : segment-name
        
 PCB.[n+1].SENSEG.2=NAME=CPWS,PARENT=PARTMAST,PROCOPT=A

  • Constructor Details

    • DliBaseService

      public DliBaseService(DliBaseService parent)

    • DliBaseService

      public DliBaseService()
      Constructor deprecated

  • Method Details

    • initializeBaseService

      public void initializeBaseService()
      Description copied from class: ESQLBaseService
      in ESQL projects commits are manually made e.g EXEC SQL COMMIT END-EXEC Hence turn the auto-commit off during initialization
      Overrides:
      initializeBaseService in class CicsBaseService

    • execute

      public Integer execute()
      Description copied from class: BaseService
      Run the program - transferring any parameters via method "addCallParameter" to the called program. Note that in some COBOL application a very large number of Parameters will be passed between programs. For example, 20 parameters may be used in a call. This makes it impractical to have a a single "execute" method with 20 parameters to receive the calls. After successful execution of program, the parameters passed by reference will have new values.
      Specified by:
      execute in interface IBaseService
      Overrides:
      execute in class BaseService
      Returns:
      '0' represents successful completion of called program

    • assignPCBFile

      public void assignPCBFile(String pcbFile)
      For benefit of , and only use in IMS processing
      Overrides:
      assignPCBFile in class BaseService
      Parameters:
      pcbFile -

    • doFinalize

      public void doFinalize()
      Description copied from class: ESQLBaseService
      Automatically called after CANCELing (ServicesFactory.cancel) running a program - it removes all wrapperLists
      Overrides:
      doFinalize in class ESQLBaseService

    • retrieveRootWrapper

      protected ImsDbSegment retrieveRootWrapper(String functionType, ISMDataType pcb)