Communicator e3000 MPE/iX Release 6.5 (Non-Platform Software Release C.65.00 (30216-90291)

Chapter 5 135
Internet and Interoperability
Transact/iX Expanded B-Tree and File Open Enhancement
move (search-arg) = col("PROD1",9);
move (search-arg) = col("PROD2",17);
set(key) list(search-arg);
list(key) prod-no;
output(chain) inventory, list=(prod-no:ship-date),findmode=24;
exit;
File Open Transact
"File Open" is the name of the feature which allows database and file ids to be passed into
Transact/iX from other languages or Third Party packages. This allows the Transact
program to use the same databases and files used by the calling program. The Ids are
shared so both programs can share current record numbers, entries, paths, etc. This
feature requires a call to TL_CALL_TRANSACT (aka Transact/iX ACI) from another language
or package. HP has also included an additional enhancement, the ability to defer the
database open.
These enhancements required changes to two Transact/iX statements, SYSTEM and LIST.
SYSTEM Statement
The SYSTEM statement needs to tell Transact/iX if the database or file id is being passed.
The new syntax is shown below.
Syntax
SYSTEM program-name [, definition-list ];
Parameters
Definition-list Description of the files or data sets used during execution. See the
Transact Reference Manual for other definitions.
BASE=base-name[(["password"][,[mode][,[optlock][,[basetype][,[ open-type ]]]]])].
open-type Used by Transact/iX to determine when and if to open the
database. The valid types are OPEN, DEFER, PASSED.
OPEN is the default and opens the database at the
beginning of the Transact/iX program. DEFER delays the
database open until the database is first accessed. PASSED
tells Transact/iX not to open the database - the database
id is being passed from another program.
FILE=file-name[([access][( file-option-list )] [,[record-length]
[,[blocking-factor] [,[file-size][,[extents]
[,[initial-allocation][,[file-code]]]]]]])].
file-option-list Any of the following fields provided that they do not
conflict in meaning: OLD, NEW, TEMP, $STDLIST,
$NEWPASS, $OLDPASS, $STDIN, $STDINX, $NULL,
ASCII, CCTL, SHARE, LOCK, NOFILE, HP3000_16,
HP3000_32, DEFER, PASSED.
Either DEFER or PASSED can be specified. DEFER opens the