SC21 7507 5_IBM_System3_RPGII_Telecommunications_Programming Reference Manual_Sep76 5 IBM System3 RPGII Telecommunications Programming Manual Sep76

aaaa oaaa

aaaa aaaa

aaaaaaaaaaaaaaaaaa

oaaaaaaaaaaoaaaaaa

aaaaaaaaaaaaaaaa..

aoaaaaaaaaaaaaaaaa

33:: ::3t

aaao aaaa

aaaa aaaa

aaaaaaaaoaaaaaaaa.

aaaaaaaaaaaaaaaaaa

oaaaaaaaaaaaaaaaaa

aaaa aaaa aaaa

aaaaaaaaaaoaaaaaaa

oaaaaaaaaoaaaaaaaa

oaaaaaaaaaaaaaaa

oaaaoa aaaaaa

aaaa aaaa

aaaa aaaaa

aaaaa aaaaaaa

aaaaaa aaaaaaaaa

oaaaaaa aaaaoaaaaaa

aaaaaaa aaaaaaaaaaa

aaaa aaaa aaaa

aaaaaaaaaaaa aaaaaa

aaaaaaaaaa aaaaa

aaaaaaaa aaaa

aaaaaa

IBM

System./3

RPG

ll Telecommunications

Programming

Reference

Manual

Program

Numbers:

5701-RG1

(Model

10

Card

System)

5702-RG1

(Model

10

Disk

System)

5703-RG1

(Model

6)

5704-RG1

(Model

15)

5704-RG2

(Model

15)

5705-RG1

(Model'12)

sc21-7507-5

File

No.

53-30

Program

Product

aaaa

aaaaa

aacaaaa

aaoa aaaaaaaa

aaaa aaaaaaa

aaaoaaaaaaaoao

aaaaaaaaaaao

aaaaaaaaaaaa

aaaaaaaaaaaaaa

aaaa aaaaaaa

aaaa aaaaaaaa

oaaaoaa

aaaaa

aaaa

aaao aaaaa

aaaaa aaaaaoa

aaaoaa aoaaaaoaa

aaaaaao aaaaaaaaaaa

oaaaaaa aaaaaaaaaa.

aaaa aaaa aaaa

aaaa aaaa aaoa

aaaaaaaaaaaa aaaaaa

oaaaaaoaaaaa aaaaaa

aaaaaaaaaa aaaaa

aaaaaaaa aaaa

aaaaaa

aaaa

oaaa

aaaaaaaaa

oaaaaaaaa

aaaaaaoaa

aaaaaaaaa

aaaa

aaaa aaaa

aaaa aoaa

aaaaaaaaoaaaaaaaaa

aaaaaaaaaaaaaaaaaa

oaaaaaoaaaoaaaaaaa

aaaaaaaaaaaaaaaaaa

aaaa aaaa aaaa

oaaa aaaa aaaa

oaaaaa aaaa aaaoaa

aaaaaa aaaaao

oaaaaa aaaaaa

oaaaaa aaaaoa

aaaa aaaa

aaaaaaaaaaaaaaaaaa

aaaaaaaaaa

aaaaaaaaaaa

aaaaaaaoaaa

aaaaaaaaaa

aaoaaaaaaaoaaaaaaa

aaaaaaaaaaaaoaoaaa

aaaaaaaaaaaaaaaaaa

aoaaaaaaaaaaaaaaaa

aaaa aaaa

Page

of SC21-7507-5

lssued

30

June

1978

By

TNL: SN21-5624

Sixth Edition

{December 1975)

this is a major revision of, and obsoletes,

SC2l-75074 and rechnical Newsletters

SN21-7738,

SN2l-7759,

and SN2l-5255. Information for the Model l2 Rpc ll

compiler has

been added. changes

are indicated by a vertical line to the left of the

change. New or extensively revised

illustrations are indicated by a bullet (o) to the

left of the ligure title. Appendix I has

been added and should be reviewed

in its entiretv.

This edition applies

to the following IBM system/3 RpG II program products:

Version Modif ication

I

15

6

z

+

14

0

Program

Number

5701-RG1

5702-RG

I

5703-RG

I

5704-RGl

5704-RG2

s705-RCl

System/3

Model

10

Card

8 and

10 Disk

4and6

15A,

B,

C

15D

t2

This revision

remains

in effect for all subsequent

versions

and rnodihcations unless

specifically altered by a new edition or a technical newsletter. changes

are

continually made to the specifications

herein; before using this publication in

connection rvith the operation of IBM systems,

consult the latest IBM Systeml3

Bibliography',

GC20-8080, for the editions that are

applicable and current.

Use

this publication only for the purposes

stated

in the

preface.

Publications are not stocked at the address

below. Requests

for copies of IBM

publications and for technical information about the system should be made to

your IBM represenrative

or to the IBM branch off,rce

serving

yourlocality.

This publication could contain technical inaccuracies

or typographical errors. use

the Reader's

comment Form at the back of this publication to make comments

about this publication. If the form has

been

removed, address

your comments to IBM

corporation, Publications,

Department

245,

Rochester,

Minnesota

55901. crommenrs

become the property of IBM.

@opyright

lnternational

Business

Machines

corporation

1969,

1970,

r9j1, r9jz, l97J.rg75

This refcrence

rnanual

is

intended prirnariiy

for the

Systenr/3

user who

has

littlc or no experience

with telecommunications

prograrrnring.

This n'ranual provides

inforrlation

a

progralnlner

necds

to

write

System/3

RPG

ll telecommunications

programs.

It contains

a:

o Dctinition

of

basic

telecornnrunications

ternts

. Statenlent

of the

telecotnnrunications

capabilitie

s of

Sy stcnr/3

o De:scription

of each

of thc RPG

Telcconrrnunications

Specifications

required

to

write

a telecomnrunicaticins

prograni

for Systern/3

Samplc

progranls

arr:

includcd

in this

ntanual

to illustrate

progranrming

techniques

and

possible

applications

for

Systenr/3

RPG

II telecomrnunications

prograntrning.

System/3 Model 8

'Ihe

Systerr/l} Model

8 is supported

by

System/3 Model

10

Disk Sysicm

control

prograrnming

and

program

products.

The lacilities

described in

this

publication

for the Model t0

are

also applicable to the Model

8,

although the

Model 8

is

not

ref'erenced. However,

the Integrated

Comnrunicltions

Adapter

(lCA)

is available

only on

the Model

8. If you

have

the ICA, it is alwavs

designated

as

BSCA

line 2. Tirerefore,

you

rnust

enter the BSCA OCL

statement

(/i BSCA

l-lNE-2)

at executior.r timc. It should be noted

that

rrot

all devices

and leatures which

are available on the Model l0 are

available on thc Model 8. Therefore, Model

8 users should

be

tarriliar with the contents

of IBM S.ysteml3ll'lodel 8

Intr<tductnn,

GC2l

-5

I 1 4.

Page

of SC21

-7507-5

lssued

24 September

1976

By TNL: SN21-5428

Preface

IBM

SYSTEM135448 DISK

STORAGE

DRIVE

The

IBM

Systent/3 5448 Disk

Storage

Drive

ol Systenr/3

Modcls

8

and l0 uses the same

program

product

support

as the IBM 5445 Disk

Storage . Flowevcr, a

separatel

system

control prograln

feature

is

required

for the 5448.

In

general,

ref-erenccs

to 5445 in this

nranual also apply

to 5448. For specific inforrnation

about 5448 opt'rating

clraracleristics

and

prograrnrning

suppolt., see IRM

Systcmf 3 5448 Disk Storage Drivc Progrant Re.larcttL.t'

Manual,

GC2l

-5

I

68.

Page

of SC21-75O7-5

lssued

24 September 1976

By TNL: SN21-5428

The following

chart

lists

the

order

numbers

of the

various

related publications.

Publication Model

6Model 8

Model 10

Card System

Model 10

Disk System Model 12 Model 15

General

IrtJ'ormation Binary

Sy ttchronous Co

mmu

nica t ions GA27-3004 GA27

-3004 GA27-3004 GA27

-3004 GA.21-3004 GA27-3004

Comp onc t t

t s R el ere

n c e Ma

nual GA34-000r GA2r-9236 GA2r-9236 GA21-9236 GA2l-9236 GA21-9236

Operator's Ouide GCr2l

-75

01 GC21-7634 GC21-75 l

3GC2 I

-75

08 GC21-5144 GC21-5 075

RPG II ReJ'erence

Manual sc2l-75I7 sc2 1-7504 sc2 l-7500 sc2 1

-7s04 sc2 I

-7504 sc2 1-7504

'f

ele

co mntun ica t

io tls L og ic

Manual sY2l

-0526 sY2 1-0s 26 LY2l-0528 sY21-05 26 sY2l-0s26 sY2l

-05

26

Systern

Ot,tteratiort

ReJerence

tVotual GC2l -5

I 26 GC21-5

126 GC2t-5126 GC2 l-5 126 GC2l-5126 GC2t-7

616

lv

Contents

LIST

OTI ABtsREVIATIONS

INTR0DUCTION

BSC

I',ELECOMM

IJN ICAI'IONS C]ONCEIY|S

AN D

TERMINOLOGY

T'elecommunicati0ns

Networks

Nonswitched

Netrvork

Su itched Nctwork

Ne

Iu ork

(

'rnltrrl

l\lrrlti|uint

I'oint-To-Point

I)ata

Link

('ontrol

l)rtl [.ink

('onlrol ('haractcrs

l)llr l,ink Nlcssugc

('oclcs

l)lrlr

Link

l\lcsuge

l

,rrrn

rls

Sl:tndilrd

I

utn)rt

I Flr.

1;11

1 rrt:sPrrt'ne1

Irrlr:rmrrdiale

Block

('hccking

Moder

(l

l'B)

RPG

II BSCA PROGRAMMINC

IIS('A Station

-fypes

RP(i

II Telcconrrnunications

Specil ica t iorir

('olunrns

l-2

(Pagc)

.

('olurnnsS-5

(

l-ine

)

('olunrn

6 (l ornr

Typc)

('olunrn 7 (('ornntcn

ts)

(lolurnns

7-14

(liile

N:rnre)

.

('olumn l5 (('ontigurrtion)

('olumn I6 (l ypc

ol'Slation)

('olunrn

l7 (Typc

ol Clontrol)

('olunrn I

13

(Typc o1'(iode)

('olunrn I 9 ('I'ransparcncy)

('olumn

2O

(Switchod)

('olurnns

2l-31 (l)ial

Nurnber)

('olurnn

32

(Location

of ldontificalion

This Slation)

('olumns

33-39

(ldentil'ication

This Slation)

Colunrn

4()

(Location

ol ldcntil'ication-Rcnrote

Station).

( nlrrnrns

4147 (lde

ntification Renlotc

Slation)

('olunrns

48-5 I (Re

rnotc

T'ernriurl)

('olunrn

52

(11'B)

('olurrrns

-5 -l--54

(l)orrnane

nt l,,rror

Indicator)

(-olurnns,55-57

(Wait

Tirne)

('olurnns

5tl-59

(llecord

Avrilable

Indic:rtor)

( olumn

60

([.ast

Iiilc)

(-olunrns

6 I-62

(Polling

('hlractcrs)

('olunrns

6 3-64

(Add

ressing

Characters)

('olunrns

65-70

(

l{crnotc l)cvrce)

('olurnns

7 l-74

(llescrved)

.

('ol

u lrr ns

7,5

-tl0

(

Plrg,rarn

lden

t

i l'icatio

n) .

Iiilc

l)cscription

Specil'ication

l,lntries

lirr

IIS('

lrilcs

('olurnns

7-14

(l ile Narnc)

.

ColLrmn

l-5

(

Irile

-l-ypc)

.

C'olumn

|6 (lrile

l)esignalion)

APPBNDIX Il" ')ATA l.lNI\- ' (ritl ROl- ('HARACI'ERS . 49

Colutnn

l7 (l'.nd

ol [,ilct

(lolunrn

l9 (lrilc

liornrrl)

Coluntns 20-23

(likrck

[.r'nr'1h]

Columns

24-27

(

l{csrrr! {.lririir)

('olumn

32

(Adrlitionll

i\rc:r)

(-,rlrrnrn.

4t

14h (

|

)r\

i( r)

Descriptions

til'

llS('

lrunr:lionr

Progftilttrtil

nt ('1)r]si(lerrt

i,

Re t t'ilr (

)rr

l1

llccoivc

uitlt l-r;u;rtrriit:,i

i i'('nvcrsalional

ltcply

'l'r;rnsrnil

Onl1,

'l

ransnrit $ iIlr l{rr:cir1it;i

.

rl

( ,rDvcrsaliorrul

l{cply

l

ratrstttil utrtl l{cecivc

l\l , I ,rnvcrsrtionrl

Reply)

APPFINI)lX A. .,\SCil ANt) t.$t r)lC ('O[)U,S

AS(

ll{ ,rrlt'r

l'.8('l)l('('ories

APPI,.NI)lX

C. POLI-lN(;

A).rir \l)l)l{llSSlN(;

CIIARA(l'l IlRS IrOR

SYS i

I ',ti

I

l lt('l

)i('

( , 'dt

AS('ll

('orle

APPF]NDIX

D. ItP(; II IF]I

i I]ii.

'{'IJSSING

SPECIFICIAl'l0NS

S(rllth,|

,:.i

r,

R.P(l

ll Iclccorrrrrrunicrlrlr.

'., r

ii

icrtions

lrilc l)cscription

SIccil

ir.

:tiir,'

r:. i

r,'

ilS('A lrilcs

APPIiNDtX

[.. tJStN(i

Tilt r'tr,]

2770

AND THI,]

II]M 27IJ0

RP(i

lI

Spctilir';rtr,'nr

RP(l

liilc l)cscriJrtirirr

Siiri.

ii,..ii,)11\

l{PtI

I

inc(

uunl(.;

St'..rit',. :r.

RI)(i'f elccontnru

nir:;r t ior (,

irr:,

i

I

icat ions

RP(;

Oulput-lr()rrlrlt

Spc{ iil!itl

jons

Sy\l(Dl/

I

(

ilnride

r.rtr'

'rr.

| \rnll)l('s

Transnritting

lo l

lrr I ltl\{ ..i

'

,'t! l):rla

('ornrlunication

Systcrn

Rceeivirrr 1r'()ni

rn lltlV 27li1i i

'l

cnninal

,t, l,,,,rr,t,irri,,n

APPItNDIX F. ('Ol\,{Nl{rNI('A

ll| {, lVl'l'rl

TIlll

OPIIRAT'lN( ; SYri

l t'.1\t'Ill

I l'.r.

{.

}

\,

i\{

LiN l(lA'tlONS

ACCUSS

Mlil lt(li) {

t{'AM)

Systcrn/3 to'l

('All

liilc I)csi

iipirr'n Sl)f, ilie:rI

r{)n\

I r,lr.trsiln

SP.r

ititlrrr,rrtr

TelL(illrllllirri.,rli,,1r..

t1r1,

r,'

..:

.,n\

IrtPrll 5p", tl

r{

:,r

;(irl\

(',rlt

trl;rti":i

5i'(

(rl

i(,rIi,,r'.

Output l on!rirl

SI)c(ilicijtr!)l

i

3

.l

-5

5

6

7

1

IJ

li

ti

9

r)

l{)

l0

t0

l0

t0

ll

lt

ll

l2

t2

l2

l3

t:]

l3

|,l

l.l

ll

l3

l4

14

l4

14

t4

14

t5

l-s

t6

20

24

21

JI

47

4lJ

-sI

-)l

52

53

,5 -5

57

5l

57

5rl

5

r.l

,59

59

60

ol

65

66

67

61

6lJ

68

Page

of SC21

-75C17-5

lssued

24 September

1976

By TNL: SN21-5428

TCAM to System,/3

Iile Description

Sirecif ications

Lxtension

Spc

cificat ions

Telccommunicalions

Specifications

Inpul

Specilicrtitrns

Calculation

Sprecifications

Output-liormal Spccifications

.

TCAM Considerali0ns

10

70

'70

71

1l

72

74

APPENDIX G. USINC TTIE

IBM 374I AND IBM 5230 75

RPG lI Specilications 75

RPG ll lrite

Description

Specitications 75

RPG II Telecornmunications

Specitications i6

RPG II Output lrormat

Specifications. '16

Flxamples. i7

Transrnitting

to the IBM 3741 . '17

Receiving from an IBM 3741 79

Receiving a Status Message fronr

an IBM 3741

Data

Station

Receiving liom a 3741 Data

Station with llxpanded

Communications

Iicature

. 86

Transntitting

to a 3741 with L,xpanded

Comrnunications

ficature 88

APPB,NDIX H. USING RPG II IN COMMUNICATION

BETWEEN A SYSTEM/3 AND THE IBM 3750

(WORLD

TRADE

ONLY)

I\oqranrmins

Procedure

APPENDIX I, SYSTEM/3 RPG II INTERFACE

TO BSC LINE PROTOCOL

Point-to-Point

L.ease-d

Line

Receivc

Transrnit

Transmit Mulliple lrilcs

Transmit/ Reccivc

Receive/Transmi

t

Leased

Multipoint, Systern/3

Tributary Station .

Roccive

Transmit

Transmit, Reccive

Receive.

Transmit

Point-to-Point

Switchcd Line 10

SIIQ: Switched

Line

Station Idcntific:ation

Sequcncc

Optional

Receive,

Syste:rn/

3 Ansrver

Station

Recoivc,

System/3 Calling

Station

Transmit, Systcm/3

Answer

Station

Transmit,

System/3 Calling

Station

Transmit/Receive,

System/3 Calling

Station .

Transmit/Recr:ivc,

Systcm/3

Answer Station

Reccive/Transmit,

System/3 Answer

Station

Receive/Transmit,

System/3

Calling

Station .

Conversational NIodc

Receive with Conversational Reply

Transmit with Conversational

Reply

Line

Condition System/3 Rcsponses

Data

Mode,

System/3 Transmitting

Dal:r

l\1udc.

Svsrcm/J Receiving

GLOSSARY

INDEX

81

9l

93

94

95

96

97

98

99

100

101

t02

102

103

104

105

106

r07

108

109

ll0

110

1ll

112

tt2

tt4

l 15

ll7

V1

ACKO Even positive

acknowledge

ACKI Odd

positive

acknowledge

ASCII American

national

standard

code

for

informa-

tion interchange

BCC Block

check count

BPS Bits

per

second

BSC Binary synchronous

communications

BSCA Binarysynchronouscommunicationsadapter

BTAM Basic

telecommunications

access

method

(System/370)

DA Display

adapter

DISC Disconnect

DLE Data link escape

character

DOS Disk operating

system

EBCDIC Extended

binary

coded decimal interchange

code

EHT Error

history table

ENQ Enquiry

character

EOT End

of lransmission

ERC Error retry

count

ETB End

of text block character

ETX End

of text

character

ICA International

Communication

Association

ITts Intermediate

block check

LCA Local communications

adapter

NAK Negative

acknowledgement

character

OS Operating system

(System/360

and Systern/370)

PEI Permanent

error

indicator

List of Abbreviations

RVI Reverse interrupt

character

SDLC Synchronous data

link

control

SOH Start of heading character

STX Start of text

character

SYN Line synchronization

character

TCAM Telecommunicationsaccessmethod(Systern/370)

TTD Temporary

text delay character

VTAM Virtualtelecommunicationsaccessntethod

(System/370)

WACK Wait for acknowledgernent

character

vii

IBM

System/3

Telecommunications

programming

provides

the user

with the capability

of sending

and receiving

binary

synchronous

data over

conlmon

carrier

facilities.

The pro-

gramming

performs

all

functions

necessary

to establish

line

connections,

exchange

identification

sequences,

send

and

receive

data,

and

execute

the

correct

termination

or discon-

nect

procedures.

Systeml3 RPG

II telecommunications

support is provided

via the RPG

II language.

Binary

synchronous

data trans-

mission

is

possible

between

System/3

and:

. Other

System/3s.

o Operating

System

or Disk

Operating

System Basic

Tele-

communications

Access

Method

Binary

Synchronous

Communications

(OS

or DOS

BTAM

BSC).

o System/360

Model

20 Input

Output

Control

System for

the Binary

Synchronous

Communications

Adapter.

o Operating

System Telecommunications

Access Method

(rcAM).

. IBM

3741

Model

2Data

Station.

o IBM

5230

Model

2Data Collection

Controller.

o IBM

3750

Switching

System

(World

Trade

only).

o IBM

System/7.

Page

of SC21

-7507-5

lssued 24 September

1976

By TNL: SN21-5428

Introduction

The

Systemi

3

Model

l0 Disk

Systern, I\todel 12,

Model 6,

Model

8,

and Model

15 can

also transutit

data

to

and

receive

data from

the IBM 2770

Dala

Commr-rnication

System

and

the IBM

2780 Data

Transrnission

Terminal

(see

Appendix h,).

BSCA files

are defined by entries on

the RPG Irile Descrip-

tion

Specification and

the RPG

Telecornnrunicutions

Speci-

fication.

Note: For use of the sccond BSCA

feature

.see

|he

IBM

Systeml3 Model 10

Disk System

Control Prograntmbtg

Ref'erence Manual, GC2l-7512,18M

Svsteml

3

Model 12

System Control l'rogramming Relerence Monual,

GC2l

-5

I

30,

or IBIvI Systeml3

Model l5 Sl,sYem Control

Programming

Rel'erence

Manual, GC 2 1

-5077.

A System/3 RPG

ll telecommunications

program

can

exist

within

a dual

progranrming

system

(Dual

Programming

Fea-

ture required).

Normal operator

attention is required

to

respond to processing

halts.

Note: lf you

are

atteinpting to commutlicate

between

two

programming

levels using

the RPG Il tclecommunica-

tions features

and dual BSCA,

it is suggcsted

that

you

do

not have

overlays in either

of the RPG

Il prograrns.

For

IBM

System/3 telecommunications

operating

procedures,

see

your

system's operator's

guide.

lntroduc:1ion I

This

section

describes

the

basic

characteristics

and opera.

tional

concepts

of

the BSC

telecontmunications

systeln:

what

it is, irow

its

parts

are related,

and how

control

is

maintainecl.

Comrnonly

used

terms

arc

italicized.

Data

Set

(Modem)

Nonsw i tched, Point-to-Poirrt

Data

Set

(Modem

)

BSC

Telecommunications

Concepts

and

Terminology

TE

LECOMMUNICATIONS

NETWORKS

A telecommunications

system

may

use

a

nonswitched

net-

work

or

a switched

network (Figure

l).

Switched Point-to-Point

System/370

System/3

Model

10

Disk

System, Model

12,

or Model

i5

Data Set

(Modem)

Data

Set

(Modem)

Common

Ca rr

ier

Exchange

System/7

Data

Set

(Modem)

Data Set

(Modem)

Data

Set

(Modem)

B

r.

A

Tri

butary

Station

B

J

n

A

Nonswitched

Multi

point

\\

Contro

I

Station

Data

Set

(Modem)

Data

Set

(Modem)

I

;

Tributary

Stati

o n

B

a

A

t,

r

[-J

I

Data

Set

(Modem)

B

A

Tributary

Station

B

a

A

l igure

l. Telecommunications

Neluorks

(Part

I ot 2)

llSC Telecommunications

C-'oncepts and

Terminology

8000 BPS

Local

Interface

2400

BPS

Local Interface

' 'l

he lntcrrllcd

( orrrrnunications

A(hpter

(

I( A) nrust be

ltddrcssccl

as US('A

linc 2. 'fhc

nranuel I('A switch

can huve onlv onc

intcrf'acc

lclivc lll rny onc

tinre.

I Scc

Itiguro

| (l'l11

I ot 2)

lirr

crrmples o1'llS('A

line

contilluratrons.

l:i1'urc L Te l('r','tllrlttlrliLrli,rnr \e lu,rrks {Prrl I ,'l It

System/3

Model

8

Data

Set

(Modem)

Data

Set

(Modem)

Nonswitched

Network

A nonswrtched

network

consists

of a nurnber

of private

or

leased

cornmunication

ltnes

that connect

a

colltpulcr

to one

()r

rrore r(ntote tarminals. Rernote

terntinals

is

a

general

lernl

used

to represent

interconnected

equiprnent

at a

relnote

klcatiorr.

having

either input

or outpul capability.

or both. (ln tronswitched

networks,

the

cornputer

and

rerrote

telnrinals

are

physically

counected,

tlrat is.

the

circuits

nraking

up tl)e

coutntuntcation

lines

are

continuously

cstablished

for predeterntrned

tirre periods,

during

which

data

rnay

tre

transmitted

over the

lines.

The

lines rhat

cornprise

a nonswitched

ne

twork are variously

known as

privatc, leasetl,

or tledic'ated

/incs. These

lines

rnly be furnishecl

by a

contnron

carner

on a contr-act

basis

between

specified

locations

for a continuous

period

or for

regularly

rccurring

periods

at stated

hours,

tirr tlte

exclusive

use

of one

custolner.

ln this

publication

the

ternt

nonswitched

network

re

fers to

a

nctwork in which

the conintuntcation

liltes

linking

the

conlputer

und the

renlole

terntinal

are

continuously

estab-

lished,

thus

recluiring

no dialing

to establish

the

cttnnecrion.

Switched

Network

A switchcd

network

allows

rlany renlotc

tcnninals

to

con)tltunicate

witlt a cornputer

without requirir-rg

dedicated

cornrnunication

lines.

The

computer

and

the fentote

terrni_

nals

arc connected

by

access lines

to the

cornrnon

calr-rcr

exchange

serving their

respective

locations.

A conrpletc

aud

continuous

data

path

is established

between

the

corn-

puter

ancl the remote

terntrnal

only tbr the

period

o1'tinte

in

which

data

translnission

takes place.

Tlre

conncction is

establishecl

by dialing the

telephonc

nurnber

of rhe

remote

t errlrinal.

ln switchcd

networks.

Iine ref-ers

to a discrete

data

path

betwcen

thc telecontrlunications

contr<tl

uni1. or aclapter,

and the cornnton

carrier

exchange.

The servicc

providecl

by

thc cornnlol-l

carrier

is

usually

on a tirne-used

basis.

ln this

publication,

the

ternl

switched

network

ref'ers

to any

network

in wlrich

a direct physical

connectiorr

between

the

cornputer

tnd the

relrlote

teruiinal

lnust

bc established

by

dialing

in orclcr

fbr

datl transutissiou

to occur.

NETWORK

CONTROL

Initial

contlct bctween

a conlputer

and

a

rentotc

ternrinal

nray occur

ilt

two ways.

dependent

on the type

ollinc

connection

between thenr.

The connections

possible

aLc

multipoint.

on nonswitched

lines,

and

point-to-point

eorr-

lention.

on both switched

atrd tronswitched

lines.

The

BSC

telecornrnunication

systent

perntits

comn.runicatton

using

eitheL type

o1'connection

(Figurc

I

).

Multipoint

It a

renrote

terrrinal

is

connected

via

a nrultipoint

iine.

clata

is sent

anci reccived

under

the

control ol'the

t'cntral or

conlrol station. ln order to scncl

ttr leceive

data. tlre

reulote

ternrirral,

rel'erred

ro as't ntultitlroppetl termirrul ot tributur)'

station,

l.nust be

selected

by the

control statron.

'Illis

pr.o-

gess

ol station

selection is

called

Txtlling

or atlclrcssittg.

Mrrc. Systenli-l

ctlltot bc a conlnrl

station.

Pollirtg:

Polling

ls a

lecluest to a trrbutary

staliolt to rfans-

rnit data to the control

statton.

Once the

bributary sration

has accepted

the invitation.

thru r.ecognition

of its

unicluc

polling

characters

sent by the

contlol

station. the

rentote

ternrinal

may use the

line to send data.

'Ihe

tributary

stttion ltotillcs tlre

control

station wlrctr

data

transler is

conrplcte

by sending a uniquc Iitrd-o.f-Trartstttissittrr

(EOT) character to the

control

slatiolt.

(For nrore

iltlilnra-

ticrrr or-r

control clraractels.

scc Duta Littk C'otttntl tn tltis

section.)

Upon

leceipt

of the L,OT

se(luetlce.

tlre

contr.ol

slation

uray

poll

or address anothcr tributary

slltrtrrr.

Addrcssing: Datl transf-er

fronr the cont lol sttliolt to thc

tributaly

station

orr a ntullipoint

nelwolk is

lccorrrplislrctl

by

addressing tlre

selectccl tributary

station.

Addressing is

n

request

t() a tributafy

stttion to rcccivc

data.

The

control

slatiolt notilles thc

tributary station

wheu

data

transf'er is

contplete by transnritting

thc L.OT

seque ncc.

Afier BOT l'ras

bccn sent. ths

contlol statioll

polls

or

addrcsses othe r tributary statrorrs

conncclcr-l vil tlte rnulti-

point

nelwork.

Orrly the control

station

has the figlit to rcrluesl

drtl

trlnslcr-s

orr a niultipoint

netwot'k.

Point-to-Point

-fltc,'tlter

typc

r)l

lirre eorrrree lion is poirrl-tt,-l)"ill

eun-

tention. with the

contputer and tlie

rentote te nrrirral

connecle d

via a nonswitchecl

or switclred line .

llS( ltlccortnrttricrrlions

('()necl)ts

lutrl I

rrlrinolirrt

Non-Switched:

On a nonswitched line. either the

computer By

using

data link control characters,

the computer and

or the renrote terminal ntay initiate the transrnission of data. the remote station

notify each other of their status, and

However"

if both stations srmultaneously attempt to transmit the status

of data sent or recelved

by them. During normal

or

receive

data, the

line

is disconnected. operation,

the

data

link characters

cannot

be included

in the

data belns

sent or received.

Switched. On a switched line. one of the statrons is desig-

nated

as the calling station. The other stations. or called Data Link Message Codes

stations,

accept calls

from the calling

station.

The

calling

station may

perlbrrn

the

calling

sequence

by either autocall The

BSC adapter

is

capable

of sending

or receiving data

in

(autonratic

dialing by the compul-er) c:r manual dial

(dilJring one of two

codes:

EBCDIC

(

Extended

Binary Coded

Deci-

performed

by the machine operator).

The called station rnal

lnterchange Code)

or ASCII

(Arnerican

National Stand-

accepts calls from the calling station by

either autoanswer ard Code

for Information

Interchange). The code

you

use

(automalic

answering by the computer)

or manual answer is

deterrnined

by the type of tsSC

adapter installed

in your

(machine

operator makes the

data

set ready). system.

The calling station

must

initiate data transntission by sending EBCDIC

and ASCII character

code

charts are

provided

in

the

propei

control sequence

to

ensure that a connection Appendix

A of this

manual.

has

been rrade with the

desired station. Tl're control

se-

quen0e

usuaily

involves the exchange ol stati<,tn

identiJicatbrt

sequences.

When

station identification sequences are used, DATA LINK MESSAGE FORMATS

data transrnission will not

begin until both the called and

the

calling station

have sent

and

received the

correct

lD Standard

Format

sequen0e.

The

standard tnessage

fbrrnat

consists

of characters

of data

When

tl.re control sequence

has

been completed.

the

calling from the code selected.

excluding

specially designated

data

station rnay either send data to tlie called station, or may link control

characters.

relinquish the right to send data by sending an End-of-Trans-

rnission

character. Once

the L,OT has

been sent.

the

called

station nlay initiate sending data to the

calling

station. When EBCDIC

Transparency

both statit-rns have completed sending

data.

the calling station

starts a discclnnect

procedure

to terntinate

the data link. tsSC adapters

with tl're BBCDIC

transparency

feature

in-

stalled rnay

send and receive

nlessages

containing any

or all

of the

possible

256 character

combinations

in the

EBCDIC

DATA

LINK

CONTROL code.

including

data

link

control

characters.

This

f'eature

allows unique data.

such

as

packed

decirnal data. to

be

Data link oontrol

procedures

are used to ensure the

proper sent

unallered

from one contputer

to another.

sending and

receiving of data

between the computer and the

remote

terminal. System/3

BSCA support assurnes the

responsibility

lbr rnaintaining the

proper

data link control Intermediate

Block

Checking

Mode

(lTB)

procedures.

The

intermediate

block checking

feature

allows large

The following inlbrrnation

is

presented

to provide

thc buff'ers o1'data

to be sent

and received

with parity

checking

Systern/3

progranrmer

with sufficient infbrntation 1o performed on eaclt logical

record

rather than

the total

propeLly

utilize

the BSCA capabilities. bufl'er.

The

ITB character

delintits

logical

records within

the bufl'er.

Data Link Control Characters

Data link conrmunication control between

stations, that is.

between

the conrputer and

the remote

te rrlinal

is urrin-

lained by' thc use of

Data Link Control

Characters

(Appendix

B).

System/-)

RPG

II Telecommunications

programming

pro-

vides

the

RPG

II user with

the

capability

of transmitring

and

receiving

binary

synchronous

data

via

a telecommunr_

cations

network.

BSCA

support

is

achieved

through

the

use

of an

RPG

Telecommunications

Specifications

Sheet

and

the

addition

of BSCA

as

a

valid

device

entry

on the

RPG File

Description

Specificarion.

No

other

RpG

speci-

fication

sheets

are

aff-ected

by BSC.

BSCA

STATION

TYPES

RPG

II permits

System/3

to lunction

as

any

of the

following

station t1,pes:

1. Receive

only

(receive

input

data

from

a

remote

terminal).

l. Receive

with transmittal

of conversational

reply

(receive

input

data

from

a remote

tennlnal

and.

when

required, transrnit

data

as

an acknowledgement).

RPG

ll BSCA Programming

3. Transmit

only

(transntit

data to a remote

terminal).

1. Transmit

with reception

of conversational

reply

(trallsmit

data to a rernote

terminal

and, when

required,

receive

data

as

an acknowledgernent).

5. Transmit

and

rece:ive

no

conversational

reply. Three

rlodes

of

operation

are

possible:

a. Transmit

a file,

then

receive

another

file.

b. Receive

a

file,

then transmit

another

fire

.

c. Transmit

records

of a

file

interspersed

with

receir.

ing

records

of another

file. (This

function

is

avaii-

able only

when

System/3

transmits

data

to OS or

DOS.

System/3

rnust

transmit

first.)

A

description

of

these functions,

including

complele

RpG

ll

programs,

are

provided

following

the

description

of the

specification

sheets.

Note: Each

telecomnrunications

program

implies

a counter-

part

at the other end

of'the line.

The two

programs

rnust

be

compatible.

For exarnple,

a

program

which

transntits

ASCII

data requires

a

program

which

will Leceive

ASCII

data.

RP(; Il lls('A Proglunrnrinr:

RPG I I TELECOMMUNICATIONS

SPECI FICATIONS

'flre

RPG'Ielecornrlunications

Specifications

Sheet

(Figure

2)

permits

the

RPG [I programmer

to enter

the

inforntation

necessary

to

estabiish

and maintain the

BSC cornmunica-

tions link. Each

BSCA

file

defined

on the RPG File

De-

scription

Specifications Sheet must have

a corresponding

RPG

Telecomrnunications

Specifications Shect.

Columns

1-2

(Page)

E'rttry lixplanation

0l 99 Page number.

Colunrns

li

-2

in the uppcr riglrt corncr of tlre spccifications

slrect arc used to inclicate the

page

number.

The

felc-

comrnunication Spccifications

nrust follow

the

File Descrip-

tion and rny File

Extcnsion

and Linc

Countcr

Specif

ications

Sheets.

Any number Line numbers.

Columns

3-5

are used to number the lines

on the

page.

fblurnns

3-4

are

preprinted.

so in rnost

oases

line nurnbering

is done for

you.

Column 6 (Form

Type)

lintry Explanation

T Coluutn 6 must contain

a T. T identifies

this

page

as a Telecornmunicatiotts

Spccification.

Columns 3-5

(Line)

Ii rt

try Explanation

IBM

ft;;, 1,1",: l ,' , ,,,

,,,, ] "

'"'""

1 I

I '"" i;,'" i ,

RPG TELECOMMUNICATIONS SPECIFICATIONS

1 2 ta167l /8198{t

Pr."rdi l l l l

LI1 ,",.,,

LlIILl

T

!

a

at

J5

I

J,;

.l

"l',

"t'

tl

T

r

T

li

rl

tl:

']

,l

IL

ltl

llr

f

li it

I

ill,ii

11ilii

r-l -T

llr

I

i,

'il

llllltllll

rli:

rlillili

rrrrl

il|r

illl

11llii

liliir

rillii

l

ll,

l.

l t i

ll

ll':l:

llrri

t;llr

llrl

l

t'

I

tl

LL J

I

't

lri

li

ii

l1

I

rl

ll

1l

ll

T

T1l..

rll

it

i

ll

Ili tt

L

I

ili l

.l

i'

rl

'll

Iiigure 2.'feiecommunications Specitication Sheet

Column

7 (Commentsl

Entry Explanation

r* Comments line.

You often want

to write comments

that will help

you

understand

or remember

what

you are doing in a certain

section

of coding. RPG

II allows

you to use

an entire

line for these

comments.

The comment

line is identified

by placing

an asterisk

(*) in column 7. Comment

s are not

instructions

to the RPG II program.

They serve

only as

a

means of documenting

your program.

Columns

7-14

(File

Name)

Enffy Exphnation

alphameric This entry must

be the same

as the file name

associated

with the BSCA

device

on the File

Description

Specifications

Sheet.

Column

15

(Configuration)

Entry Explanation

P

or blank Point-to-point,

nonswitched

network

(pTp).

M Multipoint network,

where

the control

sta-

tion selects the

tributary station

through

polling

or addressing.

System/3

cannot

be

the control

station.

S Switched

network.

Column

16

(Type

of Station)

Entry Explanation

This station

will transmit

messages

from this

file (transmit

only or transmit

with reception

of conversational

reply). The file must

be

designated

as

an output or combined

file

on

the File

Description

Specifications

Sheet

and

must

appear

on the

Output Format

Specifica-

tions

Sheet.

This station

will receive

messages

into this

file

(receive

only or receive

with transmittal

of

conversational

reply). The file must be

desig-

nated as

an input or combined

file on the

File

Description

Specifications

Sheet and

must

appear

on the Input Specifications

Sheet.

Column 17

(Type

of Control)

Entry Explanation

T This is

a

tributary station on a

multipoint

network.

System/3 cannot be

the

control

station and transmit the

polling

supervisory

sequence.

blank Polling is not used.

Column l7 must contain a T if column I 5 contains

an M

(multipoint network).

Column 18

(Type

of Code)

Page

of SC21-7507-5

lssued

30

June

1978

By TNL: SN2'l-5624

Explanation

ASCII (formerly

referred

to as USASCII) data

link control characters will be used.

When

ASCII is used, each station must

provide

file

translation when it is required.

Explorwtion

This entry is valid

only for EBCDIC. The

transparency feature must

be

installed.

The data being transferred may contain data

link control characters. EBCDIC data link

control characters

are

listed in Appendix B.

Entry

A,U

Entry

Y

E or blank EBCDIC data link control

characters

will

be used.

The

entry in this column must be the same type that

your

BSCA

and RPG

II program

supports. ASCII and

EBCDIC

codes are

listed in Appendix A.

Note: lf your BSC

program

halts because of an invalid

ASCII character

in your

data, check

your

ASCII

translation

table.

Column 19

(Transparency)

T

N or blank The transparency

feature is not used. Un-

packed

numeric or alphameric data will be

transmitted

and received.

The

data

being

transferred

may not contain data link control

characters.

I Note: This

entry is independent

of the

entry in column

20.

RPG ll BSCA

Programming 9

Pag€

of SC21-7507-5

lssued

30

June

1978

By TNL: SN21-5624

Column 20 (Switchedl Column 32 (Location

of ldentification-This Station)

Entry

IM

IE

Explanation

The computer operator using

this

program

makes

the

connection between stations

by dialing

the

number

(manual

dial).

Autocall

is to be

used

by this

station. The

dial

number

is listed

in columns

21-3 l.

Explaration

This is the number to be dialed when

column

20 contains an E.

Explanation

Switched

network. This station's

identification

is located at the position

referenced by the

symbolic

name specified

in columns

33-39.

Switched

network. The entry in columns

33-39

is

this station's

identification.

Entry

S

S Autocall is

to be

used

by this station. The

entry

in columns 21-3 I is the

symbolic location

of

the dial

number.

A Autoanswer

is

used

by this

program.

B Manual

answer is used

by this

program.

blank This

is

not a switched

network.

Notes:

l. When

calling,

you

should use

E,

M, or

S. If

the

program

is to be called,

you should use A

or B. That is, if two RPG

II programs

are

communicating, one

program

must have an

E, M, or S, and the other must have

an

A or B.

2. This entry is

independent of the

entry in

column

16.

Columns 21-31

(Dial

Numberl

blank This is a

nonswitched

network or a switched

network where

no ID is desired

for this station.

Columns

3&39 (ldentification-This Station)

Entry Explanntion

alphameric When

column 32 contains

an

E, this

entry

is the actual identification

sequence of this

station

(minimum

two characters).

When

column

32 contains

an

S,

this entry is

the symbolic name

of the location

of this sta-

tion's identification. The

symbolic name

must not be an array name. If the BSCA

file

is

primary

or secondary,

this symbolic

name

must refer to the first element

of a table.

(The

table

may have only one element.)

This

ensures

that the station identification

will be

in storage

before the telecommunications

line is

opened.

The station identification

can be

from two to

fifteen

characters;however,

the length

of

this field or literal

must

be the

same as the

length

of the field or literal

in columns

4l-47 (b|a*s in literals

do

not count

as

part

of the lensth). A station identification

must

not contain

a control character sequence

(see

Appendix

B). The station

identification

will be translated if the BSCA files

are beins

translated.

Entry

numeric

alphameric Columns

2l-31 must

contain a symbolic

name, other than an

array name, referencing

the location

of the dial number when

column

20 contains an S. If the BSCA file is an

input

file other than

a demand or conversational

receive file,

this name must

refer to the fint

(or only) element

of a table. This ensures

that the dial

number

will be

in storage before

the telecommunications

line

is opened.

(This

restriction

does not apply when the

function of the

program

is transmit

with

conversational reply.)

l -r,j, r' '-,1

.

!.;5iiaj(-l

Jt l!l

i-'.y.

r\J: Si.

Column 40 (Location

of ldentification-Remote

Station)

Entry Explanation

S Switched network.

The remote

station's

identification

is located

at the posirion

referenced

by the syrnbolic

nanre

specified

in

columns 4l-47.

E Switched network.

The

entry in cojurnns

4l-41 is

the remote

station's

identification.

blank This is

a nonswitched

network

or a

switched

network

where

no ID is desired

tbr tlie rernote

station.

Columns 41

-47

(

| dentif

lcation-

Remote

Station )

Entry

alphameric

Explanation

When

column

40 contains

an E., this

entry

is

the actual

identification

sequence

of the

remote

station

(minimurn

two characters).

When

column 40 contains

an S, this

entry is

the

symbolic

name

of the location

of the

rernote

station's identification.

The

syrnbolic name

must not

be an

array name. If the

BSC file is

primary

or secondary,

this

symbolic narne must

refer to the

first element

of a table.

(The

table

may

have

only

one element.)

This ensures that

the station identification

will be in storage

before the telecommunications

line is

opened. The station

identification can

be

from two to fifteen characters, however,

the

length

of this field

or literal must

be

the same

as

the iength

of the field or

literal in columns

33-39

(blanks

in literals

do not count

as

part

of the lengtir). A

station

identification

must not contain a

control

character sequence

(see

Appendix

B). The station identification

will be

translated if the BSC fiies

are beils

tran

slated

.

i{i". il ii\c

Pase

of SC21-7507-5

lssued

30

June

1978

By TNL: SN21-5624

This

page

intentionally left blank

10.2

Columns

48-51

(Remote

Terminal)

Columns

48-5

I are used

only if System/3

is to communicate

with the IBM 2770 Data

Communication

System or the

IBM 2780 Data

Transmission

Terminal (see

Appendix

E).

Otherwise, columns

48-51

are

never

used with Svstem/3

and

must

be

blank.

Column

52

(tTB)

Entry Exphnation

I Intermediate

block check

(ITB) is used.

blank ITB is not used.

Intermediate

block checking

can

be used only if records

are blocked.

Columns

53-54

(Permanent

Error

Indicator)

Entry Explanation

01-99,L1-L9 A permanent

error

indicator

should

be used

LR,ll1-H9 with every

BSC

file. If you are using more

than

one BSC

file, each

should

have

a

per-

manent error

indicator,

not necessarily

unique.

When

a

permanent

error

occurs,

the specified

error

indicator

and

the identification

indica-

Page

of SC21

-7507-5

lssued 30 June

1

978

By TNL: SN21-5624

tor of the record

causing the

error

are

both

set on. The

permanent

error indicator

should

be

used

to condition

appropriate

program-

ming response

(for example,

printing

a mes-

sage or performing

a controlled

cancel). No

further

transmission

should be

attempted

while the

permanent

error indicator

is on.

Ifyou are

using dual I/O buffers on the

Card System

and a

permanent

error occurs

when the

first record is received,

a system

halt is issued automatically.

Disk systems

only: To retry an operation

after

a

permanent

error

occurs, turn off the

permanent

error indicator. The

RPG

II pro-

gram

can then

access

the

BSC file that

caused the error.

If no

error occurs,

pro-

cessing continues;

otherwise the

permanent

error

indicator

is turned

on

again.

Keep the following

points

in mind when

you

retry an

operation:

l. The

permanent

error indicator is the

only

indication

given

to the

RPG lI

program

that an

error has

occurred.

2. Any data in the BSC

buffers at the

time

of an error

is lost.

3. Switched

lines

are

not disabled

when

an

error occurs

except for disconnect

sequence

received or hardware

de-

tected disconnect.

4. Any data

passed

to the user while the

permanent

error indicator is on is

invalid. Unless

your program

recog-

nizes all

data, an

unidentified record

halt may occur.

A limit should

be imposed by the

RPG

II program

on the nuntber of

times an

error occurs

before stopping

the

program.

5.

RPG II BSCA Programming I I

blank No permanent

error

indicator

is

specified.

If a

permanent

error

occurs

on

a card

or disk

system

when

no

permanent

error

indicator

has

been

specified,

a

system

halt occurs.

The

program

cannot

be restarted.

Note: Avoid

using

H1-H9

as

permanent

error

indicators

if

you

wish

to condition

operations

on

the

permanent

error

indicator

being

off. Since

Hl-H9 are reset

at the end

of

the

detail

cycle,

they

may

be

set offbefore

the program

cycle

in which

the

error

occurred

is

completed.

Also,

when

H1-H9

is

used

as

a

permanent

error

indicator,

the

Hl-H9 display

may preempt

the

system

halt

display.

If

the

Hl-H9 display

appears

before

the

system

display,

dial

the

0 option

on

a disk

system

or restart

the

card

svstem

to

prompt

the

system

halt

display.

Columns

55-57

(Wait

Time)

Entry E.rplanotion

numeric The

length

of time in seconds,

l-999,

that

BSC

will wait

with no

messages

being

sent

or re-

ceived

before

a

permanent

error

condition

occurs.

blank The

system

convention

for

timeout,

180

seconds,

is used.

A permanent

error

results

whenever

the wait

time

elapses

on

an

idle

line. l'herefore,

when

you

determine your

wait

time,

consider

time

the operator

may

require

to respond

to halts

and

other

processing

interruptions,

and

also time

the

program

may

require

for special

operations

such

as table

searches.

computlng

square

roots,

etc.

Nr.tte:

The

time

limit specified

applies

only to d,elays

caused

by this

System/3

program

and

does not

apply

to

the

rernote

device.

If the

remote

device

does

not commun-

icate

with

this

System/3

within

a

20-second period,

a

permanent

error

condition

occurs.

In addition,

the time

limit applies

only during

the

transmission

of a file, not

between

file transmissions.

The

occurrence

of a

permanent

error

indicates

the

end

of processing

of a file.

l2

Columns

58-59

(Record

Available

Indicator)

Entry Explanation

0l-99, A record

available

indicator

should

be

assigned

Ll-L9, to every

BSCA

input file

that is

to be reopened.

LR, (lf a file

is used

again

after

end-of-file

has

been

Hl-H9 reached,

the

file is

"reopened.")

See Figure

9

and

Appendix

F for

examples

using

a record

available

indicator.

This indicator

is

set on

whenever

a reverse interrupt (RVI) is received.

Column

60

(Last

File)

Entry Explanatiorr

L This BSC

input file is

processed

only after all

other

primary

and secondary

input files have

been

processed.

blank It isn't necessary

that this BSC

input file is

the

last input

file

processed.

Columns

61-62

(Polling

Characters)

Entry Explanatbn

Alphameric The

polling

identification

of this

station is

needed

if this

station is

part

of a multipoint

network

and the

BSC file

is

a

transmit (out-

put)

file. Polling

characters

are listed

in

Appendix

C.

blank This

station

is not

transmittine

on a

multipoint

network.

Columns

63-64

(Addressing

Characters)

l'. tttrv [.xplattutittrt

Alpliarneric The addressing

idcrrtification

of tliis slariolr

rs rreecled

i1' tliis

statiun

is

part

o1't luulti-

ptlirrt

uerwork

lnd the BStl filc

is r reue

ive

(iuput) llle. Adclressiug

charactcls

arc

listcd

iu

Appcndix

['.

btrnk This

stltion is

rrot leccrvinrr

ou lt rtrultipoint

nctworl(.

,'\'r.,rc.' L.rrtcr

polling

lnd lclcllessirrg

chlr-uctcrs irr

Syste nri.3

eocic: the

uornpileL will currvelt tlle

clitfilctcrs to tlle li)l-ln

lccluiiccl lry

the ctrde

spccilicd

in colururr

1 8.

Columns

65-70

(Remote

Device)

('olunrn:

(r5-70

lrc. usccl onlv

rl

Systerrr.i-i is to

corntntrrricrte

r'r'itlr

the tllN,l

1770 Drta

(lonrnruniclriorr

Sysrcnt or tlrc

IllM

l7E0 Drtr l'ransnrission'fcrrrrinrrl (Scc

Appendix

l-).

Otlle

lwis,.:

coluttttts 65-70

lrc rteve;

usccl witl Systcrnt-3

and

nrusl

l)e

blulrk.

Columns 71-74

(

Reserved)

Colurrrrrs

7l-1

1 tre ncver

used

u'ilir Systcrni -l

arrd nrust

be

b Lank.

Columns 75-80

(Program

ldentification)

f'oiunrns ,15-80

ntly contain

uny

charactcls.

'flrcsc

coluntrrs

nrav usc tlrf pr()!lfallr

rranre

in thc

corrt|ol

clrcl.0r LItey nray

corrtr-rirt

clrufuctcfs whicli idcntily

u ccltrirr portion

ot'tlre

progfanl.

Thc c'ntly is ignorcd by tlre

conrpilcr. but will

apl)erf in tlre

source

protrarrr

listing.

FILE

DESCRIPTION

SPECIFICATION ENTRIES

FOR

BSC FILES

The

entries irr the

colurnns listed below are used

to def iue

r BSCA llle on

the RPG File Description

Specifications

Sheet.

The entries in

coluntns not listed

are

the

sarne as

basic RPG.

No

other RPG specification

sheets are changed by BSC.

However.

since

a

BSC

progran.r

nrust

not be interrupted.

a

B nrust

not be entered

in colunrn -17 ot'the RPG

ll Control

Card Specilications

when the BSC

program

is to

be run on a

ciisk systenr.

Columns

7-14

(File

Name)

This is

the rranre of a

BSC file. The

samc file narne must be

used on

the

RPG

Telecornrnunications Specilications

Shect.

,'\r,,rc.

Look-ahcad f ields nlust

not be specified lbr a

BSC

file.

Column 15

{File

Type)

L.h

try

I

o

C

I')rplotta tion

This is

an

input (receive)

I-ilc.

This is

an output (transrnit)

lile.

Courbined tlle. Use

C whcn your receive flle

(]r

transurit file uscs

convcrsational reply. Un-

like conrbincd

card

files.

the acknowledgement

sent ils

a convcrsational rcply nray or nlay not

be addcd to tl.re last lecord received.

(' is an invaiid cnrrr, ii an

IIIN'I 1770

or

IBM

178() is

bcing

uscd.

l{P(i ll llS(',\ I'rogrrtttttting | 3

Column

16

(File

Designation)

'['his

is thc

sur]tc

AS

b:rsic [LP(i

ercr|r lltuL

l. l)

(di:rnand

Illc)is

the

rcrlurre

d

clttfv

lor

trurtsrttir

intarspcr,sctl

tri tlr

rct:t:it,e.

LIS(

A tllcs

ulso shoulu

oc

clcsignu

t ed

ls de'ntarrd

I ilcs

r,vit

ii an1' r'cec-ivirr[

])f

oltr

alr

l

wirrclr

does ror iiddrcss

tlrc

IISCA

l-tle

s irnntcdil

itrly

.

For.cxanrpic..

i1

-vout

BSCA

filc is

de.flncd

as a scc-

onclary f ilc.

thc telecclrrtnturucut

ious

line lvill

bc

Opened

as soolt

as tilc

ltrogranr

bcgins.

l-ltis nteans

thal

youl wart

lirnc

rnav elapse

bciitre

1,11n

arc rclcly

to ir,!.occss

tlrc llS('A l'ilc.

ll ritc

IIS('A f

ile

is clelincd

as u

dc-rnanci liic.

Irowcver.

tirt--

linr. u'ill

bc opcrrc.d

onli,

vi'hcn

tlic lrlogt'ant

is rcady

lo t.eccive

l'r.orn

tlrc

IIS('A

tilc.

R (recorcl

address t'ile')is

lrrr

irrvalicl

cntry. A BSCA

f

ile

cartuol

be I rccord

ltldrcss

l'ilc,

Column

17

{End

of File)

Lntel

urr

L:

rl'cltri-i:r

iiic

()Jt

lilr.ilirrri

(ir,icrvci

lile

i: to

rlc_

le

fntinc.,'.1-u1-iob.

l'lre

tJS(,\

illrLrl

lilc

crrn

lrt, tlrc

orrlv

lllc

with

un

E

rrr

colrrntn

17. Il urtr otlrcr

rrrpLtl

lllc lras

un

F.

spccilrctl

i'c.lrrrnti 17. tltcil

lll IISCA

itiprrr

liics

sir.Lrltl

liuvc

un

l: ilr

coluntn

1

7. -i-hc

l-.

irr

i:trlrr;tirr

l7 is nor

rlrirr_

rlatorl ltrrt r.litlroLrt

it wlrclr

cnd-o1-l'ilc

is

r.etrcltctl

rrn

tlrc

otllcr

llic.

tlrc IJS('A

lllc

riill

bc

ciosctl

u,irlrorrl

girirrg

llrc

s),stell

()it

llte otllci

errd

arr rrriiicntion

ot ri,llri

l,.rr

lrappcne

d. llv using

tlrc [:

in

uo]1111,,'

l7 lor

lll tiS('A

input lilcs.,

all systcrns

rvill

conrc

to u

succcssli,,

.,.,,1-,y1-_.jolt.

Column

19

(File

Format)

E,nter

an F

(l'i-rcd

lcngtli.l

tirL

IIS('A

l'iics.

Columns

20-23

(Blocl<

Length)

[:trtcl

tltr't;izc

ol tlrc blocks

ol ilatl to

bc proccsscu

n1'

tlSC. Illour BS('A

illcs trsc

ctutvcrsatiorrrrl

rcplr'.

block

lcrtgllr rnr"ntt

be

tlrc surrrc

lrs recorri

iclgllr:otlrcrri'rsc.

ltltrck

ir'ngtlt

cltr ltc

lr rrrrrltiplc

ol'rccolrl

lcngtlr.

'l

lr.'nlr_trrrtrrrrr

block lcrrgtlrs

rlc :10()(r

(\lotlcl |0 ('errl

Svslcnt)

urrd

r)()9t)

(Nlodcl

6.

iVlodel

l0l)isk Sysrerrr.

Nlodcl

ll. rrid

Nlodel

l5)

Cofumns

24-2-l

(Record

Length)

l:nlci

tlre lcltriit,,l'\'()ur

llS(.,\

ri,'erir.lr.

rigjti

lusliljr.rl"

i!l

.

illrlllrrr

-l

I l-. tt r,riri IJS(',\ 1i1,,,,

11,s,,'r'()lr\,a;\irlii)ltiii

ti:-

plt..

rccotr.l

i:rrllir

ilrl)l l)j llre r^r

rlr-

lt: irlrr,,i,

l,:rtLlllr.

li'

I tttt

tlo

ll{,i \l)rrr'il-\

lt

lL"\

i)l(l

l(.1r1-1llt.

tilr tci.()f,.i itrrt:iit

liil

bc

Llclltrllcrl lo /el o. 'J-ltrr

rluriltrrrlti

tccortl 1..r,.-

Ilr.

.,rr

.10()(r

(

\'ltiri.'l I 0 ('rrci Svsltttt

)

',rlil

()()()()

{

\l9tir,i {,. \lgtir'l

i0 l)isi' 5yslcnr. \lodel l l" rnd \lotlr:l l -i

).

,'\',rtr..

Wirert

tirc. tlnttsrtrtii,.ri

r.,.i,rii

i" i,.lr- Lit

!i) lit!' r,-'-1i)r(1

lertiltlr

spceificltijolt

ilcid ltr 1i!i iri(i:rii.titi. tlt. r.liil:r tl tirc

lcittlrirtdcr ol lirc

buitcr

nlr\ t.,.r:,. t. iirtL.-,t,.;."

l,r

ie)itlt\.

Column 32 (Additional Area)

Assigrl

tluul l,i0 lrclrs. l'llis

u()!rili|t 11,

11.5s'..!

'r1111

rL

1r .

i'ttttt't'rsu!iortul

BS( ;\ l'iies.

Arrv llr-ur)h,tr.

J iitiirirrtil

,r ...iits!,\

tlvo l,O rrcls t() bc ltssignccl.

Il titis

toilrnrl rs

i.rl:rr;r..

, , ,

ortt'1,'O lilu:.t ts

lrssigttcrl lrltti lltloLrqiil)rli

i\ l.'-,i':i:t'ri;rrtlr;,1-

ingll

.

Columns 40-46 (Device)

Tlrc

clcvice enr

rr iirr IJSt'A

lilcs

rs

liS( A.

r\ir,,tc.'

Orr tlrc Nlodcl

l0 Disk

51'srcrri.

\4odel

ll. NlutleI rr

lurrcl

Modcl 15.

llrc nruxirrrurl

lurrrbcr oi rron,lJSl'i\

lilcs

liiowcd ln l pfogriult

using 13S('A liles

clcperrcis ut)oll

llte

rturttbcr o1

IJS('r\

filc-r:

Number

of BSCA

f iles

In

program

Maximunr number

of

non-BSCA

files alloweci

1l

l+

DESCRIPTIONS

OF

BSC

FUNCTIONS

T'his

section

describes

tite

functions

that

Systenr/3

can

irer-

fornr

as

part

of

a teleconrmurricltions

network.

(..otrrpletc

RP(l

Il progrilnrs

are

inclucle

d to

show

how

these

functirrrrs

rna1,

be used.

Programming

Considerations

RPG

ll First.Time

Logic

RPC;

ll first-tirne

logic

opens

all

prirlar.y

ancl

se c:onclarv

in-

put files

dtrring

the

llrst-tinte

cycle.

"fhat

is,

one

r.ec:orcl

is

read

from

cach

prirnary

and

secclrrclar.y

input

file

betirrer

any

input

file

is

processed.

However,

<lepentling

.Lrpon

thc

particuhr

application,

you

lnay

want

t()

clelal,

first-titrre

logic

for

your

BSCA

inpLrl

liles.

you

can

a,:hieve

this

by

designating

cach

BSCA

input

file

as

a

clenrald

file (I)

in col-

ur.nn

16

of the Filc

Description

Specificatiorr

sheet).

One

BSCA

input

file

can also

be dcsignated

as

the

last

iile

(L in

colrrmn

60

of

the Telecomnrunications

Spccification

sheet)"

Remernbcr

that

an entirc

BSCA

input

file

ntust

be receivcci

belbre

another,

or part

of

irnotlier.

BSCA

inprrt

llle

can

bc

reccived.

Control

Breaks

and

Overflow

care.

rnust

be taken

wherr

transr'ittingt

rlata,t

toral

ti're

i'

any

l{PG

II progrant

which

both

lrarrsrrrits

arrd rcccrvcs.

Due

ttt

the

secluence

of total

ancl

rlcttLil

operations

in

tlie

RPG

II Proglani

Cycle.

data

nlav

not

be

available

lirr

outpLrt

even

though

i1

has

becn

read.

Sinrilar

crle

n.tr-rst

bc

taken

when

assignirrg

the

over.llow

indicltor

ir.r

a

pr.ogrant

tliat

botlt

lr.ansnrits

and rcccrvcs.

r\

lrotcntial

problent

exists

in

that

IU,G

Il. bccause

of

1he

pro-

grant

r:y,cle,

tray

try

trt

trlnsrrrit

an ovcrllr.rr.,,

rccorcl

lrltr-:r

receiving

a rccortl.

pa.qe

of SC21_7507-5

tssued

24 September

l976

By

TNL: SN21_5428

Data Restriclions

. Rerncntber

thal

/* in tlie first

two

positions

of a reoord

alr.r,ays

signifies

end-of-file.

This

applies even

to data

tiansmitted

anci received

in

a BStl

proglam.

Therefore,

be

sure that the

use oi literals"

coltstants,

or OS or

DOS

data

rccords

does rrot

lesult

in the transnrission

(rt

/* i!r the

lirst two

positions

of

a

record.

A/ofe..

\Vher.r

a table is

clurnped,

a

/* is

gcneralcd

to denote

thc: errd

of the

tabic.

Therei'olc,

il'you

dump

a tablc

lo

a

BS('A

flle. expect

an

cnd-of-flle

condition

when thc

lablc

iiirs

bcert

lccciveri.

r ltr'you

have

the

aulo-turnarouncl

f'eature

ancl

you

are

conrntunicatirrg

in transparent

mode

to the ItsM

27g0,

the last

lecord

receivecl

by

System/3

beforc

turning

the

line

around

will

be blank.

Consicier

this

when

you

spec-

if,\,

r..,,,r,0

identifiers

in the

RPG

input

specifications.

Details

ol'transrnittirig

data sets on

the

3741

can

be

fountl

in the

IBM Systemf

-l 3741 Mottets

3 and 4 hogrammnble

l&rk Starir.tn

Prograntnting

ReJercnce

Manual,

GA2l-9 194,

or IBA,I

3741 Data

Station

Relbrence

ll,lanual,

GA2l-9 lg3.

Data Formats

Svstern/-3

RPG

II support

use s

tlte fttllowing

data iorntats

lor

lransnrission

of

clata,-tirese

lbrrrrats

rnust

be

used

when

scnding

data to

Systcrn/,3

froni

I CpU.

The BSCA

support

provides

lhcse

lirr thtr I{l)C

ll trscr.

. Non-transparcnt.

non-lTll:

S'l'X-data-E

IX (fr'f

ll)

o Non-tratrspal'cnt,

lJ'B:

S f

X-cll

t

l-lT ll-cla ta-lTts-data-E1'X (I-Tts)

. Transparcnt,

non-l'l'il:

DLE-SiX-data-ETX

(LTU

)

e l-r'urrsplrcnt.

I'fB:

I)L.l--sl-X

-dara-lI

u-DLE.Sl

X-dara-lTIl-D

L

[.]-STX_ila

ra_

I:

tX (lrTU)

r\ir,r/c.'

ll'f

AM

ctnn()t

scnd

lrrrrsparcnt

il'B da1a,

but

can

fccclvc

trtltspafcllt

l'IU datl.

l)utu

curr hi.:

ertlrcr

l'ixcd

lcrrgth

and r.rnblockcd,

or blockcd

rvitlr

tixcd rcr:orcl

lcrrgtlt.

li' ll-ll rnoclc

is

usecl,

thc ITll

clla]"actcr

ritrrst prccecle

olclr

record

crccpt the first,

arrcl

slroulcl

rrot

be

countr-d

in thc

rt'corrl

length.

RP(;

Il US('A

Plogrumming i5

Errors

If ar error occurs

at either

station,

Systern/3

will retry the

operation

a ma;<imum

of seven times.

System/3

halts with

a

permanent

error if it receives:

o Art EOT

while transrnitting

o The following

sequcnce

of data link

control

characters:

TTD-NAK-hOT.

RPG

ll Diagnostics

Refer to the RPG

I rcference

rnanual

t'or

your

systern for

a discussion

of contpile

tinre RPG

ll diagnostics.

Model 15 Only

Because

the BSCIA

program

is

an

interrupt

driven

program

and

cannot

be

rolled

out of its partition.

care must

be taken

when

using BSCA

files

with SPECIAL

files

(where

allocation

of systenr

supported

disk devices

is

perforrned)

or unpre-

dictable results

will occur.

To prevent

the

program

l'ronr

being

rolled oul by allocation,

the RPGTCF programmer

must

ensure that

the BSCA

data managernent

DTFs

and

IOBs

are

located

6K

bytes beyond the

beginning

o1 the

partition.

Receive

Only

The receive

only function allows the RPG lI user to receive

input

data from

a remote

terrninal.

The flle

rnay be

either

a

prirnary

or secondary

llle. Blocked records

are

permitted.

Dual l/O areas

can be used

to achieve

greater

throughput.

The receive

only file

is defined

as an input

file on

the RPG

File Description

Specification

and as a receive

flle

on

the

RPG Telecommunications

Specification.

ln tlre followingreceive

only program

(Figure

3), a branch

officc

is transnritting

a

daily

sale s report

to Systcm/3.

The

infornration

received is

listed on

the

printer

and

punched

and

printed

on

oards. The

salesuran's nante is

sent on one

record.

This record

is

followed

by any nulnber

of records

identifying

his sales for the day. The

card

file

produced

by

this

and other day's

transmissions

can be sorted

and used

by

another RPG

Il program

as data to calculate inforrnation

such as inventory

control

and

the

salesman's

commissions.

The

same program

could then

transmit this

information

back 1o the

branch office.

16

File Description Specif ications (Figure 3, part 7

)

C'ttltrttut [)escriptiott

Page

of SC21

-7507-5

lssued

24 September

1976

By TNL: SN21-5428

Telecommunications

Specifications

(Figure

3, part I

)

Otlrtmn Desciption

7-l.l

l5-t6

l1

l9

20-'.t7

3:

40-tl6

SALES

is tltc

llle

which

contains

rhe

salcs

rcport

rcccivcd

by this

station.

SALIIS

is the prinrary

input

lile

fol this

prograln.

End-of-lllc

on

SALES

does rrot

determine

cnd-ol-job

tinre.

BSCA

files

always

have

a

f

ixed

length

format.

Records

are

blocked.

Dual l/O arcas

arc uscd.

BSCA

is

thc

device used

fbr BSCA flles.

IIS('A is

also spcciliccl

whcn

conrrnunicating

with

a dcvice

attuclrecl via

thc Local

Conrnrurri-

cations

Adaptcr.

LE5

r8-20

32-47

CONTROL

CARD

AND FILE DESCRIPTION

SPECIFICATIONS

l:rr,

11;:l

] i,i

File

Description

Specif

ication

Sy0rl),)l c

ilevi.e

SALES is

the BSCA file

for

this

program.

This station

is

part

of a

switched

network

(S),

and will receive

messages (R). Polling

is

not

used,

so

colunn

l7 is

blank.

bB(lDlC

codc

(

H)

and

the

traltsparency

fcaturc

(Y)

are both

used.

Autoanswer

(A)

is usccl

by

the

called

statton.

Explici

t

stution

idcnti

ficatiorr

sequeltccs

ale

given

for

each

station.

Station lDs

ensure

data

scculity

otr tlic

switched

network.

Ir)tcnllccliate

block

clicck (l) is used.

7-14

| 5-t7

)l

IBM

1""''""

oTlL

L^I

E

P]T

LT

RPG

TELECOMMUNICATIONS

SPECIFICATIONS

",,,,,bfr].,

.

Itl'C;

tl IISC'A

[,rorrlrlrning lj

Column Descriptktrt

53-.54 fhc pe

rmanenl

crror

indicator

used is 99.

55-57 'I'hc

tclecomntunications

line will be kept

,lpen

for 1

20 seconds

even though

no

messagcs

arc being

sent or received.

After

I 20

seconds have elapsed,

a

pernlanent

error

condition results

if the linr:

still is

not

being uscd.

lnput Specifications

(Figure

3, Part 2)

Data transmitted

by the remote

station

is received

by

SALt,S.

Calculation

Specif

ications (Figure

3, Part 2)

If a

permanent

orror

occurs, LR is set on to enter end-of-job

processlng.

cx?t 9094 2 u/M

050.

t 2 157671?a19AO

**

FFl.,_';fftiil",..

lFlElcTEltltl

I

i

I

r-- RPG CALCULATION

SPECIFICATIONS

|igurc 3. Reccivr:

Only Progrant

(Part 2 of 3)

Ottt1.;ut

I:ornrat Specif

ications (Figure 3, part 3)

i\ Irclrrtrtrcll ft)(r: cllilsf\ lll clt.(lf

nl0srilllt,

li) ilc I)fillic(i

IBM

I

OUTPUT SPECIFICATIONS

1--r- ---'--|

')lTor

LLrsr

{+

5',

DATE'

I-

I

i

_,-

+._

qaN

SPECIF

ICATiOI{S

I i'r li )l te i) al

' idol

' i,,;lt;,,

Iniilcjuiilvr

llcccnt Onil l)roerarrr

(lrarl 3 ol'-l)

Itl'(i ll llS( r\ Pr()griunnlin! I9

Receive with Transmittal

of Conversational Reply

Ihe r.cccive witir

trarrsnrillal

,r1

convclsirtirrrrli rcltly iirrretron

;rikrlrrs tlr,.r RPG

ll user [o fcccive data urrd. lvlrcrr

nccessur'1

.

to scrrd

u lccorci

to the

leulotc tclnrirral.

Dull Ii0 arcas uud

blocking or dcblocking

ol tlaLa

are not pcf

nlrteJ.

.[irc

reccir,'e witlr

lrarrsrnithi

rri- conversltiolal

rcltlv lile

is

def ined as l corlbinetl iile

on tlre

Ii.PG frilc DcscLiption

Spccii'ic:ritiorrs

Shcct and

as

a rcceivc

filc uri

tlie RP(l

Tele-

corirrrrurri.:uI iorrs

Speeil rcations

Shcct.

-['lre

lirli,.nvirrg progral]l

(Figure

4) is sirnilar

to the re(:cive

irlilr., piogrlrn:

however.

the

receiving

statiol carr

rrow

se rid

a i-cspollsr)

t()

the

rernote

statiou

if'the irrlirrrnation

rcceived

is inconrplete.

File Description Specifications (Figure 4, Part 1

)

Column Desc'ription

1.14

l5

lb

t1

l9

20-21

40-46

SALL,S

is

a

BSC file.

SALES is a cornbined

{ile

since

it will receive

data and transmit

a conversational reply.

SALES

is the

primary

input lile for

this

program.

End-of'-flle on SALES does

not

determine

end-o1-job

time.

BSC files always

have a fixed length forrnat.

Blocking

and deblocking are

not

permitted

lbr oonversational

BSC llles.

BSCA is the device used fi)r

BSC fiies.

RPG CONTROL

CARD AND

FILE DESCRIPTION

SPECIFICATIONS

IBM

I

, lr

j

I'F'l'

'l'l

0!

0(i

ili

;l"i

ri;a

jf,l-i

Itfl ;"";;N';";l

Control Card

Specifications

igurc 4. Receive witlt'fransmittal of Conversatkrnal

Reply

Prograrn

(I'>art

I ol 4)

Telecommunications Specifications (Figure 4, Part 2)

Colunut Dest'riptiotr

l-11 SALtsS

is

tlre BS( 1ile liri this

l)fogran).

l5 t7 Tlris

station is

part

ol a swrtclrcd

llctwork

(S)lrtd

will

rcccive

witlr

cottvt'rsltional

reply

(l{). Irolling is noi uscd. so coluntn l7

is bhnk.

EtsCDI(l

codc

(E)is

Lrsed. but thc trans-

pareucy

l'cature is r)()t usrrd

(N

). Autornswer

{

A

}

is usctl h1 tlrc clllctl

\lrl.t()t1.

Lxpliii

t :l lrl ir

rri

itleil I i I ir'ut i,

rrr

ic(luc|rec\ J Ic

given

lirr

each statiorr. Stution

lDs ensure

datr security orr

tlrc

srvitclied

network.

The

peruranent

cfror indicatol used is 88.

Thc teleconrrnunications

linc will bc kc-pt

open

lbr 45 scconds

even tllougll no rncs-

sages afc being scnt

()r'r'ceeived.

AttcL 45

seconds havc

clapscd. il

p0nlrallcn

t

crror

condrtion results if thc

lirre still is not being

usccl.

18. re.

t0

32.11

5.1-54

55-57

RPG

TELECOMMUNICATIONS

SPECIFICATIONS

,@ld

l+rrli l

rP

/5 /li /l /8 /1r

80

|,! , f;l^-l^L l.,

,,,r.,,,

Ll<lKiE lriLiY l

lllrrrc

.1. Ilt'cci\ c

rvith

Transntittal

ot ('on\crsatronal

Rcplt I)ritgnrnr

(

Prrt

ll

IBM

R.P(; il tJs(

A

lnput Spe,cif

icattons (Figure 4, Part 3)

Lirtc

0). t'oluttttts

69-70: ll SLSNIAN

is

lbscrrr tr()rrr

ir

rccord

lra'ving

ari

N in

positron

l. indicatot.()9

is sct trn.

Calcttlation Sper:if ications lFlqrtre 4, part 3)

Il lt

Pr'rtrtltncrll

cfl()l ()ccuf\.

Lll is scl

()n

t() illl.f ,',,r.1-,,1'-1ob

i)l

occsslltg.

RPG INPUTSPECIFICATIONS

1 ,r, , 11 11 rl

ps :' RRLEPT-}/

":;ll l-'-- I

1,,,r'li

,,i

irl

,.,,1'll,r,

:I-f1-----

i-l-r

-1-

i-rl

lsnsuA,Nl i i i

rli

rsLsMANiLl t r

0+l

rtuneeq

131

,flEttl i

Afl

'oeer ,

14 ,DEL0AT

sftgusrNo I I i

T]PG C^LCIJI,A

i i(JII..] SPFCIFICATIONS

RREPLY

I'r:':',,r

',,- ,6,4 ;

''

' l llrll'

l

i

I

**,t,..,,,1''.

I

't

'l

rl

il

ll.

ll,,

,r

i

.L

I

'l

IL

i

tgttrc 4. Reccivc

\\'ith'['riln\lltilra] o1'( on\er\utiLtnal

ltcnlr I)rogrrnr

(l'rrl .l

o1

.i)

01

ill

Iru]i

t.l

Otttput

Format

Specifications

(Figure

4, part

4)

Page

0,i, lirtes

I5-l6: A peruranerrt

error

causes

an crror

nrcssage

to be

printed.

.,1,

ar

:l'

(ri

ll

"l'l

ri

tt

.,.

"l

,ll

5f.l

Pagc

06, littcs

9-l

l: When

iudicator

t)9

js

set

on,

a

coilver-

sational reply

is sent

fiour SALES.

OUTPUT SPECIFICATIONS

'ORDE8 F ROI'1'

'igRANCti. OFFICE *i

'

5lAlLEsrtlAN'

ITE 14'

' CU^ST.OI"IER'

DEL)VERY

DATE'

l',

TtrM,

UST

1i1

,29

97

3

*l

,?-

3,

lr.

|tt

i [r1 '1.

rli

I8M OUTPUT SPECIFICATIONS

L

IDA

.l

ENTRY

,,LAsT

:ilril 6dl€lPi.ii

T:

t:

U]

;i,i

,,],1

"l.l

li

u

ln.

0{i

.,',irpt"

a7

tl

it:

l^t

tlu'

'

T4I5SING TN'

R]ECORD

SENT'

igurc

:1"

l{ctrirr. \\'ith

Tr.ansrnittal of

('onlcrsational

Rcplv l)rograrn

(Plrt

4 ol .1)

I{P(; II IJS('A I)r(jLriu}lnlir)r

Transmit

0nly

.[1rt'trrnsrnit

only

tLrnction rlkrws

the I{PG ll use.r'to

r

uutsnrrl liS(' datl to I relnote

locltion. l)ual

ItO lreas

rrntl

blocking ol data can be usccl to

lncreasc

tlrroughput.

'[-lrc

tllrrsrrril orilr'lilc

rs tlctrnccl

as an

oritl)t-rl lllc ttrr

tltc

ttlr(, liilc

l)cscliptiorr

Spccilicltions Slrcct urrcl us u trrnsnllt

rlc rrn tlr.' RI)(l

Tclcconrrrrirrricutiorrs

Spccri icutiorrs

Sltcct.

'I

hrs

/rarrsirril

oiilr'

Proslunr

(Figrrrc

5

)

is rcudirrs,

lrrd tlans-

rtrrttirts

tlrc

card

lilcs procluccrl

ltr tlrc. rcL'airt'

r,,ii{r'proglarrr

r I:igLrrc

.1

1 llrc

\\cck's

dutl

llrs be'en

sor

tccl br, salcsrrrll

nanrc.

'f

lrc anl()unt ol'cuch

srlt lras

be

crr

prrrrchcd

into tlte

r:rlcls ercl tlrc totll sllt's ioi t-aclr

salt-.snran

is tr-arrsnrittcrl

to

tlrc br.rrrclr

ot'l-icr'. Altr.r

all cartls ltave ltccl rclcl.

thc rotal

rr1

lll sule:; is tlansurittc'cl.

File Description Specif ications (Figure

5, Part |

)

Colunrn DesL'riptiorr

7-t 4

l5

19

)0.)1

,tl

40-46

WKLYSMRY rs

a tsSCA

llle

.

Since

WKLYSMRY is to bc transnrittcd. it

ls

an

outpLtt lilc.

IISCA

filcs

always havc u

lircd lcrrgth l-ornurl

Rccolds

are bl()ckcd.

I)ual I/O arcas are trsed.

BSCA is thc clcvicc usccl

fbr

IISCA f

iles.

IBM RPG CONTROL

CARD AND FILE

DESCRIPTION SPECIFICATIONS

File

Description

Specif ication

1 2 lt) ll\ li tl tl nl

' ldrl il:t:irft",,

FlRlds]Mlil

ior l)AM

I igur.'5. lrrnrrnit

Onlr l)rogrent

(l)art

I ot'.1)

Teleconrnttnications Specifications (Figure S, part 2) (1t1111111,

Dcscriptiorr

5l lrrtcrntcdiatc

b]ocl,

circck

(l)is irscci.

5-l-5.+ I'lrc

pcnnartcnt

ctlol indiclttir

rrscrl is

15.

-55 .57 'l

ltc

lc.lccorurriulicutiorrs

liltc ri

iil bc lie

Ir

opcrr

trtt

70

scctrltls cvcll

1ll(iu!.ll

n() ll)csll!j)

alc bcing sL'ltt

()f

tcccivctl.

.,\t'tcr

f0 soeontl:

ltavc

clltIst-ti.

u

l)cfllJIrr'tlI

i.I

I

()|

.'{)nLliI

i()ll

rcsults

ii'tlrc

linc slili

is rroi

bcirrs

Lrscrl.

!npttt Specificatiot)s (Figur:: 5, ?arr 1)

Littt's 0l-()-i.

l'itc

i'irsi

clrrri i.'l,ti

c()ltlliits

iiitr

r.lt,r,

rrurr,ii!r

ol'tllc

fr'lilotc

stxtioti

liltri i';()1j1 :i.:lirlt

j..1!'i:ir:

.rit.r.;tl

sc

(lur'lt

cc

s .

Colttutr,,

1-t4

l5-17

lE-19

l0-ll

-1j-+ /

Dcst'ri1t

tiott

WKLYSMRY is

the BSCA

lile for rhis

pro-

gra

u)

.

TIris

station

is

palt of u srvitcltcd

net.,vork

(S).

and will

bc

transnrilting

(T). lrolling

is ltor

rrsccl.

so

coluntn

l7 is blank.

l:ts('DlC

code

(l:) illld

rllc

rraltsl)arcltcv

lcutrrrc

(Y)arc

borlr

Lrscd.

Autocall

is

Lrscd

(S).

and

coluntns

I l--l I

contain

tlie

sy niboiic

location

o1' the

tlial

l)

Lrlr ber.

S1,'nrbolic

locatiorrs

alc

givc-rr

l'ol

caclr

station

rdcntitlcation

sequcllcc.

Station

IDs e'nsLrlc

data

sccrrrit)'

on thc

switclted

rrcl rvrtr-k.

RPG

TELECOMMUNICATIONS

SPECIFICATIONS

RPG INPUTSPECIFICATIONS

''",

Az 'i-r

airu.S

*t'

IBM

ff" l,;.

r-

- -- a

rnt* i

YriD l

OU

R.I

P]

r-

s

rrn,nir-

l"louNTl

I

['ranstlit

Onl1.[trogrurn

(l,art

] of'

j)

t{t,(; II lis(

Calculation Specifications

(Figure

5, Part

3)

lf a

permanent

error occurs, LR is set on to enter

end-of-job

pr()cesslng.

Output-Format Specifications

(Figure

5, Part

3)

Lines 0l-04: If a

permanent

error occurs.

a

messagc printed

at

total time identifies

the record being

processed

when the

permanent

error occurred. However,

because of record

blocking and the use ofduai l/O areas, all the records

pre-

ceding

the record identified

may not have

been transmitted.

Lines 05-10: When on, the

permanent

error indicator pre-

vents the

program

from

transmitting totals.

RPG CALCUI-ATION

SPECIFICATIONS : :-tr

t;.;"1;; i l llilwnm-l

t-''1

,-- L:::":ii:iiiIilll l ,,-

[qJ.|

., il::flr'

".

L;lilN]5

I{iti:

IBM . ,.,.. RPG

F*. _ J;""'

lP{,,",-"' P: L "'," "'

OUTPUT SPECIFICATIONS

L:fiIIi;if

I-"''-'"]

.,."[d]9.,

il:iilt",,,

EshEdl

' PRioGlRtAfl

lINlElRRuPir

ED'

'

.wHr[-lE1

PlRplc EisS r NGI' .

l

il

tr

OTA I.

o

O

o

OTFU

igurc

5. l-ransmit

Only Prograrn

(Part

3 of 3)

Transmit

with Reception

of Conversational

Reply

The transntit

with

rcception

of conversational

reply

function

allows the

RPG II user

to transrnit

data to

a remote

terntinal

and

receive

a record

in return.

The

received

record

will

be

nrade

available

by RPG II on the

cycle.

Text

rnay

or ntay

not be received

for

each

block

of texl

transntitted.

When

text is received,

the

user

cannot

send

another

block of text prior

1o

processir.rg

the received

record.

Dual

l/O

areas

and

blocking

or

deblocking

arc

not

perntitted.

Matching

ficlds

are

not

permitred

for rhe

BSCA

file.

The

transrnit

with reception

of conversational

reply

lile

is

deflned

as a

cornbined

file

on the

RPG

File Description

Specilicatton

and

as a transmit

file

on

the

RpG Tele-

conrnuni(

ltion

Specifi

cations.

Program

m i n

g Co nsid

era

tio ns

1. A conversational

reply

is

in

effect

forced

by RpG Il.

That

is. the

reply

is accepted

at

output

tirne.

but it

is

not

available

for processing

at the

receiving

station

until the

receiving

station

enters

the

next progranl

cycle

. Wl'ren you

transmit

with

receipt

of conversa-

tional

reply,

then,

be

sure

to review your

progranr

for

compatibility

with

the RPG

II Program

Cycle.

Do not

expect

to process

a record

that

will not

be available

lbr processing

or output

until

the

next program

cycle.

2. RPG II allows

only

one

conversational

reply

for each

RPG

II Program

Cycle.

An error

halt

occurs

if more

than one

conversational

reply

is

received

during one

program

cycle.

The program

is

then

terminated.

3. The

records

rnust

be of

equal

length

for

both input

and output.

This progrrrn

(Figure

6) is

sirnilar to the

tansmit

only

program:

however.

the station

receiving

the transrnission

can uow

send

a

response

that

is

printed

on the

System/3

printer.

File Description

Specifications

(Figure

6, Part |

)

Colunm

I-14

15-16

19

20-27

11

Description

WKLYSMRY

is a BSC

file.

WKLYSMRY

is

a conrbined

file since

ir will

receive

records

and l'rave records

transmitted

f'ronr

it. WKLYSMRY

is the

secondary

inpur

file.

End-of-file

on WKLYSMRY

does nor

deter-

mine

end-of-job

tirne.

BSC

files

always

have

a

llxed

length

forr-na1.

Blocking

and deblocking

are nor

permitted

for conversational

BSC

files.

40-46 BSCA is the device used

for BSC

f iles.

Telecommunications Specif ications (Figure 6, Part |

)

Column Description

1-t4 WKLYSMRY

is the BSC

file lbr this

Drosram.

15-17 This station

is

part

of a switched

network

(S)

and will be transmltting

with reception

of

conversational

reply

(T). Polling

is nor

used,

so

column l7 is

blank.

l8-19 EBCDIC

code

(E)

and the transparelrcy

feature

(Y) are both used.

l0-31 Autocall

is used

(S),

and colunrns

2l-31

contain thc

symbolic location

of the

dial

number.

32-41 Syrnbolic

locations

are

given

lbr

each station

identification

sequence. Station

U)s

ensure

data security

on the switched

network.

53-54 The

perrnanent

crror indicator

used is 77.

55-57 The telecontrnunicattons

line

will

bc kept

open for 70

seconds eveli

though no

rnessages

are being

scnt

or

received.

After 70

seconds

have

elapsed.

a

perntanent

crror condition

results

if the line

still is not being

used.

RPC; ll BS('A

Progrrtutlitttr 21

IB}I RPG CONTROL

CARD AND FILE DESCRIPTION SPECIFICATIONS

File

Description

Speci{ication

:',"',',r:,','r

l

-l --+

'[-ARiDFILETI

llKL Y5^tR

F]RE,P.LY

RPG

TELECOMMUNICATIONS

SPECIFICATIONS

12t516DlAnSQ

,,*

bE.,_';::i1,,

".

ltlRl

ilPlrl

tl

igrrLc 6. [-ransnrit

\\'ith

lLcccption o1

( onvcrsatictnal

l{r'plr

I)rograrrr

(l)ltrt

I ol 3)

]E

lnput Specifications (Figure 6, Part 2)

Liltes

0I-01. Thc first

card

rcad

contains

the dial nunrber

o1'the

rcnrotc

station and botlt station identification

sc-

qucll

ccs.

Lirrcs

08-09: A nressage

of fiour I to 50 characlers is

receivcd

as a couvcrsational rcply.

RPG TNPUTSPECIFICATIONS

IBTTT ,

1""1,,",,'\"'l

r".' I l' *Illl_I

tq

/b /6 t/ 78 /9 80

*u"

fdil., :::lll,,,,,,LFI@EM

YSll'{R

ii

igrirc 6, 'fransrnit

With Rcccption of Convcrsational

Reply Prograrn

lPart 2 of 3)

RP(; II IIS( A l)rogntrtrtttittg ]9

Calculation

Specifications

(Figure

6, Part

3)

If a

perr.nanent

error

occurs,

LR is set

on to enter

end-of-job

processin

l;.

Output-Format Sprcif

ications (Figure

6, Part 3)

Lines

0l-02: Conversational replies

received

are

printed

to

the

output file REPLY.

Line

03: A permanent

error

causes an crror

message to be

printed.

Lines

04-08: Data is transmitted

from WKLYSMRY.

RPG OUTPUT SPECIFICATIONS

15 i6 11 18 19 80

_'J::i"fl

,,."

ItiRfEltlLT?l

**F[d',

Figure 6. Transmit With Reception of Conversational

Reply program (part 3 of 3)

Transmit

and Receive

(No

Conversational

Reply)

Tu,o

tllcs

are dcfined,

ou!'as an

input

lile

on the

RPG File

Descriptron

Specilications

Sheet and as

a

receive llle

on

the

RPG

Telcqonrmunications

Spccifications

Sl'rect.

The other

tlle

rs dcf incd

as an

output

illc on

the l{PG

Filc

Description

Specilications

Shect and as a transmit lilc on

the RPG

T

elecornrnunications

Specitications

Sl.rcet.

l.ransmit

and receive RPG

BSC

programs

can be written

thlee

ways:

1 . Transrnit a

file,

then receive

a

file.

). Receive

a

file. then

lransmit a file.

3. Transnrit inlerspersed

with receive

(Systenr/3

to OS

or

DOS

only).

P rog ra m r r t i ng

C o nsi de

rat

i

ons

ln any llSC'

prograui

which

transrnits

aud

rcceives with

ncr

conversational rcply, colurnns

I

5

and l7-47 rnust

be

identi-

cal in tlrc two RPG Tclecomnrur.tications

Specifications

lines.

Transmit a File, Then

Receive a File

Ihe

receivc

llle

n.rust

not be defined as the

primary

input

l-ile on the

RPG File Dcscription Specifications Sheet.

An

L nrust be

entered in the Last

Filc

Proccssed

coluntn

o1-the

telecornmunication

specillcatlon.

Matching flelds and

the

record availablc indicators

nrav not bc delincd

for the BSC

filcs.

Systerni

3 in this example

(

Figurc 7) is a tributar') stutir)n

(polling

characters

RR)

on a multipoint

network.

OS or

DOS is the

control

station

(centlal)

and

polls

tltc

stlitiotts.

System/3

reads a card

file

containing

part

nurnbers

and

number of parts

required.

The cards have been sorted

into

ascending

order

by part

number and are

sequence checked

by specifying

a matching

fieid

(M

l) on the RPG

lnput

Specifications

Sheet.

The

parts

information is transmitted

to the central

when the central

polls

the station to see

if

any

data

is

available. OS

or DOS accepts

the data

from

System/3

and sends back

a list of parts

that

are

not avail-

able. The

list is

printed

on the

System/3

printer.

The L in

column

60 of the Telecommunications Specifications

Sheet

causes the

file named

ANSWER

to be

processed

after the

other

input file. Normally, any

file

without

ntatching fields

would

be

processed first.

RPG

II lls('A I'rogratnnring l l

File Description Specifications (Figure 7, part I )

C'oltrrrtrt Dast'ri7'ttiott

l.l4

l5-17

l9

20-21

40.46

ANSWER

and

REQUEST

are

BSCA tlles.

ANSWER

leccives

mcssages;

therefore.

it is

an irrput

llle. It is

the

secondary

input file.

artcl

dcterntines end-of-job

tintc.

Sincc

RLQUEST

is

transn]irred.

it is

an orrtput file

BS['A files

always

havc

a

l'ixed

length

format

ANSWER

is

not

blocked;

REQUEST

is

blocked.

IISCA

is

the dcvice Lrsed

for

BSCA liles.

itsht RPG CONTROL

CARD

AND

FILE

DESCRIPTION

SPECirrCNrrOrrrS - - Ii

lrl

I I I I ll dr rr:,a.@|oll

l,llrtl

Control Card Specifications

T-T T----T;:r -- =--.-_ l

File

Description

Specif

ication

,

1'""

f-r" =

j

i0f DANI

| | | )1,1,i.,',,,

i l l t'r,,l

' -

I r 'r,,,r:, 5'r"r t-

l

l, L,,

. r1, ,1, I i,i

ll,L,,r)Al,l, l!r

la-

1 'lil I,i:

I'l ;

,' i

I

+_ ilil

lFiPARr

s ElPl6!

]'inr.rs

wen hlsiel

lFRLauEsT

q i

I'ir-::s: pi

i i

i:iilil

i:iiill

,1 5L

L

'lrFrCiUl I

ISCAI

3sc,A

)R.IAJ

TE]R

_1,i iili ]'

igttrc

?. f trnstttit-[.ltcrt

llcer:irc

l,rogLlirit

(No ('0n,",ersationlriRc1tl1

)(l)art I ot.l)

Te,lecornrrlunications

Specif

ications

(Figure

Z,

part 2)

('t,ltrrrttt Dcut.tTtliott

/-1.+ REQUEST

ancl

ANSWER

ar.c rhc

IISCA

f

iles

lol this

prograut.

1-i Titis

station

is

pult

ol'a

rnultipoirrt

rrc,tlvor-k

(NI

;

I{llQLlESl

u'ill

bc

rnnsnritte

d

('I).

ANSWEIT

will

rcceivc

drra

(ll).

(ltltttrttt Deu'rilttiort

6l

-61

Thc tclc'corrrntrrnications

linc I'r'ill

bc f:c1rt

opcn

tor I

00 sccorrcls cvcn

tllougll no lltcs-

sages

arc lteirrg

scnt

ol rcccive

d. At'tcr

100

scconds

have elapsed,

a

pennancnt

r.rror

condition

rcsults

i1'tlrc

line

still is not

bcing

rrscd.

ANSWER

must be thc last

filc processccl

(L)

because

tlrc scrluence of tlrc

proglanr

is

tfansurit

a

f

ilc. tlictr rcccivc

a

iile. Wrtlrout

tlrr-

[- in colunrn 60. ANSWI]R

would bc

pr()ccssr'd

bclbrc PARI'S. be-causc PAILTS

lras

nratclring rccrtrcls.

lLl{

arc thc pollirrg

chtri.lctcfs usi-cl by'tlte

control statioil 1o

re(lLlest

d:rtu

t'r'onr

tlris

tribrrtar-y

statioll

.

Tlrc addressing

charactcrs usccl b1,'llre

coIt|tl1

slation to request

tltat this tfibutai)- station

rcceivc

data are

99.

6.1-64

60

l6

11

l8-l()

l0--17

5-r 5+

Tlris

station

is

u triltrrtalv

stutiorr

(T)

in

a

nlrrltil)oilt1

|cnvork.

and

polling

is

rrscd.

t:llC

DI(' coile'(l:)

arrd tlrc

transplrcnc\

t'cltrrrc (Y)arc botlt

usecl.

Since pollirrg

is used.

tltcse

coiuntns

arc

blank

I'lrc

pclnunent

cfror

inrlicutor.Lrsed

rs

rj(r.

IBM RPG

TELECOMMUNICATTONS

SPECIFICATIONS

lril: 1",*,"" 1.,, T | il I l f {c,,,rr"m-J, l

1u,', l''1"-'-'1",,','l

I I I I L 1l liiril'".[r_T]Rl4hl

15 /6 1/ /8 t9 80

igurc 7. 'l-rlnsrnit

-f

Ircn

Iicccivr'l)rosranr

(\o ('onvcrsrtional

Rcplr

*,*@E'

ItP(; Il IJS(,\ I)rrgrrrrrntirrr: tl

lnpttt Specif ications (Figure

7, Part 3)

Lines

04-05:

ANSWER,

the secondary

input

tile,

receives

data i'rorn

the control station

after REQUEST has

been

transnritted.

RPG INPUTSPECIFICATIONS

''l

-,1-

-l :

't

Figure

7. Transrnit Then Receive Prograrn

(No Conversational Rcply) (Part

I of 4)

,.,,di],,,_

Calculation Specifications (Figure 7, part 4)

If a

permanent

error

occurs,

LR is

set on to enter

end-of-iob

processlng.

Output-Format Speifications (Figure

7, Part

4)

Lines

0l-03: Records

read from PARTS

are transmitted

from REQUEST

until end-of-file

is reached

on PARTS.

and

no more

data

is available for the control

station.

Lines

04-05: Records

received

by ANSWER

are

printed

to

LIST.

Line

06: A permanent

error

causes

alt error

message to bc

printed.

RPG CALCULATION

SPECIFICATIONS

1801,,,",.,",.," a!3nesMa.h,..c!..,a,.n

f^ ---

13"' --- - ___J ,,-n,* Graph,c

i i T fl--fkEh*l

|"".g'aa-'':Dalp|nl"l(lo.|Plln.h':|]

, r_ -_*1 t_: t__i._ .L i I-l-. l__L l

Result Field

Fac!or 2

t

,"*dfr.,-

Ii

_TJ

I

it

I

T

+

.T

j

'ir1i

r+iir

I

iI i

OUTPUT SPECIFICATIONS

Card E ectro Numer **fri]"-

1i

Tl

T

Figure

7. Transmit

Then

Receive

Program

(No

Conversational

Reply)

(part

4 of4)

RPG II BSCA

Programming 35

Page

of SC21

-7507-5

lssued

30 June

1978

By TNL: SN21-5624

Receive

a File, Then Transmit a File

The receive

file is defined

as a

primary

or secondary

file on

the RPG

File

Description

Specifications

Sheet.

The record

available

indicator

must

be

blank

on the

ItpG Telecom_

munications

Specifications

Sheet.

In the following

example

(Figure

8) all data

for a student

test

given

at a remote

location

is received

by System/3.

The first record

contains

the correct

answers

and

the

number

of questions

on the

test (maximum

50). All following

records

contain

student

answers.

The

correct

answers

and

the

students

answers

are

stored

in arrays

and

compared.

For each question

the number

of students

that missed

the

question

is then

calculated

and

transmitted

back

to the

r_emote

terminal

as an element

of the array

named

RES.

File Description Specifications (Figure I, Part I

)

t9

20-21

32

40-46

RPG CONTROL

AND

FILE

DESCRIPTION

SPECIFICATIONS

File

Description

Specif

ications

Description

GRADES

and RESULTS

are BSCA

files.

GRADES

will receive

data; therefore,

it is

an

input file. It is

the

primary

input file.

RESULTS

is the

output file since

it will be

transmitted.

End-of-file

on GRADES

causes

LR to be

set on.

BSCA

files

always have

a

fixed length

format.

Both files

are

blocked.

Duat

I/O areas are used.

BSCA

is the device for BSCA files.

Column

t-14

r5-16

l7

GXzr m2. UM/60'

75 16 77 78 79 80

,^*ffi.'

_',irr,l",..

RliffLldld

Control Specif

ications

H

o

;

o

i

c

Ei

"cl

;I

6l

>l

il

:t, :

E

,

Model 20

:

s

20

!

a

E

a

6

9l

nq

d

l

!

l9

t6

la

:ls

-t-

Reler to the specrl c Sy*3m Reierene

Llb'ary man!al ior actua entr e5.

54 55 56 57 5A 59 60 61 62 63 64 65 6 67 63

"-li &

;c

a

E

o 1 lr

Figure 8. Receive

Then Transmit Program

(No Conversational

Reply) (part I of 3)

36

Telecornmtttnications

Specif

ications (Figure g, part 2)

Coltrtrtrt Dcscriptiort

7-14 GRADES

and

RESULTS

arc

the BSCA liles

foi this

prograni.

I ) Thrs

station

is

parr

o1'a

swirchcd

rrctlvor.k

(S).

I6 (;tir\l)Es is

un input f'ilc

arrd ri,ill

rcerivr.

tlura

(R). ITESULTS

ts

an oulpul

t'tlc

ancl

rtrll

lrL

111111511rittr'J

(T).

Interurediate

block

chccl<

(l) is rrsed

-fhc

pcrnruncltt

cffor

ilidicator.uscd

is -55.

TIic

tclccouiniLuricatiorrs

litrc will bc Ice

pt

open 1br

70

seconcls eve rr

tlrouelt

no llles-

sagcs

afc ltcinq

scnt or reccived.

Aftcr 70

seconds

havc clapscd.

a

pcnlaneltt

cnor

conditrou

re

srrlts if

lhc line

strll is rrot

being

tuse'cl.

5 -l-5

r+

17

I3-19

l(l

-l l-.17

l)olling

is not

Lrscd.

so colrrntn

l7 is

blank.

i:B('DIC

code

([:.)ancl

llrc traltsl)lrcltcv

tL'aturc

(Y)rLe

ltoth

uscd.

Atttoansrver (A) is

uscd

b1' tlrc

callr:cl

slarion

[:rIlii1

1

\l:lI

i(

rn

iderr

t i I

ieut

jt,rr

:erlrrer)ces

lrrc

errtcled.

Statiori

lL)s

ensuic

clata

securitv

,,tt

llrr'

rrr

il.lr.'J

nt trrtrr

k.

lnpttt Specifications (Figure 8, Part 2)

Lirtas

0l-0-l: -flre

f

ilst recolcl

teceivctl

conturrrs

tlie nLrnrbcr

of <prcstions

olt

tlle

test ancl tlrc

cofrect

answcrs

to tlre

que

stions.

Tlrcse

alts.,ve-rs lurrn

arr aLra1,.

ANSAI{R.

Litrcs

04-0->. ,,\ll records

leccived

rlter tlrc tilst

lecord

eontui|r stUdents'allswcfs

to tltc tcst

rluestiolrs.

'l'hcse

Answe fs lolnr tltc

urrav

S'f DARII.

t{l'(; ll lls( ,\ r7

RPG TELECOMMUNICATIONS

SPECIFICATIONS

RPG INPUTSPECIFICATIONS

i ,1'L,r

""

folal.'

_ ?Hiil'

".

[8tFl+W

5 lL ll /8 l9 nl

', @!l iilii:, lR[lrlrjoP]

Figure

8. Receive

Then Transn.rit

Prograni

(No Conversational

Reply) (Part

2 o1 3)

Calculation

Specification (Figure

8, Part 3)

Lines

0l-02: If a

permanent

error

occurs,

LR is

set on

and

02 is

set off ro enter

end-of-job

processing

immediately.

Lines

03-09: The

array

containing

the

correct

answers

(ANSARR)

rs

compared

an elcntent

at

a time

to the

arrays

lbrmed

by

students'answers (STDARR).

Front

these

comparisons

the nutnber

of wrong

answers

to eacli

questiou

is

computed

and entered

in

the array

RES.

Lines

I

I-18: When

the cntire inpul file (GRADES)

has becn

received

and the

LR indicator

set olt, RES rs

transrrrltted

fronr

RI-SULTS

by exception

output,

one clenteut

at

a rinte.

unlcss

a

pennancnt

error

occurs.

Output

- Forntat

Specif

ication

(Figure

8, Part

3)

Lines

01-04; RESULTS

is transnritted

as

exceprion

outpur.

Lines

05-06: A pcrnranent

error

caLlses an error nlessage

to

be

written.

RP(; II IIS('A l)rrsltnrrrrini:

IBM

|',:

() )6 1t tta i\t tt)

@rat 1,,;l;lt.,

lntrirlfi@ld

GUESTTON. J*

occuRRED

I

tgurc

8. lRcecive-l-hen

Iransnril Progranr

(No

( onvcrsational

l{eply)

(l,lrt -] ol 3)

Transmit

Interspersed

with Receive (systeml

3 to OS or

DOS Only)

A "transrnit

interspersed

with

receive"

program

transmits

data

lrom

one

file

and

receives

data

in another;

the

data in

the

two files

may or may not be related. I_hlike

conversa-

tional programs,

a

'otransmit

interspersed

with receive"

program

may intersperse

data

several

records

or several

blocks

at

a time.

The

receive

file must

be

defined

as a

Demand

file on the

RPG

File

Description

Specification.

The

record

available

indicator

must

be

defined

on

the

RpG

Telecomrnunication

Specification.

This

method

of transmission

can be

used

only

when

System/3

is

the

remote

terminal

that

initiated

the

transmission.

When

data

is

transmitted

from the con_

trol

station,

System/3

suspends

its

transmit

file

to recerve

the

incoming

data.

Program

m i n

g Con

sid era

tion

s

Once

System/3

BSC has

begun

to process

the last

recorcl

in

the

BSCA

transmit

file,

System/3

will

ignore

the

record

available

indicator,

whether

or not the

last

record

has

actually

been

transmitted.

When

BSC

accepts

for trans_

mission

the

last

record

in the

file,

RpG

II completes

LR

processing

and

begins

to close

the file.

This

rneans

that after

RPG II passes

the

last

record

in the

transrnit

file to BSC,

RPG II completes

Last

Record

(LR)

processing

and

begins to close

the file. Consequently,

if

OS

or DOS requests

to transmit

a response

to a record

or

block

transmitted

by System/3,

the request

is ignored

if

it is

a response

to the last

record

or last

block

in the

file.

If OS or DOS

requests

a response

on

the next-to-the-last

record

or block in the file,

the

request

is

ignorecl

only

if

the

file

has

already

been

closed.

The

System/3

programmer

can avoid problems

this

may

raise

in a

particular

program

by agreeing

with the

OS or

DOS programmer

upon

a

special

record

to be

adcled

to the

end of the

System/3

transmit

file. This record

woulcl

signal

OS or DOS

that

System/3

has

gone

to end-of-job

and

can-

not

honor

a request

to receive

from

OS or DOS,

even though

that

request

may

have

just

been

transmitted.

Page

of SC21-7507-5

lssued 24 September

1976

By TNL: SN21-5428

ln Figure

!),

a

card lile

contairring

inlorntation

about

a stu-

dent test

is read

in

and transrnitted

to an

OS or DOS

for

processing.

During

transrrrission,

OS or DOS

ntay itrte.rLupt

to send

back results.

Wren

rhis occurs,

RPG

wiil turn

on

record

available

indicator

0,4.

Thc

input

file

is then

read

and the

incoming

data is

printcd

on the printer.

Systern/3

then

resumes

transmission.

File Description Specificatirtns

(Figure

g, part |

)

Column Description

7-14 RESULTS

and

GRADES

are

BSC

files.

15 RESULTS

will receive

data; therefore,

it is

an input

llle. GRADES

will be transrnitted

and is

an output

tile^

16 To receive

data interrnittently,

a

BSC file

must

be a dernand

file.

17 End-of-file

on

RESULTS

does

not

determinc,

end-of-job

tirne.

19 BSC files

always

have

a fixed

lengtli

forrnat.

20-27 Neither

BSC file

is

blocked.

40-46 BSCA is the

rlevice

for BSC

files.

RP(; II lls( A l)ro:rLrrtttttirtr

,+l

RPG

CONTROL

CARD

AND

FILE DESCRIPTION

SPECIFICATIONS (,x7)

!o92 I LrM

OfO.

i\ ltl | /8 lg Bl

l,i,r:ll't,

iiB[ln]qtl

File

Description

Specif ication

Figure

9. Transmit Interspersed

With Receive Program

(No C'onversationalReply)

(Part I of 3)

rl

i

f

I

Control Card Soecifications

Telecommunications

Specif ications (Figure

g, part 2) 32-41 Explicit

station

identification

sequences

are

given.

Station

lDs ensure data

security on the

switched network.

53-54 The

pern.ranent

error rndicator

used is 44.

55-51 Thc telecornmunications

line will be

kept

open t'or

70 seconds

even

tltough no rnes-

sages are being

sent

or received. After 70

seconds have elapsed,

a

permanent

error

condition results if'the line

still is

not

being

used.

58-59 The record available indicator is

0.1. lt is

set on when the remote

statiou is

ready

to

scnd

a

record

to be

received

by RESULTS.

lnput Specifications

(Figure

9, Part 2)

Lines

07-09: RESULTS receives records from

the

remote

station. These records

contain a student

number

and the

student's score.

Student scores are calculated

by the

renrote

station

from

the data lransnritted

from

GRADES.

l)

It)

Column

7-t4

17

18.19

20-3r

Desuiption

RESULTS

and GRADES

are rhe BSCA

files

for

this

program.

This

station

is

part

of a switched

network

(S).

RESULTS

is

an input file and will receive

data

(R). GRADES

is an

output file

and

will be

transmitted (T).

Polling

is

not used,

so

column

l7 is

blank.

EBCDIC

code

(E)

and the

rransparency

feature (Y) are both

used.

Autocall

is used

(E),

and

columns

2l

-3

I

contain

the

dial number

of the

remote

station.

RP(;

Il IJS(

A I'r,'r'r';rrrrrrrirrr

-{J

IBM

T

RTII@J-

frz

rll( Ir') " !1-\

AN5AR

R

5]-}A

RR

a(A

. rY.

< ,r( t

ot lt

t6 , r

RPG

T'[

LECOMMUN

ICAI

IONSj

I]PECi F ICATIONS

ii

','-

I L2K

I

L

lT

I

IBI{

IBM

: li

1l

l

li

i\\

i i l-

l!

l

l,.i

i

,

, .r i lr,' I

1Lto.1d,i6t,

ti]oto ;

. T RrT

R(p,t-

lt

,i

qrl'Iq i<,Qi FV

A DES 5lr rE;Y

t,

LYtS ltl L,:b /!J

,L:56 7

I

Ltr

i']PG Ii\PI.J1

SPECI

FIC,ATIOI\IS

@t{ iRTROI

I

I5TtTDENT

I

i

IDF(rrJ T< rcR

acN

zcT

1 Cq

3CD

AA

ilB QL

5 rp1*qYg5

LT 5q ANSARR

3 5 sTU DTD

11 bO 5TDARR

3 5 sTDNT

8 L6 ;CORE

cc 63

I iruic't. I

r.rn.nrri interr1,.i.eJ

\\

iilr I{rrrrrt l)r

-i -i

C;tlt'ttlatiort

'sltecificattons

(f-rgtrre

!),

Part -l) rlr

ril(' :'!illt \\ll\ irr

1L'trI I \\!ii1 rrlie

tirjitiiti'''' 'r'r'l'

l

,rl"t.li

r.{,1 :lr.rir

'i..

'tr, .; , .'ill

iiLl lr':l!"i'rl

i'r li!:SL i l S

tLitlt'tlr

f\rL'llilr)ll

r)ull)tli t,t

l'}l{ll\l lltrr.

jtr:1..'

ilt.,t ii,. rr rirl.l,,,

.,1,.,tiirlLIli

,ici)l.is iiilll:\-

;,rll..l,r

. \'r\:\

I

i.iti:: i;l-t,'r..

Lr)tr[)

] rs,-'t.r,:Lticd tlLrtiii!.

rlt'iltil

tlrtre. tlt.it i.'.

bcl,Ie .'tttl',.rj

ff ili()tr'\1ilir()n

:riltl

IllNc: it irr I{l:SL l.l S lnilrc:rtrit

ltJ

i:, i(\r}r.

\L'i or \','llclr Ill- \l) 0rrclrnllclt illt

criti-oi-lilc eoitilitrirtt.

L

rrril 0-l is

,e

t rrll ;.rrrtl l0 i::;f l i)rl. rec()iLis *ili lrc ltu.r'irictl

tir llt:SLll.

f

S.rl,l

viill be uvlrilriblc

lor t'tit:i.ri1.11

,r111p111

,,;

PttlN'l'. Ioop I cuti

it.'crtle tttl

or rc-otttillcl

lrttr

lltttf

()i 1\

\ji()ll.c\!(]l)llilt0|0ll|i-()].l.llcitltsbutrllei1!i1!'(]{)liSI|()..l[l.tliFtlrttlatSt'iei:iitt.;lloll

l)trN I

S. I

ircr.'lortr.

liltcr

()rio

gloiiP

()l

ricr!rtl. lilit ir.'cl

rcil.l l)\ tlrc icccrvirig slilii()1. tlre

rcccrvirr,: \rl|i{)lt nrnsr \rl I ittr'.,

r'i-l)h:

(;lt \L)l.S

i' ii.ti;r,lii 1lfi1 l(i

lllr Iclil.td

tlrc cntl

()r'-jrlc

in(lir'irlor'(l0),)l1 s() tilirl

lilf rlJXl

gr()llI

oi \l'iilrilr

Iuir)l

(l\

nliti'

llc rcltil.

Littc'i

i)7-i-.r;

[-trLrP I is cxLrcttletl

rltttittg iLrtlrl tiittc. tltlit is.

Ll{ irttlrclttrrr

sci

()ll.

[-otrP i l)rr)cjssc\

reeirtrl: it,r i{l.Si L-|S i..';,tltlcrl.

RPG CALCULATiCN

SPECIFICATIONS

I8M .,,","."

s,..a(,..h

rc,..;1.:

r:r

lFr.,.an. | "...,, lc,"pr. I l;; ;M; I

r'--^" '" ", "'

i; ' l"*k'E]"

r

"*L*

f+

I

OUTPUT SPECIFICATIONS

T-^ -

Punch nq brapn!'

.1 :1'j'

o

F

I

lena

nre

T;

F

.I;

i

-

s[p Outl,ut Ind

cato,\

D,*,

i

ii

tj ill[il;,

1

)l )4 ?l

t t

D

o

,[F]o[rl

,

itrilri

Il

iliii

*ll i

llill

rl,l.

Ii-Jri.-

I

ii

tSz

l

i

FJH

,w

il

*i

Tri -11

.t5

tbA

. ,r,t{

i

1.3

A?

. lz5

,zg

.'l

lii

l

if'll,l,.--rll.

I

.i:ilrilrli

riiilll

']ER]floR;

OC-CUIRRED',

.

'sruDEilT #'

f +r i '

i

' SCO'QE = '

,tli,,,,itl,i

r

i. r ..1,.-, I I r

I

I,t-r.r,

tr,Il,

I I IJI Il_, I tl,

:L]

05

1'

o' ,

;;

'i;

;1"

l

t.'

!?

ll'

1+'

Figure

9. Transmit

lnterspersed

With Receive

Progrant

(No Conversational

Reply)

(part 3 of 3)

The

coded character sets for

ASCII

and

EBCDIC

shown below. Use

the set that

vour adapter and

mlng

sy'stem supports.

ASCllCodes

Appendix

A. ASClland EBCDIC

Codes

The data

link

control

characters

recognized

by System/3

are ljsted in

Appendix B.

are

program-

Main Storage

Bit

Positions

O,1,2,3

Main Storage

Bit Positions

4,5,6.7

ASCII and

F.BCDIC Codes 11

i:3CDlC

Codes

Main

Storage

Bit

Positions

O,

1,2,3

I

Appendix

B. Data

Linl( Control

Characters

'['Irc

IoIIiIr,',irrq

cIratic1e rs

lnd c]rulacte

r-

scclItcltccs

ltrr.

rcc0qrrizcrl

br Ststcitrr-l

llS['A. I,or

tictuiicd

iltlrrrruutrutr

trrr

L)rrtrr

l-ink

( orlrol ( llaf.e

tcrs.

scc

(it'ttt'rul

Iil.li)ntMtit)tt

lJ

i

t

t u

ry Si.t

t

t L l t ro t

r t t t

r.\ C t u t

t

t t t r t r

i t'a

l

ir.rrrs.

(i,\ 1,/

--l

(X1"1

N,tnte

St;rrt of Heirrlinq

Starr. of Tet: I

Errtr

of -f

r.rnsnttssion

Block

Enct of I ex r

Ertct

of Tr.trrsmrssr<tn

Enqurry

Nr:qaI

rve l\r:k

nowledqe

Synchronous

lclle

Datr Lrnk !scape

I

nterrncrli,.ite

Block Cltaracter

Erren

Ackrrl'wledqe

Orlc.l

Ack rtr,,rulerlqe

Wril Beforr: Trlnsmil Pos.

Acl<

M;n<1ator

y lisconnect

Ft;ver

se Inter rupt

Tempor

ary Text Del;ry

Transparent

Start of TexI

Tr

anspafent I nter rnerl

ra te Block

Transpareni

End

of Texr

Trrnsparenr

Enci

of Trans.

Block

Tr arrspareni

Synchronous lclle

Transparenr

Block Canr:el

Trarrsparcnl

TTD

Dat;r

DLE irr

Tritnsparent

N,4ocle

EBCDIC

sct-]

STX

ET t]

EIX

EOT

FNO

NAK

SYN

DLE

IUS

DLE

(70)

t] L E,'

DLE,

DLE EOT

DLEO)

STX ENO

DLE STX

DLE IUS

DLE ETX

DLE ETB

DLE SYN

DLE ENO

DI E STX DLE Ei\O

DLE DLE

I\,4ne|non

rc

SOH

STX

El'ts

ETX

EOT

ENO

NAI<

SYN

DLE

ITB

ACK

O

ACK

]

WACI<

DrSC

RVI

T

TI)

XSTX

XITts

X ETX

X ETts

XSYN

X FNO

XI

TD

XDLE

ASCII

sofl

STX

EI tJ

E X

EOT

ENO

NAK

SYN

DLE

US

DLE O

DLE

1

DLE;

DLE

EOT

DLE.-

STX ENO

I)rrllr l.irtk

( ottItol

( llilrirtlfr\ 49

.50

Polling

and

addressing

are used

on

multipoint,

nonswitched

networks.

Polling

is

a

request

to a tributary

statlon

to

transmit

data to the

control

station (central).

Therefore,

polling

characters

identifying

your

station

must

be entered

on the RPG

Telecommunications

Specifications

Sheet for

the BSCA

output (transmit)

file.

Addressing

is

a request

from

central

to send data

to your

station. Therefore,

the

addressing

characters

must

appear

on the RPG

Telecommunications

Specifications

Sheet for

the

BSCA input

(receive)

file.

Appendix

C. Polling

and

Addressing

Characters

for System/3

A polling

character

is

contposed

of two identical

alphabctic

characters;

an addressing

character

is

contposeil

rrf

tlvo

identical

alphabetic

or nunreric

characters.

polling

antl

addressing

characte

rs must

be used

togethcr

in certaitr

patrs.

When

a

polling

character

is selectcd,

the cornplententary

addressing

character rnust

be used.

when

an

addressing

character

is sele

cted,

the

complententary polling

character

rl-lust

be used.

Polling

and

Addre ssing

('harrcters

lirr

Sl'stcm/3 5I

\ uiirl

pr,iirirl

lllr(l lr(L(ira'\\ing

uitrtlrctutr

i,,r irrrlir I iil lJl(

,lrt!l ,\:i( ll ,,trLle'

i.tir'

,-.1\'0rt

l,.t'lou

tl ir:r1.,.

EE|CDIC

CODE

ASCII CODE

I

I ntl

.t,l

--T

I

l

Mt\4 ntnl

NN

+ --- -

I

X)\ I xx

Pollinq

Character

Appendix D. RPG ll Teleprocessing

Specifications

Surrrrirary

RPG

I I

-IELECOMMUNICATIONS

SPECI

FICATIONS

( ttltt;ttrt Strltit't

tI .

tt

tr_t'

o

I

-(/9

0ll()-9e9

I

t-l

i'..t

1

tlut

tu I

ir

t

t t

I'lrra

nrrinhcr

i irrt ttttrttbt'r

Iricn ti1 ics

il lclaa()nlt]ulltcatl()lt spccil'icut

rol

Itlcrttiiics

il .olllllcru lilrr

Nrirrtc ol' IJS(

;\ lilc

l)rrill io l)\)llrt.

tt()l\\\ ilcitctl ne

trrrrrl'.

rrtLrltiporrrI rreI\\

()r

1..

srr

i1

cltcil

nel

rr

ol I'

I

ri.lllslllll

()r

lr'eet\c

(\\itll

()l

\\,lllr()iLl

f()rl\'fl\itli()litrl re|11

1

I

r rlrLilltr\ \lllli(rlr" r)oll-iiii)ullll\

\S(

ll.(lorntcrlr it'lcrrttl

loasIiS.\( ll].

i,

lJ( l)l(

Sit'itclic-d

()r

|(r1.

r)Luluill

()r

itulo ltrtswcr''elrll

l()cirli()rl

ol tlnrl

rtrtrttltet ii lLtrtoeulI

l)ilri rrrrnrhcr

rr loarrtiLrrr

ol tlilrl

rtttrnbt'r

l.ocutrott

iil ll) il ll) rLscrl

ll)

r,r lo,llrlrorr

ll ll) it Il) Lrscrl

I

oculiort ril

ll) i1 ll) Lrserl

-

l+

ta

I

(-.

lr

t\

]')

l0

l1-j1

ll

.l.l

-.i

(

.+o

l'rt:.r

c

Lute

lorirt

ltpt

( ot11111g,11t

l

ilc

riuirrc

'|

rpcol

\l ll I tl

)ll

I)

Pc

"l

e()ltltr)l

[']

frt't'l

e,rtit

\lpirurrrr-ric

I

Irtlt:plttcttcl \'. \ or lrllrtt1. Itiilr\i)l[ct]f\ lclturc rrse tl 0t lt()l use tl

( ,,ttli-tll:tll,rtt l),,1 l'1.,,'1,

\1.

s

It{

|. biurri'

\. I

I ,rt

blrLttk

Su

rtelrcri

l)rri rrLrrn[rcr

[-oeutiott rrl

iticrttil ielrt rorr

llil)

\lit

tir)tl

\1. t..

s. \

lJ.

Lrllrli

\ irittcr re

.

,lll)llitlllfl

l-

S.

I .

blrrnk

I oe

lrtion

ol

rticntrliclLtiort

ler)l()lu sllrti()rt

\. [. irl.Lrrk

Itlcrr t i

l

reut

rLin .\lpirlr nrrr

ie

tl]ls

slitlt()ll

Irle

n t

i1 ie u tiorr ,\ip

ltu nrc

r ie

lcnl()t0:llrlr()ll

il--1 ll)

or lrrcutrLrrt

ol

l[] rl ll) Lrsttl

RPG | |

TELECOMMUNICATIONS

SPECT FtCATtONS

(Gontinued)

Colunrn

48-51

)i

53-54

55-57

58-59

60

61-62

63-64

65-t0

71-14

75-80

tiubiect

Remote

terrninal

ITB

Permanent

CTIOT

indicator

Wail

time

Record

available

indicator

Last file

Polling

characters

Addrcssing

characters

Renrote

device

(Reserved)

Program

identification

Entry

Blank,

2170,211r,

2172,2113,

2114.2780

I,

blank

01-99,

Ll-L9,

LR,

HI-H9

Numeric,

blank

0l

-99,

LI.L9, LR,

Hi.H9

L

Alphameric

Alpharneric

Blank,1442-1,

1442-2,1443,

0545-3, 0545-4,

))t?-t ltlt-.

1501-l )50)-r

5496-1,

5496-2

Alphameric

Explanation

Columns

48-5

I are used only

if rhe

Model l0 Disk

System,

Model

12,

Model 15,

or Model 6

is to

communicate

with

an lBM2710

or IBM

2780

(see

Appendix

E). Otherwise,

columns 48-5

I are never

used

with

System/3

and must

be blank.

Intermediate

block

check

used

or

not

Signal

of a

permanent

error

Wait

time specified

or assumed

Indicates

that the receiving station is

ready to transmit

Identifles

BSCA input file

to be

processed

last

Polling identification

Ad dressing identification

Colunrns 65-10

are used only

lf the Model l0 Disk

System, Model 1

2,

Model

15,

or Model

6 is

to

comnrunicate

with an IBM 2110 or IBM

2780

(see

Appendix E). Otherwise, columns 65-70

are

never

used with

Systemi3 and

must

be blank.

Not used

Name of program

FILE

DESCRIPTION

SPECTFICATIONS

FOR

BSCA

FILES

Column Stbiect Entry Explanation

7-14 File

name Alphameric Name

of BSCA file

15 File

type I,

O,

C Input

(receive).

output

(transrnrr;,

com-

bined

(conversational);

C is invalid

with

an

IBM

2ll0 or

IBM

2780

16 File D Demand file

lbr transmit

interspersed

with

designation receive

or for

any

other use

of READ

with

a BSCA file

17 End

of file E,

blank End-of-file

used

to determine end-of-job

time

19 File format F Fixed

length

20-23 Block

length Numeric Block length

of BSCA file (sarre

as rccorcl

length

for conversational

reply),

see

Ap-

pendix

E for entry

with

IBM

2770 or IBM

2180

?4-21 Record Numeric Length of BSCA

records:see

Appenclix E

length for entry

with IBM

2liO or IBM

27g0

32 Additional 1-9,

blank Dual

or

single

I/O

area:<iual for

non-

area conversational

BSCA

files

only

40-46 Device BSCA Device for all BSCA files

RI'(i ll'[elcproccssing SpcctliclrtiorsStttnttrarl 5-5

RPG II telccommunicatiolls

prograntnring

supports

the

IBM

1770 Data

Communicarion

Sysrcnr

and rhe IBM

1780

Data

Transnrissior.r

Terminal

as rernote

tcrminals

for

the

Systr:nr/3

Model

l0 Disk Systern,

Model

ll, Model

15.

rnd

Model

6. This

appendrx

contains

a description

of the RpG

ll specil-lcations

recluired

to usc

the IBM

2770

and the

IBM

1780.

a

rliscussion

of specific

Systenr/3

considerarlons

which

apply

when

using these

devices.

and one sanrplc

RPG

II program

for

cach device.

Nols. Before

atte lnptillg to write

your

own RPG II pro-

grar"ns

for

rrsing the IBM 1770 or the

IBM 2780,

you

should

read IlllV Slfsrcrrs RcJercncc

Librar.t, 51'stem

Components:

IBllt 27'70 Data

Comnluttic:atiott

51,stem, GAlT--l0l 3: IBhI

Sl,slcris ReJeranc'c

Librar.t, IRM 2770 Sr'.r1(,/r? Swnntary.

GA27"3014;

and/or

IBM St,stents Re.fbrertce Librury IIIM

2780

Data Trunsmissk.ttr

Tenninal Cotttponutt Dcsc:rip-

rir.rrt, GA27--1005.

RPG

II

SPECIFICATIONS

Use of the IBM 2770

Data

Cortrrnunication

Systerrr

and thc

IBM

271i0 Data

Transntission

Ternrinal

affects

RPC file

description

specilications.

RPG

line

counter

specifications.

RPG

teleconununications

specilications,

and

RPG output-

lirrnrat

specifications.

Only

the entries

Lrnique

to

the IBM

2ll0 nr IBM

2780

arc described

herc.

RPG File

Description

Specifications

For

each

IBM

2770

or IBM

2780

devicc

specitied on

rlic

RPG

J'elecomrnunications

Specifications

slleet

(scc

Rp(i

Te l e

t: o rr t trttt t

t ic o t

k

t r t

s Sp cc i.f

ic a t i o t ts

),

a ultiqu

c l'ile

rnust

bc

defined

on

the RPG File

Description

Spccificalior.rs shect.

Columns

20-27

(Block

Length

antl

Record

Lengt:t1

The

Systern/.3 [rlock

lcngtlt

(coluntns

]0 ll) ancl rccord

length

(colurrtns

24-27) deterrlirrc

the

rcrnotc

bul-l'er

size.

For

tlre

IBM

1780,

bufler

size is

always

400. lbr

tlre

IBM

1770,

tile lrul-l-er

size is

as

fttllows:

Systern/3

Block Size Remote

Buffer

Size

<'28

> 128

128

255

Tclecontnrunicttions

I{P(; Itsupport

tlren

blocks

all r.ccor.ds

to

ensurl

thlt thc relnote

bul-l'cr

sizc

rs nevcr

cxcecclcd.

Appendix E. Using

the IBM 2770

and

the IBM 27BO

Wherr

tnrnsnritting

to an IBM 1780, no ntore than

nvo

rccords

arc

bkrckcd

i1'the

r.atio of block length (colunrns

30-23) t

r record

lcngth

(colurlns

)1)1\ is less

thcn

l. It'

thc ratio

is

greutcr

tlran l.lto ntore

than 7 rccords

will bc

blockecl.

The

IBM 1770 inserts

a rccord

scpafator (RS)

character

bc-

tween

blocked records.

but does

not perlbrnt

intcLntediate

biock

cliecking.

If you specily

lTll lbr the

tBM )770 in

tfanspar0nt

ntode.

Systcrn/-3 issues

a diagnostic.

Otherwisc.

the

specificatiorr

is

ignored lirr

the IBM 1770. Intet.nrediutc

block

chlcking is

alrvays

assumcd lbr thc IBM 1780.

Fol record

lengths

supported

by tlre

rcnrote

clevrccs

1,ou

arc using,

sc'e

tlte appropriate

Systenrs Rcfere ncc

Librar_v

manual.

I1'a

recold

rcceivcd

by Systcnt/-l

is shorter

tlian

the r-e.cord

lcngth

spccificd in

colunrns

14-17. blanks

are

aclded to thc

right. l1'a

rccorcl

receivcd

by Systcnr/3 is

longer thln thc

rccrrrd le

ngth

spccif ied

irr colunrr.rs

)l)7, the

record

is

tnlncated

on the risht.

Columns 33-34 (Overf low lndicator)

An ovcrl.ow

indicator

rlly be sltccil'ied lirr

IBI\4

1770 lrrd

IBM l78il prirrtcL

t)lcs.

Columns 4O46 (Device)

Thc devii:c speciticd

in

colunrns

:10-.16

o1'thc Rl)(i l:ile'

Dc-scription

Spc-cif ication

slle et is

alrvays BSCA iitr

clclr

IBI\,1

l77il and IBI\,1

1780 lile. The uurxinrunt

nuntbcl o1'

llle's

allorvcd within a

progrilllt

using BSCA I'iles

is ll.

Other Entries

All othe r valid

tlle

descriptiotr

specil-ications

arc

acceptcd

in

a BSC

progranr

using

thc lllM 1770 or ltsM

1780.

I rirrr

lht lll\l 1770 urtrl lltc Ili\l l7li1) .57

RPG Line

Counter

Specifications Columns 65-70 (Remote

Device)

A line

courltcr

specil-ication

should

be

given

l'or

cvcry

IBM llnt.t' Rcntote

Tcnninal Rernotc

Device

1770

and

cverrv

lBN,l

l7E0

printer

flle. I1'a line

counter

spccification

is no1

givcn.

the

overflow

line

is set

at 60 anci 144l-l IBM 2780 IBM

1442 Carcl

Read/

thc fornt lcrrglh

is

sct at

(16.

A warning

is issLrcd

at coln- Ihnch

(card

rcad)

pilation

tirnc f

or

each

IBM

2ll0 ttr IBM 1780

printer

file

lrcking

a

line

countcr

specification. 1142-2 IBM 2790 IBM

l44l Card Read/

PLrnch

(card

punch)

RPG Telecommunications

Specif icationr 144,1 IBM

27g0 IBM

1443

piinter

IBM

1770 files

and IBM

2780 files reqrrire

r',vo additional 0545_-l IBM

2i'70 IBM

0545

Card

punch.

entr.ics orr

thc

RPG

Tcleconrntunications

Spccifications Model 3

sheet:

Ilcrrrotc

Tcrntinal

and

Rcrnote

Dcvice"

0545-4 IBM

1770 IBM

0545 Card

punch.

Model

4

Columns

48-51

(Remote

Terminal)

lll3-l lBM1770 IBM22l3Printer.

Ljttr.\' Iirpluttattrttt Model I

)170 The rerttotc

lcrnrinal

is

an tBM

)710. ll :ll-3-l IBM

2770 IBM

l2l3 Printer.

S1,ste nt/-3 is transnrilting,

the output

channel Model

l

on the

IBM

1770 is.

by default.

output

chan-

nel

1. l50l-l ItsM

1770 IBM

2501

Carcl Reader.

Model

I

)711 The

rentotc

tcrrninal

is

ln IBM

2770, oLrtytut

chrrttrel

l. l50l-2 IBM

2170 IBM

1502 Card Reader.

Model

2

)71: The

renrole

rcrntinal

is

ln IBM

1770.

ourput

charrnel

l. 5496-l IBM 1770 IBM -5496

Data

Rc-

cordcr

(card

rcad)

2113 Thc

rentotc

tcintinll

is

an IIIM

1770. output

channel

3. 5496

I IBM

1770 IBM

5,196 Data Re-

corder'

(card

punch)

:111 l'he r.enrote

ternrinal

is

an IBM

1770, outprrt

chrtnrrcl

4. (Output

channel

4 is

an oPtional lJci'orc

transrnitting

duta front

Systcnr/.1. the

Systern/3

pro-

channel:i1-

it is Itot

availlble

artd is

spccilicd. grrumrer

must

dctcrrnine

whicli output

channels

and/or

cle-

a

perlllallcnt

crrot

tlccttrs.) vices

are

recessary

to his

program,

and

ensure

that they will

be

availablc wlten

reqrrired. Dcvice

selection

occurs

each

l7E0 Tl'Le I.etttote

tcrnrinal

is an IIIM

1780. linre

a diff'ercnt file is

sclccted.

,\i,,1c. You

cunno1

sPecil_v

botlt the IBM

1770

lnd thc

IBlll

1780 in thc

sarnc

progrant. Related R

PG Telecommunications Specifications

A dcsignation ol trrultipoint

(M in colurnn l5) and

associated

enlries (T in colurnn

17. addressing

and

polling

charactcrs

in

colunrns tr

I

-64)

are

invalid

'felecornnrunicatictns

Specilica-

ttorts

entries

in I plogranr

using

thc IBM 1770 or IBM 1780.

Sy'ste

ur/3 can not t'uitction

as the

control station

in a

rnulti-

point

nclrvork.

All ot Iier

l-clecorn

r r.runications

Specifications en t

rics are

valid

in

a

prograrir

usrng

thc IBM 1770 or rhe IIIM l7ll0.

R

PG

Crutput-Format

Specif ications

Space

,rnd

skip enlLics

are restricted

by thc lIlM 1770

and

IBM 1780

as

follows:

r An elttry

of'0 or blank

is not sLlpported

in

coluntn

lg

(Spacc

Aftcr): default

is

to space

I al'ter,.

o The

skip crrtry

is liniitcd

Io

a maxirnurtr

ol-l1l lirr

thc

IBNII

lll3 Prinrcr.

Modcl I (sec

votrr

systcm

ltpG Il

relcrence

ntanual

to entcr

100-I

I l).

. Tape

carriage

channel

control

is

not supportecl

(conlinc

purr.'l.rcs

to channel

l ).

o Repeated

I

P

tirrrtrs posilioning

ctnnot bc used

on 1he

lBNl

1770

and

lBN,l

t780.

R

e

I

ate cl Co n

s i dera

ti o n

s

o TIrc

IBN{

1443 Printe

r

spaces

once

elch tinte

ir is

scl_

cctcd

lirr

the

lBN,l

1780.

o Ar cscape

characlef

(X'17')nlust

ltot

bc

the l)rst

bytc

sclll

to tlrc

I

BM J780

printer

if 1,ou

arc transntitiing

in

traltsparcllt

ntodc.

o EaclL printeL

foL

the. IBM

1770

and IBM

l7g0 rt.scts

thc

intelnal

linc.

coLrrrt

to I if the print filc is

rcr-rpened

at'tcr

a

IrrLnch

lilc has

been transnrittcd

to an

lllN{

)710 or

tBM

1780.

c The

cncl-ol-filc

card

trarrsrnittcd

b1, thc 549(r

Datu

Re-

corrlcr

t}onr

the IBN,I

1770

is receivcd

by Sl.stern/3

as

data,

o Syslcrl/3

canuot plirrt

the end-ol'-ntcdia

characrer

rrans_

ntitlr:d

by the

IBM 1780. Translare

this

cltaracrcr

tr.r

avoid

an unpriltable-character

halt

on Sirstem/3.

SYSTEM/3

CONSI

DE

RATI

ONS

The

Sl

rttent/-3

RPG

II progralnntcr

utust

coltstantlV

be

awlr.e

of thc lirnits

intposed

bi' the IBM 1770

and

the IBM

1780

when

tl'rey

are used

as rellote lcrntinals.

For that

rcason.

a tlrorotrglr

reading

ol thc fbllowing

nranuals

is iui_

pera

tlvo:

o IIltll Slslr,nrs Rc.f crotc't' Lihrar-t' .!rrsrelr Cotrrytotrt,nts;

IBXI

2770 Data Comnrunit'atictrt

Sl,srcnr,

GAlT--3013.

o lRll Jlsroris Rt'.larurta Librury lBll 2770 Svstcm

Sutrtntor-t'.

GAlT--10

| 4.

and/or

o Ill,M Slslon.i Rc.lcrort'c Libran, IBM 2780 Data Trons-

ntissiotr

T'crnirtal Cont;tonatt Dcsc.ription, G.427-3005

-l'he

Svstcnrl3

progral.nlner

ntusl

also

consider:

o Transnrit

r",i1li

conve Lsational

reply and receive

with cot-r-

versational

reply

arc not supporled

with thc IBM 2770

or tlie IBIM

1780.

o Transnrit

intc'rsperscd

wilh reccivc is not supported with

thc fBM )770 or the IBM 1780.

o 11-Systenri

-l

lnswers an IBM )llO rtr an IBM 1780 in a

switched network,

the

I'irst

tlle

rcfcrencecl

by Systern/3

cannot

bc

a transnrit flle. Usc

a dummy receivc

filc to

acconmrodale

your particulaf

needs if Systeni/3 calltot

always be

prograrnmed

to call.

o Without thc

auto-turnaround featurc,

the IBM 2780

usually

canuot

tritnsrnit to Systcnt/3

and then. irnnredi-

ately aI'ter the

data has

been trtnsn'ritted.

rcceive front

Systenr/3. The IBM 1780 opcrator cannot,

in nrost

cascs,

rcady

devices

to receive in the short tinte

required

by

Systern/-j to tunt the linc around from receivc

to trans-

nrit. In the

absencc o1-auto-turnaround, progrant

Sys-

tenr/3

to transurit

and then reccivc.

o Spacing

arrd skipping

in transpalcnt

rnode

usually

rcquire

s

nrore

transutission

tirne il'atr IBM 2ll0 u an

tBM 1780

is thc

rc-ntote

ternlinal:

IBM 1770 To spacc or skip

rnore

tlratr

one line

re-

(lulres

al) cscapc

sequetrce

(cornnrand

tcr

printcr)

to bc transntittcd

in noiltralls_

parenl

lnoclc

(executed

by RPG II). This

entails

linc

turrr

around

tinrc

and extra

transmission

tinre.

IBM 1780 Tci space

or skip

nrttre

than three lincs

requlre

s alt escape

sequencc (cnmntand

tcr

printer)

to be transrnitted

in nontrans-

parent

nlodc

(execurcd

by RPG

ll). This

cntails

linc

turrr around

tinre

and extra

transrnission

tinrc.

I sing tlre

Il]\l l77O

rrntl

llrr llt\l l7E0 .59

EXAMPLES

Ihe following

two IiPG

II progranrs

provide

cxrnrplcs

cl'

llre

Systern/3

Model

l0 Disk

Syste.nr or

Modcl

ll tisins ihc

iBM

1770 and the

IBM

1780 as rentore

re

nnin;rls.

Tire ilrst

pl'ogram

transtnits

data fronr

Systenl/3

trt

rri IBIV

l77i): rlrc

sccond

controls

tlte transntission

of dala

ihrrn

ln IBM

17.r0

to

Systenr/-3.

Transnriiting

to the lB0-4 2778 Data

Communication

Sys-

tem

S),stcnr,l

j lcltis

liie lnpirl iilc.

('AltDlN, I'rorn

N4

l-'('LJ

I

([]igurc

l0). 'tiris

dulu iolrns lllf r)utput file. Ptj-tONLY.

llial

is llunsnrittcd. Lrsine

tlrc IISCA. to

atr lllM 1770.

I

nirtsnrissioil

is

itr ntirrli.tilsittrrcnt

rrrtldc.

]'lrc itli\{

lTlJ irrints

I'iiiONl-Y on

an

ItsM

lllS Piintcr'.

l"'io,-itl

l. tr)L.iT{l\t.\'

is

|11111g.1

lvitit I hcrding

condilionr-d

ori

ilic

o..'crliorr

linc.

IBM

llt'''''

L ::1 1t':

RPG CONTROL CARD

AND FILE

DESCRIPTION

SPFCIFiCATIONS

Ll rl lllll, ':il:4i.

l,

C('ntrol

Card

Srecl{ications

l,

; irlnlztrlilOt

File

Description

Soecif

ication

iir,

] $-. |' --.r-!:i-.r- -rr-,-:-:--:-:!-.-

i i i"lF;Ur

I brl :i,es

cn

i

,ii,

iil

-rr l r.- !

e6l ?"61

LJII LJAI

ti

!.-fi r.(l4 rY

IPU.ToNLY

l*

t-

I

i:

I

IBM

I

RPG EXTENSION

AND LIT{5 COI.Ji\ITER

SPECIFICATIOI\S

L.irq Ci)rrr ler Sixrcif

ic:rtlorr:;

_i_,r'i_,_ _ __r_l ; | ,l r_f__,r +

i , tt

ii

tl

lt il

i,l,iiililiii

ir,.lliii,l

::liil

irii

t-- i r..;,;,---,.r- t-

i--' ]--J--L--l ] i--,

iiliiiirlljiill

lirl.rilii

I

iirgurc 1(1.

Transmitting to thc

ll]trI llTi) I)lrtl

( onrrtrinrtr:irn

S',:r.ll,

tI,rl: i lr l)

()0

RPG TELECOMMUNICATIONS SPECIFICATIONS

U.T O,NL

Y

RPG INPUTSPECIFICATIONS ','.,..,...

I :r it /{j / / /a t! llr)

dqi l

'r:':,,,

ii-;qraiilbl

I

I'r

L1;-

ti

---;'[innrnr inr!,

I'll

i

iiii,

.- i

ri

r"l

---t

l

I

i

i+

I

ttoNll lr

ql

lr

I

l rrnsnrittins

Io

iir

i-'l:l'

lii,i

linl

igLrrt' I 0.

i'll

'ifl.'i

br' I a-ri i

I

l'l i

]'1"1','f

-- '-

1t - -t-l-*

i

r tlrl I lill

i tr

rlioa-rn

ilt

,Iiil,I'liiilliililll

i'.ii;lll,iiilli

IBM RPG

l

OUTPUT SPECIFICATIONS

i

-iEA}ING'

' ''

@5)

' l,,llll

,

1,, t6 tl tB rJ BQ

trdallrb-l

\'|_]!;

z1t,1p

iii'i

il1

iii

il

(illrt I ol'l)

I sinr

tire IIJ\l

]770

rrr(l

llte

llJ\l l7ii0 6l

IBM

|'

[,,,,,,

Receiving

from an IBM 2780 Data Transmissron

Terminal

,\;i

lllNl

.l-r,0

r-'riLi,,

lir ini)rl1

iiic.

(,i.1'Ot'i

i' r'.,

r'r ,,

lU\{

l4-ll Llr.t l{e;itl

Prrrrch

(l'igurc

ll). 5,"-,;rrir. .:l irirr;::

r.:,

ti.tc opcIuiioii

h,t'

tii'rl rr- iite l[]M l7E(j:rir,:

r,.'{1ilr..\llilJ

i(,

rdiclYu

usluq

iri!'lJS('A.

iirt- liJ\l

.lirr{l titr,ri

ilJllrrllrlr

(;l:l(J\l Y ro

Svslciti

-i irr riLrntL;inspltcitr:loLlr.

L)lrtr.l

teccivcd

lrY

Svstenr,',1 fr.orrr

liru IUi\l

lr5(l !rrrls iire

outl)Lri tile

Pl{l

N f

. Systenti -i

irririi.,

llris f ii.:.

spll!ii1{

()ilic

al

lcr eacll

rcoolt1.

RPG CONTROL

CARD

AND FILE DESCRIPTIOI\J

5Pi:CIFICAT|CIiIi

F., I l

'i t:

Frle

Descrrptiorr

Specrf ication

15t RvLf,916

l

r .-- "-t,-.i

tr _

*__-+_j_! ];i_._. - ,]-,i_-

FFEToNLy

rlpigi

iFt

Bbt zeil ,li I llBs

' :,,

i,.

Il

,

:

c

-r I

ti

I

l

i,l

ii'i

"'i

"'l

lllr i ii^

RPG

TELECOMMUNICATIONS

SPECIFICATIONS t :

, ,

'i

,) tt t: tr t) l,tl

'..

bi?1,,,

i;rtlitt,

givLzirlelor

i'"""1 I

llf

ilr

liiiiii

ihui'1

ll i

iiilili

igLrL.' I i. l{ce e

ivrng lrr

igurcIl l{cccivingllonrunIllNl 1780DataTlrns;tri>sionIcunrnul

(t'utIotl)

RPG INPUTSPECIFICATIONS

SPECIFICATIONS

t.l

Usins

1he

IIINI 1770 und tlte

lllNI lTlJ() 63

64

Appendix F' Communicating

with the

Operating

System

Telecommunications

Access

Method

(TCAM)

io

I

Svstclri,i.l

r'lll

be

llart

ol'l ielccornlturriellions

nclwork

rlttt

irci utit,r;

the

Opcrating

Syst

ern'l'elcconrrrrunlcat

lolls

Access

\lci

htrr.l

(

I

CAful

). (

f:or

iri liiLrriltion

regar.clirrg

TCAl\,1,

sc.r

lBtll

,\,,,'.;tt,rrt

'.i60

OTtcruri,g,!-r'rrt,i,

lclet..ti,ttuttiL..uit),s

:1ict's:; 1IatItoi I7'(.'.,1I[)

('{|t!('(pIs

utrtl !itt,iIirtt,.s.

CC-]0_]011,

:|ttlliJ.ll^\'r'i/r,1il

-i6ltO1;trutiti.r1

.\'i.s1r,tii'!

rlt,r,,ttiriltttri(.Lt!it.)tLs

.!1'(

('r.!

,llLtt'r,ttl

l'l'('.lll l'!

,t.qt.tyt!2tt,t.:;

OttiLlt,utttl

llt,.l

t,rt,rtr.,L,

.\!utrttit,)

.

(;('l(l-10:+

)

Svstcrrrl'-i

eorntrrrLnicales

rvitll'l[ 4.\'l

iil llrc

sunrc

rir,\ ii

e

orrrrnr.r.riclite's

ri'i1ii

lrrrrrthci

St, ste rni

-l cxccpl

ilrlt it clnnol

cxriltnilrt

uonvctsllrorrltl

riii:ssagcs

rtith-l'CAj\,!

. 1-lrc

Sv,stcrn,/J

l-1f()llfilil)l1lc1

rrral'orrit'llpptr)\i1tttr'

\(,ll\L.l)lllr)lt1l

ilode,

by

tising

lllP(i

ll.

T lrc

RPt.

l l iccltnic;trc

l-tri

;1 p1,1,

rr

iuiuttrrg

etrrrr r-LSattoiuil

ittotiC

i0ltsiSts

ril'

{.Jsing

tltc

RF.AI)

opcrltiotr

coilc

to rcccivr-

dltr lnd llrc

EX(

iPT

ope

lltion cr)de lr)

trlrrsrnir

cllt,r.

lndlduliltg

ll

tflllsntii

or u lcccivc

olrcratitrn

vil -fCAill

ttt

iltc

Systcnt,r.3

pl()!rlrnl

so iiurt

Systernj-i

lvill

pcrlirrrrr

lirc

lpprtrpritLtc

IJS('A

transrrrit

or

rcccivc

opcratiorr.

lrrstcld

oI using

ol]c

cr)ntbiltc(.1 t'iie

litr lfaitsiniltirrg

lrrrcl rc-

ccivins

diitli. thc RP(; ll tccllni(lue

l't'quife.s

two fllcs. a

cje'

rnattcl

lllc

litr

iriput lloru

thc

BS(

A, rnd utrollrcr

f

ile

i'or.out"

put

to thc iiSCA.

flrc lbllowing

trvo sunrple

ilrog,rillls

tr-st'

the tllrG ll tcelr-

ric1Lrc

ttr

approrirnate

coltvcrsationtri

rrrodc.

Sl,slcnri-i rs

the prinrury

slttion irr tlrc lirs1

sanrpic

Irforlrxnl

(Sysle

rni,i

tntlintes

tlansn'rission

to TC'AM);

Systcrtrl-3

is

lhc rr'irrottt

stJtion

in tlru

scconcl

saruple

pfoglaul

(T( AI,l iniirltes

lilin:-

irissiotr

to Srr.'stern/.3

).

( onlllLlllcltllllr u itlt thc Optr \lctlrori

(I(,\\lt 65

SYSTEM/3 TO TCAM

Sl,steur/.3

rransmits to TCIAM

(Figure

12) the answers

(Y or

N)

that str.Ldcnts havc

given

ol1

a test. TCIAM

deterntines

rvhich

ansivers

are correct and which

are nol.

and then re-

turns

the

results

to

Systern/3.

File

Description

Specifications

Systenri3 reads

studenl

answers from

MFCUI. The

answers will

be

rransntittcd

to

TCAM. MFCl

TAB is

a

table file

containing station

ID's. ANSWER

and RESULTS

are

r.rsed

to transmit

and receive,

respectively.

RESULTS

nrust

be a

rleurand

tile

(D

in coiunrn

l6)

because

the READ

c,pcration

i:ode

will

be

used

to receivo

records

to the f ile.

Extension

Specif

ications

MFCl TAB

contains the tables TABME and TABYOU.

TABME

is the

Systern/3

station lD;TABYOU is the TCAM

station ID.

I!M RPG

CONTROL

CARD AND

FILE DESCRIPTION SPECIFICATIONS

C,A

S.CA

t?/!iL77i87q80

u,*@l.' il:t:il,,,,,

El{rlo:ld

96

q

File

Description

Specif ication

RPG EXTENSION

AND LINE COUNTER

SPECIFICATIONS

','

ldd,,, bL:FlqFlcl

igurc

12. Sl

ste

nri 3 to TCAM (Part

Telecomnrunications

Specif ications

,'\\SWi:i{t,rrrii

Rl-SLr

L'fS

arc rrlnsrrlr

lrrri rcccirc

l'iics

rcspcclivci,".

lJotlr

ilfc pitrt

ol'I swrtcired

rrctrvolk.

Input Specifications

MITCLI

I Prtrviries

data

fl.ttnt

tltc

clrd read0r.

RESULIS

providcs

data lronr

TCAM.

IEj!,1 RPG

I'ELECOMMUNICAIIONS

SPECIFICATIONS

T

-l

i

't

I

.u _ r_ t_'t t'

ABYOU

-t

it

tl

rl

i-,

il

l+ -

t5i1-4

Br,lE

isirAEmE

I

ll

l

i

14;

i1

iii'

lilil

iiil'i

liil,

<rl

;ln

ii

iili

ri

l

ll

ii

t'r

!j

\;

i

il

,ii

rl l

ii

ll

i

l

lt

I

li

I

l

i

!,1

' I

i,i'i

i

iF.A

i

1i

li

lBrBl

li

1i

ii

iANsl^/gRs

i{i€su

Lr5

RPG INPUTSPECIFICATIONS

.) r, t 1t trr ll)

i4qt', l,,rll:t ,

islairloiridl

;'ill

( ()lllllllrlli(irlilt!

riitlt llrc

O1r1'1111j11"

S\\lcnr Iclt(()tttt|uni(ltlir,rrr r\tttsr \lctlroti

t l( ,\\l) 67

Calculatiorr

Specif ications

S.Vstcnt,/

j rcctlrLls

tlle tritnrlier

()i

ir.sl5llirrj:iilil1iltj

t,r

it \lt

Iol

clrircr.'1iott

l'lte tc:;i;

lue ttanstttilIcd

t-,\'ix(tal)tir)tr

{)u1,

l)tl1

1o

ilic I3S(',,\.

51'stcttti-l icecti'ct

irisit:l

tirc ltl:Ai)

opellti(Jn

corlt') rcsrrlts llorit I'('Alll

ul)til

Svsit'nt.,.i rr:ii:ltcs

cncl-ol'-l'ili:

rrri ILIlStlL'[S. Svstcrn/-3

scts

irr,iir-.rrtors

rrll

ut

cnrl-o1-llle

litrr.'

il rlclt.tii..

ilr ilrc

no\t lil)1

,

t\.i:lt:.

Ourput- Format Specif

ications

ii',:icrrll.i

l)fints

(lttr iry cxc0ptrorr

()ull)u1

us thc

dala is

tclttl

l't'trttt tlrc

clrd rcadcl. lrtd reccivcd f'lgr1

tIc BSCA.

Svsicrrti.3 lurrtsnrits

tlata

lo -l'('AM

b1'e

rccplion

()utput

a\

tire

tllll is read lltirrr thc

crrd lcadcr'.

Systenri.3 signals

l(,,\N'l

(wrth

arr

'li')wller)

n() rnolc

records rvill bc

sent.

TfiM

i

tfPC CAj-CllL,4.irfrl\r

qPt:Cli

lCATlONS

I

|'

:l

ltt

ta )l; t; ]n i't tl

l

r:;l

;;,,,,

ls Sllloliicl

I

,il

@F,

-l

_1

I

rl

.l

i

.l

l

I

j

I

1

''

i'i

i{i

ii

i",

i.i

l,'i

'ti

l.I

l,,l

i..i

1"r

i''l

1,.

.l'-r

\\l (l)rrr

i ,,1

.1

|

t,",.,","

FN''

?li,

',vo

---:--t;_: _l_ _

inT"r"f eD,

IECETV€D'

' SENT:

.

il

i

tl

li

ii

-

ii-

il

I

zP]

i,

ANshlER.s

1"r_l

i'

A

rJD

RE

5u

tl

i

3Ol

l'roTAL RE

1(l i

ti

,i

l'

^'

z6l

i

)Rl i

*"ll

1s)

I

zq I'TRANS^1Ir

I

il

i1i

RPG OUTPLIT SPLCIFICATIOIJS

1.

lrl." il

I'r

lll

I

RANS

T5R

oRos

FN,

-,:.-l

TRP

LI:

coF

TFt]

OUTPUT SPECIFICATIONS

RPG

lll;1,

lslslrloirrcl

IBM

1,,,

f,,,,,

o

irurc I

l. Si stcnril

ro

'I('Al\l

(l)art .l

ot .l)

lr

i,i

l']o'"

i"'

ln,e

s

u

I

]^

^".

lruun,c

il1,

N5:WERS

lllll:' \\

llll lll!

TCAM TO SYSTEM/3

System/-3

receives fronr TCAM (Figure

l3) the

answc.rs

(Y

or N) that studcnts

liave

givcn

on a test.

Systcrn/3 cle

tcL-

nrines rvhich

answers arc

correct and

which ere llot.

and

theu retuflts the results

to TCAM.

File Description

Specif

ications

N4FCDUIVIY

is a durlnry lllc and serves only to begin

thc

RPG II cy,cle. MFCUI is

a

table llle.

contairring

slarion

ID's and

a tablc o1'thc

correct altswers lbr thc tests being

processed.

ANSWITRS

and

RESULTS

are IISCA

llles

uscd

1o reccive

and lransntil.

rcspectively.

ANSWERS ntusl

be

a

ciemancl filc

(D in coltrrnn

l6) becaLrse

the

READ opera-

tion code will be

used

to receive rccolds

to the 1-ilc.

Extension

Specif

ications

'fhe

tlrst recold fronr

MFCLI

I ci)ntains statioll

ID's. l'hc

sccond rccorcl 1l'orn N{FCLi

I is

u

table. MASI .

c('nlrlnlng

thc corrcct answcrs lbr the tcsls t()

be

processed.

'l'rvrr

xrrrys. ANS und RF.S, will

bc

built

drrring

crccution o1'tltc

prograll).

ANS lvill

conlair) alrswefs

r.ece'ivecl:

llL-.S will con-

tlin tlrc rcsrtlts ol r colllparison of tltt'

answcrs rcccivcd tir

tlte

correct answcrs in N{AS'I.

IBM

[,.,

,

RPG

CONTROL CARD

AND FILE

DESCRIPTION SPECIFICATIONS

File Description

Specif ica

gUI

CIJI,

(:,, I rd,,, N 'r

",

ii

tion

I

FlfYlF

cD u t1Y 9

9

1

F[1I.C-Ur

FANS

WER 5

FiRE

s.u.LTs

'lP

Rrnr

IBM

f^

rJ;

,, lE xtension Specif ications

.ClU.t

i"'r,. |: If.\\l r,r \r.r,.r'r 1 Il),rr L,t (r

Telecommu

nications

Specif ications

ANSWERS

and RESULTS

are receive

and

transmit

files.

respectively.

Both

are

part

of a switched

network.

Input

Specifications

ANSWERS

receives

dara frorn

TCAM.

The

character

.E'

will identify

the last

record

to be received

(columns

26-21).

MFCDUMY

contains

no

data

but merely

begins

tl-re

RpG II

cycle

and sets

on

indicator

39.

RPG

TELECOMMUNICATIONS

SPECIFICATIONS

IBIfi

f'

I irure 13. fCAl\,1

ro

51stern7.1

lPart

l

T;]

r1

of .5)

//8i980

,-.Op,,_

:,.,'

".

trcirlo5E

RPG INPUTSPECIFICATIONS

1

2 /5/6/r/8t)80

".,bE,' i::llxl",,,

l{ctigl{t

Fu,.hn(

f;,*all f IT l [lM;;d.;";,; ]

'.'..,'. I p,,.. : I

tttt

-

( otrltttttnicrting

with thc Operating

Sl,stcrrr Tr:lecorrrrrrrniclrlions

Acccss l\lcthotj

(l'( A\l) 1|

Clalcu latiorr

Specif

ications

A1

teL rcading MFCDIJMY,

Systern/3 receives

a

lccord

to

ANSWERS.

prints

the record leccivcd

(by cxccptiolt

out-

pu1).

deterruines

whic:h o1'the

answers receivcd

are

corrccl

(by conrpaLing tlicnt

1o the

lnswers in N,lASl'),

ilnd thelt

prints

and trarrsntits thc lesults

(by

cxccptior)

output).

Al'tcr caclr record

has bccrr

processed.

Systent/3

prcparcs

f.ur

thc

rrcr.t

RP(, Il cycle

by se tting ol f inllicutoLs.

Systenr/-3 continues to receivc

and

process

unswcrs rrntil

rhe

lasl rccord.

idcntil-ied

by 'E'.

has

been

proccssed.

Output- Format Specif

ications

Systenr/3

prints

tnd transtnits data

by erception

output.

IIPG CNLCLILA-IiON

SPFCIFICATIONS

ta ltt D in i! 8l

i.l:;:

il.,

ir]cFlcjaltl

IBM

(

I

i*- T

1,,.,,,,.,

i l'"

-

r-

I

i-

li

l',

ii

t:

flt

]r

ll

1t

il

lr

l:

l

t:

i,

ll

1r

il

ir

l11l'l'::':'

iC

I'l

li;

l-...

I'

i,1,, l:

i;:'l:

i:::li:

l'-li'

i,

,,r

li

f

r,i

1:

l'ti

I

l'

ii:11.

liigurc

13.

-|CAN{

to Sl stcrn/-1

(l'art

J of 5)

irri

b5

it

tll

ti-tf7 I

XBIYI

i

.,:

I .;.',1

iii,

i"i 77i I

i''i

', I l?i 1

.tr: -/6: I

l'

: 'li1N7 !,

i' i I, ifrllbr

i'.1

,??iN?.6,

l'-rti

'r l6i i

i''l 1

16; '

i', i -i6; i

i'l l,.lNt.li

i:l r i I

l"ilrli

i -:l: .1 .- . .-r

Dr-i

l{-

O OPOri..i

ll.lufirQes

X

iE

N.D

I,BM

\\i ti,

)rr

rr

il,i

,iil

i illirc t.j. irt i I

ll.jrl + (,i :i

l

iil..lftriji !PFf;lFiiil\,-lalrJli

..:

ai-,' n,.fa"if*j, RL.Ci:iVLt;

ArrD

q.j- ,' R€

5l-r

i-r:, I p.

A

rj

3

f,^,:r

r E

n ,

65 'ril Rl:LOriJ RSC!I;'iD'

'il ' A

!-

l- l-

ES i 3 P

R'{:ri-i1r:r [t

zfr

,g

'7q

.|tl*. iir.V5rve.ri":r

qeC flvf n'

llirl,i {;i!

.T-AG

tx.-,8pvlL

,lp".G ,

tr"

o r"1P rX

*CtiO iENO

€y.i.Pr'

A jji"] *

ir,O-fO liOtr'lr0U

T4G

iE

iCP I.

5 f,

TO,F'r

i5.6-r0f

i

GO]"0 ;RrE,A0

i

it'{Af.1f

li\rJl-10Lsix

Atrs

t -)

i.:

.- -1

"-1

* r"{

;

i

fr'

O

l- +-

lDl

OFi

ll

I tl

r.Ri

OIiIV?1i

t'l 1)

I]PG OUTPUT

NAM E

lx

iREs

,

x

NAf,l

E

;r.f

aue

]/\

QF< X

SPECIF

ICATIOI\S

6e T

CT

O53

i.

ri

it

.l

l

il

it

li

i-l-

icir

,l

ii

I

il

E5

u

LTS iLi

I

II

ii

li

il

'ir

]L

ii

il

l6i i

i?

iNr

6r

pRo( E55gD !

.FCAM COINSIDERATIONS

'['wo

It'ririctiorrs

nol rpl]llrcnl

in lltt'prrcctiill rr:lrrplis

ltrLlst bc.,rtlsicicr''lii

v,tltctt

\,r)tt ,.L);liilLrlltirlr

\\;tit

'l'(

'\\,1

. -io

urtrrti

"uitidcrtiiiict.l

rccorti"

itllt:..,t,rrr

l{l'(, II

l)r

{)gf

it

lit nlU\1

re cr,)gni./.t'

ttttd t{ltrrt lrrtt itlrriil.

rite

rrltis

lfalrsilr ttrd by T( AN'I.

(lt'AN'l rllrv tfiin::llrii t()

\ ()u

irilrnk

icc0rtis

tcci'ivcil

1

rrrril rl: ()lilft lr i rriiillris.

I

I 1'o

nr;.tttttlitt

:t swite

irld lrrtc e,rrtrtrcirt)ir.

\ r)ir

ilu\1 bc!ln

ir:ursrlrltirrr to

'l

('r\N{

*rllriit ninc \0!()nrls iiil.f

rceeir'ing

cnd-ol:l'ilc

l'ronr

T('r\\1. Ollrtrurstr. \()u niusi

dill t,r rl-estubjish tlrc

lirre eorlrrclrori.

-1

,

LV))

'1I

44

zd

5ai

I

J

l8i

z6i

2,5,

RPG

II telecommunications

programming

supports the

IBM

37,11

Model

2 Data

Sration,

rhe IBM 314l Modet

4

Programmable

Work

Station,

and

the

5230 Nlodel

2DaIa

Collection

Controller

in comrnunicate

mode

as a

remote

device via

the

BSCA

on the IBM

System/3

Model

6,

Model

8, Model

10 Disk

System,

Model

12, and

Model

15.

The

314l and 5230

are

also

supported

when locally

attached

to

the

System/3

Model

6, Model

l0 Disk

System,

and

Model

15

via

the

Local

Communications

Adapter.

In

addition,

remote

and local

attachment

is

supported

via

the

Integrated

Communications

Adapter

on the

IBM

System/3

Model

8 and

Model

12.

This

appendix

contains

a

description

of the RpG

II

specifications

required

to use the

3i4l ancl

5230

(identical

to specifications

used

to receive from

a 3j4l

without

expanded

comntunications)

and

three

sample

RPG

II programs.

It is

recommended

that

only

one

data set

be

transmitted

from

the

3741

during

the

execution

of an

RpG

II pro-

gram.

I1'more

than

one

data set is

transmitted,

erroneous

records

may

be

passed

to the

RPG II program.

Data

sets

with different

record lengths

are

not permitted,

since

only

one

BSCA input

file

can

be defined.

For

more

detailed explanation

of transmitting

data sets

ot 3141. refer

to the IBM Systeml3

3741

Models

3 and

4

ho grammable

l4/ork

S

tation Pro

gramming

Reference

Manual,

CA21-91

94, or

IBM 3741 Data

Station

Reference

Manual,

GA21-91 83.

A 3141

with

an Expanded

Cornmunications

Feature

(Fea-

ture

1680) has

a maximum

buffer

size

of 512

bytes.

The

Operator ldentification

Card Reader

Feature

(Feature

5450)

and the Expanded

Communications/Multipoint

Data

Link

Control Feature

(Feature

1685)

on the

3741

are not

supported

by System/3

RPG II.

Note: 11'

an RPG II program

is

communicating

with a3741

and

an error occurs

on the 3741,

the

System/3 could

loop

on

I/O attention.

To

prevenl

this,

the RPG

II program

must

use the

permanent

error indicator

to force

the

application

prograrn

to end

ofjob or

other non-BSCA

operations.

The

user

program

should

print

a message

if this occurs.

Pase

of SC21-7507-5

lssued

30

June

1978

Bv TNL; SN21-5624

Appendix

G. Using the

lBl/l

3741 and IBM

5230

RPG

IISPECIFICATIONS

Use

of the

IBM 3741

affects RPG II file description

specifications,

RPG

II telecommunications

specifications,

and RPG

II output

format specifications.

Only the entries

unique

to the

3741 are

described here.

RPG ll File

Description

Specif

ications

Only two BSCA files

are allowed

(one

input

and/or

one

output)

per

RPG II program.

If two BSCA files

are

used,

the input

file

must

be

processed

completely

before

pro-

cessing the

output

file.

Column l5 (File Type)

Entry Explanation

I This is

an input (receive)

file.

O This

is an

output

(transmit)

file.

Columns 20-23 (Block Length)

When

using

an

RPG II program

to communicate

with a

3741 without

the

expanded

communication

feature,

the

maximum

block length

is

128 bytes.

When

using

an

RPG II program

to transmit

to a 3741

with

the

expanded

communications

feature.

the

maximum

block length

is 512

data bytes

plus

a number

of IRS

(interrecord

separator)

characters

equal to the blocking

factor"

The IRS

characters

are

stripped by 3741

hard-

ware so the

block

will fit into

a

5l2-byte

buffer.

When

using an

RPG II program

to receive

data from a 3741

with the

expanded

communication

feature,

the

maximum

block size is

5 I

2 bytes.

This

block contains

the

data

records

as well

as the record

separator

characters

piaced

in

the 3741

buffer

before transmission.

The

RPG II program

may remove

or ignore

the IRS character.

See

Expanded

Cornmunications

Feature

in the IBM 3741 Data

Statbn

Reference

Manual,

GA2

I

-9

183.

Note: When

the 3141

is in ECB

transrnit mode

(J)

it

will block records.

including

the IRS characrers,

to get

the maximum

number

of

records

inro a 512-byte

buffer.

An

X'1E'

must

be

used

as

the IRS character when

transmitting

to the 3741

(see

Figures

16

and l8).

Using the IBM 3741 75

Columns

24-27

(Record

Length) RpG

ll Telecommunications

Specifications

Maximum

record

length

is 128

data

bytes

(129

bytes, which The

314l files require

some

restrictions

to the

telecom-

includes

the IRS

character,

if expanded

communications munication

specifications.

Only the columns

affected are

feature is

used). listed

here.

Column Entry Not Allowed Desciption

Columns

40-46 (Device)

BSCA

is

specified

when

3741

attachment

is

via either

the

Binary

Synchronous

Communications

Adapter

or the

Local

Communications

Adapter.

A, U ASCII

Transparency

(Not

allowed

when the

3741

is

attached via

the Local

Communica-

tions

Adapter)

ITB

Columns

61-74 must be

biank.

RPG

ll Output Format

Specifications

Columns

17-22must be

blank.

l5

tl

l8

t9

M

T

Multipoint

network

Tributary

station on

a

multipoint

network

52

76

EXAMPLES

The lbllowing RPG

II programs

provide

examples

of the

Systern/3

Model

l0 Disk System.

System/-3 Model

12,

and

Systerrr/3

Model

I 5 using

the 3

,141. The

first

program

transnrits

data front

the

System/3

Io a 3741,

the

second

program

receives

data from a 3141,

the

third progran

transrnits

data

to a 3741

with the expanded

comnrunica-

tions

feature

using

the

expanded

comrnunications

buff'er,

and the

fourth

program

receives

data from

a 374t Model 2

and receives

a status message.

I81t,,,",.",,..", ",,!ne$

Mach,ne

co,ooia,on

Pase

of SC21-75O7-5

lssued

24 September

1976

By TNL: SN21-5428

Transmitting

to the IBM

3741

System/3

reads the input file

CARDIN frorn

MFCUI

(Figure

14). This

data forms the

output file BSCAOUT

tlrat

is

transmitted,

using the

BSCA, to a 3741.

The

3741

writes the

data on

a diskette. The

printer

file is used tcr

indicate

normal

end of

job and any

errors.

RPG CONTROL CARD

AND FILE DESCRIPTION

SPECIFICATIONS

RPG TELECOMMUNICATIONS

SPECIFICATIONS

12

**[-fl"_ Hll;,""BblclM!

Cad Eleclro Nu'n&l

Date

Control Card Specif ications

H

I

o

qEla

!

6

-

j

t

I

E

,!

q

zn

o

I

;lr F

=

3

E

!

i

Rerer 1o lhc sDecrt c Svsrem Rcierence Lrbrarv ma.ual lor nctual rnt.ies

!

Extent Exil

lor DAM

L€ngth ol Key Fleld or

of Record Addre$ F,ekl

A.d Eleto Nuhbr

I

oa"

f

7 a

s iotl12t3

9

e

c

s

t

:

:z

E:

69

g

!-

p:

P9

dP

;P

i5

!il

=

DialNum&.

zl 22 73 2a E 6 21 nn & 3r s3 533793 1424446a)

I Figure

14. Transmitting

to the IBM 3741 (part I of 2)

Using

the

lliN'l

i74l 77

Page

of SC21-75O7-5

lssued

24 September

,|976

By TNL: SN21-5428

IBIL,,,",,,., ".. au.ipi Mach,ne

c.,Nrdn.n

IBll ",",",, .." a!3.ds Mach ne

co,pors.on

RPG INPUTSPECIFICATIONS

RPG CALCULATIONSPECIFICATIONS

SPECIFICATIONS

**

ff l'_',i::1il",..

lCBTCffdl!

Fo,mCX2t S932

PrnrDdLnUSA

15 76 17 1A 1S aO

t2

GX2r S4 2 U/M

050

t5 76 ]t 18 19 80

_';::Iil,,".

FFIoIITAEI

I81il.",,,.,,,".

I Proqran I I

l

-:l -- - ,,-.] e'*n a I crrpi..

l

Prcvaru l::l I l ii'" I ^rl

t\

I Figu.'

't8

Record

ldentif

icarion

Codes

Transmitting

to the IBM 3747

(Part

2 of 2)

lleceiving

from an

IBM :3741

-lirc

IBI\4.17.1

I transurils

rr rccoLtl

usitrg

rltc

llSCr\

rtr

!i1,s11'", .' This

tllta tirLins

tire

in|rrt

lilr'tlSCAlN.

'flrr

!it'ste tttT.i

'*'ril.'s

tite

dutli

rcccivcd

to lllc Printcr

i'ilc

t'lUNlLlt {l igurc

l-5).

B5CA62

RPG CONTROL

CA.RD

AND FILE

DESCRIPTION

SPECIFICATIONS

lr

i,,'t,,

Control

Card Suecilicatrons

iT

I

-,1 -r

r _l_ r_

Frle

Descriptron

Specitication

iFr --ri ':;r.,

= ji .r-

: ,1"

]1

l:

I i i,,, i i- --rl l:tt':t-

]]

I i t'-;=l '|':;r

r

ilill

r- :r'l,i

,,i.,,,',

iif't-i

l't I.iI i .l.l

!',,:

i

r-- ! -r - l. -r .--1 *ir- i- ,

i l'b5cArN riplEl

lF 961 96 , ,2. gSCn

1,,

l'rPi?rNrERoi]l';

'o,,'"1

I iii i irpRrrurr

li

Il

' -l.i

i,r

-----Tr

ltt

lti

rl-

R

.l

'I

nui

le-sieiaPi{l

-_---_l

L,I

RPG

TILECOMMUNICATIONS

SPECIFICATIONS

lsuf!'l-5. I{eecrving

tront an IliM 3741 (}rlr1 I o1 5)

I.

I

l igurc

l-5. l{eeciving

lrurrr

rrr lllM 3741

(Part

I oj -5)

rT

l

I

i

l-i

,

,i.

'tr

lL

'.lr ll|i

li

ir

ll

I

tl

I

lii

iri

r*1

I

1.r.1.14^414'rr,

r

ti

f

.l

f I

l

I

.l

I

t \lr! tirt.' llJ\l 17.+

l 79

RPti rlJPLl i ';PI{-;lFiCAl

l(]NS

i' rt . tt;.tl

",i ;,, , gtstcAioiai

tst4

i \ ', I

ir

, .

i.,r ,ll, i'l

,rt'. i

,IJ v-\ ririr,

't

:,,

l:,i.Arir

ril-,t1,,.1Lr)!-ft.4TtoN

:;pLClFioAlt()tis

:R.: r, t (/. 1

.u \J 'J r, yJer

fia 6l

t5Jt-l

T

i

I

.l

l.

l

r{r

!

i

lr,

i -. . ,.,-- l-!_:---,.1 _j:

rt f rr, : tor^

.AUi ; t{t,l

i.1f"'T'c fi i

'

I

.i..&.it1

I'

SPICIF IiIAT IONS

iii'i))d,

-t

I

i

I

!

I

i

'-

--'-i

I

i

I

i

,1

.l,rili

; rli i

,it't

itir

f:--r- . f

i{ r': i,,

,llii

iDAr-A

lil eq

lp.acur izj i d

I iri

rq

i ;iisq

illli

lRwur l4 1 s1

I : | \r-t

r ll; o\sl

i iiis,q

lrill

lllll

RgC.oRDS

RgqEtVtiO'

peRtuNENiT

EqRoR

RECoPOS (sCErVeD'

S

L{C0GSSFTIL

CoLMPT-ETi

oN

,

I

pqr{qqi

'

il

9?i

r-q

rl

i

I

I PINOq

-..1'1r .

I

l7-11 tl'.rrt

5,'l 5r

Page

of SC21-7507-5

lssued

30 June

1978

By

TNL: SN2j-5624

Transmitting

to a3741

with Expanded

Communications

Feature

This program

(Figure

l6) shows

the

BITON

and

BITOF

coding

needed

to generate

the

interrecord

separator

character

to separate

records

when

transrnittins

data

to a

374 I using

the

expandecl

communications

feature.

System/3

reads

the

input

tilc DISKA

from

DISK. The

RpG

II program

will then

attach

an

IRS

(interrecord

separator)

character

to

each

record

in this

file. This

forms

the

output

fiLe

T3741

which

is

then

transmitted,

using

BSCA,

to a

3741

. The

PRINT

file

is used

to indicate

any

errors

and

a

total

card

count

at end

of lob.

Using

RPG

II in Communication

Between

a System/3

and the IBM 3750

(World

Trade

Only) 80.1

Grldic Ca.d El.cro Num*r

I oab

Pase

of SC21

-7S07-5

lssued

30

June

I

978

By

TNL: SN21-5624

1811,.,",^",,-. ",".* M&hid

co.br.roi

RPG CONTROL

CARD

AND

FILE

DESCRIPTION

SPECIFICATIONS

RPG TELECOMMUNICATIONS

SPECTFICATIONS

*"[-I-]"_

I--_ --

lP'qrem 1"""."" lc'"on" I I I I I J I fcdb;,d,-b'_l

lp,q,amme, loare I rm,,rcro.

ln,..n I I I I I I I I I

rrqtamlllllll

_ ro*',r-"-LI j l__l-l

l

75 76 77 78 79 80

Control

Card

Specif

ications

H

cd. I

s4b l;

bmpil. | :

lo

t!

tE

lo

:iz. to

r2

l3 1r

!l n,-*'

il o p'r.

{l e-,u.*

6l

h&r 20 )o

.a

a

s

!

F

RE

er to Se i@iric Syrbm Referde Library manuat for fttud 6nri6.

t2 $ s 55$57 S 50 &61 62S& 65

to shn E

-

a

!

olr

I lx lik

Lsng$ ol Key Field s

of RMrd &dr€$ Fietd

;;;;-l

--1 """,",,,

1424344451'_""

Fiillir

t: E9

^-!

:

t! ,1,*

:[: i5tr678691011 t213t4

ll ll

+tl

lllliIrJ

8 0.2

Transmitting to a 37

41 using an Expanded communications Buffer (part l of 2)

Page

of SC21-7507-5

lssued

30

June

1978

By TNL: SN21-5624

RPG INPUTSPECIFICATIONS

,"*

[tTl",-

i

-t

t-

i

Record ldentif ication Codes

I

n

3

2

3

&

!

mRPG CALCULATION

SPECIFICATIONS

t- ---

t'oqran | ^ Grar

: .-l :-''n

I Prolnnm{ I DaE I rNr^'d'o" I P,rn

L.--___L

i

c

Resulr Fleld

TTT-T

,L I 1 1

RPG OUTPUT SPECIF ICATIlNS GX21 S0 ? U/M

O9'

Pr ht+d !n

u s.A

75 76 77 78 79 80

P,q'.o fl=rT_rT-l

_ rde.ircaro.l I j i | | |

IBl,l

T^

Llat"" **ff-]"

Ourpr/t Indi.ators

41r

t1

f;,

n

i,;

04 o

T'

05

06

,l

Q7

.l^i

Figure 16. Transmittirrg

Using

RPG

II in Communication Between

a System/3

and the tBM

3750

(World

Trade Only) 80.3

Page

of SC21-7507-5

lssued

30

June

1978

By T'NL: SN2'l-5624

This page

intentionally left blank

80.4

Receiving

a Status

Message

frorn

an IBM 3741 Data

Station

l:trlitre

i / slttirr\ it(r\r,lo

fcccive

tllr

stlrLitb

ni!ts)iillc

Iloill

-i-/ull

[)ut;r

Stirtion

u'iicli

l iiS(

r\ crroi irus

r)\]culr-cLl.

l'lte lli]\'l

r7-1

i tlrrrsnrris

titillr vr;r

rltc

IJS(

A iri

Sr,sitirr'..i

ll'lti:

tilrrL

lo;.nr:;

rirc

irrprrl

!iic lNllSCA.

Sysrerii

-i rlrcn

\r"irtcs

iIi(,

11.rtu

tce civcd

Iit

pflntci

tilc

OUT'llS(',\.

WIrcil

arr \'lt(.)r r)drtrfs

()il

lltc .17,+i^

iitc

llcttttlnctll

ctt()r

inrirculor

trr tirc

l{PG ll prtirlluiri

is

tur rrcd

on. BS( dutu

nrinragcr]rollt

e loscs llre

INtIS('A ltlc

lrirl Lrperrs

lNEIil{Oll

[()

tciclVc llic stillrrs

lncssltgc.

-l

hc I,b1,'ti:

cl]ilfxcte

i re

icrvcr,l

t: 0r)r1)|)iil'Jri

tit t lre

..17:l

I ::iitt

us iilrilaittol

r lillrl tltu upi| 0,

l)i

iulc llle

:,:\itgc

rr Piuted iil [)]inte

t lilc oL:l'tJS('.,\.

rH${ airi.j |(..,\, iii{_lr.

,.:}iijlr Ai\ili I'li.t iJi:S{:HiPIli-lN ijPEt-,lFlCATiONS

l,

dl STATU5

TJ

!t

--

;ilB5aA ipl

I

D|.JT ASLA OI

O;I{ERROF, TD

.-- t llr- -:-.,-

I

i

i,_

r

iF

F

izBt ia8

rl2 r34

*28i L ZS

1i

-

i |BSCA I

tp

nrrur

gR

Bscn I

r:i[,(; i x r

ii!:it{}l\i :1irit_t LtNE il(}titil ER

spEcl FIcA-ItoNS

! |+ur- l

IBI'{ :'

5

I,AIT

U

5

QZ

rl

I

i

l

i

I

l

I

i

3i

I

-i i-

3di I

l

l"s"

;i ,i

tr

[. riAri

I

t,.

- lt

I i:rtrrr

I

rl{cL.'ttirtr;r StrlLi: }lcrsarrr

Irirli lrn

IIJ\l .l

RPG

TELECOMMUNICATIONS

SPECIFICATIONS P ,n1ed r Lr.s

n

t5 16 ]t 1g 19 &l

- ';:::il".""fffflrlF]

**ffilr

24 25 26 21 2429 3A 31

Figure

17. Receiving

a Status Message

from an IBM 3z4l Data

station

(part

3 of 7)

RPG INPUTSPECIFICATIONS

IBll .," .", "., au5

nos,

Md ne

co,oo(.non

'f

Ift

l

Il'

T

t.r

T

F* -"

Flra* -**lfuil'-

c":, wo , ,r" ouo'

I

rszerrrsusao

I

',ifln.,."EFtrFIFl

I

Itl

il l

'lJ

l

1rl

+l]

I

r

I

T

I

Figure 17. Receiving

a Status Message

from an

IBM 3741 Data

Station

(Part

4 of 7)

Using

the lllM 3741 til

Page

of SC21-7507-5

lssued

30

June

1978

By TNL: SN21-5624

.T

-

ia-.-

[-'-

1.1,'11:' -J

l?1 1

r. l

rl

RPG CALCULATION

SPECIFICATIONS

'NER{4PR

,

i-i '[/x:

WfR

',L,NX.

VNKNiotwN'

'56,,lNX

,50ve

Sl,'/E

"l'1,''1.'

' | ',i rlr lii

,*w,s],

l,,;lt,i..,,,sirnifuiil

T-

t-

i

QI

2A

Q)

f

!9

i l-,

r

l

t';,i:

,l

lT.

ii;i

l.

:i'f i:

Figure

17. R.eceiving

a status

Message

from an IBM 3741 Data

station

(part

5 of 7)

IB}L..,.,,,",,,,, ".",n.s M# np

corm,dnon

RPG OUTPUT SPECIFICATIONS cx?1

eirr)

2 urM os.

""

i@{tl

" li:xl'

,,,,

lsJijntrl

r

is

I

t-

I

Figure

17. Receiving

a

status Message

from an

IBM 3741

Data

Station

(part

6 of 7)

i---"-.rr

r:l

.a -i.

c{ r- >a

,i}*an ilj

i-Q.-.

-i -_-

i * L r-

o..o

,

iirE O- -

>ru

f-.t v^, rl)

q(o;1

'.Uur:)

-u-aa a'j

cr L. ai

iitr:ervrnli f ronr.rr il741 []:,'Ii':r{iii.;otl rvitf

i f:xpil!dec{

(,{ ,

: ttn

r!

n

tii ll

itt

n: I cii lu, ..

',',,l. r.r .r

't: ,rr.rr.,:!ir;ii\i

\' ,,,

,

I r

]:.. ,.:i ..1

,.

',,1:

,:.1 :

,,,1 .,',

1F(:j

{..ii\

il.;'.r; , ,,r'.i]l.i

ANi':

FILF,

ii5511p1;PrlO\:}?F{liFlCAl'lOt\lS

ighi

O I l. .tt,r. : i ; ti.: ,r.,i; .,i: l,:,r,i,.rl(.,,tililt|rl.ittir,:.i..ttL|:tit,,r'i

rii

ttsrd

it

h{

A

sc Adt{

rl

;B5

CA

6i{

I-

t

ij,.:i'l

'i.-i 5F dNA qc

RPG INPUTSPECIFICATIONS cx2t 9G4 2 U,M

050"

Prnred.UsA

1 2 7576117A7980

'"*

LL 1'_ ";:1i1",..

EElcFEfq-l

Record

ldentif

i€tion Codes

Figure

18. Receiving

from a

3741 Data

Station

with Expanded

Communications

Feature

(part

3 of 5)

I81vt .,.,.",.,," a,, nen Mach

np

coroo,,non

BPG CALCULATIONSPECIFTCATIONS Fo,' ajx2:

s93 2

1 2 1a)61/ /a79AO

""

fil.'_ fi::1ilt",",

trtkEbEi

------']

Comments

1fi+.+

I

t-l-l

- i -

i.tl ii]

t1

r-l

*1

ri

F'igure

18, Receiving

from a 3741

Data

Station

with Expanded

Communications

Feature

(part

4 of 5)

RPG OUTPUT SPECIFICATIONS

**ffi"

6X2r 9@0,'

(r,M

r)50'

f,,ir-"d

fus!

15 76 i,1 18 t9 80

_';::tit",

",

Flblalc/Tql

r4+

,

ll

i

Figure

18. Receiving

from a 3741

Data

Station

with Expanded

Communications

Feature

(part

5 of 5)

Using

the

IBN{

3741 It7

Page

of SC21

-7507-5

lssued

30 June 1978

By TNL: SN21-5624

This

pap:c

intentionalll'

Iclt nlank

Page

of SC21-7507-5

lssued

24 September

1976

By TNL: SN21-5428

RPG CONTROL

CARD AND

FILE DESCRIPTION

SPECIFICATIONS GX2t 962 3 UM/O$.

15 16 tl t8 t9 aO

"*f[",_'#:l;",.^

FkEEE

Prqr.m Grrphic Card Elecno Numbr

Prqrrmmr I oao

Control Card Specif ications

H

C&.

S2a to

ftmpil!

I

t"

6lf

3 l.!

A-IE

;"1;

T

I

a"l

sze to I

Ex6@b

I

ll

""

ti

E

.l

tt

=

Ol Prini

t

E

!

6

hd.l 20 T

aI

E

o

3

E

€

9

I

5

neler to the speific System Relerene Lib.ary maoual tor actual enriei

i2sg55$57S59 &616?eA

to Sbrr E

.E

F

.g

File

Description

Specif

ication

F

Filsname

a 0

Device Symbolic

Device

=l

?l

TI

il

I

Name ol

Lab€l Exit

Extent Et

for DAM

Addition/Unord€red

o, Cvlinder Ovedlow

l- $** -

I l-l{:sl- Il4ord tudr6. TYE E

Core lndex

ll"

I t;l

:|:lll U] U8

I

I Key Fierd

I sbdins

".t"::""::"" ,55S57Sse

Enlry

orl Frrlrls lr.I

RPG TELECOMMUNICATIONS

SPECTFICATIONS Fo,m

GX2J 0t l6 1

Plnr.drnusA

1 2 15161t t879a0

^ ffl . P'q'dm l=-T-f T-f T--l

**l -Ll"'_ u_,r".,,-LLl_

| I | |

Grd Electo Numhl

I Figure

16. Transmitting

to a 374r Using

an

Expanded

communications

Buffer

(part 1

of 2)

Using RPG

Il in Communication lletween a S)'stenr/3 antl the lBM 3750 (World

Trade

Only) 89

Page

of SC2t

-7507.5

lssued

24 Septemberr

,t976

By

TNL: SN21-54:28

RPG INPUTSPECIFICATIONS

RPG CALCULATION

SPECIFICATIONS

Facrof 2

IBrt ,,",",,.""

Ru5n.*rli:hnecooo,a,on

RpG OUTpLrr SpECTFTCATT.'NS

F* 1,,, , 1",, I f N

trar------1"'"

- lt"'"ll 1I1 IIfl l

1

? ta16ttJntagQ

' P,..,, t I I

'"LL

I ' [tl]L ]

Di

tr T

,l

Iil

fIl-

"-[]1,

I ltigr." 16. Transnritting

to a 3741 Using an E,xpanded

Communications

Bufler (part 2 of 2)

90

=o

Ue

:;

.ll

TERMIN.AT,ED,

Page

of SC21-7507-5

lssued

24 September

1976

By TNL: SN21-5428

Appendix

H. Using

RPG ll in Communications

Between

a System/3

and the IBM 3750

(World

Trade Only)

When

a System/3

is connected

to an IBM 3750

Switching

System,

the RPG

II telecommunication

program

must be

used

to code

the application

programs

allowing message

exchanges

between

the

two systems.

The

application

program

can

be

written for message

exchange

the

following

3750

functions:

1. Call

recording

2. Contact

monitoring

under

data

processing

system

control

3. Inquiry

to data

processing

system

with recorded

answer

4. Real

time

data collection

to data

processing

system

5. Recorded

announcement

to extension

under

data

processing

system

6 Transfer

of recorded

data

to data

processing

system

Comrnunications

between

the

System/3

and

the 3750

are

binary

synchronous, point-to-point

operations

in trans-

parent

mode.

Only

the EBCDIC

code

can be

used.

The

System/3

operates

as

a transmit

and receive

station.

Programming

Procedure

On each

end of file (EOT) received from a flle, the RPG

Il

program

must switch

to read the other

input file.

z.

I. The input files

will

be defined as receive files

on

the

RPG II telecommunications

specifications.

The output file will be defined as a transmit

file on

the

RPG II telecommunications

soecifications.

The exit frorn

the RPG II program

can

be

taken

when the

stop

message is

received.

The

rernot

device

field

of the t{PG II telecommuni-

cations

specification must be left

blank. The 3750

is

considered

to be

a

processor

by System/3 RPG

II

BSCA.

^

*.

Using

RPG II in Communication Between a System/3 and the

IBM 3750 (World

Trade Only) 91

92

1'his

appendix

is intended for a person

wlio is kr.rowledge-

rble about

BSC line

protocol. This

person

should ltave

the

lollowing

inlblntation

to

:

. Writc

u

progfanr

1'or

the ret)iote location

to interflce

with Systern/3

RPG II

o Wlitc it

progrant

lbr the Systenri -3

to perlbr.nr

a spectlic

sequeucc

of line

prolocol

-l'he

appc'ndix

shows

RPG Il Birury Synolrronous

Cornnruni-

cations

(

[iSC) line

plotocols

and indicates

wlrich ones

are

pe

riblntcrJ

autotnatically

and rvhiclt

orles rllc

l{PG ll

progranl

controls.

[:lch Sl stenl-] tlansrnission

of data over

tl)e couturuniea-

tion linc

is equal to BLOCK SIZE

on the BS['A's

File

Descr.iption

Specif icution. Thc

sizc of tlie

dlta blocks receiv

cd by Systerl/-i is

contLolled by the

transuritriug

sration.

('f

he astcrisk in the

Systcnr,.,l SoftwaLe/Adapter

uoluntn

indrcates

Justonref coding Iogic.

)

Appendix l. System/3

RPG

ll Interface

to BSC Line Protocol

Mrlc. DLrrirrg

thc

execution

of an

RPG lt tele

conrruurricatiorr

pfogrant,

BS['

output da1a rnanager-nc'rrt

delays

tr:lusrntssitrn

ol each

block

ol'data

r-rntrl

thc ncxr

block

is

rcady

to be

transnrittcd.

This

dclay is necessary

to allow

data

rnanagenrent

1o placc

the proper

linc

contr.ol

clialactcr

(ETX) orr

tltc last

block

of'data

to be trarrsnritted.

For

cxantple,

Ilte

Transmit

Llultiple FJlcs

clrart slrows

tlte last

data

block of lilc I beirrg

tfansniltted

rs

u rcsult

of the

uscr progranl

rcquestiltg

output

to BSC lllc rr.

System/3 Transmitting

Station Syste m

/3 Softwa

relAdapte r

Line initial ization

(autornatic)

'

I nput

f

rorr BSC f

rle

(aritoma|c

acknowleclge)

<r Da1,r

'Crttses

,

rrtl

t.r{

lrle

{or

BSC

lile

Svslcrrri I IIP(i II lnlcrluec

to

llS('

[.inc

Protocol 93

Transmit

RecervinE

Station System/3 Software/Adapter

Line

initialization

(automatic)

*output to BSC

iile

(automatic

acknowledge)

"

End

of

job

94

Transmit Multiple Files

System/3 Sy stem/3 Software/Adapter

Lirre

rnrtializal ron

(autornatrc)

'Output to tsSC

tili:

1

{.i.,lutrtlt

a dcKrro\\l (l,Jr I

'OutprLrt

to

BSC

f

rle

rr

{.rtrlo'l'dt C

.rCkrl{,\\l,'1,1'

\

Lrnc

tritral

zatrof

(autorlatrc)

'Enil

oi jotr

Transmit/

Receive

System/3 Receive/Transmit

Station Sy stem/3

Softwa

relAdapter

ENo r+>

+ACK

I irr] iltlttalt,/alto|

{autt)llliittc)

n,r-

E

r .+>

B

AOI<

Data

T r>

B

<r ACK

-l)rrilrtrt

tc FISiC

tilr:

1

{.rrlor,JlrL

.'r'f

t

,r'.1'

,i't'

t

D

at.t

E

r+>

X

<- ACK

EOT +>

+r ENo

ACK r+

ACK .+

'

lnltLrt f rorr BSC

lrlt;

l

(.rrll'rlll,tlre

ut

f,l r,,fl,,1,j,

'

L ne ir tralrzation laLr lornatit:)

+r ior 'Caust:s

entl

of f lr: tor BSC

f le

R eceiv e/

Transmit

System/3 Transmit/Recerve

Station System/3

Sof

tware/Adapter

+ FNo

ACK +>

LIrr|

rrr

I

.,lrzllrOrr

(JutomdltC)

+ Data

T'+v

------+

ACK +

'lnput

f ronr

tsSC

f

ilt:

1

(.rrttOtrralir

at

I

tr,,rvlrrlg'

\

+r

ENo +

EOT

ACK

<r

Data

E

r r+>

B

+ACK

Causus

lnd ol trle

tor

tsSC trle

*Output

to BSC

f ile n

(automatic

acknowledge

)

Line initialization

(automatic)

F

Data T +

+ ACK

Eor +

'Errrl

o{

lolr

Svstcnr/3

RP(i II IntcrJacc

to llS('

Littc Protocol 97

LEASED

MU LTI

POI

NT,

SYSTEM/3 TR

IBUTARY

STATION

Receiv

e

System/3

Software/Adapter

Systemi

3Control Transmitting

Station

Line initializatior]

(autornatrc)

+ Arlr/rseq ENo

-lnput

from BSC

lile

{automatic

ack

r

rowlt'tlg.)

*Causes

encJ of file tor BSC

lile

Transmit

System/3 Control

Receivinq

Station System/3

Software/Adapter

Polllng

seq ENO Line

initial

ization

(6u1sms1i6)

'Output

to BSC f

ile:

(automat

ic

acknowledqe;

'Encl

of

job

Systcnr/3 RPG

II Intcrflcc

to tsS('

l-inc Protocol

Transmit.

Receive

System/3

Control Receive/

Transmit

Station System/3 Software/Adapter

Pollirrg

seq

ENO Line initial ization

(autorratic)

"Output

to

BSC

f

ile

1

{au

tomat

ic

ackr

rowledge)

Arltlr setl ENA

"

lnput BSC

f

ile n

(automdt

rc

ackrrowledge)

Line initial izatior-r

(automatic)

*Causes

end

of f

ile

for BSC

f

ile n

Receive,

Transmit

Control

Transmit/

Recei

ve

Station System/3

Software/Adapte

r

A(/r/r

SC(/

tl\U Line

initial

ization

(automatic)

"

Input from

BSC f

ile

1

PollrngserT

ENO

*Causes

end

of f

ile

for

BSC f

ile 1

*outpur to BSC

f

ile

/l

(Automatic

acknowledge)

Line

initialization

(automatic)

'End

of

job

Systenr/3 I{P(i Il Intcrlace

to BS('Line Protocol

POINT

TO POINT

SWITCHED LINJE

lD SEO:

SWITCHED LINE

STATION

IDENTIFICATION SEOUENCE OPTIONAL

Receive, System/3 Answer Station

System/3

Software/Adapter

L'n" rrtitial rzatiort

(iiutomdtic)

'lnput

f rom BSC

tile

(automatic

ackrrowledge

)

'Causes

encl of

f

ile

for

BSC

f

ile

System/3 Transmit Station

lD

sr:rt

I ENO

llDseql

as6

+

DLE

EOT

Receive,

System/3

Catling

Station

Transmit

Station System/3

Software/Adapter

llDseql

ENo

r+>

IlD

seq]

ACK

Line initialization

(automatic)

*

Input

f

rom

BSC f

ile

(automatic

acknowledge

)

<T DLE

EOT *Causes

end of f

ile for

BSC f

ile

Systcm/3

RPG Il lnterlace

to BSC Line Protocol 103

Transmit,

System/3

Answer Station

Sy

stem/3 Receive

Station Svstem/3 Sof twa relAdapter

LID

seql

ENO

llD

seql

ACK

r>

I inc initializatiorr

(automatic)

'Output

to BSC

f

ile

(automatic

acknowledge)

DLE

EOT

'End

of

job

Transmit,

System/3

Calling

Station

System/3 | Receive

Station System/3

Sof

tware/Adapter

Line

initialization

(automatic)

llD

seql

ENo

+

llD

secr

I ACK

'Output

to

BSC f

ile

{au

ton

ral

ic

ar;k

r rowlldge

)

DLE EOT +

*

Encl

o{

yob

Slrteru/.1

l(P(i

ll Irrt.

rl;r,,' l,' lis( l.rtr' l'r,,t',r',)l

Transmit/Receive,

System/3 Calling Station

Receive/Transmit Station System/3 Sof twa relAdapter

llD

seql

ENo t+

<- llD

seql

ACK

Line initialization

(automatic)

'Output to BSC

f

ile 1

(automat

ic

acknowledge)

*

Input

f rom BSC

f

ile

n

(automatic

acknowledge)

Linc

initializatrorr

(automatic)

'Causes

end of f

ile

for

BSC

f

ile

n

<T DLE

EOT

Transmit/Receive,

System/3

Answer Station

Receive/Transmit

Station System/3

Software/Adapter

llD

scql

ENO

I

lD

seq

1

ag6 r>

Line

initialization

(automatic)

'Output

to BSC

tile

1

{automatic acknowletlle

}

'lnput

f

rom BSC

f

ile

rr

(automatic

acknowledge)

Line

initialization

(autornatic)

+r DLE Eor 'Causes

end

of f

ile

for

BSC

f

ile rr

Svstern/3 l{P(i II Irrtcrluec

to IJS(' Linc

Prolocrrl

Receive/Transmit,

System/3

Answer

Station

Transmit/Receive

Station Sy stem/3

Software/Adapter

+- llD

seql

ENO

llD

seql

ACK r+

<r Dara

Linc' initial ization

(automatic)

'lnput

f

rom BSC

tile

'1

(automdtrc

acknowlcdge)

*Causes

errd o,f

f

ile

for BSC

f

ile 1

"Output

to BSC

f

ile

rr

(automatic

acknowlecige)

Line

ir.ritial ization

(automatic)

DLE

EOT

'

Errd

of

job

Receive/Transmit,

System/3 Calling Station

Transmit/ Receive

Station System/3

Sof

tware/Adapter

llD

se

ql

ENo r+

<r lD

seql

ACK

{- Data

Line initialization

(automatic)

'lnput

f rom BSC

f

ile

1

(automatic

acknowleclge)

"Causes

end of f

ile

for BSC

f

ile

'l

'Output

to

BSC

f

ile

rt

(autornatic

acknowledge)

Line initial

ization

(automatic)

DLE

EOT

*

Encl

of

1ob

Systcnr/3

Ill'(l ll lnterl'acc

to llS('l-itrt

Protocol

CONVERSATIONAL

MODE

Receive

with Conversational

Reply

System/3

Receive Transmitting

Station System/3

Sof

tware/Adapter

f enro

lqK_ +>

Lirre initlalization

(automatic)

{r DArA

i

X

ACK +

-t, 11-,ynTa i

E

DArA r -)

X

_^_-

5tr

TT

f onrn

rf>

<r DArA

E

T

X

ACK

E

T

X

f eor

-lnput

BSC

file

(au

tomatic

acknowledgle

)

-Output conversational

response

(automatic

acknowledge)

"lnput

BSC

file

(automatic

acknowledge)

*Causes

end-of-f

ile

on

BSC f ile

Transmit

with Conversational

Reply

System/3

Transmit Receiving

Station System/3

Sof tware/Adapter

ENO ->

E_____t_T:_

DATA T -)>

X

E

+ DATA

T

X

ACK rf>

+I T

X

E

T

X

Line

initialization

(automatic)

*Output

to BSC f

ile

(automatic

acknowledge

)

*

Input

conversational

reply

(automatic

acknowledge

)

E

DATA T

X+>

fr no<

EOT +>

*Output

to BSC file

(automatic

acknowledge)

*

End

of job

System/3

RPG II lnterf

ace to BS(-- Line Protocol

Pase

of SC21-7507-5

lssued

24 September

1976

By

TNL: SN21-5428

LI NE CONDITION*SYSTEM/3

R ESPONSES

Data Mode,

System/3 Transmitting

System/3 Receiving

Station System/3

Software/Adapter

Data +

+ WACK

ENo r+

+ ACK

---j

*Output

from

BSC

f

ile

(automatic

acknowledge)

System/3

recovery

(automatic)

TTD I+ V

+ NAK

Data .+

;?AUN

*Output

from BSC

file

(automatic

acknowledge)

System/3 recovery

(automatic)

Datal r>

+ NAK

Datal r>

<. ACK

4' ,t

*Output

from BSC

f

ile

System/3

recovery

(automatic)

Data2 +

<r ACKO

(wrong

ACK)

ENo +

<r ACK0

(wrons

ACK)

Data2 r)

+ ACKI

*Output

f

rom BSC

f ile

System/3 recovery

(automatic)

v'v

tt2

Data

Mode,

System/3

Transmitting

(continued)

Page

of SC21-7507-5

lssued

24 September lg76

By

TNL: SN21-5428

Receiving

Station

Time-ou1

Data3

*Output

f rom

BSC f

ile

System/3 recovery

(automatic)

+ ACK

or RVI

*Output

f

rom BSC f

ile

Sets

System/3

record

available

indicator

*

Input

to BSC f

ile

System/3 permanent

error

condition

while

in transmit

mode

EOT

or DLE EOTr+>

'*Causes

error

indicator set if

assigned for

BSC file.

otherwise halrs.

+ EOTor

DLE EOT

*Output

f

rom

BSC

f

ile

*Causes

error

indicator

set if assigned

for

BSC

f

ile.

otherwise

halts.

System/3

RPG II Interiace

to BSC Line Protocol 1 13

114

Page

of SC21

-75O7-5

lssued

24 September 1976

By

TNL: SN21-5428

Data Mode,

System/3

Receiving

System/3

Softwa relAdapter

*

Input f

rom

BSC

f

ile

(automatic

acknowledge)

System/3 recovery

(automatic)

Input from

System/3

recovery

(automatic)

Time-out

f errro

*lnput

from BSC

f

ile

System/3

recovery

(automaticl

Input

from

BSC

f

ile

System/3

recovery

(automatic)

System/3

permanent

error condition

while

in receive

mode

*lnput

from

BSC

file

*Causes

error

indicator

set

if assigned

for BSC

file, otherwise

halts'

EOT

or DLE

EOT+

<r EOTor DLE EOT

*Causes

error indicator

set

if assigned

for BSC

file, otherwise

halts.

-fhis

g1ossrry

contains

sornc

terms

that

are

used in tliis

rnanull.

Data

processing

and otlier

comrnunications

tenns

rLfc

defined

in IBful

Data

Prot'cssing

Glossar.l',

GCl0-

1699.

addressing:

A request

from

tl're

control

station

to

a

tributaly

station

to receive

data.

autoanswer:

A rnaclrine

I-eatule

that

allows

a

called station

to respond

automatically

to a call

it receives

over

a switched

I lllc.

baud: A unit o1'nreasuring

thc

nurnber

of data

characters

scnt

on

a IISCA

line

in a

given

tinte.

krinary

synchronous

communication: A flexiblc fbrnr of

linc

contlr:,1

which plovidcs

a set of rules

for c<lrnurunrca-

tion

bclrvccn

trvtt

devicos.

called

station: A station that

accepts

calls.

calling

station: The

station from wlrich

a call

originltcs.

central

station: Sec utrttrul stati()n.

clocking: A procedurc.

to control

the nurnbcr

o1'datl

bits

\rnr

()il

rr

[tSCA lrrre

irr

I giverr rirrrc.

control

station: The

prirlary

or controlling

coutputer in r

lnultipoirrt

tclccornnrunicatiolls

configuration.

It controls

tlrc

sendrlg

and

recciving

ot'clata.

conversational

file: A BSC file

that

allows

receivitrg

trr

sending

dlta characters

as an

acknowledgnient

instead

tul the

A('K0 or ACKI character.

data

link: TIre

corrtrnunications

lines.

rnodcrns

(datl sets).

stutions.

tr.illtil)als.

arrd

otlrer

conrnrunications

e qurputelt

t

us0d

lirr the tt'ansntission

ot'd:.r1a

betwcen

statiolrs.

data

link

control

characters:

TItc

control

characters

used

by the

datu link

and

thc

control

station

to

notily

eaclt

othcr

()f

tllcir

status

and

thc

status

of thc

datl

senr or

reccivcd.

Glossary

data

link message: Data sent through BSCA using

either

FBCDIC

or ASCII

code

data

mode: A time at which the BSCIA is

transrnitting

or

receiving

characters

on the line.

data set: See

rnotlem.

disconnect

timeout: An indication that tire

BSCA station

you were comnrunicating

with has

gone

on hook or hung up

EBCDIC

transparency: A provision

that allows

BSCA to

scnd and receive

messages containing

any or all of the 256

character

cornbinations

in the EBCDIC

code. including

data link control characters.

error

history file: A push-down

stack of the lasr

BSCA

crrors

that have

occurrcd.

full duplex: A BSCA

network that

allows for sirnultaneous

trlnsmission

and reception

of data.

half

duplex: A two-

or fbur-wire

BSCA network that

providcs

lbr data

to be

sent

in only one

direction at a

givcn

tirne.

half rate: A rnodenr

1-eature that provides

for transrnitting

or rcceiving

data at one-half the normal rate.

host: See utntrol station.

intermediate

block check

(lTB)

: A provision

that allows

lbr parity checking

on each logical

record rather

than the

total bul'fer when large

buffcrs

of data are

received.

fine controf characters: See tlata link control t'haracters.

manual

answer: The rnachinc

operator rnakes the

data

ser rea0y.

manual dial: Dialing

is

perlbrrned

by the ntachinc

operator.

master: The BSCA

station that is transuritting.

(ilossrrr' I

l-5

modem: A haidware

box used to connect

the BStl

adaptcr

to the

BSC line.

monitor

mode: A time during which

the

BSC

adapter is

hroking

Ibr

syr.rchronization

characters.

muftidropped

terminal:

See tibutary station.

multipoint

data link: More

than two

stations

olr

a cornlnon

transurission

line

or communication

facility. Each

station

has the

ability

to monitor

the transmission

line

at all tirnes

f or

activitl, or data that

nay be directed

to it.

nonswitched

line: A conrlnunication

link

between

a

remote

station

and computer

that

does not have

to be

established

by dialing.

op end interrupt:

A hardware-generated

interrupt

used to

indicate

the completion

of the soliware-initiated

BSCA

input/output

operations.

point-to-point

data link: A communications

facility that

connects

a single remote

station

to the

computer.

polling:

A request

frorn

the control

station to a tributary

station

to transmit

data. Once the

tributary

station has

accepted

the invitation,

through

recognition

of its

polling

characters

sent

by the control

station,

the remote

station

may use

the line to send data.

receive

timeout: An indication

that no

data has

been

received

by this BSC

adapter in a

given

tirne.

receive

initial: A software

command

to allow

the BSC

adapter

to receive

synchronization

characters.

receive

mode: A tirne

during which

the

BSC adapter looks

flor

synchronization

characters

and then

stores the

data

characters

in main

storage.

remote

terminals: lnterconnected

equipment

at a renlote

location

having

either input

or output

capabilities

or both.

reverse

interrupt: A metl.rod

of sending

data records

from

c,ne

BSCA

station to another station

before receivins

end-ol-file

indication

fronr

the other

station.

slave: The

BSCA station

that is receivins.

standby line: A rnodern

I'eature

that

allows

a

point-to-

proint

lease

d line ntodern

to also function

on a

point-to-

point

switched

line.

station: Any of the computers.

terminals. or devices

that

use the communication facilities.

switched line: A comrnunication line in which the

connec-

tion between the

computer and a rernote station is

established by dialing.

transparency : See

EBCDIC transparency.

transparent mode: A BSC adapter rnode initiated

by the

sequence DLE STX.

tributary

station:

A secondary or noncontrolling

device

in

a

multipoint

telecomlnunications configuration.

wrap test: A diagnostic

procedure

that transnrits a

specilic

character

pattern

to or through the

nrodem

in a loop and

then

compares the character

pattern

received to what was

transmitted. It is

used when unrecoverable BSCA

hardware

errors

occur.

access

lines -5 pata Communication

System

(2770) I,57

additional

area entry 14 data tbrmats 15

addressing 5 6ata

link

addressing

characters 5

2,

54 control 6

addressing

characters

entry 1

3 control characters 6,49

Arnerican National Standard

Code tbr message codes 6

Inlbrmation Interchange 6,47 message tbrmats 6

AS('ll 6 6ata

restrictions 15

ASCII code

chart 41 Dara

Station

(3741

) 75

autoanswer 6' 10 Data

Transmission

Terminal

(27ti0) 1,57

autocall 6, 1

0 dedicated

lines 5

demand f-rle 14

device entry 14

dial

number

entry l0

DOS 1,1

block

lcngth

entry 14 dgal

I/O areas 14

block

size 93

[]SC

flnctions 15

telecomlnunications

concepts 3

terminoloqy 3

IJSCA station

types 7 I:BCDIC 6

ITBCDIC code chart 48

EBCDIC transparency 6

end-of-file entry 14

end-of-transmission 5,6

central .5 lot 5, 6

code

type entry 9 errors I

6

cor.nbined

f-tle 14 Flrtendeti Binary Coded Decimirl Interchange

comrrents

line

entry 9 Cocle 6,49

contmon

catner 5

conliguralion

entry 9

consideral

ion s

conversationalreply

27

progratnminr 1-5 lile description specitications sheel

entries 17

Systen/li 59 BSC tltes 13

"fCANl 74 hlc designation entry 14

2170i2,180 59 file tbrmat entry 14

control

breaks

and

overflorv 15 file name

control characters,

data

link 6,49 hle

description

entry 9, I 3

control

sequence 6 lelecommunications

entry 9

control

station t t le

type entry I 3

control

type entry 9 form type entry B

conversational

mode

receive

q'ith conversational

reply I 10

transnlil u,ith conversational

reply i 1 1

slossary I I 5

lndex

lrrtlcr I

I

7

identification ptrint-trr-point

suitchecl

line

remote

station

entry 10 lD seq: svn'itched line station identification

sequence

this strtion entry I 0 optional

lnternediate block checking

entry I1 receive/transmit,

System/3

answer

station |08

intermediate

block checking

mode 6 receive/transmit,

System/3 calling station I09

ITB 6, I I receivc,

System/3

ans\\,er

station 102

receive,

System/3

calling

station 103

transmit/receivc,

System/3 ans$er station I07

transnrit/receive,

Systent/3

callins

stati{jn 1

06

last file trapsnrit,

Systern/3 ans\\er

siation I

0.+

entry 12 transmit,

Systcnr/3

calling station 105

erample 33 polling 5

leased

lines 5 pollins

characters ,51.52

leased

multipoinl, system/3

tributary station polling

characlers

entry j2.

receive 98 private.

lines 5

receive,

transmit I 0l progralt

iclentilicatign

entry 1

3

transnrit 99 programntius

considerations l

5

transnlit,

receive 1

00

line condition

--System/3

responses

data

mode,

System/3

receiving I l4

data

rnode,

System/3

transmitting \12

line

number

entry B RI.]AD operation code 65

line

protocol 93 receive a f'ile, then

transntit I lllc proqram 36

location

of identification receive

only program I

6

remotc station

entry I

0 recerve rvith

transmittal

of conversational

reply program 20

this station

entry I 0 rccord

available

inclicator

cntry lZ

use 41.65

record length

entry l4

remote

clcvicc

entry I 3

manual answer 6, I 0 rcnrotc ternrinal entry I

0

manual

dial 6, I

0 reserved entry I 3

message

codes,

data

link 6 RPG II

message firrmats,

data

link 6 BSCA

prograntming 1

multidropped

terminal 5 diagnostics 16

multipoint 5 llP(; teleconrnlunications specitications

shcet 8

network control 5 specifications

slieet. teleconrnrunications 8

net\\,'orks,

telecommunications 3 specifications sunmary, teleprocessing 53

nonswitched 6 station identification -5

nonsrvitched entry 9 statron

identit'ication

enlries 10

nonsrvitched

network 5 starion idcntification

location entries lt)

station type entry 9

slation types,

BSCA 1

su

itched ,5

switched entry l0

operatlng

procedures I su,itched network .5

OS |,7 Su,irching Systenr

(3750) 89

overflow, control breaks and I

5

T('A[,] (OS

telecourmunications

access method) I

,

65

page

number

entry 8 TCAM considerations 14

permanenl

error indicator

entry 1 I teleconlrnunrcatlons

point-to-point 5 netivorks 3

point-to-p,rint

leased line specit'ications sheet 8

receivc 93 specilications

su

l)nary 5

3

receivc/transmit 97

transmit 94

transmit multiple

tiles 9-5

transrnit

/receive 96

llu

transmit

a l1le.

then

receive a file program 31

transmit

antl receive

(no

conversational

reply) 3l

transmlt

interspersed

with receive

progranl 4l

transmit

only program 24

transmit rvilh

reception

of conversational

reply program 27

transparency

entry 9

transparency.l..tsCDIC 6

tributary

station 5

rype

or

code

entry 9

control

entry 9

station

entry 9

nait tinie entry 12

2770 Data

Conimunication

System l. 57

2780 Data

llransmission

Terminal 1,

57

3741

Data

Station 15

3750

S'"vitching

System B9

lndr'x I l9

sc21-7507-l;

?EE--

=:=r=

International

Business Machines

Corporation

General

Systems Division

ar775D

Glenridge

Drive

N.E"

Atlanta,

Georgia

303Ci

(USA

Only)

IBM

\[,orld Trade

Cr:rporation

821 Ljnited Nations

Plaza,

New

York. New

York 10017

(lnternational)

F

a

:.

@

=

C

U>

N}

\,1

!

iJr

READER'S

COMMENT

FORM

IBM

System/3

RPG

| | Telecommunications

Programming

Reference

Manual

sc21-7507-5

YOUR

COMMENTS.

PLEASE

.

. .

Your

comments

assist us

in improving

the

usefulness

of our

publications;

they

are an rmporranr

part

of the input used

in preparing

updates

to the

publications.

All comments

and suggesttons

become

the

property

of lBM.

Please

do not use this form for technical

questions

about the system

or for requests for additional

publications;

this

only

delays the response.

Instead,

direct

your

inquiries

or requests

to your IBM

representative

or to the

IBM

branch

office

serving

your

locality.

Corrections

or clarif rcations

needed ;

Page Comment

l,eoulrl

like

a reply. I

Name ,

Acldress

O Thank

you

for your

cooperation-

No

postage

necessdry

if mailed

rn

the

U.S.A

I

=

o

f

a

f

o

I

i

I

sc21 7507-5

BUSINESS

REPLY

MAIL

NO POSTAGE

STAMP NECESSARY

IF MAILEO IN THE UNITED STATES

POSTAGE

WIII. BE

PAID

BY

IBM

Corporation

General

Systems

Division

Devel

opment

Laboratory

Publications,

Dept. 245

Rochester,

Minnesota

55901

FIRST

CTASS

PERMIT

NO. 387

ROCHESTER, MINN.

-

IT

--

-

--

-

la

l<

lo

l-

ru)

lT

lc)

t=

tg

r=

t

lo

t^

tTl

=

1O

lz

lo

t\)

loo

i.-

Fold

EEI=S

International

Business Machines

Corporation

General

Systems

Division

5775D

Glenridge Drive N.E.

Atlanta, Georgia 30301

(USA

Only)

IBM Worild

Trade Corporation

821 Unitrad Nations Plaza. New York, New York 10017

{lnternatrron

al)

r=.

to

l6

r=

lc

.,^

lb

I

lN)

t!

,{

l0n

I

{

j

I

Fold

nq-;\q-\ n /

IJLULII\

/ Technicat Newstetter

/

Base Publication

No. SC21-7507

b

File

No. 53-30

IBM System/3

RPG

ll Telecommunications

Programming

Reference

Manual

O IBM

Corp.

1969,

1970,

1|g]-j,

1g72,

1gt3.

1gl'

This

technical

newsletter,

a

part

of version

05, modification

00, of the IBM

System/3 Model

15 RpG ll,

version

02,

modification

00,of the IBM

System/3

Model

12 RPG

ll (program

product 57O4-RG1;

,

and

version

01, modification

00of lBN4

System/3

System

Control

Program

(program

product s7o4-Sc2l

,

provides

replacement

pages

for the

subject

publication.

These

replacement pages

remain

in effect

for

::::to"t"t

versions

and

modifications

unless

specifically

altered.

Pages

to be

inserted

andlor

removed

Cover,

Edition

Notice

iii

through

vi

1,2

9, 10

l5through

18

41,42

75

through

78

87 through 92

111

through

114

Back

Cover

Reader's

Comment

Form,

Business

Reply

Changes

to text and illustrations

are indicated

by a

vertical

line

at

the left

of the chanqe.

Summary of Amendments

Changes

effected

by Program

Number

57o4-Rc2and other

miscellaneous

changes

have

been

added.

A/ote"

Please

file

this

cover

letter

at

the

back

of the manual

to provide

a record

of chanqes.

sN21-5428

24

September

1976

This

Newsletter

No.

Date

f

tsM

corporation,

Pubrications,

Departm

ent

24s,

Rochester,

Minnesota

55901

O IBI\,,1

corp.

1976

Printed

in

u.s.A

l f l n )\ \/ 'J

llruJ_l';,[ Technical

Newsletter

Cover,

Edition

Notice

9,

10

10"1,

10.2

(added

to

accommodate

moved

text)

11,12

35,

36

Changes

to text

and illustrations

are indicated

by

Summary

of Amendments

Miscel

larreous

technical

changes

This

Newsletter

No. SN2l-5624

Date 30 June

1978

Base Publication

No. SC21-7507-5

File

[\lo. 53-30

IBM System/3

RPG

ll Telecommunications

Programming

Reference

Manual

OIBM

Corp.

1969,

1970,

1971,1972,1973,

1975

This

technical

newsletter

applies

to the

current

versions

and modifications

of the

applicable

system/3

programs

listed

in

the edition

notice

and

provides

replacement pages

for the

subject

publication.

These

replacement

pages

remain

in

effect

for subsequent

versions

and modifications

unless

specifically

altered.

Pages

to be

inserted

and/or

removed

are:

75,76

80.1

through

80.4

(added)

83,

84

87,

88

89,90

(deleted)

a

vertical

line

at the

left

of the changes.

y'y'ofe;

Please

file this cover

letter

at the back

of the manual

to provide

a record

of changes.

f

BM corporation,

Publications,

Department

24s,

Rochester,

Minnesota

55901

O tBM

Corp.

1978 Printed

in U.S.A.

sc21-7507-5

International

Business

Machines

Corporation

General Systems

Division

5775D Glenridge

Drive N.E.

Atlanta,

Georgia 30301

(USA

Only)

IBM

World

Trade

Corporation

821

United

Nations

Plaza,

New

York, New

York 10017

(lnternational)

@

(/,

(^)

T'

=

d

F

6'

3.

I

z

;

qJ

G)

o

j-.

-'

tr

?

P

v,

o

N

\,1

('l

o

!

(t

READER'S

COMMENT

FORM

IBM

System/3

RPG

ll Telecommunications

Programming

Reference

Manual

sc21-7507-5

YOUR

COMMENTS,

PLEASE

.

. .

Your comments

assist us

in improving

the usefulness

of our publications;

they are

an important

part

of the input used in preparing

updates

to the publications.

All comments

and suggestions

become

the

property

of lBM.

Please

do not use

this form for technical

questions

about

the system

or for requests

for additional

publications;

this

only delays

the response.

Instead,

direct

your inquiries

or requests

to your IBM

representative

or to the I

BM branch

office

serving

your locality.

Corrections

or clarifications

needed:

hge comment

I

would like

a

reply. n

Name

Address

o Thank you for your cooperation. No postage

necessary

if maired

in the u.s.A.

I

,

o

l

I

f

o

I

sc21-7507-5

BUSINESS

REPLY

M,A,

IL

NO POSTAGE

STAMP NECESSARY

IF MAILED IN THE UNITEDSTATES

POSTAGE WII,L BE PAID BY

IBM

Corporation

General

Systems Division

Develop

ment La

boratory

Publications,

Dept. 245

Rochester,

Minnesota 55901

FIRST

CTASS

PERMIT

NO. 387

ROCHESTER,

MINN.

-

I-I

-

--

-

-rI

E

-

I

'@

=

l=

tvt

| (.)

1tr

l!

'G)

t-

-{

t(D

o

tl

6'

lo

l^

.Tl

lo

z

!

ta

(^)

| (",

ro

Fold

International

Business Machines Corporation

General

Systems

Division

5775D Glenridge Drive N.E.

Atlanta,

Georgia

30301

(USA

Only)

IBM World Trade Corporation

821 United

Nations

Plaza, New York, New York 10017

(lnternational)

I

!

t-

r5'

Itr

'ut

tP

lgD

c)

IN

IJ

-l

| (tl

ro

lol

Fold

SC21 7507 5_IBM_System3_RPGII_Telecommunications_Programming Reference Manual_Sep76 5 IBM System3 RPGII Telecommunications Programming Manual Sep76

SC21-7507-5_IBM_System3_RPGII_Telecommunications_ProgrammingReferenceManual_Sep76 SC21-7507-5_IBM_System3_RPGII_Telecommunications_ProgrammingReferenceManual_Sep76

Navigation menu

Versions of this User Manual:

Views

Navigation