Envoy Application Programming Manual
Table Of Contents
- What’s New in This Manual
- About This Manual
- 1 Application Programming With Envoy
- 7 ADM-2 Multipoint Supervisor Protocol
- 8 TINET Multipoint Supervisor Protocol
- 9 Burroughs Point-To-Point Protocol
- 10 Asynchronous Line Supervisor Protocol
- A ASCII Character Set
- B ASCII to EBCDIC Code Conversion
- C File-System Procedures
- D Statistics Messages
- E S-Series Changes to Envoy
- NonStop™ Himalaya S-Series Server Architecture
- G-Series Migration Considerations
- CBSENSEON and CFSENSEON Modifiers
- LEOTRESYN and NOLEOTRESYN Modifiers
- Treatment of Characters After the Termination Character
- Number of SYN Characters
- DTR Drop
- Reporting of Parity Error
- Half-Duplex Support for Asynchronous Lines
- Controller Replacement
- SYSGEN and COUP
- Unit Numbers
- FDX Line Changes
- No Support for Auto-Call Unit
- Glossary
- Index
TINET Multipoint Supervisor Protocol
Envoy Application Programming Manual—427159-001
8-34
Steps of Example Program
Example 8-15. Program Code for TINET Multipoint Supervisor (Page 2 of 13)
! line errors.
LITERAL
no^response = 171,
bad^reply = 172,
max^naks = 173,
overrun = 177,
max^failures = 10;
! message formatting.
LITERAL
term^addr = 3, ! term address index from
! slinebuf[0].
acct^field = 4, ! account field index from msg[0].
acctnum^fl = 15, ! account num field length.
banknum^fl = 4, ! bank number field length.
expdate^fl = 4, ! expiration date field length.
refnum^fl = 8, ! reference number field length.
trancode^fl = 2, ! transaction code field length.
amount^fl = 7; ! amount field length.
! TINET message formatting.
DEFINE
! write tutorial mask codes.
w^id = %377#, ! terminal address placeholder.
w^seq = %137#, ! sequence number.
wtm^cc = %061#, ! command code.
wtm^enter^wcc = %062#, ! "enter" write command code.
wtm^reenter^wcc = %064#, ! "re-enter" write command
! code.
! write tutorial mask light code/field length pairs.
wtm^acctnum^lcfl = %061, ! "enter acct num"
%060 + acctnum^fl #,
wtm^banknum^lcfl = %062, ! "enter bank num"
%060 + banknum^fl #,
wtm^expdate^lcfl = %063, ! "enter exp date"
%060 + expdate^fl #,
wtm^refnum^lcfl = %064, ! "enter ref num"
%060 + refnum^fl #,
wtm^trancode^lcfl = %065, ! "enter trans code"
%060 + trancode^fl #,
wtm^amount^lcfl = %066, ! "enter amount"
%060 + amount^fl #,