Pathway/iTS TCP and Terminal Programming Guide

Writing User Conversion Procedures

Compaq NonStop™ Pathway/iTS TCP and Terminal Programming Guide—426751-001

4-11

Intelligent Device Input Procedures

Most of the parameters for the two input procedures are the same; they differ in their

internal data representation and in that alphanumeric items can be justified but numeric

items cannot. Declarations for the numeric and alphanumeric intelligent device input

conversion procedures are shown in Figure 4-7

and Figure 4-8.

Figure 4-6. Message Input From an Intelligent Device

Figure 4-7. Device Numeric Input Procedure Declaration

PROC USER^NUMERIC^INPUT^MSG^CONV ( USERCODE, ERROR, INPUT,

INPUT^LEN, INTERNAL, INTERNAL^SCALE, FILL^CHAR,

FILL^OFF, FIELD^RETURNED, FIELD^PRESENT );

INT USERCODE; ! Supplied by TCP

INT .ERROR; ! Generated by user procedure

STRING .EXT INPUT; ! Supplied by TCP

INT .INPUT^LEN; ! Supplied by TCP; modifiable by user

FIXED .INTERNAL; ! Generated by user procedure

INT INTERNAL^SCALE; ! Supplied by TCP

STRING .FILL^CHAR; ! Supplied by TCP

INT FILL^OFF; ! Supplied by TCP

INT .FIELD^RETURNED; ! Generated by user procedure

INT .FIELD^PRESENT; ! Generated by user procedure

CDT 046.CDD

Message Level

Group Level

Field Level

VARYING1 and VARYING2 handling

SEND MESSAGE Verb’s

USER CONVERSION

Message Level USER CONVERSION

OCCURS Processing

PRESENT IF checking

FIELD-DELIMITER testing/

RESULTING COUNT

Field conversion to

WORKING-STORAGE format

Field Level USER CONVERSION

TO/USING destination location

Intelligent Device message TCP

TCP message MESSAGE SECTION

MESSAGE SECTION