CA ADS Runtime System › Managing Storage › Using XA Storage

Using XA Storage

Application development tools and CA ADS applications can be executed in XA storage on any operating system that supports XA functionality. Record buffer blocks (RBBs) and variable dialog blocks (VDBs) can be acquired from XA storage pools. The invoking task for the application determines whether the runtime system can allocate RBBs and VDBs for the entire application from XA storage pools.

Considerations

If XA storage pools are used, the following rules apply:

• If an application links to a 24-bit mode user program, the invoking task must have a location of BELOW to insure that storage for the program is allocated from 24-bit storage pools. For example:

  TASK APPL1 INVOKES ADSORUN1 LOCATION BELOW.
  

• If an application links to 31-bit mode programs exclusively, the invoking task must have a location of ANY to take advantage of XA storage. For example:

  TASK APPL2 INVOKES ADSORUN1 LOCATION ANY.
  

• Tasks invoked after the initial invoking task or after the return from a user program must be defined with a location of ANY. For example:
  • A task invoked after the initial invoking task:

    TASK ADS2 INVOKES ADSOMAIN LOCATION ANY.
    

  • A task invoked after the return from a user program:

    TASK ADS2R INVOKES ADSOMAIN LOCATION ANY.
    

Sample Task Definitions

The following diagram shows the task definitions for two sample applications.

              APPL1                               APPL2
                        Location                           Location
         ┌──────────┐   mode:               ┌──────────┐   mode:
         │          │                       │          │
         │ Dialog   │     31-bit            │ Dialog   │     31-bit
         │          │                       │          │
         └──────────┘                       └──────────┘

         ┌──────────┐                       ┌──────────┐
         │          │                       │ VS2      │
         │ COBOL    │     24-bit            │ COBOL    │     31-bit
         │ program  │                       │ program  │
         └──────────┘                       └──────────┘


         Task definitions for these applications are:

         1.  TASK APPL1 INVOKES ADSORUN1 LOCATION BELOW.
         2.  TASK APPL2 INVOKES ADSORUN1 LOCATION ANY.