Using Anzio with AS400

Introduction

While Anzio does not support the IBM 5250 and 3270 terminal emulation types, both Anzio and AS/400's do support the VT terminal types (vt100, vt220, etc.). As long as the application on the AS/400 is not written for a specific terminal type, or uses the vt terminal type, Anzio should be able to work fine. Here are some hints in setting the AS/400 up to use telnet and the vt terminal type.

Additional hints and suggestions for the use of TCP/IP on an AS/400 can be found at the IBM web site.

Changing Keymappings

While it is difficult to map all functions of the 5250 to VT, there are some correlations as shown below. Some of the typical key maps are:

Additional 5250 to VT keymaps:

5250 Function VT Key(s)
5250 Attention . . . : *CTLA *ESCA
5250 Help . . . . . .: *CTLQST *ESCH
Page Down (Roll Up) .: *CTLD *CTLF *NXTSCR
Page Up (Roll Down) .: *CTLB *CTLU *PRVSCR
System Request . . . : *CTLC *ESCS
Insert . . . . . . . : *ESCI *ESCDLT *INS
Delete . . . . . . . : *DLT *RMV
Enter . . . . . . . .: *RETURN
Backspace . . . . . .: *BACKSPC
Duplicate . . . . . .: *ESCD
Erase Input . . . . .: *CTLE
Error Reset . . . . .: *CTLR *ESCR
Field Exit . . . . . : *CTLK *CTLX *ESCX
Field Minus . . . . .: *ESCM
Home . . . . . . . . : *CTLO
New Line . . . . . . : *ESCLF
Print . . . . . . . .: *CTLP *ESCP
Field Advance . . . .: *TAB
Field Backspace . . .: *ESCTAB
Cursor Up . . . . . .: *CSRUP
Cursor Down . . . . .: *CSRDOWN
Cursor Left . . . . .: *CSRLEFT
Cursor Right . . . . : *CSRRIGHT
Clear Screen . . . . : *ESCC
Test Request . . . . : *CTLT
Toggle Indicator
Lights . . . . . . . : *ESCT
Redraw Screen . . . .: *CTLL *ESCL
F1 . . . . . . . . . : *ESC1 *PF1 *F1
F2 . . . . . . . . . : *ESC2 *PF2 *F2
F3 . . . . . . . . . : *ESC3 *PF3 *F3
F4 . . . . . . . . . : *ESC4 *PF4 *F4
F5 . . . . . . . . . : *ESC5 *F5
F6 . . . . . . . . . : *ESC6 *F6
F7 . . . . . . . . . : *ESC7 *F7
F8 . . . . . . . . . : *ESC8 *F8
F9 . . . . . . . . . : *ESC9 *F9
F10 . . . . . . . . .: *ESC0 *F10
F11 . . . . . . . . .: *ESCMINUS *F11
F12 . . . . . . . . .: *ESCEQ *F12
F13 . . . . . . . . .: *ESCEXCL *F13
F14 . . . . . . . . .: *ESCAT *F14
F15 . . . . . . . . .: *ESCPOUND *F15
F16 . . . . . . . . .: *ESCDOLLAR *F16
F17 . . . . . . . . .: *ESCPCT *F17
F18 . . . . . . . . .: *ESCCFX *F18
F19 . . . . . . . . .: *ESCAMP *F19
F20 . . . . . . . . .: *ESCAST *F20
F21 . . . . . . . . .: *ESCLPAR
F22 . . . . . . . . .: *ESCRPAR
F23 . . . . . . . . .: *ESCUS
F24 . . . . . . . . .: *ESCPLUS

For TELNET clients accessing the AS/400, you can also use the DSPVTMAP command for VT-style connections to view the keyboard map. The corresponding command to change the keyboard map is CHGVTMAP. This allows you to remap what the host application will receive for certain function keys.

AS/400 Telnet

The following are some TCP/IP and telnet hints when experiencing problems connecting to an AS/400.

TELNET users are not able to log back on once they have logged off

PTF SF23661 must be installed on your system. This is included with the AS/400 C5192310 cumulative package. Use the following command to see if it is installed. If this is not installed, request it and install it.

DSPPTF LICPGM(5763SS1) SELECT(SF23661)

QINTER subsystem is not active

If the QINTER subsystem is not active, attempts to telnet to your AS/400 system will fail. If the controlling subsystem is QCTL, check to make sure that subsystem QINTER is active.

User class of *SECOFR cannot log on

Check that the system value QLMTSECOFR is set to "0=Explicit device access not needed". If it is set to "1=Explicit device access needed", users who have *SECOFR authority are not allowed to log on to the AS/400 system using TELNET.

The system value QAUTOVRT is set to a value that is too small

When you attempt to TELNET to an AS/400 system, the TELNET server assigns your job to the next free virtual workstation. If there are no virtual workstation devices available, then the TELNET server will attempt to automatically configure one. This can only be done if the value QAUTOVRT is set correctly.

Use the Change System Value (CHGSYSVAL) command to change the value of the QAUTOVRT. For example, entering the following command string changes the number of virtual devices to 50. This allows up to 50 users to sign on simultaneously using TELNET.

CHGSYSVAL SYSVAL(QAUTOVRT) VALUE(50)

Passthrough printing on AS/400

Most of what IBM considers passthrough printing deals with the use of LPR / LPD (remote printing protocol). Passthrough printing in the TELNET environment involves printing to a local PC printer through the telnet session by sending a "transparent print on" code, the data, and ending with a "transparent print off" code.

In order to do this type of passthrough printing on an AS/400 several things must work together. First, the particular terminal type you are running at the host end must support passthrough printing. Second, the terminal emulator you are running must support passthrough printing (Anzio products do). And third, the host application must allow for passthrough printing as an option to doing printouts (you can get around this by printing to a file and using a shell script to handle the passthrough printing, see our shell script examples in our A Guide to Passthrough Printing document).