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
User Manual: SC21-7507-5_IBM_System3_RPGII_Telecommunications_ProgrammingReferenceManual_Sep76
Open the PDF directly: View PDF 
.
Page Count: 146
| Download | |
| Open PDF In Browser | View PDF |
aaaa
oaaa
aaaa
aaaa
aaaaaaaaaaaaaaaaaa
oaaaaaaaaaaoaaaaaa
aaaaaaaaaaaaaaaa..
aoaaaaaaaaaaaaaaaa
33::
::3t
aaao
aaaa
aaaa
aaaa
aaaaaaaaoaaaaaaaa.
aaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaa
oaaaaaaaaaaaaaaaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaaaaaaaaoaaaaaaa
oaaaaaaaaoaaaaaaaa
oaaaaaaaaaaaaaaa
oaaaoa
aaaaaa
aaaa
aaaa
IBMSystem./3
RPGll Telecommunications
Programming
ReferenceManual
ProgramNumbers:
aaaa
aaaaa
aaaaa
aaaaaaa
aaaaaa
aaaaaaaaa
oaaaaaa aaaaoaaaaaa
aaaaaaa
aaaaaaaaaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaaaaaaaaaa
aaaaaa
aaaaaaaaaaaa
aaaaaa
aaaaaaaaaa
aaaaa
aaaaaaaa
aaaa
aaaaaa
aaaa
aaaa
aaaaa
aacaaaa
aaoa
aaaaaaaa
aaaa
aaaaaaa
aaaoaaaaaaaoao
aaaaaaaaaaao
aaaaaaaaaaaa
aaaaaaaaaaaaaa
aaaa
aaaaaaa
aaaa
aaaaaaaa
oaaaoaa
aaaaa
aaaa
aaaa
aaao
aaaaa
aaaaa
aaaaaoa
aaaoaa
aoaaaaoaa
aaaaaao aaaaaaaaaaa
oaaaaaa
aaaaaaaaaa.
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaoa
aaaaaaaaaaaa
aaaaaa
oaaaaaoaaaaa
aaaaaa
aaaaaaaaaa
aaaaa
aaaaaaaa
aaaa
aaaaaa
5 7 0 1 - R G (1M o d e l1 0 C a r d S y s t e m )
5702-RG1(Model 10 Disk System)
5703-RG1(Model 6)
5704-RG1(Model 15)
5704-RG2(Model 15)
5705-RG1(Model'12)
aaaa
oaaa
aaaaaaaaa
oaaaaaaaa
aaaaaaoaa
aaaaaaaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aoaa
aaaaaaaaoaaaaaaaaa
aaaaaaaaaaaaaaaaaa
oaaaaaoaaaoaaaaaaa
aaaaaaaaaaaaaaaaaa
aaaa
aaaa
aaaa
aaaa
aaaa
aaaa
oaaa
aaaa
aaaa
oaaaaa aaaa aaaoaa
aaaaaa
aaaaao
oaaaaa
aaaaaa
oaaaaa
aaaaoa
aaaa
aaaa
aaaa
aaaa
aaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaaaa
aaaaaaaaaa
aaaaaaaaaaa
aaaaaaaaaaa
aaaaaaaaaaa
aaaaaaaaaaa
aaaaaaaoaaa
aaaaaaaaaa
aaoaaaaaaaoaaaaaaa
aaaaaaaaaaaaoaoaaa
aaaaaaaaaaaaaaaaaa
aoaaaaaaaaaaaaaaaa
aaaa
aaaa
aaaa
aaaa
sc21-7507-5
FileNo.53-30
ProgramProduct
Pageof SC21-7507-5
lssued30 June1978
By TNL: SN21-5624
Sixth Edition {December1975)
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
ProgramNumber
System/3Model
I
14
0
0
0
0
0
5701-RG1
5702-RG
I
5703-RG
I
5704-RGl
5704-RG2
s705-RCl
10 Card
8 and 10 Disk
4and6
1 5 A ,B , C
15D
t2
15
15
6
z
+
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 addressbelow. 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, addressyour comments
to IBM
c o r p o r a t i o n , P u b l i c a t i o n s ,D e p a r t m e n t 2 4 5 , R o c h e s t e r ,M i n n e s o t a
55901. crommenrs
become the property of IBM.
@opyright lnternational
Business
Machines
corporation1969,1970, r9j1, r9jz, l97J.rg75
P a g eo f S C 2 1- 7 5 0 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
Preface
This refcrencernanualis intendedprirnariiyfor the Systenr/3 I B M S Y S T E M 1 3 5 4 4 D
8 I S K S T O R A G ED R I V E
userwho haslittlc or no experience
with telecommunications
prograrrnring.
The IBM Systent/35448 Disk StorageDriveol Systenr/3
M o d c l s8 a n d l 0 u s e st h e s a m ep r o g r a mp r o d u c ts u p p o r t
This n'ranual
providesinforrlation a progralnlnernecdsto
as the IBM 5445 Disk Storage
. Flowevcr,a separatel
write System/3RPG ll telecommunications
programs.
system
control
prograln
feature
is requiredfor the 5448.
I t c o n t a i n sa :
I n g e n e r a rl ,e f - e r e n ctcos5 4 4 5i n t h i s n r a n u aal l s oa p p l y
to 5448. For specificinforrnationabout 5448 opt'rating
o D c t i n i t i o no f b a s i ct e l e c o r n n r u n i c a t i ot enrsn t s
clraracleristics
and prograrnrning
suppolt.,seeIRM
Systcmf
3
Disk
5448
Storage
Drivc
Progrant Re.larcttL.t'
. Statenlentof the telecotnnrunications
capabilitie
s of
-5
Manual,
I
GC2l
68.
Systcnr/3
o De:scription
of eachof thc RPG Telcconrrnunications
Specifications
requiredto write a telecomnrunicaticins
progranifor Systern/3
Samplcprogranlsarr:includcdin this ntanualto illustrate
progranrming
techniquesand possibleapplicationsfor
Systenr/3RPG II telecomrnunications
prograntrning.
System/3 Model 8
'Ihe
Systerr/l}Model 8 is supportedby System/3Model 10
Disk Sysicmcontrol prograrnming
and programproducts.
T h e l a c i l i t i e sd e s c r i b eidn t h i sp u b l i c a t i o nf o r t h e M o d e l t 0
arealsoapplicableto the Model8, althoughthe Model 8 is
n o t r e f ' e r e n c e dH.o w e v e rt,h e I n t e g r a t eC
d omnrunicltions
A d a p t e r( l C A ) i s a v a i l a b loen l y o n t h e M o d e l8 . I f y o u h a v e
the ICA, it is alwavsdesignated
as BSCAline 2. Tirerefore,
y o u r n u s te n t e rt h e B S C AO C L s t a t e m e n(t/ i B S C Al - l N E - 2 )
at executior.r
timc. It shouldbe noted that rrot all devices
and leatureswhich areavailableon the Model l0 are
availableon thc Model8. Therefore,Model8 usersshould
be tarriliar with the contentsof IBM S.ysteml3ll'lodel8
Intr a r tI o l 4 )
;"";;N';";l
Telecommunications Specifications (Figure 4, Part 2)
Colunut
Dest'riptiotr
l-11
S A L t s Si s t l r e B S ( 1 i l el i r i t h i s l ) f o g r a n ) .
l5t7
T l r i ss t a t i o ni s p a r to l a s w r t c l r cl dl c t w o r k
( S ) l r t dw i l l r c c c i v w
e i t l rc o t t v t ' r s l t i o n a l
r e p l y( l { ) . I r o l l i n gi s n o i u s c d s. o c o l u n t nl 7
isbhnk.
1 8 r. e .t 0 E t s C D I (cl o d c( E ) i s L r s e db .u t t h c t r a n s p a r e u c yl ' c a t u r e
i s r ) ( ) tu s r r d( N ) . A u t o r n s w e r
{ A } i s u s c thl 1 t l r cc l l l c t l\ l r l . t ( ) t 1 .
32.11
L x p l i i i t : l l r li rr r i i t l e i lI i I i r ' u it , r r ri c ( l u c | r e c \J I c
g i v e nl i r r e a c hs t a t i o r r .S t u t i o n l D s e n s u r e
d a t r s e c u r i t yo r r t l r c s r v i t c l i e dn e t w o r k .
5.1-54
T h e p e r u r a n e n tc f r o r i n d i c a t o l u s e di s 8 8 .
55-57
T h c t e l e c o n r r n u n i c a t i o nl isn c w i l l b c k c - p t
o p e n l b r 4 5 s c c o n d se v e n t l l o u g l l n o r n c s s a g e sa f c b e i n g s c n t ( ) r ' r ' c e e i v e dA. t t c L 4 5
s e c o n d sh a v c c l a p s c d .i l p 0 n l r a l l c nt c r r o r
c o n d r t i o nr e s u l t si f t h c l i r r es t i l l i s n o t b e i n g
usccl.
RPG TELECOMMUNICATIONS
SPECIFICATIONS
IBM
l
r
P
+
r
r
l
i
l
,@ld
/5
/li /l
/8 /1r 80
|,! ,
f;l^-l^L
l.,
,,,r.,,, Lll
il
Specif ications
Model 20
!
&
:
;
a
c
E
:
a
a
E
6
9
l
Reler to the specrl c Sy*3m
Llb'ary
d
s
!
ior actua
Reierene
entr e5.
-t54 55
lr
Figure 8. Receive Then Transmit Program (No Conversational Reply) (part I of 3)
man!al
q
F i l e D e s c r i p t i o n S p e c i fi c a t i o n s
36
:ls
l
n
56
57 5A 59
60 61
62 63
64
65
6
67 63
TelecornmtttnicationsSpecif ications (Figure g, part 2)
Coltrtrtrt
7-14
Dcscriptiort
GRADES and RESULTS arc the BSCA liles
foi this prograni.
I)
T h r ss t a t i o ni s p a r r o 1 ' as w i r c h c dr r c t l v o r .(kS ) .
I6
( ; t i r \ l ) E s i s u n i n p u t f ' i l ca r r dr i , i l l r c e r i v r .
t l u r a( R ) . I T E S U L T St s a n o u l p u l t ' t l ca n c l
r t r l ll r L1 1 1 1 1 1 5 1 (1Tr )i t. t r ' J
1 7
l ) o l l i n gi s n o t L r s c ds.o c o l r r n t nl 7 i s b l a n k .
I3-19
i:B('DIC code([:.)ancl lrc traltsl)lrcltcv
t L ' a t u r c( Y ) r L e l t o t h u s c d .
(l) is rrsed
I n t e r u r e d i a tbel o c kc h c c l <
5-l-5r+
-fhc
p c r n r u n c l tct f f o r i l i d i c a t o r . u s cids - 5 5 .
T I i c t c l c c o u i n i L u r i c a t i o rlri st r c w i l l b c I c ep t
o p e n 1 b r 7 0 s e c o n c les v er r t l r o u e l tn o l l l e s s a g c sa f c l t c i n q s c n t o r r e c c i v e d . A f t c r 7 0
s e c o n d sh a v c c l a p s c d .a p c n l a n e l t t c n o r
c o n d i t r o ur es r r l t si f l h c l i n e s t r l li s r r o t b e i n g
tuse'cl.
lnpttt Specifications (Figure 8, Part 2)
l(l
A t t t o a n s r v e(rA ) i s u s c d b 1 ' t l r c c a l l r : csl l a r i o n
-flre
L i r t a s0 l - 0 - l :
f i l s t r e c o l c lt e c e i v c t lc o n t u r r r st l i e n L r n r b c r
o f < p r c s t i o nos l t t l l e t e s t a n c lt l r c c o f r e c t a n s w c r st o t l r e
q u es t i o n s . T l r c s ea l t s . , v e -l rusr r n a r r a L r a 1 ,A. N S A I { R .
-ll-.17
[ : r I l i i 1 1 \ l : l Ii (r n i d e r tri I i e u tj t , r r: e r l r r e r ) c e
l rsr c
e r r t c l e d .S t a t i o r il L ) se n s u i cc l a t as e c u r i t v
, , t tl l r r 'r r ri l . l r . ' Jn t t r r t r kr .
L i t r c s0 4 - 0 - > . , , \ l l r e c o r d sl e c c i v e dr l t e r t l r c t i l s t l e c o r d
'l'hcse
e o n t u i | rs t U d e n t s ' a l l s w c tf o
s t l t c t c s tr l u e s t i o l r s .
A n s w ef s l o l n r t l t c u r r a v S ' f D A R I I .
t{l'(; ll lls( ,\
r7
RPG TELECOMMUNICATIONS
SPECIFICATIONS
_ ?Hiil'
""folal.'
".[8tFl+W
RPG
i
INPUTSPECIFICATIONS
,1'L,r
F i g u r e 8 . R e c e i v eT h e n T r a n s n . r i P
t r o g r a n i( N o C o n v e r s a t i o n a R
l eply) (Part 2 o1 3)
', @!l
5
lL
ll
/8
l9
nl
iilii:, lR[lrlrjoP]
Calculation Specification (Figure 8, Part 3)
Lines 0l-02: If a permanenterror occurs,LR is seton and
02 is setoff ro enterend-of-jobprocessing
immediately.
Lines 03-09: The arraycontainingthe correctanswers
( A N S A R R )r s c o m p a r e d
a n e l c n t e nat t a t i m e t o t h e a r r a y s
l b r m e db y s t u d e n t s ' a n s w e( rSsT D A R R ) .F r o n tt h e s e
comparisons
the nutnberof wronganswersto eacliquestiou
i s c o m p u t e da n de n t e r e di n t h e a r r a yR E S .
L i n e sI I - 1 8 : W h e nt h e c n t i r ei n p u l f i l e ( G R A D E S )h a sb e c n
r e c e i v eadn d t h e L R i n d i c a t o rs e to l t , R E Sr s t r a n s r r r l t t e d
f r o n rR I - S U L T Sb y e x c e p t i o no u t p u t ,o n ec l e n t e uat t a r i n t e .
u n l c s sa p e n n a n c net r r o ro c c u r s .
Output - Forntat Specification (Figure8, Part 3)
L i n e s0 1 - 0 4 ; R E S U L T Si s t r a n s n r i t t eadse x c e p r i o no u t p u r .
Lines 05-06: A pcrnranenterror caLlses
an error nlessage
to
bewritten.
RP(; II IIS('A l)rrsltnrrrrini:
IBM
()
| ', :
GUESTTON. J*
I
occuRRED
t g u r c8 . l R c e c i v e - l - h eI n
r a n s n r i lP r o g r a n (r N o ( o n v c r s a t i o n al l{ e p l y ) ( l , l r t - ] o l 3 )
)6
1t
tta
i\t
tt)
@rat 1,,;l;lt.,
lntrirlfi@ld
P a g eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
Transmit Interspersedwith Receive(systeml 3 to OS or
DOS Only)
A "transrnitinterspersed
with receive"programtransmits
data lrom one file and receives
datain another;the datain
the two files may or may not be related. I_hlikeconversational programs,a 'otransmit
interspersed
with receive"
programmay interspersedata severalrecordsor several
blocksat a time.
The receivefile must be definedas a Demandfile on the
RPG File DescriptionSpecification.The record available
indicatormust be definedon the RpG Telecomrnunication
Specification.This methodof transmission
can be used
only whenSystem/3is the remoteterminalthat initiated
the transmission.Whendata is transmittedfrom the con_
trol station,System/3suspends
its transmitfile to recerve
the incomingdata.
Programm i ng Con sideration s
Once System/3BSChasbegunto processthe last recorclin
the BSCAtransmitfile, System/3will ignorethe record
availableindicator,whetheror not the last recordhas
actuallybeentransmitted.WhenBSCacceptsfor trans_
missionthe last recordin the file, RpG II completesLR
processingand beginsto closethe file.
This rneansthat after RPG II passesthe last recordin the
transrnitfile to BSC,RPG II completesLast Record(LR)
processing
and beginsto closethe file. Consequently,
if
OS or DOS requeststo transmita response
to a recordor
block transmittedby System/3,the requestis ignoredif
it is a response
to the last recordor lastblock in the file.
If OS or DOS requestsa response
on the next-to-the-last
recordor block in the file, the requestis ignoreclonly if
the file hasalreadybeenclosed.
ln Figure!), a cardlile contairring
inlorntationabout a stud e n tt e s ti s r e a di n a n d t r a n s r n i t t etdo a n O S o r D O Sf o r
processing.Duringtransrrrission,
OS or DOS ntay itrte.rLupt
to sendback results.Wren rhis occurs,RPGwiil turn on
recordavailableindicator0,4. Thc input file is then read
and the incomingdatais printcd on the printer. Systern/3
then resumestransmission.
File Description Specificatirtns(Figure g, part | )
Column
Description
7-14
RESULTSand GRADESare BSCfiles.
15
RESULTSwill receivedata;therefore,it is
an input llle. GRADESwill be transrnitted
a n di s a n o u t p u tt i l e ^
16
To receivedatainterrnittently,a BSCfile
must be a dernandfile.
17
End-of-fileon RESULTSdoesnot determinc,
end-of-jobtirne.
19
BSCfilesalwayshavea fixed lengtliforrnat.
20-27
NeitherBSCfile is blocked.
40-46
BSCAis the rlevicefor BSCfiles.
The System/3programmercanavoidproblemsthis may
raisein a particularprogramby agreeing
with the OS or
DOS programmerupon a specialrecordto be adcledto the
end of the System/3transmitfile. This recordwoulclsignal
OS or DOS that System/3hasgoneto end-of-joband cannot honor a requestto receivefrom OS or DOS, eventhough
that requestmay havejust beentransmitted.
R P ( ; I I l l s ( A l ) r o : r L r r t t t t t i r t r, + l
R P G C O N T R O LC A R DA N D F I L ED E S C R I P T I OSNP E C I F I C A T I O N S
( , x 7 ) ! o 9 2 I L r MO f O .
i\
ltl
|
/8
lg
Bl
l,i,r:ll't,
iiB[ln]qtl
Control Card Soecifications
f
I
II
rl
i
F i l e D e s c r i p t i o n S p e c i fi c a t i o n
F i g u r e 9 . T r a n s m i t I n t e r s p e r s e dW i t h R e c e i v eP r o g r a m( N o C ' o n v e r s a t i o n a l R e p l y )( P a r t I o f 3 )
TelecommunicationsSpecifications (Figure g, part 2)
Column
7-t4
Desuiption
RESULTSand GRADES are rhe BSCA files
for this program.
l )
This stationis part of a switchednetwork(S).
It)
RESULTSis an input file and will receive
data(R). GRADESis an output file and
will be transmitted(T).
17
Pollingis not used,so column l7 is blank.
18.19
EBCDICcode(E) and the rransparency
feature(Y) areboth used.
20-3r
Autocallis used(E), and columns2l -3I
containthe dial numberof the remote
station.
32-41
Explicit stationidentificationsequences
are
given. StationlDs ensuredatasecurityon the
switchednetwork.
53-54
The pern.ranent
errorrndicatorusedis 44.
55-51
Thc telecornmunications
line will be kept
opent'or70 secondseventltoughno rnessages
arebeingsentor received.After 70
seconds
haveelapsed,
a permanenterror
c o n d i t i o nr e s u l t si f ' t h el i n e s t i l li s n o t b e i n g
used.
58-59
The recordavailable
indicatoris 0.1. lt is
seton when the remotestatiouis readyto
scnda recordto be receivedby RESULTS.
lnput Specifications (Figure 9, Part 2)
Lines 07-09: RESULTSreceives
recordsfrom the remote
station. Theserecordscontaina studentnumberand the
s t u d e n t ' s c o r e .S t u d e n ts c o r e a
s r ec a l c u l a t ebdy t h e r e n r o t e
stationfrom the datalransnrittedfrom GRADES.
R P ( ; I l I J S (A I ' r , ' r ' r ' ; r r r r r r r i -r {r Jr
IBM
frz
r l l ( I r ' )
A N 5 A RR
5]-}A RR
"
! 1 - \
t o t
t 6
a
(A
rY.
.
< ,r(
T RTII@J-
l t
r
,
R P G T ' [ L E C O M M U NI C A I I O N S jI ] P E CFi I C A T I O N S
IBI{
.
i\\
lT
:
l
1
i
l
l
i
l
i
l !
l
I
l
,
T RrT R(p,t-
t
l , . i
l
i
i
i
qrl'Iq
','L2K
I
A DES
I
l
i < , Q iF V
5lr
LYtS
ltl
L,:b
/!J
, L : 5 67 I
rE;Y
i
, , .r i
lr,' I
1Lto.1d,i6t,
ti]oto
;
L
t
,
L
t
r
i ' ] P G I i \ P I . J 1S P E C F
I IC,ATIOI\IS
IBM
@t{
I
I 5 T t T D E N TA A
acN
1
C q
5
I
ilB
zcT
QL
i
I D F ( r r J
T <
cc
63
5q ANSARR
3
11
5 s T UD T D
bO 5TDARR
3 C D
rcR
3
8
I iruic't.
-i -i
rp1*qYg5
LT
I r . r n . n r r ii n t e r r 1 , . i . e J\ \ i i l r I { r r r r r t l ) r
5 sTDNT
L6 ;CORE
iRTROI
i
C ; t l t ' t t l a t i o r 'ts l t e c i f i c a t t o n (sf - r g t r r e! ) , P a r t - l )
r l r r i l ( ' : ' ! i l l t \ \ l l \ i r r 1 L ' t r II \ \ ! i i 1 r r l i e t i r j i t i i t i ' ' ' '
'r'r'l' l
' i . . ' t r , . ; , . ' i l l i i L l l r ' : l ! " i ' r li ' r l i ! : S L i l S
, r l " t . lri . { , 1 : l r . r i r
t L i t l t ' t l rf \ r L ' l l i l r ) l lr ) u l l ) t l it , t l ' } l { l l \ l
l l t r r . j t r : 1 . . ' i l t . , t i i , . r r r i r l . l , , , . , 1 , . , t i i r l L I,liic i ) l . i s i i i l l l : \ ; , r l l . . l , r.
\'r\:\I
i . i t i : : i ; l - t , ' r . . L r ) t r [ ) ] r s , - ' t . r , : L t i ct dl L r t i i i ! r. l t ' i l t i l t l r t r e .t l t . i t i . ' .
bcl,Ie .'tttl',.rj
f f i l i ( ) t r ' \ 1 i l i r ( ) n: r i l t l I l l N c : i t i r r I { l : S L l . l S l n i l r c : r t r i t l t J i : ,
\ L ' i o r \ ' , ' l l c l rI l l - \ l ) 0 r r c l r n l l c l t i l l t c r i t i - o i - l i l c e o i t i l i t r i r t t .
i(\r}r.
L r r r i l 0 - l i s , et r r l l ; . r r r tll0 i : : ; f l i ) r l . r e c ( ) i L i s* i l i l r c l t u . r ' i r i c t l
, ;1
t i r l l t : S L l l . f S . r l , l v i i l l b e u v l r i l r i b l lco r t ' t i t : i . r i 1 . 1, r11 1 1 p 1, 1
P t t l N ' l ' . I o o p I c u t i i t . ' c r t l et t t l o r r c - o t t t i l l c l r t t rl l t t t f ( ) i 1 \
\ji()ll.c\!(]l)llilt0|0ll|i-()].l.llcitltsbutrllei1!i1!'(]{)liSI|()..l[l.tliFtlrttlatSt'iei:iitt.;lloll
l ) t r N I S . I i r c r . ' l o r t rl .i l t c r ( ) r i og l o i i P ( ) l r i c r ! r t l . l i l i t i r . ' c l
r c i l . ll ) \ t l r c i c c c r v i r i gs l i l i i ( ) 1 .t l r e r c c c r v i r r \, r: l | i { ) l t n r n s r \ r l
s ( )t i l i r l l i l f r l J X l g r ( ) l l I o i
t l r c c n t l ( ) r ' - j r l icn ( l i r ' i r l o r ' ( l 0 ) , ) l 1
I i t t r ' .r,' i - l ) h : ( ; l t \ L ) l . S i ' i i . t i ; r , l i1i l f i 1l ( i l l l r I c l i l . t d
\l'iilrilr
I u i r ) l( l \ n l i t i ' l l c r c l t i l .
L i t t c ' i i ) 7 - i - . r ; [ - t r L r PI i s c x L r c t t l e trl l t t t i t t gi L r t l r lt i i t t c . t l t l i t i s .
L l { i r t t l r c l t t r sr rc i ( ) l l . [ - o t r Pi l ) r r ) c j s s cr\ e e i r t r l :i t , r i { l . S i L - | S
i..';,tltlcrl.
R P G C A L C U L A T i CSNP E C I F I C A T I O N S
.,,","." s,..a(,..hrc,..;1.:
I8M
r
lFr.,.an.
:
r
|
'"
r'--^"
"...,,
",
"'
lc,"pr.
'I
i;
;M;
l;;
I
"*k'E]"
l
r
"*L*
f+
I
OUTPUT
Punch
nq
T b-r a^p n ! '
SPECIFICATIONS
-
.1:1'j'
o
s[p
F I l e n an r e
, * ,i i i t j i l l [ i l ; ,1
T;
F
.I;
D
t
5
1'
o ',
;;
'i;
;1"
l
o
o
o
o
o
t.'
o
!?
o
ll'
1+'
)l
o
Il*ll
iliii
i
l l i l l
rl,l.
Ii-Jri.-
)4
?l
l
i f ' l l , l , . - - r l l .
i i
itrilri
:L]
t
D
,[F]o[rl
,
0
Outl,ut Ind cato,\
i
tSz
l
i
I
FJH
T
r i
I
- 1 1
. t 5
tbA
. i : i l r i l r l i
r
i
i
i
l
l
l
,w
OC-CUIRRED',
. ,r,t{ ']ER]floR;
.
i
1.3 'sruDEilT #'
i l
A?
. lz5 ' SCO'QE = '
,zg
*i
i
f + r
.
'
lii
l
,
t
r
l
i . r
i
'
i
,
,
,
,
. . 1 , . - ,
i
t
l
I
I
,
r
I , t - r . r ,t r , I Il , I I I J I I l _ I ,
F i g u r e 9 . T r a n s m i t l n t e r s p e r s e dW i t h R e c e i v eP r o g r a n t( N o C o n v e r s a t i o n a R
l eply) (part 3 of 3)
i
t l ,
A p p e n d i xA . A S C l l a n d E B C D I CC o d e s
The codedcharactersetsfor ASCII and EBCDICare
shownbelow. Usethe setthat vour adapterand programmlng sy'stem
supports.
The datalink control characters
recognized
by System/3
a r el j s t e di n A p p e n d i xB .
ASCllCodes
M a i n S t o r a g eB i t P o s i t i o n sO , 1 , 2 , 3
Main Storage
Bit Positions
4,5,6.7
A S C I I a n d F . B C D I CC o d e s
11
i:3CDlCCodes
M a i n S t o r a g eB i t P o s i t i o n sO , 1 , 2 , 3
I
Appendix B. Data Linl( Control Characters
'['Irc
I o I I i I r , ' , i rcrIqr a t i c 1res l n d c ] r u l a c tre-s c c l I t c l t c cl tsr r .
r c c 0 q r r i z cbr lr S t s t c i t r r -lll S [ ' A . I , o r t i c t u i i c di l t l r r r r u u t r u t r
t r r rL ) r r t rlr- i n k ( o r l r o l ( l l a f . et c r s . s c c( i t ' t t t ' r u lI i l . l i ) n t M t i t ) t t
lJi t tury Si.tt tLl tro t rtt t r.\ Ct u t tt t tt rt ri t'al ir.rrrs.(i,\ 1,/--l(X1"1
N,tnte
I \ , 4 n e | n o nr c
S t ; r r to f H e i r r l i n q
SOH
S t a r r .o f T e t : I
-f
E r r t ro f
r . r n s n t t s s i o nB l o c k
STX
Enctof I ex r
E r t c to f T r . t r r s m r s s r < t n
Enqurry
N r : q a Ir v e l \ r : k n o w l e d q e
Synchronouslclle
Datr Lrnk !scape
I n t e r r n c r l i , . i t eB l o c k C l t a r a c t e r
E r r e nA c k r r l ' w l e d q e
O r l c . lA c k r t r , , r u l e r l q e
W r i l B e f o r r :T r l n s m i l
P o s .A c l <
M ; n < 1 a t o ry l i s c o n n e c t
F t ; v e rs e I n t e r r u p t
Tempor ary Text Del;ry
Transparent Start of TexI
T r a n s p a f e n t I n t e r r n e r lr at e B l o c k
TranspareniEnd of Texr
T r r n s p a r e n r E n c io f T r a n s . B l o c k
T r a r r s p a r e n iS y n c h r o n o u s l c l l e
T r a n s p a r e n rB l o c k C a n r : e l
TrarrsparcnT
l TD
Dat;r DLE irrTritnsparent N,4ocle
El'ts
ETX
EOT
ENO
NAI<
SYN
DLE
ITB
ACK O
ACK ]
WACI<
DrSC
RVI
T TI)
XSTX
XITts
X ETX
X ETts
XSYN
XFNO
XI TD
XDLE
ASCII
EBCDIC
sofl
STX
EI tJ
E X
EOT
ENO
NAK
SYN
DLE
US
DLEO
DLE 1
DLE;
DLE EOT
sct-]
DLE.STX ENO
STX
ETt]
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
DLE DLE
Ei\O
I ) r r l l rl . i r t k ( o t t I t o l ( l l i l r i r t l f r \
49
.50
Appendix C.
Pollingand addressing
areusedon multipoint,nonswitched
networks. Pollingis a requestto a tributary statlonto
transmitdatato the control station(central).Therefore,
pollingcharacters
identifyingyour stationmust be entered
on the RPG Telecommunications
SpecificationsSheetfor
the BSCA output (transmit)file.
Addressing
is a requestfrom centralto senddatato your
station. Therefore,the addressing
characters
must appear
on the RPG Telecommunications
SpecificationsSheetfor
the BSCAinput (receive)file.
Pollingand AddressingCharacters
for System/3
A p o l l i n gc h a r a c t ei rs c o n t p o s e o
d f t w o i d e n t i c aal l p h a b c t i c
characters;
an addressing
characteris contposeilrrf tlvo
identicalalphabeticor nunrericcharacters.pollingantl
a d d r e s s i ncgh a r a c tres m u s tb e u s e dt o g e t h c irn c e r t a i tpr a t r s .
Whena pollingcharacteris selectcd,the cornplententary
addressing
characterrnustbe used.when an addressing
characteris selected,the complententary
pollingcharacter
rl-lustbe used.
P o l l i n ga n d A d d r es s i n g( ' h a r r c t e r sl i r r S l ' s t c m / 3
5I
\ u i i r l p r , i i r i r l l l r ( l r ( L ( i r a ' \ \ iunigt r t l r c t u t ir, , r i r r r l i rI i i l l J l (
, l r t ! l, \ : i ( l l , , t r L l ei'. t i r,' - . 1 \ ' 0l ,r.tt ' l o ut l i r : r 1 . , .
A S C I IC O D E
EE|CDIC
CODE
Pollinq Character
I
I
ntl
--T
I
.t,l
l
Mt\4
ntnl
NN
X)\
+
I
I
---
xx
Appendix D.
RPGII
RPG ll Teleprocessing
Surrrrirary
Specifications
-IELECOMMUNICATIONS
S P E C FI I C A T I O N S
( ttltt;ttrt
S t r l t i t ' tt
I .t t t r _ t '
i ' . . t1t l u t t u I i r t t t
t-l
l'rt:.r
c
o I-(/9
I'lrranrrinhcr
Lute
0ll()-9e9
i irrt ttttrttbt'r
l o r i r tl t p t
I
I r i c nt i 1i c s i l l c l a a ( ) n l t ] u l l t c a t l ( ) lst p c c i l ' i c urto l
( ot11111g,11t
-
l +
ta
l ilcriuirrc
( ,,ttli-tll:tll,rtt
I t l c r t t i i i c si l . o l l l l l c r u l i l r r
\lpirurrrr-ric
l),,1 l'1.,,'1,
\ 1 .s
I (-.
'|
rpcol
I t {
\l llI tl)ll
l r
I) Pc
"l
e()ltltr)l
t\
[']frt't'le,rtit
N r i r r t co l ' I J S ( ; \ l i l c
l ) r r i l l i o l ) \ ) l l r t .t t ( ) l \ \ \ i l c i t c t l n e t r r r r r l ' .
r r t L r l t i p o r r r Ir e I \ \( ) r1 . .s r ri 1c l t c i l n e l r r o l I '
I r i . l l l s l l l (l )l r l r ' e e t \ c( \ \ i t l l ( ) l \ \ , l l l r ( ) i L l
f ( ) r l \ ' f l \ i t l i ( ) l i trrel | 1 11
|. biurri'
\. I
I r r l r L i l l t r\ \l l l l i ( r l rr") o l l - i i i i ) u l l l l \
\ S ( l l . ( l o r n t c r l ri t ' l c r r t t ll o a s I i S . \ ( l l ] .
I ,rt blrLttk
i,lJ(l)l(
I t i i l r \ i ) l [ c t ] f \ l c l t u r c r r s et l 0 t l t ( ) l u s et l
]')
I Irtlt:plttcttcl
\'. \
l0
S ur t e l r c r i
\ 1 .t . .s . \
S i t ' i t c l i c - d( ) r | ( r 1 . r ) L u l u i l l( ) r i t u l o l t r t s w c r ' ' e l r l l
lJ. Lrllrli
l ( ) c i r l i ( ) or l t l n r l r t r t r t t l t ei ti l L t r t o e u l I
\ i r i t t c rr e.
l ) i l r i r r r r n r h c rr r l o a r r t i L r rorl t l i l r l r t t t r n b t ' r
l1-j1
l ) r r ir r L r r n [ r c r
or lrllrtt1.
,lll)llitlllfll-
l l
[ - o e u t i o t tr r l
S.I . blrrnk
l . o c u t r o t it i l l l ) i l l l ) r L s c r l
. \ l p i r lnr r r ri e
l l ) r , r l o , l l r l r olrl r l l ) i t I l ) L r s c r l
\. [. irl.Lrrk
I o c u l i o r rt i l l l ) i 1 l l ) L r s e r l
, \ i pl t un r cr i e
l l ) o r l r r c u t r Lorlr lt [ ] r l l l ) L r s t t l
i t i c r t t iile l r rt o r r
l l i l ) \ l i tt i r ) t l
(
.l.l -.i
I t l c rtri l r e u rt L i n
tl]lsslitlt()ll
.+o
I o el r t i o n o l
rticntrliclLtiort
l e r ) l ( ) l us l l r t i ( ) r t
il--1
I r l en t i 1i eut i o r r
lcnl()t0:llrlr()ll
R P G| | T E L E C O M M U N I C A T I O NSSP E CFTt C A T t O N S( G o n t i n u e d )
Colunrn
tiubiect
Entry
Explanation
48-51
Remote
terrninal
Blank,
2170,211r,
2172,2113,
2114.2780
Columns48-5I areusedonly if rhe Model l0 Disk
S y s t e mM
, o d e l1 2 ,M o d e l1 5 ,o r M o d e l6 i s t o
c o m m u n i c a tw
e i t h a n l B M 2 7 1 0 o r I B M 2 7 8 0( s e e
AppendixE). Otherwise,columns48-5I arenever
usedwith System/3and must be blank.
)i
ITB
I, blank
Intermediate
block checkusedor not
53-54
Permanent
01-99,
Ll-L9, LR,
HI-H9
Signalof a permanenterror
CTIOT
indicator
55-57
Wail time
Numeric,
blank
Wait time specifiedor assumed
58-59
Record
available
indicator
0l -99,
LI.L9, LR,
Hi.H9
Indicatesthat the receivingstationis
readyto transmit
60
Last file
L
IdentiflesBSCAinput file to be processed
last
61-62
Polling
characters
Alphameric
Pollingidentification
63-64
Addrcssing
characters
Alpharneric
Addressing
identification
65-t0
Renrotedevice
Blank,1442-1,
1442-2,1443,
0545-30
, 545-4,
Colunrns65-10areusedonly lf the Model l0 Disk
S y s t e mM
, o d e l 12 , M o d e l 1 5 ,o r M o d e l6 i s t o
comnrunicate
with an IBM 2110 or IBM 2780 (see
AppendixE). Otherwise,columns65-70arenever
u s e dw i t h S y s t e m i 3a n dm u s tb e b l a n k .
))t?-t ltlt-.
1501-l )50)-r
5496-1, 5496-2
71-14
(Reserved)
75-80
Program
identification
Not used
Alphameric
Nameof program
F I L E D E S C R I P T I OSNP E C T F I C A T I O F
NO
S R B S C AF I L E S
Column
Stbiect
Entry
Explanation
7-14
File name
Alphameric
Nameof BSCAfile
15
File type
I, O, C
Input (receive).
output (transrnrr;,
combined(conversational);
C is invalidwith
anIBM 2ll0 or IBM 2780
16
File
designation
D
Demandfile lbr transmitinterspersed
with
receiveor for any other useof READ with
a BSCAfile
17
End of file
E, blank
End-of-fileusedto determineend-of-job
time
19
File format
F
Fixed length
20-23
Block length
Numeric
Block lengthof BSCAfile (sarreasrccorcl
lengthfor conversational
reply),seeApp e n d i xE f o r e n t r y w i t h I B M 2 7 7 0o r I B M
2180
?4-21
Record
length
Numeric
Lengthof BSCArecords:see
AppenclixE
f o r e n t r yw i t h I B M 2 l i O o r I B M 2 7 g 0
32
Additional
area
1 - 9 ,b l a n k
D u a lo r s i n g l eI / O a r e a : < i u af ol r n o n conversational
BSCAfilesonly
40-46
Device
BSCA
Devicefor all BSCA files
RI'(i ll'[elcproccssing SpcctliclrtiorsStttnttrarl
5-5
Appendix E.
R P GI I t e l c c o m m u n i c a t i opl lrso g r a n t n r i nsgu p p o r t st h e
I B M 1 7 7 0D a t aC o m m u n i c a r i oSny s r c nar n d r h e I B M
1780 DataTransnrissior.r
Terminalasrernotetcrminalsfor
t h e S y s t r : n r /M
3 o d e l l 0 D i s kS y s t e r nM
, o d e ll l , M o d e l1 5 .
r n d M o d e l6 . T h i s a p p e n d r cx o n t a i n sa d e s c r i p t i oonf t h e R p G
ll specil-lcations
recluired
to uscthe IBM 2770 and the IBM
1780. a rliscussion
of specificSystenr/3considerarlons
which apply when usingthesedevices.and one sanrplc
RPG II programfor cachdevice.
Nols. Beforeattelnptillg to write your own RPG II prograr"ns
for rrsingthe IBM 1770 or the IBM 2780,you should
readIlllV SlfsrcrrsRcJercnccLibrar.t, 51'stemComponents:
IBllt 27'70Data Comnluttic:atiott51,stem,
GAlT--l0l 3: IBhI
Sl,slcrisReJeranc'c
Librar.t, IRM 2770 Sr'.r1(,/r?
Swnntary.
GA27"3014;and/orIBM St,stents
Re.fbrertce
Librury IIIM
2780 Data Trunsmissk.ttr
Tenninal Cotttponutt Dcsc:riprir.rrt,
GA27--1005.
Usingthe IBM 2770 and the IBM 27BO
W h e r rt n r n s n r i t t i n gt o a n I B M 1 7 8 0 , n o n t o r e t h a n n v o
r c c o r d sa r c b k r c k c d i 1 ' t h e r . a t i oo f b l o c k l e n g t h ( c o l u n r n s
3 0 - 2 3 ) t r r e c o r d l c n g t h ( c o l u r l n s ) 1 ) 1 \ i s l e s st h c n l . I t '
t h c r a t i o i s g r e u t c rt l r a n l . l t o n t o r e t h a n 7 r c c o r d sw i l l b c
blockecl.
T h e I B M 1 7 7 0 i n s e r t sa r c c o r d s c p a f a t o r( R S ) c h a r a c t e rb c t w e e n b l o c k e d r e c o r d s .b u t d o e sn o t p e r l b r n t i n t c L n t e d i a t e
biock cliecking. If you specilylTll lbr the tBM )770 in
t f a n s p a r 0 n tn t o d e . S y s t c r n / - i3s s u e sa d i a g n o s t i c .O t h e r w i s c .
t h e s p e c i f i c a t i o rirs i g n o r e d l i r r t h e I B M 1 7 7 0 . I n t e t . n r e d i u t c
b l o c k c h l c k i n g i s a l r v a y sa s s u m c dl b r t h c I B M 1 7 8 0 .
F o l r e c o r d l e n g t h ss u p p o r t e db y t l r e r c n r o t e c l e v r c c1s , o u
a r c u s i n g ,s c ' et l t e a p p r o p r i a t eS y s t e n r sR c f e r en c c L i b r a r _ v
manual.
I 1 ' a r e c o l d r c c e i v c db y S y s t c n t / - li s s h o r t e r t l i a n t h e r - e . c o r d
l c n g t h s p c c i f i c di n c o l u n r n s1 4 - 1 7 . b l a n k s a r e a c l d e dt o t h c
r i g h t . l 1 ' a r c c o r c lr e c e i v c db y S y s t c n r / 3i s l o n g e r t h l n t h c
r c c r r r dl en g t h s p c c i fi e d i r r c o l u n r r . r)sl ) 7 , t h e r e c o r d i s
t n l n c a t e do n t h e r i s h t .
R P GI I S P E C I F I C A T I O N S
Useof the IBM 2770 DataCortrrnunication
Systerrr
and thc
IBM 271i0DataTransntission
TernrinalaffectsRPC file
d e s c r i p t i osnp e c i l i c a t i o nR
s .P Gl i n e c o u n t e rs p e c i f i c a t i o n s .
Columns 33-34 (Overf low lndicator)
RPGteleconununications
specilications,
and RPG outputl i r r n r a ts p e c i f i c a t i o n O
s .n l y t h e e n t r i e sL r n i q u teo t h e I B M
A n o v c r l . o w i n d i c a t o r r l l y b e s l t c c i l ' i e dl i r r I B I \ 41 7 7 0 l r r d
2 l l 0 n r I B M 2 7 8 0a r c d e s c r i b ehde r c .
I B M l 7 8 i l p r i r r t c Lt ) l c s .
RPG File DescriptionSpecifications
Columns 4O46 (Device)
F o r e a c hI B M 2 7 7 0o r I B M 2 7 8 0d e v i c cs p e c i t i e o
dn r l i c
RPGJ'elecomrnunications
Specifications
slleet(sccRp(i
Tel et:o rrt trttttticot k t rts Spcci.ficat i o tts), a ultiquc l'ile rnust bc
definedon the RPG File DescriptionSpccificalior.rs
shect.
61 ' t h c R l ) ( i l : i l e '
T h c d e v i i : cs p e c i t i c di n c o l u n r n s: 1 0 - . 1 o
Dc-scription
S p c - c i cf a t i o n s l l ee t i s a l r v a y sB S C A i i t r c l c l r
IBI\,1l77il and IBI\,11780 lile. The uurxinrunt nuntbcl o1'
l l l e ' sa l l o r v c dw i t h i n a p r o g r i l l l tu s i n gB S C A I ' i l e si s l l .
Columns20-27 (Block Length antl Record Lengt:t1
T h e S y s t e r n / [. r3l o c kl c n g t l t( c o l u n t n s] 0 l l ) a n c lr c c o r d
l e n g t h( c o l u r r t n2s4 - 2 7 )d e t e r r l i r r tch e r c r n o t cb u l - l ' esri z e .
F o r t l r eI B M 1 7 8 0 ,b u f l e rs i z ei s a l w a y s4 0 0 . l b r t l r eI B M
1770, tile lrul-l-er
sizeis asfttllows:
S y s t e r n / 3B l o c k S i z e
<'28
> 128
Other Entries
A l l o t h er v a l i d t l l e d e s c r i p t i o t rs p e c i l - i c a t i o nasr c a c c e p t c d
i n a B S C p r o g r a n ru s i n g t h c l l l M 1 7 7 0 o r l t s M 1 7 8 0 .
Remote Buffer Size
128
255
Tclecontnrunicttio
I {nPs( ;I t s u p p o r tt l r e nb l o c k sa l l r . c c o r . d s
t o e n s u r lt h l t t h c r e l n o t eb u l - l ' csri z cr sn e v c rc x c e c c l c d .
I r i r r rl h t l l l \ l 1 7 7 0 u r t r l l t c I l i \ l l 7 l i 1 )
.57
RPG Line CounterSpecifications
Columns 65-70 (Remote Device)
A line courltcrspecil-ication
shouldbe givenl'or cvcry IBM
1 7 7 0a n d c v e r r lvB N ,ll7 E 0 p r i n t e rf l l e . I 1 ' al i n e c o u n t e r
s p c c i f i c a t i oins n o 1g i v c n .t h e o v e r f l o wl i n ei s s e ta t 6 0 a n c i
t h c f o r n t l c r r g l hi s s c ta t ( 1 6 .A w a r n i n gi s i s s L r cadt c o l n p i l a t i o nt i r n cf o r e a c hI B M 2 l l 0 t t rI B M 1 7 8 0p r i n t e rf i l e
l r c k i n ga l i n ec o u n t c rs p e c i f i c a t i o n .
llnt.t'
RcntoteTcnninal
RernotcDevice
144l-l
IBM 2780
I B M 1 4 4 2C a r cR
l ead/
I h n c h ( c a r dr c a d )
1142-2
IBM 2790
I B M l 4 4 l C a r dR e a d /
(cardpunch)
PLrnch
R P GT e l e c o m m u n i c a t i oSnpse c i fc a t i o n r
144,1
IBM 27g0
I B M 1 4 4 3p i i n t e r
I B M 1 7 7 0f i l e sa n d I B M 2 7 8 0f i l e sr e q r r i r e
r ' , v oa d d i t i o n a l
e n t r . i cosr r t h c R P GT c l e c o n r n t u n i c a t i oSnpsc c i f i c a t i o n s
s h e e t I: l c r r r o t cT c r n t i n aal n d R c r n o t eD c v i c e "
0545_-l
IBM 2i'70
I B M 0 5 4 5 C a r dp u n c h .
M o d e l3
0545-4
IBM 1770
I B M 0 5 4 5 C a r dp u n c h .
Model4
lll3-l
lBM1770
IBM22l3Printer.
Model I
:ll-3-l
IBM2770
I B Ml 2 l 3 P r i n t e r .
M o d e ll
l50l-l
I t s M1 7 7 0
I B M 2 5 0 1C a r cR
l eader.
M o d e lI
T h er e n t o t ct c r r n i n ai sl l n I B M 2 7 7 0 ,o L r t y t u t
c h r r t t r ell.
l50l-2
IBM 2170
I B M 1 5 0 2C a r dR e a d e r .
M o d e l2
T h er e n r o l er c r n t i n ai sl l n I B M 1 7 7 0 .o u r p u t
c h a r r n el .l
5496-l
IBM 1770
I B M - 5 4 9 6D a t aR c c o r d c r( c a r dr c a d )
T h c r e n t o t ct c i n t i n l l i s a n I I I M 1 7 7 0 .o u t p u t
c h a n n e3l .
5 4 9 6I
IBM 1770
I B M 5 , 1 9 6D a t aR e c o r d e r('c a r dp u n c h )
Columns48-51 (Remote Terminal)
Ljttr.\'
Iirpluttattrttt
)170
T h er e r t t o t lcc r n r i n ai ls a n t B M ) 7 1 0 . l l
S 1 , sn
t et / - 3i s t r a n s n r i l t i n gt h, e o u t p u t c h a n n e l
o n t h e I B M 1 7 7 0i s .b y d e f a u l to. u t p u tc h a n nel1.
)711
)71:
2113
:111
l7E0
l ' h e r . e n r o ttee r n r i n ails a n I B M 1 7 7 0 ,o u t p r r t
c h r t n r r c4l. ( O u t p u tc h a n n e4l i s a n o P t i o n a l
channel:i1
i t -i s I t o t a v a i l l b l ea r t di s s p c c i l i c d .
a p e r l l l a l l c nctr r o t t l c c t t r s . )
Tl'Le
I . e t t t o ttec r n r i n ails a n I I I M 1 7 8 0 .
, \ i , , 1 c .Y o u c u n n o 1s P e c i l _bvo t l t t h e I B M 1 7 7 0 l n d t h c
I B l l l 1 7 8 0 i n t h c s a r n cp r o g r a n t .
l J c i ' o r tcr a n s r n i t t i ndgu t af r o n t S y s t c n r / .t1h.e S y s t e r n / p
3r o g r r u m r em
r u s td c t c r r n i n w
e h i c l io u t p u tc h a n n e las n d / o rc l e v i c e sa r er e c e s s a rtyo h i s p r o g r a ma, n d e n s u r et h a t t h e y w i l l
b e a v a i l a b lw
c l t e nr e q r r i r e dD
. c v i c es e l e c t i o o
n c c u r se a c h
l i n r ea d i f f ' e r c nfti l e i s s c l c c t e d .
Related R PG Telecommunications Specifications
A d c s i g n a t i o no l t r r u l t i p o i n t( M i n c o l u r n n l 5 ) a n d a s s o c i a t e d
e n l r i e s( T i n c o l u r n n 1 7 . a d d r e s s i n ga n d p o l l i n g c h a r a c t c r si n
'felecornnrunicatictns
c o l u n r n st r I - 6 4 ) a r e i n v a l i d
Specilicat t o r t se n t r i e si n I p l o g r a n ru s i n g t h c I B M 1 7 7 0 o r I B M 1 7 8 0 .
Sy'stu
e r / 3 c a n n o t t ' u i t c t i o na s t h e c o n t r o l s t a t i o n i n a r n u l t i point nclrvork.
A l l o t I i e r l - c l e c o r nrr . r u n i c a t i o nSsp e c i f i c a t i o n se nt r i c s a r e
v a l i d i n a p r o g r a r i ru s r n gt h c I B M 1 7 7 0 o r r h e I I I M l 7 l l 0 .
R PG Crutput-Format Specifications
o lRll Jlsroris
S p a c e, r n ds k i p e n l L i c sa r e r e s t r i c t e db y t h c l I l M 1 7 7 0 a n d
I B M 1 7 8 0a s f o l l o w s :
and/or
r
A n e l t t r y o f ' 0 o r b l a n k i s n o t s L l p p o r t e di n c o l u n t n l g
( S p a c cA f t c r ) : d e f a u l t i s t o s p a c eI a l ' t e r , .
o T h e s k i p c r r t r yi s l i n i i t c d I o a m a x i r n u r tor l - l 1 l l i r r t h c
I B N I Il l l 3 P r i n r c r . M o d c l I ( s e cv o t r r s y s t c m l t p G I l
r e l c r e n c en t a n u a l t o e n t c r 1 0 0 - I I l ) .
.
T a p e c a r r i a g ec h a n n e lc o n t r o l i s n o t s u p p o r t e c (l c o n l i n c
p u r r . ' l . r ct so c h a n n e l l ) .
o R e p e a t e dI P t i r r r t r sp o s i l i o n i n gc t n n o t b c u s e d o n 1 h e
l B N l 1 7 7 0 a n d l B N , lt 7 8 0 .
R eIate cl Con si dera ti o n s
o T I r c I B N { 1 4 4 3 P r i n t er s p a c e so n c e e l c h t i n t e i r i s s c l _
c c t c d l i r r t h e l B N , l1 7 8 0 .
o A r c s c a p ec h a r a c l e (f X ' 1 7 ' ) n l u s t l t o t b c t h e l ) r s tb y t c
s c l l l t o t l r c I B M J 7 8 0 p r i n t e r i f 1 , o ua r c t r a n s n t i t i i n gi n
t r a l t s p a r c l l tn t o d c .
o
E a c l Lp r i n t e Lf o L t h e .I B M 1 7 7 0 a n d I B M l 7 g 0 r t . s c t st h c
i n t e l n a l l i n c .c o L r r r t o I i f t h e p r i n t f i l c i s r c r - r p e n eadt ' t c r
a I r r L n c hl i l c h a s b e e n t r a n s n r i t t c dt o a n l l l N { ) 7 1 0 o r
tBM 1780.
c
T h e c n c l - o l - f i l cc a r d t r a r r s r n i t t c db 1 ,t h c 5 4 9 ( r D a t u R e c o r r l c r t } o n r t h e I B N , I1 7 7 0 i s r e c e i v c db y S l . s t e r n / 3a s
data,
Rt'.larurta Librury
Sutrtntor-t'.
GAlT--10 | 4.
lBll 2770 Svstcm
o Ill,M Slslon.i Rc.lcrort'c Libran, IBM 2780 Data Tronsntissiotr T'crnirtal Cont;tonatt Dcsc.ription, G.427-3005
-l'he
Svstcnrl3 progral.nlnerntusl also consider:
o Transnrit r",i1liconveLsationalreply and receivewith cot-rv e r s a t i o n a rl e p l y a r c n o t s u p p o r l e dw i t h t h c I B M 2 7 7 0
o r t l i e I B I M1 7 8 0 .
o T r a n s n r i ti n t c ' r s p e r s cw
d i l h r e c c i v ci s n o t s u p p o r t e dw i t h
thc fBM )770 or the IBM 1780.
o 1 1 - S y s t e n-rl il n s w e r s a n I B M ) l l O r t r a n I B M 1 7 8 0 i n a
s w i t c h e dn e t w o r k , t h e I ' i r s tt l l e r c f c r e n c e cbl y S y s t e r n / 3
c a n n o t b c a t r a n s n r i tf l l e . U s c a d u m m y r e c e i v cf i l c t o
a c c o n m r o d a l ey o u r p a r t i c u l a fn e e d si f S y s t e n i / 3c a l l t o t
a l w a y sb e p r o g r a r n m e dt o c a l l .
o W i t h o u t t h c a u t o - t u r n a r o u n df e a t u r c ,t h e I B M 2 7 8 0
u s u a l l yc a n u o t t r i t n s r n i tt o S y s t c n t / 3a n d t h e n . i r n n r e d i a t e l y a I ' t e rt h e d a t a h a s b e e n t r t n s n ' r i t t e d r. c c e i v ef r o n t
S y s t e n r / 3 .T h e I B M 1 7 8 0 o p c r a t o r c a n n o t , i n n r o s t c a s c s ,
rcady devicesto receivein the short tinte required by
Systern/-jto tunt the linc around from receivc to transn r i t . I n t h e a b s e n c co 1 - a u t o - t u r n a r o u n dp,r o g r a n tS y s t e n r / 3 t o t r a n s u r i ta n d t h e n r e c c i v c .
o S p a c i n ga r r ds k i p p i n gi n t r a n s p a l c n tr n o d e u s u a l l y r c q u i r es
n r o r e t r a n s u t i s s i o nt i r n e i l ' a t r I B M 2 l l 0 u a n t B M 1 7 8 0
i s t h c r c - n t o t et e r n l i n a l :
IBM 1770
o S y s l c r l / 3 c a n u o t p l i r r t t h e e n d - o l ' - n t c d icah a r a c r e rr r a n s _
n t i t l r : d b y t h e I B M 1 7 8 0 . T r a n s l a r et h i s c l t a r a c r c rt r . r
a v o i d a n u n p r i l t a b l e - c h a r a c t ehr a l t o n S i r s t e m / 3 .
T o s p a c co r s k i p r n o r e t l r a t ro n e l i n e r e ( l u l r e sa l ) c s c a p cs e q u e t r c e
( c o r n n r a n dt c r
p r i n t c r ) t o b c t r a n s n t i t t c di n n o i l t r a l l s _
p a r e n l l n o c l c( e x e c u t e db y R P G I I ) . T h i s
e n t a i l sl i n c t u r r r a r o u n d t i n r c a n d e x t r a
t r a n s m i s s i o nt i n r e .
S Y S T E M / 3 C O N S ID E R A T I O N S
IBM 1780
T h e S l r t t e n t / -R
3 P G I I p r o g r a l n n t c ru t u s t c o l t s t a n t l Vb e
a w l r . eo f t h c l i r n i t s i n t p o s e db i ' t h e I B M 1 7 7 0 a n d t h e I B M
1 7 8 0 w h e n t l ' r e ya r e u s e da s r e l l o t e l c r n t i n a l s . F o r t h a t
r c a s o n .a t l r o r o t r g l r e a d i n go l t h c f b l l o w i n g n r a n u a l si s i u i _
p e r at l v o :
Tci spaceor skip nrttre than three lincs
r e q u l r es a l t e s c a p es e q u e n c c( c n m n t a n d t c r
p r i n t e r ) t o b e t r a n s r n i t t e di n n o n t r a n s p a r e n t n l o d c ( e x e c u r c db y R P G l l ) . T h i s
c n t a i l sl i n c t u r r r a r o u n d t i n r e a n d e x t r a
transrnission
tinrc.
o IIltll Slslr,nrs Rc.fcrotc't' Lihrar-t' .!rrsrelr Cotrrytotrt,nts;
IBXI 2770 Data Comnrunit'atictrtSl,srcnr,GAlT--3013.
I s i n gt l r e I l ] \ l l 7 7 O r r n t l l r r l l t \ l l 7 E 0
.59
EXAMPLES
Transnriiting to the lB0-42778 Data Communication System
Ihe followingtwo IiPG II progranrs
providecxrnrplcscl'
l l r e S y s t e r n /M
3 o d e l l 0 D i s kS y s t e . norr M o d c l l l t i s i n si h c
i B M 1 7 7 0a n dt h e I B M 1 7 8 0a sr e n t o r er en n i n ; r l s T
. i r ei l r s t
pl'ogram
t r a n s t n i tds a t af r o n rS y s t e n l / 3t r t r r i I B I Vl 7 7 i ) : r l r c
s c c o n dc o n t r o l st l t e t r a n s n t i s s i oonf d a l a i h r r nl n I B M 1 7 . r 0
to Systenr/-3.
S ) , s t c n rj , ll c l t i s l i i e l n p i r l i i l c . ( ' A l t D l N , I ' r o r nN 4l - ' ( ' LIJ
'tiris
( [ ] i g u r cl 0 ) .
d u l u i o l r n s l l l f r ) u t p u tf i l e . P t j - t O N L Y .
l l i a l i s l l u n s n r i t t c dL. r s i n e
t l r c I I S C A .t o a t r l l l M 1 7 7 0 .
I n i r t s n r i s s i oiisl i t r n t i r r l i . t i l s i t t r r c nr rt r t l d c .
] ' l r c i t l i \ { l T l J i r r i n t sI ' i i i O N l - Y o n a n I t s M l l l S P i i n t c r ' .
l " ' i o , - i tll. t r ) L . i T { l \ t . \ 'i s | 1 1 1 1 1 gl v. 1
itit I hcrding condilionr-d
o r i i l i c o . . ' c r l i o rl ri n c .
R P G C O N T R O L C A R D A N D F I L E D E S C R I P T I O NS P F C I F i C A T I O N S
IBM
llt'''''
L::1 1t':
lllll, '
Ll rl
:
l
i
l
:
4
i
l, ;
.
,
irlnlztrlilOt
C ( ' n t r o lC a r d S r e c l { i c a t i o n s
F i l e D e s c r i p t i o n S o e c i fi c a t i o n
-rr l r.- !
i
]
!.-fi
l*
tI
rY
IPU.ToNLY
i:
I
r.(l4
e6l
LJII
?"61
LJAI
t i
RPG
$-.
i
r
,
--.r-!:i-.r-
|'
Ii brl
,
i
-rr-,-:-:--:-:!-.-
i"lF;Ur
i i
:i,escn
i
,
i i l
E X T E N S I O NA N D L I T { 5 C O I . J i \ I T ES
RP E C I F I C A T I O I \ S
IBM
I
I
L . i r q C i ) r r r l e r S i x r c i fi c : r t l o r r : ;
_i_,r'i_,_ ___r_l ; |
i i
t t
,
i
i
i
,
:
r
l
,
,
:
.
i
i
l
i
t-- i r..;,;,---,.ri
i
l
i
i
i
l
i
r
l
i i r g u r c 1 ( 1 .T r a n s m i t t i n gt o t h c l l ] t r I l l T i ) I ) l r t l ( o n r r t r i n r t r : i r n S ' , : r . l l , t I , r l : i l r l )
()0
,l
t
i
l
l
r
l
i
i
l
i
r_f__,r
l t
i
i
i
i
l
i
+
l
i
i
l
,
i
l
i
t- i--'
]--J--L--l ]
i--,
i
r
l
l
j
i
i
l
.
r
i
l
i
i
l
RPG TELECOMMUNICATIONS
SPECIFICATIONS
iiiiii'i
\'|_]!;
ilil1
U.TO,NLY
z1t,1p
RPG
','.,..,...
INPUTSPECIFICATIONS
I
:r
dqi
it
/{j / /
/a
t!
llr)
l 'r:':,,,
ii-;qraiilbl
I
I
'
r
L1;---;'[innrnr t i
inr!, br'
I
'
l
i
l
i r
' i f l . ' i
i ' l l -- '- - -t-l-*
I a-ri i I l'l i ]'1"1','f
1t
tr rlioa-rn
tlrl
lilli
I
ilt
i i i i ,i, I' i. i i l i , ; I l ' l l li i, ii l i l i i l i l l ii l l l
RPG
OUTPUT
SPECIFICATIONS
IBM
Io
1,, t6 tl
l
---t
iir
i-'l:l'
l
I
i
i+
' '' @5)'
i
l,,llll,
tB rJ BQ
trdallrb-l
.r -ii
r"l
I
ttoNll lr
lii,i
ql
linl
-iEA}ING'
lr
I
I
I
i g L r r t 'I 0 . l r r n s n r i t t i n s
(illrt I ol'l)
I s i n r t i r eI I J \ l ] 7 7 0 r r r ( ll l t e l l J \ l l 7 i i 0
6l
R e c e i v i n gf r o m a n I B M 2 7 8 0 D a t a T r a n s m i s s r o nT e r m i n a l
, \ ; i l l l N l . l - r , 0 r - ' r i L li i, r, i n i ) r l 1i i i c . ( , i . 1 ' O t ' i i ' r ' . ,r ' r , , l U \ {
l 4 - l l L l r . t l { e ; i t lP r r r r c (hl ' i g u r c l l ) . 5 , " - , ; r r i.r:.li r i r r ; :r :. : ,
t i . t co p c I u i i o i i h , t 't i i ' r l r r - i i t e l [ ] M l 7 E ( j : r i r , : r , . ' { 1 i l r . . \ l lii(l ,J
r d i c l Y uu s l u qi r i ! ' l J S ( ' A . i i r t - l i J \ l . l i r r { l t i t r , r i l J l l r r l l r l r
( ; l : l ( J \ l Y r o S v s l c i t i- i i r r r i L r n t L ; i n s p l t c i t r : l o L l r .
L ) l r t rt.el c c i v c dl r Y S v s t e n r , ' ,f1r . o r r lri r u I U i \ l l r 5 ( l ! r r r l s i i r e
o u t l ) L r ti i l e P l { l N f . S y s t e n t-ii i r r i r i i .l,l r i s f i i . : .s p l l ! i i 1 {( ) i l i c
a l l c r e a c l lr c o o l t 1 .
R P G C O N T R O L C A R D A N D F I L E D E S C R I P T I O I 5\ JP i : C I F I C A T | C I i I i
IBM
|'
[,,,,,,
F . ,
I
'
i
l
t
15t
:
RvLf,916
F r l e D e s c r r p t i o r rS p e c r fi c a t i o n
' :,,
i
,
.
I
l
,
:
l
,]-,i_-
.-r
tr _ *__-+_j_! ];i_._. F F E T o N L"-t,-.i
r lyp i gi F
i t Bbt zeil ,li I
l l B s-rc
"'i"'llllri ii^
ii'i
I
t
i
I
l
i
RPG TELECOMMUNICATIONS
SPECIFICATIONS
t :
i'"""1
,)
tt
t:
tr
,
l
, , 'i
t)
l,tl
'..bi?1,,,i;rtlitt,
givLzirlelor
llfilr
I
liiiiii
ihui'1
ll i
iiilili
i g L r L . I' i .
l { c eei v r n g l r r
RPG
INPUTSPECIFICATIONS
t.l
SPECIFICATIONS
igurcIl
l { c c c i v i n g l l o n r u n I l l1N7l 8 0 D a t a T l r n s ; t r i > s i o n I c u n r(nt 'uul t I o t l )
U s i n s1 h eI I I N I1 7 7 0 u n d t l t e l l l N I l T l J ( )
63
64
Appendix F' Communicatingwith the OperatingSystemTelecommunications
AccessMethod (TCAM)
S v s t c l r i , ir.'ll l l b e l l a r t o l ' l i e l c c o r n l t u r r i e l l i o nnsc l w o r k r l t t t
i r c i u t i t , r t; h e O p c r a t i n gS y s te r n ' l ' e l c c o n r r r r u n l cl ao tl l s A c c e s s
\ l c i h t r r .(l I C A f u l) . ( f : o r i r il i i L r r i l t i o n r e g a r . c l i rTr gC A l \ , 1s, c . r
'.i60
lBtll ,\,,,'.;tt,rrt
OTtcruri,g,!-r'rrt,i,lclet..ti,ttuttiL..uit),s
:1ict's:;1IatItoi I7'(.'.,1I[)('{|t!('(pIsutrtl !itt,iIirtt,.s.CC-]0_]011,
l r r s t c l d o I u s i n go l ] c c r ) n t b i l t c (t.'1i i e l i t r l f a i t s i n i l t i r r gl r r r crl c c c i v i n s d i i t l i . t h c R P ( ; l l t c c l l n i ( l u el ' t ' q u i f e .tsw o f l l c s . a c j e '
r n a t t cl l l c l i t r i r i p u t l l o r u t h c B S ( A , r n d u t r o l l r c rf i l e i ' o r . o u t "
put to thc iiSCA.
: | t t l l i J . l l ^ \ ' r ' i / r , 1- i 6
l l t O 1 ; t r u t i t i. .\ r' i1. s 1 r , t iril't!, r , , t t i r i l t t t r i ( . L t ! i t . )ftl L
r cs l b l l o w i n g t r v o s u n r p l ei l r o g , r i l l l st r - s t 'h e t l l r G l l t c e l r . ! 1 ' (( ' r . !, l l L t t ' r , t tl l' l ' ( ' . l l l l ' !, t . q t . t y t ! 2 t t ,O
t .t:t;i L l t , u t t t l l t , .tl, r t , r t r . , L , r i c 1 L rtct r a p p r o r i r n a t ec o l t v c r s a t i o n t r ir r o d c . S l , s l c n r i - ir s
. \ ! u t r t t i. t(,;)( ' l ( l - 1 0 : + )
t h e p r i n r u r y s l t t i o n i r r t l r c l i r s 1s a n r p i cI r f o r l r x n l( S y s l er n i , i
t n t l i n t e st l a n s n ' r i s s i otno T C ' A M ) ; S y s t c r t r l -i3s l h c r r ' i r r o t t t
S v s t c r r r l 'e
- io r n t r r r L n i c a l revsi t l l ' l [ 4 . \ ' li i l l l r c s u n r cr i r , \ i i
s t J t i o n i n t l r u s c c o n c sl a r u p l ep f o g l a u l ( T ( A I , l i n i i r l t e s l i l i n : eo r r r r n r . r . r i c l i tr ei ' 'i s1 i il r r r r r t h cS
i t ,s t er n i- l c x c c p l i l r l t i t c l n n o l
irissiotr to Srr.'stern/.3
).
c x r i l t n i l r t u o n v c t s l l r o r r l trli i i : s s a g cr st i t h - l ' C A j \ ,.! 1 - l r cS v , s t c r n , / J
l - 1 f ( ) l l f i l i l ) l r1rlrca1l ' o r r i t ' l l p p t r ) \ i 1 t t t\ r( ', l l \ L . l ) l l l r ) l t 1i llo d e ,b y
t i s i n gl l l P ( il l .
T l r c R P t . l l i c c l t n i c ; t r cl - t r i; 1p 1 , 1r ,r i u i u t t r r ge t r r rr - L S a t t o i u i l
i t t o t i Ci 0 l t s i S t sr i l '
{ . J s i n tgl t c R F . A I ) o p c r l t i o t r c o i l c t o r c c c i v r -d l t r l n d l l r c
E X ( i P To p el l t i o n c r ) d el r ) t r l r r s r n i rc l l t , r .
i
I
I
o
l n d l d u l i l t gl l t f l l l s n t i i o r u l c c c i v c o l r c r a t i t r nv i l - f C A i l l t t t
i l t c S y s t c n t , rp. 3l ( ) ! r l r n sl o i i u r t S y s t e r n j -l iv i l l p c r l i r r r r r
l i r c l p p r t r p r i t L tIcJ S ( ' At r a n s r r r iot r r c c c i v co p c r a t i o r r .
( onlllLlllcltllllr
u itlt thc Optr
\ l c t l r o r( iI ( , \ \ l t
65
S Y S T E M / 3T O T C A M
ExtensionSpecifications
Sl,steur/.3
rransmitsto TCIAM(Figure12) the answers(Y or
N) that str.Ldcnts
havcgivenol1a test. TCIAMdeterntines
rvhichansivers
arecorrectand which arenol. and then ret u r n st h e r e s u l t tso S y s t e r n / 3 .
M F C l T A B c o n t a i n st h e t a b l e sT A B M Ea n d T A B Y O U .
TABME is the Systern/3stationlD;TABYOU is the TCAM
s t a t i o nI D .
File DescriptionSpecifications
Systenri3
r e a d ss t u d e n a
l n s w e rfsr o m M F C U I . T h e
a n s w e rw
s i l l b e r r a n s n t i t t ctdo T C A M . M F C l T A B i s a
tablefile containingstationID's. ANSWERand RESULTS
are r.rsed
to transmitand receive,respectively.RESULTS
n r u s tb e a r l e u r a n tdi l e ( D i n c o i u n r nl 6 ) b e c a u steh e R E A D
i:odewill be usedto receivorecordsto the f ile.
c,pcration
I!M
R P G C O N T R O LC A R DA N D F I L ED E S C R I P T I OSNP E C I F I C A T I O N S
t
?
/
!
i
L
7
7
i
8
7
q
8
0
u,*@l.' il:t:il,,,,,
El{rlo:ld
F i l e D e s c r i p t i o n S p e c i fi c a t i o n
96
q
C,A
S.CA
RPG
E X T E N S I O NA N D L I N E C O U N T E R S P E C I F I C A T I O N S
','ldd,,,
i g u r c 1 2 . S l s t en r i3 t o T C A M ( P a r t
bL:FlqFlcl
TelecomnrunicationsSpecifications
Input Specifications
, ' \ \ S W i : i { t , r r r i iR l - S LLr ' f S a r c r r l n s r r l r l r r r i r c c c i r cl ' i i c s
r c s p c c l i v c i , "l .J o t l ri l f c p i t r t o l ' I s w r t c i r e dr r c t r v o l k .
M I T C LII P r t r v i r i e d
s a t a f l . t t n tt l t c c l r d r e a d 0 r . R E S U L I S
p r o v i d c sd a t a l r o n r T C A M .
RPG I'ELECOMMUNICAIIONS
SPECIFICATIONS
IEj!,1
iii'
l i l i l
liil,
t
14;
i 1
i i
iili
't
I
l
r l
i-,
i l
l
i
-l
i
it
iiil'i
iANsl^/gRs < r l
i{i€suLr5 ;ln
T
-t
l +
t5i1-4Br,lE
isirAEmE
I
.u _ r_t_'t
t'
ABYOU
ABYOU
l l
l l
RPG
INPUTSPECIFICATIONS
.)
; ' i l l
r,
t
1t
trr ll)
, islairloiridl
i4qt', l,,rll:t
r i
I
l
l
l l
i i
i t'r
!,1 ' I
i,i'ii
!
j
i F .\A ;
i
i
1 ii ill
l ,rlii i
l
lBrBl
i i
l
li l
l1 l ii
i
l t
I
i lii
( ( ) l l l l l l l r l l i ( i r l i l tr!i i t l t l l r c O 1 r 1 ' 1 1 1 1Sj 1\ \1l "c n r I c l t ( ( ) t t t t | u n i ( l t l i r , r r r \ t t t s r \ l c t l r o t i t l ( , \ \ l )
67
CalculatiorrSpecifications
Ourput- Format Specifications
S . V s t c njt ,r/c c t l r L ltsl l e t r i t n r l i e(r) i i r . s l 5 l l i r r j : i i l i l 1 i tl ,t rj i t \ l t
I o l c l r i r c r . ' 1 i o tl t' l t e t c : ; i ;l u e t t a n s t t t i l I c dt - , \ ' i x ( t a l ) t i r {) )t ru 1 ,
l ) t l 11 o i l i c I 3 S ( ' , , \5. 1 ' s t c t t t i i-cl e c t i ' c it r i s i t : l t i r c l t l : A i )
o p e l l t i ( J n c o r l t ' )r c s r r l t sl l o r i t I ' ( ' A l l l u l ) t i l S v s i t ' n t . , .rir : i i : l t c s
c n c l - o l ' - l ' i rl ir:r i I L I l S t l L ' [ S . S v s t c r n / - s3 c t s i r r , i i r - . r r t or r sl l u t
c n r l - o 1 - l l llei t r r . 'i l r l c l t . t i i .i .l r i l r c n o \ t l i l ) 1, t \ . i : l t : .
i i ' , : i c r r l l . li ) f i n t s( l t t r i r y c x c 0 p t r o r(r) u l l ) u 1u s t h c d a l a i s
t c l t t l l ' t ' t r t tttl r c c l r d r c a d c l .l r t d r e c c i v c df ' l g r 1 t I c B S C A .
-l'('AM
S v s i c r r t i .l 3u r r t s n r i ttsl a t al o
b 1 ' er c c p l i o n ( ) u t p u ta \
tfPC
t i r e t l l l l i s r e a d l l t i r r r t h c c r r d l c a d c r ' . S y s t e n r i . 3s i g n a l s
'li')wller)
l ( , , \ N ' l( w r t h a r r
n ( ) r n o l c r e c o r d sr v i l l b c s e n t .
C A j - C l l L , 4 . i r f r lq\ P
r t : C l il C A T l O N S
TfiM
i
ta
)l;
t;
]n
i't
tl
@F, lr:;l;;,,,,
lsSllloliicl
I
I
| '
t,",.,","
1 ' ' -l
ii { 'i i
i i
_
i.i
l,'i
l.I
FN''
I
r l
i " ,.
' t i
1
.
l,,l
l
i
il
,
lI
:
l
1 " rj
i..i
i1', '. l
.l'-r
I
l
\ \ l ( l ) r r r i , , 1. 1|
t
t
i
l
RPG
OUTPLIT
SPLCIFICATIOIJS
1 . l r l . "
l l l
I
'
i l
?li,
',vo
r
-
ii l
t l
li i
i
iii l
-,:.-l
---:--t;_:
_l_
_
I
I
zP] i, ANshlER.sT R PA N SinT"r"f eD,
1 " r _i 'l Ar J D R E5 u T 5 RI E C E T V € D '
t l
i
3 O ll ' r o T A L R Ec o
oRos
F ' S E N T :.
L
1(l
t
I
:
i
i
,il'^'
z6l i
*) R
" ll l i
1s)I
z q I ' T R A N S ^ 1 I rT FF Nt ],
i l
i 1 i
I
RPG
IBM
OUTPUT
SPECIFICATIONS
1,,,
f,,,,,
lll;1, lslslrloirrcl
o
lr
i,i
l']o'"
i"'su
ln,e
N5:WERS
I
]^^".
lruun,c
il1,
irurc I l. Si stcnril ro
'I('Al\l
( l ) a r t. l o t . l )
lllll:' \\ llll
lll!
TCAM TO SYSTEM/3
Extension Specifications
S y s t e m / - 3r e c e i v e sf r o n r T C A M ( F i g u r e l 3 ) t h e a n s w c . r(sY
o r N ) t h a t s t u d c n t sl i a v e g i v c n o n a t e s t . S y s t c r n / 3c l et c L n r i n e sr v h i c h a n s w e r sa r c c o r r e c t a n d w h i c h e r e l l o t . a n d
t h e u r e t u f l t st h e r e s u l t st o T C A M .
File Description Specifications
'fhe
t l r s t r e c o l d f r o n r M F C L II c i ) n t a i n ss t a t i o l l I D ' s . l ' h c
s c c o n dr c c o r c l1 l ' o r nN { F C L Ii i s u t a b l e . M A S I . c ( ' n l r l n l n g
'l'rvrr
t h c c o r r c c t a n s w c r sl b r t h e t c s l s t ( ) b e p r o c e s s e d .
x r r r y s .A N S u n d R F . S w
, i l l b c b u i l t d r r r i n gc r c c u t i o n o 1 ' t l t c
p r o g r a l l ) . A N S l v i l l c o n l a i r )a l r s w e f sr . e c e ' i v e lcl lL: - . Sw i l l c o n t l i n t l r c r c s r t l t so l r c o l l l p a r i s o no f t l t t ' a n s w c r sr c c c i v c dt i r
t l t e c o r r e c t a n s w c r si n N { A S ' I .
N4FCDUIVIYis a durlnry lllc and servesonly to begin thc
R P G I I c y , c l e . M F C U I i s a t a b l e l l l e . c o n t a i r r i n gs l a r i o n
I D ' s a n d a t a b l c o 1 ' t h c c o r r e c t a l t s w e r sl b r t h c t e s t sb e i n g
p r o c e s s e d .A N S W I T R Sa n d R E S U L T S a r e I I S C A l l l e s u s c d
1 o r e c c i v ea n d l r a n s n t i l .r c s p e c t i v e l y .A N S W E R S n t u s l b e
a c i e m a n cfli l c ( D i n c o l t r r n nl 6 ) b e c a L r steh e R E A D o p e r a t i o n c o d e w i l l b e u s e dt o r e c e i v er c c o l d s t o t h e 1 - i l c .
R P G C O N T R O LC A R DA N D F I L ED E S C R I P T I OSNP E C I F I C A T I O N S
IBM
[ , . ,,
F i l e D e s c r i p t i o n S p e c i fi c at i o n
I
FlfYlF
cD u t1Y
F[1I.C-Ur
FANS WER5
gUI
CIJI,
9
9
1
FiRE
s.u.LTs
'lPRrnr
IBM
f^
J ;, ,
r
l
(:,,
i
Ex t e n s i o nS p e c i fi c a t i o n s
.ClU.t
i"'r,. |:
If.\\l
r , r\ r . r , . r ' r 1 I l ) , r r L , t
(r
I rd,,, N
'r
",
i
Telecommu
nicationsSpecifications
Input Specifications
ANSWERSand RESULTSarereceiveand transmitfiles.
respectively.Both are part of a switchednetwork.
A N S W E R Sr e c e i v edsa r af r o r nT C A M . T h ec h a r a c t e.rE '
will identify the last recordto be received(columns26-21).
MFCDUMYcontainsno databut merelybeginstl-reRpG II
c y c l ea n ds e t so n i n d i c a t o r3 9 .
R P G T E L E C O M M U N I C A T I O N SS P E C I F I C A T I O N S
IBIfi
f'
T
r
;
l
]1
/ / 8 i 9 8 0
, - . O p , , _: , . ,"' . t r c i r l o 5 E
RPG
INPUTSPECIFICATIONS
Fu,.hn(
f;,*all
'.'..,'.
p,,..
tI
t
I i r u r e 1 3 . f C A l \ , 1r o 5 1 s t e r n 7 . l1P a r t
f IT
t
t -
l
[lM;;d.;";,;
:
]
I
1
2
/ 5 / 6 / r / 8 t ) 8 0
l{ctigl{t
".,bE,' i::llxl",,,
of .5)
( o t r l t t t t t n i c r t i nw
g i t h t h c O p e r a t i n gS l , s t c r rTr r : l e c o r r r r r r r n i c l r l i oAncsc c s sl \ l c t h o t j( l ' ( A \ l )
1|
Clalculatiorr Specifications
Output- Format Specifications
A 1t e L r c a d i n gM F C D I J M Y , S y s t e r n / 3r e c e i v e sa l c c o r d t o
A N S W E R S . p r i n t s t h e r e c o r d l e c c i v c d( b y c x c c p t i o l t o u t p u 1 ) . d e t e r r u i n e sw h i c : ho 1 ' t h e a n s w e r sr e c e i v c da r e c o r r c c l
( b y c o n r p a L i n gt l i c n t 1 o t h e l n s w e r s i n N , l A S l ' ) ,i l n d t h e l t
p r i n t sa n d t r a r r s n t i ttsh c l e s u l t s( b y c x c c p t i o r o
) utput).
S y s t e n r / 3p r i n t s t n d t r a n s t n i t sd a t a b y e r c e p t i o n o u t p u t .
A l ' t c r c a c l rr e c o r d h a s b c c r rp r o c e s s e dS. y s t e n t / 3p r c p a r c s
f . u rt h c r r c r . tR P ( , I l c y c l e b y s et t i n g o l f i n l l i c u t o L s .
S y s t e n r / - c3o n t i n u e st o r e c e i v ca n d p r o c e s su n s w c r sr r n t i l
'E'.
r h e l a s l r c c o r d . i d c n t i l - i e db y
h a sb e e np r o c c s s e d .
IIPG
IBM
(
1,,.,,,,.,
i l'"
r -
l11l'l'::':'
iI 'Cl il -i
I
ta
ltt D
in
i!
8l
il., ir]cFlcjaltl
i.l:;:
i*-
T
I
I
l',
ll-...iI't:ii;
flt
i,1,,
l:]l lr
i;:'l:
1t
il
l r
l:
i:::li:
l
l'-li'
i,,,rlii ,
t :
1 r
fl 'r,i
1:
t Ii l 'i l
ii:11.
ir
l l
i l
liigurc13.
CNLCLILA-IiON
SPFCIFICATIONS
irri
b5
it
t l l
ti-tf7I
-|CAN{
t o S l s t c r n / - 1( l ' a r t J o f 5 )
llirl,i
{;i!
XBIYI
t - )i . :
i
. , : I . ; . ' , 1i - : l : . 1
i
i
i"i
i
',
i
,
.tr:
'
1
'li1N7
l{- O OPOri..i
ll.lufirQes
,lp".G
I
X
I, ifrllbr
l ' - r t i
l6i
A jji"]
iE N.D
i'
i5.6-r0fi
GO]"0 ;RrE,A0
I
i
l
r
l
*
ir,O-fO liOtr'lr0U
T4G
iE iCP I.
5 f, TO,F'r
16;
i ' ' l 1 -i6;
i', i
i
i'l l,.lNt.li
il : l" ri
i
,
tr"o r"1P rX
*CtiO iENO
€y.i.Pr'
!,
i ' . 1, ? ? i N ? . 6 ,
'r
.T-AG
tx.-,8pvlL
i
I l?i
-/6:
l' :
i' i
. .-r
I
77i
'
.-
Dr-i
;
.- -1 "-1 r"{
*
i
i
iil..lftriji
!PFf;lFiiil\,-lalrJli
I,BM
fr'
O
l
+
-
..:
-
l D l
OFi
a i - , ' n , . f a " i f * j , R L . C i : i V L t ;A r r D
l
I
q.j- ,' R€ 5l-r i-r:,
l
I p.A rj 3 f,^,:r r E n ,
t l
65
'ril
Rl:LOriJ RSC!I;'iD'
r.Ri
'il
'
A !- l-
l- ES i 3
P R'{:ri-i1r:r [t
OIiIV?1i
zfr
it'{Af.1f
li\rJl-10Lsix
Atrs
,g
'7q
.|tl*.
i illirc t.j. i
\\i
ti, )rrrr
i
l
,
,
i
i
rt i
i
l
I ll.jrl + (,i :i l
t ' l
1 )
iir.V5rve.ri":r qeC
flvf
n'
OUTPUT
I]PG
ICATIOI\S
SPECIF
6e
r
-1,
i
NAM E
i t
.
l
lx
l
ii tl
l i
i-li, c li r
i
'1I
i.
i
l6i
l
i
i
I
i l
E5 u LTS
LV))
iLi
i R E ,sx
44
NAf,lE
zd
5ai
i ? i N r6 r
I
J
I
I
aue
;r.f
]/\
I
i i
l
'
i
i
i l
r
QF<
l8i
z6i
X
] L
i
.FCAM
'['wo
i
COINSIDERATIONS
I t ' r i r i c t i o r r sn o l r p l ] l l r c n l i n l l t t ' p r r c c t i i l l
rr:lrrplis
'l'(
'\\,1
l t r L l s tb c . , r t l s i c i c r ' ' l ivi , t l t c t \t , r ) t t, . L ) ; l i i l L r l l t i r l r\ \ ; t i t
.
-io
u r t r r t i" u i t i d c r t i i i i c tr. cl c o r t i "i t l l t : . . , t , r r rl { l ' ( , I I
l r r t t i t l r r i i l . r i t er r l t i s
l f a l r s i l rt t r d b y T ( A N ' I . ( l t ' A N ' l r l l r v t f i i n : : l l r i it ( ) \ ( ) u
i r i l r n k i c c 0 r t i s t c c i ' i v c i l 1r r r r i lr l : ( ) l i l f t l r i r r i i i l l r i sI .
l ) r{ ) g fi t l i t n l U \ 1 r e c r , ) g n i . / .ttt't t d t { l t r r t
I
1 ' o n r ; . t t t t t l i t:tt s w i t ei r l d l r r t c e , r r t r t r c i r t ) i r\ . r ) i r i l u \ 1 b c ! l n
'l
i r : u r s r l r l t i r r tr o ( ' r \ N { * r l l r i i t n i n c \ 0 ! ( ) n r l si i i l . f
r c e e i r ' i n gc n d - o l : l ' i l c l ' r o n r T ( ' r \ \ 1 . O l l r t r u r s t r . \ ( ) u n i u s i
d i l l t , r r l - e s t u b j i s ht l r c l i r r ee o r l r r c l r o r i .
2,5,
pRo( E55gD !
T CT O53
P a s eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d3 0 J u n e 1 9 7 8
Bv TNL; SN21-5624
AppendixG. Usingthe lBl/l 3741and IBM 5230
RPG II telecommunications
programming
supportsthe
IBM 37,11Model 2 Data Sration,rhe IBM 314l Modet4
Programmable
Work Station,and the 5230 Nlodel2DaIa
CollectionControllerin comrnunicate
mode asa remote
devicevia the BSCAon the IBM System/3Model 6,
M o d e l8 , M o d e l1 0 D i s k S y s t e mM
, o d e l1 2 ,a n d M o d e l1 5 .
The 314l and 5230 arealsosupportedwhen locallyattached
t o t h e S y s t e m / 3M o d e l6 , M o d e l l 0 D i s kS y s t e ma, n d
Model 15 via the Local Communications
Adapter. In
a d d i t i o n r, e m o t ea n d l o c a la t t a c h m e ni ts s u p p o r t e d
via
the IntegratedCommunications
Adapteron the IBM
S y s t e m / 3M o d e l8 a n dM o d e l1 2 .
This appendixcontainsa descriptionof the RpG II
specifications
requiredto usethe 3i4l ancl5230
(identicalto specifications
usedto receivefrom a 3j4l
without expandedcomntunications)
and threesample
RPG II programs.
It is recommended
that only one datasetbe transmitted
from the 3741 duringthe executionof an RpG II program. I1'morethan one datasetis transmitted,erroneous
recordsmay be passedto the RPG II program.Datasets
with differentrecordlengthsarenot permitted,since
only one BSCAinput file can be defined.
For more detailedexplanationof transmittingdatasets
ot 3141. refer to the IBM Systeml3 3741 Models 3 and 4
ho grammable l4/orkStation Programming Reference
Manual,CA21-9194, or IBM 3741 Data Station Reference
M a n u a lG
, A21-91
83.
A 3141 with an ExpandedCornmunications
Feature(Feature 1680)hasa maximumbuffer sizeof 512 bytes.
The OperatorldentificationCard ReaderFeature(Feature
5450)and the ExpandedCommunications/Multipoint
Data
Link Control Feature(Feature1685)on the 3741 arenot
supportedby System/3RPGII.
Note: 11'an RPG II programis communicating
with a3741
and an error occurson the 3741, the System/3could loop
on I/O attention. To prevenlthis, the RPG II programmust
usethe permanenterror indicatorto forcethe application
prograrnto end ofjob or other non-BSCAoperations.The
userprogramshouldprint a message
if this occurs.
R P GI I S P E C I F I C A T I O N S
Useof the IBM 3741 affectsRPG II file description
specifications,
RPG II telecommunications
specifications,
and RPG II output format specifications.
Only the entries
uniqueto the 3741 aredescribed
here.
RPG ll File DescriptionSpecifications
Only two BSCAfilesare allowed(one input and/orone
output) per RPG II program.If two BSCAfilesareused,
the input file must be processed
completelybeforeprocessing
the output file.
Column l5 (File Type)
Entry
Explanation
I
This is an input (receive)file.
O
This is an output (transmit)file.
Columns20-23 (Block Length)
Whenusingan RPG II programto communicatewith a
3741 without the expandedcommunicationfeature,the
maximumblock lengthis 128 bytes.
Whenusingan RPG II programto transmitto a 3741 with
the expandedcommunications
feature.the maximum
block lengthis 512 databytesplusa numberof IRS
(interrecordseparator)characters
equalto the blocking
factor" The IRS characters
arestrippedby 3741 hardwareso the block will fit into a 5l2-byte buffer. When
usingan RPG II programto receivedata from a 3741
with the expandedcommunicationfeature,the maximum
block sizeis 5 I 2 bytes. This block containsthe data
recordsaswell as the recordseparatorcharacters
piacedin
the 3741 buffer beforetransmission.The RPG II program
may removeor ignorethe IRS character.SeeExpanded
Cornmunications
Featurein the IBM 3741 Data Statbn
ReferenceManual, GA2 I -9 183.
Note: Whenthe 3141is in ECB transrnitmode(J) it
will block records.includingthe IRS characrers,
to get
t h e m a x i m u mn u m b e ro f r e c o r d si n r o a 5 1 2 - b y t eb u f f e r .
A n X ' 1 E ' m u s tb e u s e da st h e I R S c h a r a c t ewr h e n
transmittingto the 3741 (seeFigures16 and l8).
U s i n gt h e I B M 3 7 4 1
75
Columns24-27 (RecordLength)
RpG ll Telecommunications
Specifications
Maximumrecordlengthis 128 databytes(129 bytes,which
includesthe IRS character,if expandedcommunications
featureis used).
The 314l filesrequiresomerestrictionsto the telecommunication specifications.Only the columnsaffectedare
listedhere.
Column
Entry Not Allowed
l5
M
Multipoint network
t l
T
Tributary station on a
multipoint network
l8
A, U
Desciption
Columns40-46 (Device)
BSCAis specifiedwhen 3741 attachmentis via either the
Binary SynchronousCommunicationsAdapter or the
Local CommunicationsAdapter.
ASCII
t9
Transparency(Not
allowedwhen the
3 7 4 1i s a t t a c h e dv i a
the Local Communications Adapter)
52
ITB
Columns61-74must be biank.
RPGll Output FormatSpecifications
Columns 17-22must be blank.
76
P a s eo f S C 2 1 - 7 5 O 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
EXAMPLES
Transmittingto the IBM 3741
The lbllowing RPG II programsprovideexamplesof the
Systern/3Model l0 Disk System.System/-3
Model 12, and
Systerrr/3
Model I 5 usingthe 3 ,141.The first program
transnritsdatafront the System/3Io a 3741,the second
programreceivesdata from a 3141, the third progran
transrnitsdatato a 3741 with the expandedcomnrunications featureusingthe expandedcomrnunications
buff'er,
and the fourth programreceives
datafrom a 374t Model2
and receives
a statusmessage.
System/3readsthe input file CARDIN frorn MFCUI
(Figure 14). This dataforms the output file BSCAOUT
tlrat is transmitted,usingthe BSCA,to a 3741. The 3741
writesthe dataon a diskette.The printerfile is usedtcr
indicatenormalend of job and any errors.
R P G C O N T R O LC A R D A N D F I L E D E S C R I P T I OSNP E C I F I C A T I O N S
I81t,,,",.",,..",
M a c h , nceo , o o i a , o n
",,!ne$
Cad
Eleclro
Nu'n&l
Date
C o n t r o l C a r d S p e c i fi c a t i o n s
;lr
H
I
El
I
o
q
a
!
6
I
Rerer 1o lhc sDecrt c Svsrem
!
3
F
=
-
L€ngth
of
E
ol
Record
t
Key
,!
ma.ual
lor nctual rnt.ies
n
!
z
Extent Exil
lor DAM
Fleld or
Addre$
Lrbrarv
q
E
j
Rcierence
o
i
F,ekl
RPG TELECOMMUNICATIONSSPECIFICATIONS
A.d
Eleto
1
2
**[-fl"_ Hll;,""BblclM!
Nuhbr
I oa"
f
9
e
s
g
c
:
:
7
a
s
i o t l 1 2 t 3
-
!
t
DialNum&.
z
E :
=
6 9
zl 22 73 2a E
6
21 nn
&
3r
s 3
5 3 3 7 9 3
1 4 2 4 4 4 6 a )
p :
P 9
d P
;P
i5
! i l
I Figure 14. Transmitting to the IBM 3741 (part I of 2)
U s i n gt h e l l i N ' l i 7 4 l
77
P a g eo f S C 2 1 - 7 5 O 7 - 5
l s s u e d2 4 S e p t e m b e r , | 9 7 6
By TNL: SN21-5428
RPG INPUTSPECIFICATIONS
IBIL,,,",,,.,
"..
G X 2 rS 4
2 U / M0 5 0
a u . i p i M a c h , nce. , N r d n . n
t
2
t5
76 ]t
18 19 80
**ff l'_',i::1il",..
lCBTCffdl!
Record ldentif icarion Codes
RPG
IBll
",",",,
CALCULATIONSPECIFICATIONS
Fo,mCX2t S932
PrnrDdLnUSA
. . " a ! 3 . d s M a c hn ec o , p o r s . o n
15
76
17
1A
1S
aO
FFIoIITAEI
_';::Iil,,".
SPECIFICATIONS
I81il.",,,.,,,".
I P r-o: lq r a n
-l
l Prcvaru
I
-
l::l
,,-.]
I
e'*n
l
a
I crrpi..
I
ii'" I ^rl
t\
I Figu.'
't8
Transmittingto the IBM 3747(Part 2 of 2)
l l e c e i v i n gf r o m a n I B M : 3 7 4 1
-lirc
I B I \ 4 . 1 7 I. 1t r a n s u r i l rsr r c c o L tul s i t r gr l t c l l S C r \ r t r
'flrr
! i 1 , s 1 1 '."' , T h i s t l l t a t i r L i n st i r e i n | r r t l i l r ' t l S C A l N .
! i t ' s t et t t T . i' * ' r i l . ' st i t e d u t l i r c c c i v c dt o l l l c P r i n t c r i ' i l c
t ' l U N l L l t { l i g u r cl - 5 ) .
R P G C O N T R O L C A . R DA N D F I L E D E S C R I P T I O NS P E C I F I C A T I O N S
l
i
,
,
r
'
t
,
B5CA62
,
Control CardSuecilicatrons
--ri
iFr
l
I
I
i
i,,,
r-
l't
r-- !
i
l'b5cArN
F r l e D e s c r i p t r o nS p e c i t i c a t i o n
':;r.,=
:
ji .r- : ,1"
]1
--rl
i t ' - ; = l ' | ' : ; rr
:i r ' ll , i, iii . , ,l , 'i.,lil f. '!lt' -, ,ii :
i
i-
I
I
T
I
I
l:tt':t- ]]
I.iI
-r - l.
-r .--1 *ir- ir i p l E ll F 9 6 1 9 6 ,
,2.
'o,,'"1
1 , ,l ' r P i ? r N r E R o i ] l ' ; I i i i i
lsuf!'l-5.
i
,
-,1
gSCn
rl-
r
_l_
-r
r_
l i
-Il .l i
'
i , r
-----Tr
l t t
R
l t i
irpRrrurr
I { e e c r v i n gt r o n t a n I l i M 3 7 4 1 ( } r l r 1 I o 1 5 )
.
.'
R P G T I L E C O M M U N I C A T I O N SS P E C I F I C A T I O N S
I
l
n u i
L
lii
,
le-sieiaPi{l
I
-_---_l
rT
l
I
i
, ,l i- .i
I
1 . r . 1 . 1 4 ^ 4 1 4 ' r r ,
r t i
f . l f
I
l
II
.
l
I
I
I
I
iri
' t r
r*1
'.lr
l L
ll|i
l
i
i r
lI l
tI l
I
l i g u r c l - 5 . l { e e c i v i n gl r u r r rr r r l l l M 3 7 4 1 ( P a r t I o j - 5 )
t \lr!
t i r t . 'l l J \ l 1 7 . +l
79
r l J P L li ' ; P I { - ; l F i C A l l ( ] N S
RPti
tst4
i
\
' ,
i'
I
",i
rt
.
t t ; . t l
;,,, gtst c Ai oi ai
i r, .
i
l:,i.Arir
.
, r
,rt'.
,IJ
,
i
v-\
l
r
'
:
,
l
i
,
i
r
i
'
r
l
,
t
,
r i l - , t 1 , , . 1 L r ) ! - f t . 4 T t :o; N
pLClFioAlt()tis
.i..&.it1
(/. 1
t yJer
.u:R.:
\J r,
'J r,
!
i
l
-.
i
rt f rr,
.AUi
;
. ,.,--
:
,
l-!_:---,.1 _j:
tor^
t{t,l
i.1f"'T'c
fi
I '
r
r{r
i
'
I
S P I C I FI i I A TI O N S
f i a
6 l
t5Jt-l
T
i
i
I
i
1
,
. l , r i l i
I
;,
pqr{qqi'
I
i
f : - - r -.
,
l
rt l i ' i ti
r
.
i i { t r ' :i i , ,r
f
l
i
iI
l
l
i
I
I- . .PINOq
1'1r .
I
lp.acur
izji r dq
I
ii
l
II
l
l 7 - 1 1t l ' . r r 5t , ' l 5 r
RgC.oRDS
RgqEtVtiO'
iri
peRtuNENiTEqRoR
;l i il s qi
lRwurl41 o \s1
s l R E C o P O(Ss C E r V e D '
r
ll;
oN ,
CoLMPT-ETi
il r ii i i ls , l qS L{C0GSSFTIL
I
:
l
l
\r-t
|
l
l
l
-t
I
I
I
i
I
!
I
I
I
I
I
I
i D A r -l A
il eq
9?i r-q
i
I
iii'i))d,
l
l
i
.' - - - ' - i
I
I
P a g eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d3 0 J u n e 1 9 7 8
By TNL: SN2j-5624
Transmittingto a3741 with ExpandedCommunications
Feature
This program(Figure l6) showsthe BITON and BITOF
codingneededto generatethe interrecordseparator
characterto separate
recordswhen transrnittinsdatato a
374I usingthe expandecl
communications
feature.
System/3readsthe input tilc DISKA from DISK. The RpG
II programwill then attachan IRS (interrecordseparator)
characterto eachrecordin this file. This forms the output
fiLeT3741 which is then transmitted,usingBSCA,to a
3741. The PRINT file is usedto indicateany errorsand
a total cardcount at end of lob.
UsingRPG II in CommunicationBetweena System/3and the IBM 3750 (WorldTradeOnly)
80.1
Paseof SC21-7S07-5
lssued30 JuneI 978
ByTNL: SN21-5624
R P G C O N T R O LC A R D A N D F I L E D E S C R I P T I OSNP E C I F I C A T I O N S
1811,.,",^",,-.
",".*
M&hid co.br.roi
Grldic
Ca.d El.cro
*"[-I-]"_
Num*r
I oab
Control CardSpecifications
H
h&r 20
cd.
I
s4b l;
bmpil. | :
lo
t!
!l n,-*'
il o p'r.
{l e-,u.*
:iz. to
.a
!
to shn
E
a
a
Syrbm Referde
Library manuat for fttud
6nri6.
F
-
6l
RE er to Se i@iric
!
!
a
tE
lo
)o
s
r2 l3 1r
t2$
o l rI l x l i k
s
55$57
S
50 &61 62S&
65
Lsng$ ol Key Field s
of RMrd &dr€$ Fietd
R P G T E L E C O M M U N I C A T I O N SS P E C T F I C A T I O N S
I - - _
lP'qrem
lp,q,amme,
loare
- -
1""".""
lc'"on" I
rm,,rcro.
I
ln,..n
I
I
I
I
I
J
I
fcdb;,d,-b'_l
I
I
I
I
I
I
I
;;;;-l
--1
r
""",",,,
t:
E 9
^-!
1424344451'_""
Fiillir
Transmitting to a 37 41 using an Expanded
communications Buffer (part l of 2)
80 . 2
_
I
:
t !
r
q
t
a
75 76 77 78 79 80
m l l l l l l l
ro*',r-"-LI j l__l-l l
,1,*
:[:
i5tr678691011
t213t4
l ll l + t l
lllliIrJ
Pageof SC21-7507-5
lssued30 June1978
ByTNL: SN21-5624
RPG INPUTSPECIFICATIONS
,"*[tTl",Record
ldentif ication
Codes
2
3
I
&
n
!
3
i - t
t -
m
RPG
t'oqran
I
CALCULATION SPECIFICATIONS
---
t:
i
.-l
Prolnnm{
|
^
Grar
:-''n
rNr^'d'o"
I
L.--___L
I DaE
I
P,rn
Resulr Fleld
c
TTT-T
,L I 1 1
c
c
i
c
RPG
IBl,l
OUTPUT
GX21S0 ? U/M O9'
P rh t + d! n u s . A
S P E C I FI C A T I l N S
**ff-]"
T^
Llat""
_
75 76 77 78 79 80
P,q'.o fl=rT_rT-l
j
rde.ircaro.l
I
i
|
|
|
O u r p r / It n d i . a t o r s
4 1 r
t 1
f ; ,
ni , ;
0 4
T '
5
o
0
0 6
,
Q
l
7
.l^i
Figure 16. Transmittirrg
UsingRPG II in CommunicationBetweena System/3and the tBM 3750 (WorldTradeOnly)
80.3
P a g eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d3 0 J u n e 1 9 7 8
By T'NL: SN2'l-5624
This page intentionally left blank
80.4
R e c e i v i n ga S t a t u s M e s s a g e
frorn an IBM 3741 DataStation
l : t r l i t r ei / s l t t i r r \i t ( r \ r , l of c c c i v et l l r s t l r L i tnbi ! t s ) i i l lIcl o i l l
- i - / u l l [ ) u t ; rS t i r t i o nu ' i i c l i l i i S ( r \ c r r o i i r u sr ) \ ] c u l r - c L l .
l ' l t el l i ] \ ' l r 7 - 1i t l r r r s n r r i tsi t i l l rv r ; rr l t c I J S (A i r i S r , s i t i r r ' . . i
l l ' l t i :t i l r r Ll o ; . n r :r ;i r c i r r p r r l! i i c l N l l S C A . S y s r e r i -i i r l r c n
\ r " i r t c si I i ( ,1 1 . r ttuc ec i v c dI i t p f l n t c i t i l c O U T ' l l S ( ' , \ .
W I r c i l a r r \ ' l t ( . ) r ) d r t r f s( ) i l l l t c . 1 7 , + i ^i i t c
llcttttlnctll ctt()r
i n r i r c u l o r t r r t i r c l { P G l l p r t i r l l u i r ii s t u r r r c d o n . B S ( d u t u
nrinragcr]role
l tl o s c s l l r e I N t I S ( ' A l t l c l r i r l L r p e r r sl N E I i l { O l l
-l
[ ( ) t c i c l V c l l i c s t i l l r r s l n c s s l t g c . h c I , b 1 , ' t i :c l ] i l f x c t ei r e i c r v c r , l
t : 0 r ) r 1 ) | ) i i l ' Jtriit t l r e . . 1 7 :Il : : i i t tu s i i l r i l a i t t o l r l i l l r l t l t u u p i | 0 ,
l ) i i u l c l l l e : , : \ i t g cr r P i u t e d i i l [ ) ] i n t e t l i l c o L : l ' t J S ( ' . , \ .
airi.j
rH${
|(..,\, iii{_lr. ,.:}iijlr Ai\ili I'li.t
ijPEt-,lFlCATiONS
iJi:S{:HiPIli-lN
dl
STATU5
TJ
! t
--
l ,
; i l B5 a A i p l
I D|.JT ASLA OI
O;I{ERROF, TD
!
i,_
r
iF
F
izBt ia8
rl2 r34
*28i
L ZS
1 i
-
.-- t
i |BSCA
I
Bscn
I
llr-
-:-.,-
tpnrrurgR
I
i
| + u r -l
r : i [ , ( ; i x r i i ! : i t { } l \ i : 1 i r i t _Lt t N E i l ( } t i t i l E R s p E c l F I c A - I t o N S
:
'
IBI'{
QZ
I
5 I,AITU5
r l
i
I
l
i
i
I
I
t
[. riAri
I
t
,
.
- lt
I i : r t r r rI r
l{cL.'ttirtr;r StrlLi: }lcrsarrr Irirli lrn IIJ\l .l
r
i
3i
;i
,i
l"s"
I
I
I
l
-i i-
3di I
l
I
R P G T E L E C O M M U N I C A T I O N SS P E C I F I C A T I O N S
P ,n1edr Lr.sn
**ffilr - ';:::il".""fffflrlF]
t5
16 ]t
1g 19 &l
24 25 26 21 2429 3A 31
'f
Ift
l
Il'
T
T
t.r
T
T
T
T
T
Figure17. Receivinga StatusMessage
from an IBM 3z4l Data station (part 3 of 7)
RPG INPUTSPECIFICATIONS
IBll
-"
.," .",
F*
".,
au5 nos,Md
ne co,oo(.non
I
',ifln.,."EFtrFIFl
**lfuil'I
r s z e r r r s u s a Io
-
Flra*
c":, wo , ,r" ouo'I
I
r
I
I
I
I
I
I
T
I
I
I
Ii ltl l
'lJl
1rl
+l]
Figure17. Receivinga StatusMessage
from an IBM 3741 Data Station(Part4 of 7)
Usingthe lllM 3741
til
Pageof SC21-7507-5
lssued30 June1978
ByTNL: SN21-5624
RPG
ia-.-
[-'-
1.1,'11:'
l?1
C A L C U L A T I O NS P E C I F I C A T I O N S
-J
"l'1,''1.'
'
',i rlr lii
|
,*w,s], l,,;lt,i..,,,sirnifuiil
1
Tt-
i
r.
l
r
l
QI
'NER{4PR
,
2A
. T-
Q
)
i
!
f
'
i-i
[/x:
WfR',L,NX.
VNKNiotwN' 50ve
'56,,lNX
, Sl,'/E
l
-
,
r
l
9
t';,i:
,llT.
i i ; il .
:i'fi:
Figure 17. R.eceiving
a status Message
from an IBM 3741 Data station (part 5 of 7)
RPG
IB}L..,.,,,",,,,,
M#
OUTPUT
SPECIFICATIONS
cx?1 eirr) 2 urM os.
np corm,dnon
".",n.s
r isI
lsJijntrl
" li:xl',,,,
""i@{tl
tI
Figure17. Receivinga status Message
from an IBM 3741 Data Station(part 6 of 7)
i---"-.rr
r:l
- i .
. a
c{ r- >a
,i}*an ilj
i-Q.-.-i
i
*
L
o..o
-_-
r -
, iirE O-
>ru
f-.t v^, rl)
q (o ;1
' .-u-aa
U u r : )
a'j
cr L. ai
-
iitr:ervrnli f ronr.rr il741
[]:,'Ii':r{iii.;otl rvitf i f:xpil!dec{
( , { , :t t n r !n t i i l l i t t n : I c i i l u , . .
' , ' , , l .
] : . .
r . r
. r ' t :
, r r . r r . , : ! i r ; i i\\' i
. . 1 , . ' , , 1 : , : . 1: , , , 1
, . : i
, , , , I
r
. , ' ,
1 F ( : j { . . i i \ i l . ; ' . r ; , , , r ' . i ]A
l .N
i i ' : F I L F ,i i 5 5 1 1 p 1 ; P r l O \ : } ? F { l i F l C A l ' l O t \ l S
ighi
Asc Adt{
h{
r l
O
I
l .
. t t , r .
:
;
i
t i . :
, r . , i ;
. , i :
l , : , r , i , . r l ( . , , t i l i l t | r l . i t t i r , : . i . . t t L | : t ir ti ,i , r ' i
ttsrd
;B5 CA 6i{
I
i
t
-
t
ij,.:i'l'i.-i
5F
dNA
qc
RPG INPUTSPECIFICATIONS
c x 2 t 9 G 4 2 U , M0 5 0 "
Prnred.UsA
1
2
7 5 7 6 1 1 7 A 7 9 8 0
'"*LL1'_ ";:1i1",..
EElcFEfq-l
Record ldentif i€tion Codes
Figure 18. Receivingfrom a 3741 Data Stationwith ExpandedCommunications
Feature(part 3 of 5)
BPG CALCULATIONSPECIFTCATIONS
I81vt
.,.,.",.,,"
Fo,' ajx2: s93 2
a , , n e n M a c hn p c o r o o , , n o n
1
2
1 a ) 6 1 /
/ a 7 9 A O
trtkEbEi
""fil.'_ fi::1ilt",",
------']
Comments
t1
r-l
1fi+.+
- -I* 1
t-l-l i
i.tlii]
r i
F'igure18, Receivingfrom a 3741 Data Stationwith ExpandedCommunications
Feature(part 4 of 5)
RPG
OUTPUT
6 X 2 r 9 @ 0 , ' ( r , Mr ) 5 0 '
f , , i r - " df u s !
SPECIFICATIONS
**ffi"
_';::tit",
",Flblalc/Tql
15 76 i,1 18 t9
80
r4+
,l l
i
Figure18. Receivingfrom a 3741Data Stationwith ExpandedCommunications
Feature(part 5 of 5)
U s i n gt h e I B N { 3 7 4 1
It7
Pageof SC21-7507-5
l s s u e d3 0 J u n e 1 9 7 8
By TNL: SN21-5624
T h i s p a p : ci n t e n t i o n a l l l ' I c l t n l a n k
P a g eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
R P G C O N T R O LC A R D A N D F I L E D E S C R I P T I OS
NP E C I F I C A T I O N S
Prqr.m
15 16 tl
Card Elecno Numbr
Grrphic
Prqrrmmr
GX2t 962 3 UM/O$.
t8
t9 aO
FkEEE
"*f[",_'#:l;",.^
I oao
Control CardSpecifications
II
H
t "a
C&.
S2ato
ftmpil!
I
hd.l
6lf
;"1;" "
T
20
9
T
E
o
t
" l
sze to I
Ex6@b
I
3 l.!
ll
A-IE
E
I .l
t
t
E
!
6
Ol Prini
=
=
ti
.g
to Sbrr
E
.
I
a
I
neler to the speific System Relerene Lib.ary maoual tor actual enriei
3
E
E
€
F
5
i 2 s g 5 5 $ 5 7 S 5 9
& 6 1 6 ? e A
File DescriptionSpecification
F
Filsname
l- $**
I l-l{:sl-
lI tl;"l
a
o
rl
F
0
rrlrlslr. I
:|:lll
=l
-
l4ord tudr6.
I
TYE
Symbolic
Device
Device
Addition/Unord€red
E x t e n tE t
for DAM
Ovedlow
E
Lab€l Exit
il
Core lndex
I
U] U8
Key Fierd
I
sbdins
I
".t"::""::""
o, Cvlinder
Name ol
?l
TI
II
Enlry
I
, 5 5 S 5 7 S s e
R P G T E L E C O M M U N I C A T I O N SS P E C T F I C A T I O N S
F o , mG X 2 J0 t l 6 1
Plnr.drnusA
1
Grd
Electo
Numhl
2
* * l ffl - L l ".' _
^
15161t
P'q'dm
l=-T-f
t879a0
T-f
T--l
u _ , r " . , , - L L l _| I | |
I Figure16. Transmittingto a 374r Usingan ExpandedcommunicationsBuffer (part 1
of 2)
U s i n g R P G I l i n C o m m u n i c a t i o n l l e t w e e n a S ) ' s t e n r / 3a n t l t h e l B M 3 7 5 0 ( W o r l d T r a d e O n l y )
89
P a g eo f S C 2 t - 7 5 0 7 . 5
l s s u e d2 4 S e p t e m b e r r, t 9 7 6
By TNL: SN21-54:28
RPG
RPG
INPUTSPECIFICATIONS
C A L C U L A T I O NS P E C I F I C A T I O N S
1 ?
'
' " L L
I
= o
P,..,,
'
t
t a 1 6 t t J n t a g Q
I
I
[ t l ] L
Facrof 2
U e
:;
.ll
Di
tr
T
, l
If I il -l
RpG
IBrt
F*
OUTpLrr
SpECTFTCATT.'NS
, , " , " , , . "R
" u5n.*rli:hnecooo,a,on
trar------1"'"
-
1 , , ,, 1 " , ,I f
lt"'"ll
1I1
N
IIfl
l
"-[]1,
TERMIN.AT,ED,
I l t i g r . " 1 6 . T r a n s n r i t t i n gt o a 3 7 4 1 U s i n g a n E , x p a n d e dC o m m u n i c a t i o n s B u f l e r ( p a r t 2 o f 2 )
90
]
P a g eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
AppendixH. UsingRPGll in Communications
Between
a System/3andthe IBM 3750
(WorldTradeOnly)
Whena System/3is connectedto an IBM 3750 Switching
System,the RPG II telecommunicationprogrammust be
usedto code the applicationprogramsallowing message
exchangesbetweenthe two systems.The application
programcan be written for message
exchangerelatedto
the following3750 functions:
1.
Call recording
2.
Contactmonitoringunder dataprocessing
system
control
3.
Inquiry to dataprocessing
systemwith recorded
answer
4.
Realtime datacollectionto dataprocessing
system
5.
Recordedannouncement
to extensionunder data
processingsystem
6
Transferof recordeddatato dataprocessing
system
Programming
Procedure
On eachend of file (EOT) receivedfrom a flle, the RPG Il
programmust switchto readthe other input file.
I.
The input fileswill be definedasreceivefileson the
RPG II telecommunications
specifications.
z.
The output file will be definedas a transmit file on
the RPG II telecommunications
soecifications.
The exit frorn the RPG II programcan be taken
when the stop message
is received.
^
*.
The rernotdevicefield of the t{PG II telecommunicationsspecification
must be left blank. The 3750
is considered
to be a processor
by System/3RPGII
BSCA.
Comrnunications
betweenthe System/3and the 3750 are
binary synchronous,point-to-point operationsin transparentmode. Only the EBCDICcodecan be used. The
System/3operatesas a transmitand receivestation.
UsingRPG II in Communication Betweena System/3 and the IBM 3750 (World Trade Only)
91
92
Appendix l. System/3RPG ll Interfaceto BSC Line Protocol
1'his appendix is intended for a person wlio is kr.rowledger b l e a b o u t B S C l i n e p r o t o c o l . T h i s p e r s o ns h o u l d l t a v et h e
lollowing inlblntation to :
.
W r i t c u p r o g f a n r1 ' o rt h e r e t ) i o t el o c a t i o n t o i n t e r f l c e
w i t h S y s t e r n / 3R P G I I
o Wlitc it progrant lbr the Systenri-3to perlbr.nra spectlic
s e q u e u c co f l i n e p r o l o c o l
M r l c . D L r r i r r gt h c e x e c u t i o n o f a n R P G l t t e l ec o n r r u u r r i c a t i o r r
p f o g r a n t ,B S [ ' o u t p u t d a 1 ar n a n a g e r - n c d
' rer tl a y st r : l u s r n t s s i t r n
o l e a c h b l o c k o l ' d a t a r - r n t rtlh c n c x r b l o c k i s r c a d y t o b e
t r a n s n r i t t c d .T h i s d c l a y i s n e c e s s a r yt o a l l o w d a t a r n a n a g e n r e n t
1 o p l a c c t h e p r o p e r l i n c c o n t r . o lc l i a l a c t c r( E T X ) o r r t l t c l a s t
b l o c k o f ' d a t a t o b e t r a r r s n r i t t e d .F o r c x a n t p l e ,I l t e T r a n s m i t
Llultiple FJlcs clrart slrows tlte last data block of lilc I beirrg
t f a n s n i l t t e dr s u r c s u l t o f t h e u s c r p r o g r a n l r c q u e s t i l t go u t p u t
to BSClllc rr.
-l'he
a p p c ' n d i xs h o w s R P G I l B i r u r y S y n o l r r o n o u sC o r n n r u n i c a t i o n s( [ i S C ) l i n e p l o t o c o l s a n d i n d i c a t e sw l r i c h o n e s a r e
p er i b l n t c r Ja u t o t n a t i c a l l ya n d r v h i c l to r l e sr l l c l { P G l l
p r o g r a n lc o n t r o l s .
[ : l c h S l s t e n l - ] t l a n s r n i s s i o no f d a t a o v e r t l ) e c o u t u r u n i e a tion linc isequalto BLOCK SIZE on the BS['A's File
Descr.iption
S p e c i if c u t i o n . T h c s i z c o f t l i e d l t a b l o c k s r e c e i v
c d b y S y s t e r l / - ii s c o n t L o l l e db y t h e t r a n s u r i t r i u gs r a t i o n .
( ' f h e a s t c r i s ki n t h e S y s t c n r , . ,Sl o f t w a L e / A d a p t e ur o l u n t n
i n d r c a t e sJ u s t o n r e fc o d i n g I o g i c .)
System/3
T r a n s m i t t i n gS t a t i o n
System /3 Softwa relAdapte r
L i n e i n i t i ailz a t i o n( a u t o r n a t i c )
'
I n p u t f r o r r B S Cf r l e
( a r i t o m a | ca c k n o w l e c l g e )
I
+
E
n ,r-
r
Sy stem/3 Softwa relAdapter
i r r ]i l t l t t a l t , / a l t o | { a u t t ) l l l i i t t c )
ACK
.+>
-l)rrilrtrt
B
t c F I S i Ct i l r : 1
{ . r r l o r , J l r L. ' r ' ft , r ' . 1 ,' i ' t 't
AOI<
DataT
B
r>
'
X
( . r r l l ' r l l l , t l r eu t f , l r , , f l , , 1 , j , '
l n l t L r tf r o r r B S C l r l t ;l
<-
ACK
+r
ENo
L n e i r t r a l r z a t i o nl a L lro r n a t i t : )
+r
ior
'Caust:s
entl of f lr:tor BSC f le
+>
ACK
r+
ACK
.+
Re c e i ve / T r a n s m i t
System/3
ACK
Transmit/RecervS
e tation
+
FNo
+
Data
System/3 Software/Adapter
L I r r | r r r I . , l r z l l r O r (r J u t o m d l t C )
+>
'lnput
f r o n r t s S Cf i l t :1
( . r r t t O t r r a l i ra t I t r , , r v l r r l g '\
T------+ '
ACK
+
+
+r
ENo
Data
r
EOT
+
C a u s u lsn d o l t r l e t o r t s S Ct r l e
*Output
B
+
ACK
F
D a t aT
'Errrl
o{ lolr
+
+
Eor
ACK
+
S v s t c n r / 3R P ( i I I I n t c r J a c ct o l l S ( ' L i t t c P r o t o c o l
97
L E A S E DM UL T IP O N
I T ,S Y S T E M /T
3 R I B U T A R YS T A T I O N
R e c e iev
S y s t e m i3
C o n t r o l T r a n s m i t t i n gS t a t i o n
+
Arlr/rseq
ENo
System/3Software/Adapter
L i n e i n i t i a l i z a t i o(ra] u t o r n a t r c )
-lnput
f r o m B S Cl i l e
{ a u t o m a t i ca c krr o w l t ' t l g . )
*Causes
e n c Jo f f i l e t o r B S C l i l e
Transmit
System/3
C o n t r o l R e c e i v i n qS t a t i o n
Polllng seq ENO
System/3 Software/Adapter
L i n e i n i t i ailz a t i o n( 6 u 1 s m s 1 i 6 )
'Output
t o B S Cf i l e :
( a u t o m a itc a c k n o w l e d q e ;
'Encl
of job
S y s t c n r / 3R P G I I I n t c r f l c c t o t s S ( 'l - i n c P r o t o c o l
T r a n s m i t .R e c e i v e
System/3
Control Receive/
T r a n s m i tS t a t i o n
P o l l i r r gs e q E N O
System/3 Software/Adapter
L i n e i n i t i ailz a t i o n( a u t o r r a t i c )
" O u t p u t t o B S Cf i l e 1
{ a ut o m a ti c a c k rr o w l e d g e )
" l n p u t B S Cf i l en
( a u t o m d rt c a c k r r o w l e d g e )
Arltlr setl ENA
L i n e i n i t i a il z a t i o r -( ra u t o m a t i c )
*Causes
e n d o f f i l e f o r B S Cf i l e n
R e c e i v e ,T r a n s m i t
Control Transmit/
R e c evi e S t a t i o n
A ( / r / r S C ( /t l \ U
System/3 Software/Adapter
L i n e i n i t i ailz a t i o n( a u t o m a t i c )
" I n p u t f r o m B S Cf i l e 1
*Causes
e n d o f f i l e f o r B S Cf i l e 1
*outpur
t o B S Cf i l e/ l
( A u t o m a t i ca c k n o w l e d g e )
PollrngserTENO
L i n e i n i t i a l i z a t i o(na u t o m a t i c )
'End
of job
S y s t e n r / 3I { P ( i I l I n t c r l a c et o B S ( ' L i n e P r o t o c o l
P O I N TT O P O I N TS W I T C H E L
DI N J E
l D S E O :S W I T C H E L
DI N ES T A T I O NI D E N T I F I C A T I OSNE O U E N CO
EP T I O N A L
Receive,
System/3AnswerStation
System/3
T r a n s m i tS t a t i o n
l D s r : Ir tE N O
System/3Software/Adapter
L ' n " r r t i t i arlz a t i o r t( i i u t o m d t i c )
l l D s e qals 6 +
'lnput
f r o m B S Ct i l e
( a u t o m a t i ca c k r r o w l e d g) e
D L EE O T
'Causes
e n c lo f f i l e f o r B S C f i l e
Receive,
System/3CatlingStation
T r a n s m i tS t a t i o n
l l D s e qEl N or + >
System/3Software/Adapter
L i n e i n i t i a l i z a t i o n( a u t o m a t i c )
I l D s e q ]A C K
*
I n p u t f r o m B S Cf i l e
( a u t o m a t i ca c k n o w l e d g)e
l l Ds e q A
'Output
t o B S Cf i l e
( a u t o m a t i ca c k n o w l e d g e )
'End
D L EE O T
of job
T r a n s m i t ,S y s t e m / 3 C a l l i n gS t a t i o n
System/3
|
R e c e i v eS t a t i o n
l l D s e q lE N o +
System/3 Software/Adapter
L i n e i n i t i a l i z a t i o(na u t o m a t i c )
l l D s e cI rA C K
'Output
t o B S Cf i l e
{ a ut o n r a li c a r ; krr o w l l d g e)
*
D L EE O T
E n c lo { y o b
+
S l r t e r u / .l1( P ( i l l I r r t .r l ; r , ,l' , ' l i s ( l . r t r 'l ' r , , t ' , r ' , ) l
T r a n s m i t / R e c e i v eS, y s t e m / 3 C a l l i n gS t a t i o n
R e c e i v e / T r a n s m iSt t a t i o n
l l D s e q lE N o t +
System/3 Softwa relAdapter
L i n e i n i t i a l i z a t i o n( a u t o m a t i c )
<-
l l D s e q lA C K
'Output
t o B S Cf i l e 1
( a u t o m a itc a c k n o w l e d g e )
*
I n p u t f r o m B S Cf i l en
( a u t o m a t i ca c k n o w l e d g e )
L i n c i n i t i a l i z a t r o( raru t o m a t i c )
'Output
t o B S Ct i l e 1
}
{ a u t o m a t i ca c k n o w l e t l l e
'lnput
f r o m B S Cf i l e r r
( a u t o m a t i ca c k n o w l e d g e )
L i n e i n i t i a l i z a t i o n( a u t o r n a t i c )
+r
D L EE or
'Causes
e n d o f f i l e f o r B S Cf i l er r
S v s t e r n / 3l { P ( i I I I r r t c r l u e ct o I J S ( 'L i n c P r o l o c r r l
R e c e i v e / T r a n s m i tS, y s t e m / 3 A n s w e r S t a t i o n
T r a n s m i t / R e c e i v eS t a t i o n
Sy stem/3 Software/Adapter
+-
l l D s e q lE N O
L i n c 'i n i t i a il z a t i o n( a u t o m a t i c )
lqK_
-lnput
{r
ACK
DArA i
B S Cf i l e
( a ut o m a t i c a c k n o w l e d g )l e
X
+
-t,
11-,ynTa
i
E
DArA r
-Output
-)
c o n v e r s a t i o n arle s p o n s e
( a u t o m a t i ca c k n o w l e d g e )
X
_^_5 t r
T T
ACK
E
T
X
f
onrn
E
X
*Causes
e n d - o f -ifl e o n B S C f i l e
T r a n s m i t w i t h C o n v e r s a t i o n aR
l eply
S y s t e m / 3T r a n s m i t
System/3 Sof tware/Adapter
->
ENO
DATA
R e c e i v i n gS t a t i o n
Lineinitialization
(automatic)
E_____t_T:_
T
X
*Output
-)>
t o B S Cf i l e
( a u t o m a t i ca c k n o w l e d g e)
E
+
DATA T
*
I n p u t c o n v e r s a t i o n arl e p l y
( a u t o m a t i ca c k n o w l e d g e)
X
rf>
ACK
+I
DATA
E
T
X
E
T T
X X
+>
*Output
t o B S Cf i l e
(automatia
c cknowledge)
*
fr
EOT
End of job
no<
+>
S y s t e m / 3 R P G I I l n t e r f a c e t o B S ( - -L i n e P r o t o c o l
P a s eo f S C 2 1 - 7 5 0 7 - 5
l s s u e d2 4 S e p t e m b e r 1 9 7 6
By TNL: SN21-5428
L I N E C O N D I T I O N * S Y S T E M /R
3ESPONSES
DataMode,System/3Transmitting
System/3
R e c e i v i n gS t a t i o n
+
Data
*Output
f r o m B S Cf i l e
( a u t o m a t i ca c k n o w l e d g e )
+
WACK
+
ACK
---j
V
I+
TTD
NAK
.+
Data
?
Datal
System/3 recovery (automatic)
A
U
*Output
ENo
Data2
System/3 recovery (automatic)
<.
ACK
,t
+
*Output
4'
Data2
N
r>
+
Datal
*Output
f r o m B S Cf i l e
( a u t o m a t i ca c k n o w l e d g e )
+
;
System/3 recovery (automatic)
r+
ENo
tt2
System/3Software/Adapter
ACKI
'v
P a g eo f S C 2 1 - 7 5 0 7 - 5
lssued 24 September lg76
By TNL: SN21-5428
DataMode,System/3Transmitting(continued)
R e c e i v i n gS t a t i o n
*Output
f r o m B S Cf i l e
Time-ou1
Data3
System/3recovery(automatic)
*Output
f rom BSCf ile
S e t sS y s t e m / 3 r e c o r d a v a i l a b l ei n d i c a t o r
*
+
I n p u t t o B S Cf i l e
A C Ko r R V I
System/3permanenterror conditionwhile in transmitmode
'*Causes
e r r o ri n d i c a t o sr e ti f a s s i g n efdo r
B S Cf i l e .o t h e r w i s e
halrs.
EOTor DLE EOTr+>
*Output
+
E O T o rD L EE O T
f r o m B S Cf i l e
*Causes
e r r o r i n d i c a t o r s e t i f a s s i g n e df o r
B S C f i l e . o t h e r w i s eh a l t s .
System/3 RPG II Interiace to BSC Line Protocol
11 3
Pageof SC21-75O7-5
lssued 24 September 1976
By TNL: SN21-5428
Data Mode,System/3Receiving
System/3SoftwarelAdapter
*
I n p u t f r o m B S Cf i l e
(automatia
c cknowledge)
System/3recovery(automatic)
I n p u tf r o m
System/3recovery(automatic)
*lnput
f r o m B S Cf i l e
Time-out
f
errro
System/3recovery(automaticl
I n p u t f r o m B S Cf i l e
System/3recovery(automatic)
System/3permanenterror conditionwhile in receivemode
* l n p u tf r o m
B S Cf i l e
*Causes
error indicatorset if assigned
for BSCfile, otherwisehalts'
E O To r D L EE O T +
*Causes
error indicatorset if assigned
for BSCfile, otherwisehalts.
114
N}
\,1
!
iJr
?EE-= : = r =
I n t e r n a t i o n a lB u s i n e s sM a c h i n e sC o r p o r a t i o n
G e n e r a lS y s t e m sD i v i s i o n
a r 7 7 5 DG l e n r i d g eD r i v e N . E "
A t l a n t a , G e o r g i a3 0 3 C i
(USA Only)
IBM \[,orldTrade Cr:rporation
8 2 1 L j n i t e d N a t i o n s P l a z a ,N e w Y o r k . N e w Y o r k 1 0 0 1 7
(lnternational)
R E A D E R 'C
SOMMENT
FORM
IBMSystem/3
R P G| | T e l e c o m m u n i c a t i o n s
Programming
R e f e r e n cM
e anual
sc21-7507-5
Y O U R C O M M E N T SP. L E A S E. . .
Y o u r c o m m e n t sa s s i s ut s i n i m p r o v i n gt h e u s e f u l n e sos f o u r p u b l i c a t i o n st;h e y a r e a n r m p o r r a n r
p a r t o f t h e i n p u t u s e d i n p r e p a r i n gu p d a t e st o t h e p u b l i c a t i o n s . A l l c o m m e n t s a n d s u g g e s t t o n s
becomethe property of lBM.
P l e a s ed o n o t u s e t h i s f o r m f o r t e c h n i c a lq u e s t i o n sa b o u t t h e s y s t e m o r f o r r e q u e s t sf o r a d d i t i o n a l
p u b l i c a t i o n st;h i s o n l y d e l a y st h e r e s p o n s e .I n s t e a d d
, i r e c t y o u r i n q u i r i e so r r e q u e s t st o y o u r I B M
r e p r e s e n t a t i voer t o t h e I B M b r a n c ho f f i c e s e r v i n gy o u r l o c a l i t y .
C o r r e c t i o n so r c l a r i fr c a t i o n sn e e d e d;
Page
Comment
l , e o u l r ll i k e a r e p l y .
I
Name ,
Acldress
O T h a n k y o u f o r y o u r c o o p e r a t i o n -N o p o s t a g en e c e s s d riyf m a i l e dr n t h e U . S . A
I
II
sc217507-5
II
I
I
II
=
o
f
a
f
o
I
I
i
II
I
I
I
F I R S TC T A S S
P E R M I TN O . 3 8 7
ROCHESTEM
R ,I N N .
NO POSTAGE STAMP NECESSARY IF MAILEO IN THE UNITED STATES
P O S T A G EW I I I . B E P A I D B Y
IBMCorporation
G e n e r aS
l y s t e m sD i v i s i o n
Development Laboratory
P u b l i c a t i o n sD, e p t .2 4 5
R o c h e s t e rM, i n n e s o t a5 5 9 0 1
a
<
l
l
o
-
r u )
l
T
l c )
t =
-
B U S I N E S SR E P L Y M A I L
l
l
t g
IT
---
r
=
t
l
o
t ^
t T l
=
1
O
l
z
l
o
t\)
l o o
i . -
r = .
Fold
Fold
t
l
o
6
rl
c
=
.,^
l b
I
l N )
t
!
, {
EEI=S
International BusinessMachines Corporation
General Systems Division
5 7 7 5 D G l e n r i d g eD r i v e N . E .
Atlanta, Georgia 30301
(USA Only)
IBM WorildTrade Corporation
8 2 1 U n i t r a dN a t i o n s P l a z a .N e w Y o r k , N e w Y o r k 1 0 0 1 7
{ l n t e r n a t r r oanl )
l 0 n
I
{
j
I
nq-;\q-\ n
/
IJLULII\ Technicat Newstetter
/
T h i s N e w s l e t t e rN o .
Date
sN21-5428
24 September
1976
/
B a s eP u b l i c a t i o N
n o.
F i l eN o .
PreviousNewsletters
S C 2 1 - 7 5 0 b7
53-30
None
IBM System/3
RPG ll Telecommunications
ProgrammingReferenceManual
O I B M C o r p .1 9 6 9 ,1 9 7 0 ,1 | g ] - j1, g 7 2 ,1 g t 3 . 1 g l '
T h i s t e c h n i c a ln e w s l e t t e r a
, p a r t o f v e r s i o n0 5 , m o d i f i c a t i o n 0 0 , o f t h e I B M S y s t e m / 3 M o d e l
15 RpG ll,
v e r s i o n0 2 , m o d i f i c a t i o n 0 0 , o f t h e I B M S y s t e m / 3 M o d e l 1 2 R P G l l ( p r o g r a mp r o d u c t
5 7 O 4 - R G 1,;
a n d v e r s i o n0 1 , m o d i f i c a t i o n 0 0 o f l B N 4S y s t e m / 3 S y s t e mC o n t r o l P r o g r a m ( p r o g r a mp r o d u c t
s 7 o 4 - S c 2 l,
p r o v i d e sr e p l a c e m e n p
t a g e sf o r t h e s u b j e c tp u b l i c a t i o n . T h e s er e p l a c e m e n tp a g e s
remainin effect for
v e r s i o n sa n d m o d i f i c a t i o n su n l e s ss p e c i f i c a l l ya l t e r e d . P a g e st o b e i n s e r t e d
a n d l o rr e m o v e d
::::to"t"t
C o v e r ,E d i t i o n N o t i c e
i i i t h r o u g hv i
1,2
9, 10
l5through 18
41,42
75 through 78
87 through 92
1 1 1 t h r o u g h1 1 4
Back Cover
R e a d e r ' sC o m m e n t F o r m , B u s i n e s sR e p l y
C h a n g e st o t e x t a n d i l l u s t r a t i o n sa r e i n d i c a t e db y a v e r t i c a ll i n e a t t h e l e f t
of the chanqe.
Summary of Amendments
C h a n g e se f f e c t e d b y P r o g r a mN u m b e r 5 7 o 4 - R c 2 a n d o t h e r m i s c e l l a n e o u s
c h a n g e sh a v e b e e n a d d e d .
A / o t e " P l e a s ef i l e t h i s c o v e r l e t t e r a t t h e b a c k o f t h e m a n u a l t o p r o v i d e
a r e c o r do f c h a n q e s .
f tsMcorporation,Pubrications,
Department 24s, Rochester,
Minnesota55901
O IBI\,,1
corp.1976
P r i n t e di n u . s . A
l f l n )\
\/
'J
llruJ_l';,[ TechnicalNewsletter
This NewsletterNo.
SN2l-5624
Date 30 June 1978
BasePublicationNo.
SC21-7507-5
File [\lo. 53-30
PreviousNewsletters SN21-S42g
IBM System/3
RPG ll Telecommunications
Programming
ReferenceManual
O I B MC o r p .1 9 6 91, 9 7 0 1
, 971,1972,197
13
9 ,7 5
Thistechnicalnewsletterappliesto the currentversions
and modificationsof the applicablesystem/3
programslistedin the edition notice
and providesreplacement
pagesfor the subjectpublication.These
replacement
pagesremainin effect for subsequent
versionsand modificationsunlessspecificallyaltered.
Pages
to be insertedand/orremovedare:
CoverE
, d i t i o nN o t i c e
9, 10
1 0 " 1 ,1 0 . 2( a d d e dt o
accommodate
movedtext)
11,12
35,36
75,76
80.1 through80.4 (added)
83, 84
87,88
89,90 (deleted)
Changes
to text and illustrationsare indicatedby a verticalline
at the
left of the changes.
Summaryof Amendments
M i s c el al r r e o utse c h n i c acl h a n g e s
y'y'ofe;Pleasefile this
cover letter at the back of the manual to provide
a record of changes.
f BM corporation,Publications,
Department24s, Rochester,
Minnesota55901
O t B MC o r p .1 9 7 8
Printed in U.S.A.
sc21-7507-5
@
(/,
(^)
T'
=
d
F
6'
3.
I
z
;qJ
G)
o
j-.
-'
tr
?
P
v,
o
N
\,1
('l
o
!
(t
InternationalBusinessMachinesCorporation
GeneralSystemsDivision
5775D GlenridgeDrive N.E.
Atlanta, Georgia30301
(USA Only)
IBM World Trade Corporation
821 United NationsPlaza,New York, New York 10017
(lnternational)
R E A D E R'COMM
S
ENT
FORM
IBM System/3
R P Gl l T e l e c o m m u n i c a t i o n s
Programming
Reference
Manual
sc21-7507-5
Y O U R C O M M E N T SP, L E A S E. . .
Y o u r c o m m e n t s a s s i s tu s i n i m p r o v i n g t h e u s e f u l n e s so f o u r p u b l i c a t i o n s ;t h e y a r e a n i m p o r t a n t
p a r t o f t h e i n p u t u s e d i n p r e p a r i n gu p d a t e st o t h e p u b l i c a t i o n s . A l l c o m m e n t s
and suggestions
becomethe property of lBM.
P l e a s ed o n o t u s e t h i s f o r m f o r t e c h n i c a lq u e s t i o n sa b o u t t h e s y s t e m o r f o r r e q u e s t sf o r a d d i t i o n a l
p u b l i c a t i o n s ;t h i s o n l y d e l a y st h e r e s p o n s e . I n s t e a d ,d i r e c t y o u r i n q u i r i e s r e q u e s t s y o u r
or
to
IBM
r e p r e s e n t a t i v eo r t o t h e I B M b r a n c h o f f i c e s e r v i n gy o u r l o c a l i t y .
C o r r e c t i o n so r c l a r i f i c a t i o n sn e e d e d :
hge
comment
I w o u l dl i k ea r e p l y .
n
Name
Address
o
Thank you for your cooperation. No postage necessaryif maired in the u.s.A.
I
I
sc21-7507-5
I
I
,
o
l
I
f
o
I
I
I
II
I
I
I
I
I
' @
=
l =
tvt
FIRSTCTASS
P E R M I TN O . 3 8 7
| (.)
ROCHESTEM
R ,I N N .
1tr
'l G! )
t t -
-{
-
B U S I N E S S R E P L Y M , AI ,L
NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITEDSTATES
POSTAGEWII,L BE PAID BY
t ( D
I-I
o
t l
--
6'
-rI
l o
l ^
.Tl
E
IBM Corporation
GeneralSystemsDivision
Development Laboratory
Publications,Dept. 245
Rochester,Minnesota55901
-
l o
z
!
t a
(^)
|r (",
o
I
!
t -
Fold
Fold
r5'
I' uttr
tP
lgD
c)
II JN
-l
| (tl
r o
lol
InternationalBusinessMachinesCorporation
GeneralSystemsDivision
5775DGlenridgeDriveN.E.
Atlanta, Georgia30301
(USA Only)
IBM World Trade Corporation
821 United NationsPlaza,New York, New York 10017
(lnternational)
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.4 Linearized : No Page Count : 146 Producer : iText 2.0.3 (by lowagie.com) Modify Date : 2010:08:22 11:18:07+02:00 Create Date : 2010:08:22 11:18:07+02:00EXIF Metadata provided by EXIF.tools