OSI/MHS Management Programming Manual

Examples
OSI/MHS Management Programming Manual—424824-001
C-7
SPI Example in TAL
open_scp
add_MTA
close_scp
#UNFRAME
SPI Example in TAL
The source code for this example is provided in the file EXSPIT1 on the OSI/MHS
installation subvolume.
-------------------------------------------------------------
--
-- File. EXSPIT1
--
-- This program communicates with an OSI/MHS subsystem
-- through SCP, sending the following commands to the OSI/MHS
-- manager process.
--
-- * ADD MTA $MHS1.#MTAX,
-- REM-LOGON-VALIDATION ON,
-- REM-OUR-PASSW MTA2OUTLOGON,
-- REM-THEIR-PASSW MTA2ITSLOGON,
-- REM-APPLIC-CONTEXT MTS-TRANSFER-PROTOCOL-1984,
-- REM-DIALOGUE-MODE MONOLOGUE,
-- REM-MAX-MSG-LEN 20000,
-- REM-LOCAL-INIT ON,
-- REM-REMOTE-INIT ON,
-- REM-NSAP-1 52,
-- LOC-NSAP-1 51,
-- REM-MTA-NAME MTAISTHENAME,
-- ISO-COUNTRY-NAME US,
-- X121-COUNTRY-NAME 310,
-- COUNTRY-NAME UNITEDSTATESOFAMERICA,
-- REM-ADMD MTA2ADMD,
-- REM-PRMD MTA2PRMD
--
-- * LISTOPENS NULL
--
-------------------------------------------------------------
? SYMBOLS, INSPECT
? NOMAP, NOCODE
? PAGE "Global literals, defines "
--
-- Global literals, defines
--
-- Note. The following SOURCE statements assume that before
-- compilation, a VOLUME or ASSIGN command has been entered
-- from the TACL command interpreter to point to the correct
-- subvolumes for the SPI definition files.
--
-- SPI TAL definitions
? NOLIST, SOURCE zSpiTAL
? LIST
-- Data communications TAL definitions
? NOLIST, SOURCE zComTAL