z/OS Communications Server: SNA Programming
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


RPL (IFGRPL)

z/OS Communications Server: SNA Programming
SC27-3674-00

Figure 1. Format of the RPL (Part 1 of 2)
The diagram shows the format of the control block RPL. The corresponding displacements are from 0 to 112 in decimal.
Figure 2. Format of the RPL (Part 2 of 2)
The diagram shows the format of the control block RPL. The corresponding displacements are from 0 to 112 in decimal.
Note: For ISTUSFBC, see Table 1. For ISTRH, see Table 1.
Table 1. RPL DSECT (IFGRPL)
Parameter on RPL-based macro DSECT label DSECT EQU label Field or EQU value For EQU: Meaning when bit setting on For DS: Meaning when byte value set Offset
Dec Hex
AAREA RPLAAREA A Alternate data area address 76 4C
AAREALN RPLAARLN F Alternate data area length 80 50
ACB RPLDACB A ACB address 24 18
AREA RPLAREA A Data area address 32 20
AREALEN RPLBUFL F Data area length 52 34
ARECLEN RPLARCLN F Data length 84 54
ARG RPLEXTDS RPLNIB X'04' RPLARG points to an NIB 68 44
  RPLARG XL4 NIB address if RPLEXTDS=RPLNIB; CID otherwise (see NIB parameter) 36 24
BRACKET RPLRH3 RPLBB X'80' BRACKET=BB 16 10
    RPLEB X'40' BRACKET=EB 16 10
    RPLCEB X'01' BRACKET=CEB 16 10
BRANCH RPLEXTDS RPLBRANC X'02' BRANCH=YES 68 44
CHAIN RPLCHN RPLFIRST X'80' CHAIN=FIRST 18 12
    RPLMIDLE X'40' CHAIN=MIDDLE 18 12
    RPLLAST X'20' CHAIN=LAST 18 12
    RPLONLY X'10' CHAIN=ONLY 18 12
CHNGDIR RPLRH3 RPLCMD X'20' CHNGDIR=CMD 16 10
CODESEL RPLRH3 RPLCS1 X'08' CODESEL=ALT 16 10
CONTROL (settings mutually exclusive) RPLCNTRL XL3 Request unit control codes 21 15
  RPLCNTDF RPLDATA X'80' CONTROL=DATA 21 15
    RPLCNCEL X'40' CONTROL=CANCEL 21 15
    RPLQC X'20' CONTROL=QC 21 15
    RPLQEC X'10' CONTROL=QEC 21 15
    RPLCHASE X'08' CONTROL=CHASE 21 15
    RPLRELQ X'04' CONTROL=RELQ 21 15
  RPLCNTDC RPLBID X'80' CONTROL=BID 22 16
    RPLRTR X'40' CONTROL=RTR 22 16
    RPLLUS X'20' CONTROL=LUS 22 16
    RPLSIGNL X'10' CONTROL=SIGNAL 22 16
    RPLTBIND X'08' CONTROL=BIND 22 16
    RPLTUNBD X'04' CONTROL=UNBIND 22 16
    RPLSBI X'02' CONTROL=SBI 22 16
    RPLBIS X'01' CONTROL=BIS 22 16
  RPLCNTSC RPLSDT X'80' CONTROL=SDT 23 17
    RPLCLEAR X'40' CONTROL=CLEAR 23 17
    RPLSTSN X'20' CONTROL=STSN 23 17
    RPLSHUTD X'10' CONTROL=SHUTD 23 17
    RPLSHUTC X'08' CONTROL=SHUTC 23 17
    RPLRQR X'04' CONTROL=RQR 23 17
    RPLRSHUT X'02' CONTROL=RSHUTD 23 17
    RPLSWTCH X'01' CONTROL=SWITCH 23 17
CRYPT RPLEXTDS RPLCRYP X'08' CRYPT=YES 68 44
ECB RPLOPT1 RPLECBIN X'01' External ECB used 40 28
  RPLECB A Address of external ECB if RPLOPT1 equal to RPLECBIN and RPLEXTDS equal to RPLNEXIT and RPLEXTDS not equal to RPLEXIT (see EXIT parameter) 8 8
EXIT RPLEXTDS RPLNEXIT X'40' No RPL exit specified 68 44
    RPLEXIT X'20' RPL exit specified 68 44
  RPLECB A Address of RPL exit if RPLEXTDS not equal to RPLNEXIT and RPLEXTDS equal to RPLEXIT and RPLOPT1 not equal to RPLECBIN (see ECB parameter) 8 8
FDBK RPLFDB3 XL1 Feedback data flags 15 F
FDBK2 RPLFDB2 XL1 Feedback reason code (see Return codes and sense fields for RPL-based macroinstructions) 14 E
IBSQAC RPLIBSQ RPLISET X'80' IBSQAC=SET 65 41
    RPLITST X'40' IBSQAC=TESTSET 65 41
    RPLIRSET X'20' IBSQAC=RESET 65 41
    RPLIIGN X'10' IBSQAC=IGNORE 65 41
    RPLIPOS X'08' IBSQAC=TESTPOS 65 41
    RPLINEG X'04' IBSQAC=TESTNEG 65 41
    RPLIINV X'02' IBSQAC=INVALID 65 41
IBSQVAL RPLIBSQV XL2 STSN inbound sequence number 62 3E
NIB RPLEXTDS RPLNIB X'04' RPLARG points to an NIB 68 44
  RPLARG XL4 NIB address if RPLEXTDS=RPLNIB; CID otherwise (see ARG parameter) 36 24
OBSQAC RPLOBSQ RPLOSET X'80' OBSQAC=SET 64 40
    RPLOTST X'40' OBSQAC=TESTSET 64 40
    RPLORSET X'20' OBSQAC=RESET 64 40
    RPLOIGN X'10' OBSQAC=IGNORE 64 40
    RPLOPOS X'08' OBSQAC=TESTPOS 64 40
    RPLONEG X'04' OBSQAC=TESTNEG 64 40
    RPLOINV X'02' OBSQAC=INVALID 64 40
OBSQVAL RPLOBSQV XL2 STSN outbound sequence number 60 3C
OPTCD RPLOPT1 RPLASY X'08' OPTCD=ASY 40 28
OPTCD RPLOPT4 RPLPERS X'80' SETLOGON OPTCD=PERSIST 43 2B
    RPLNPERS X'40' SETLOGON OPTCD=NPERSIST 43 2B
    RPLINQPS X'20' INQUIRE OPTCD=PERSESS 43 2B
    RPLOPRES X'10' OPNDST OPTCD=RESTORE 43 2B
    RPLSLTMR X'08' PSTIMER specified on SETLOGON 43 2B
    RPLNQN X'04' INQUIRE OPTCD=NQN 43 2B
    RPLEXTOP X'01' RPLOPT4 byte holds an extended OPTCD value, see RPLOPT4X description for byte value meanings instead of other RPLOPT4 bit definitions. 43 2B
  RPLOPT4X     Extended OPTCD value byte    
    RPLSTGNA X'01' SETLOGON OPTCD=GNAMEADD 43 2B
    RPLSTGND X'03' SETLOGON OPTCD=GNAMEDEL 43 2B
    RPLSTGNS X'05' SETLOGON OPTCD=GNAMESUB 43 2B
    RPLIQSNM X'21' INQUIRE OPTCD=SESSNAME 43 2B
    RPLCGEAF X'41' CHANGE OPTCD=ENDAFFIN 43 2B
    RPLCGEF X'43' CHANGE OPTCD=ENDAFFNF 43 2B
    RPLSP_NoTimer _FTOALL X'81' SETLOGON OPTCD=PERSIST, (PARMS=(FORCETKO=ALL)) 43 2B
    RPLSP_NoTimer _FTONONE X'83' SETLOGON OPTCD=PERSIST, (PARMS=(FORCETKO=NONE)) 43 2B
    RPLSP_NoTimer _FTOSNGL X'85' SETLOGON OPTCD=PERSIST, PARMS=(FORCETKO=SINGLE)) 43 2B
    RPLSP_NoTimer _FTOMULT X'87' SETLOGON OPTCD=PERSIST, PARMS=(FORCETKO=MULTI)) 43 2B
    RPLSP_Timer _FTOALL X'89' SETLOGON OPTCD=PERSIST, PARMS=(FORCETKO=ALL, PSTIMER=value)) 43 2B
    RPLSP_Timer _FTONONE X'8B' SETLOGON OPTCD=PERSIST, (PARMS=(FORCETKO=NONE, PSTIMER=value)) 43 2B
    RPLSP_Timer _FTOSNGL X'8D' SETLOGON OPTCD=PERSIST, PARMS=(FORCETKO=SINGLE, PSTIMER=value)) 43 2B
    RPLSP_Timer _FTOMULT X'8F' SETLOGON OPTCD=PERSIST, PARMS=(FORCETKO=MULTI, PSTIMER=value)) 43 2B
  RPLOPT5 RPLDLGIN X'80' OPTCD=CS 56 38
    RPLTNFY X'40' PARMS=THRDPTY= NOTIFY 56 38
    RPLPSOPT X'20' OPTCD=PASS 56 38
    RPLNODE X'02' OPTCD=ANY 56 38
    RPLCNDCS X'01' OPTCD=CONDCS (used along with RPLDLGIN: RPLDLGIN = 1 and RPLCNDCS = 1 indicates Conditional CS mode, RPLDLGIN = 1 and RPLCNDCS = 0 indicates normal CS mode) 56 38
  RPLOPT6 RPLCOND X'10' OPTCD=COND 57 39
    RPLNCOND X'08' OPTCD=UNCOND 57 39
    RPLXBUFL X'04' OPTCD=XBUFLST 57 39
    RPLBUFFL X'02' OPTCD=BUFFLST 57 39
    RPLCONTC X'01' OPTCD=CONTCHN 57 39
  RPLOPT7 RPLCNALL X'80' OPTCD=CONALL 58 3A
    RPLCNANY X'40' OPTCD=CONANY 58 3A
    RPLQOPT X'10' OPTCD=Q 58 3A
    RPLRLSOP X'04' OPTCD=RELRQ 58 3A
    RPLLMPEO X'01' OPTCD=LMPEO 58 3A
  RPLOPT8 RPLODACQ X'80' OPTCD=ACQUIRE 59 3B
    RPLODACQ X'40' OPTCD=ACCEPT 59 3B
    RPLUSRRH X'01' OPTCD=USERRH 59 3B
  RPLOPT9 RPLLOGON X'80' OPTCD=LOGONMSG 96 60
    RPLDEVCH X'40' OPTCD=DEVCHAR 96 60
    RPLTERMS X'20' OPTCD=TERMS 96 60
    RPLCOUNT X'10' OPTCD=COUNTS 96 60
    RPLAPPST X'08' OPTCD=APPSTAT 96 60
    RPLINQST X'04' OPTCD=STATUS 96 60
    RPLCIDE X'02' OPTCD=CIDXLATE 96 60
    RPLTOPL X'01' OPTCD=TOPLOGON 96 60
  RPLOPT10 RPLSPARM X'20' OPTCD=SESSPARM 97 61
    RPLTSKY X'10' OPTCD=SESSKEY 97 61
    RPLUNBND X'04' OPTCD=UNBIND 97 61
    RPLSONOP X'02' OPTCD=SONCODE 97 61
    RPLSENOP X'01' OPTCD=SENSE 97 61
  RPLOPT11 RPLQUIES X'80' OPTCD=QUIESCE 98 62
    RPLSTART X'40' OPTCD=START 98 62
    RPLSTOP X'20' OPTCD=STOP 98 62
    RPLHOLD X'10' OPTCD=HOLD 98 62
    RPLMTS X'04' OPTCD=MTS 98 62
    RPLTERMQ X'02' OPTCD=TERMQ 98 62
    RPLKPSRB X'01' OPTCD=KEEPSRB 98 62
  RPLOPT12 RPLRSPQD X'80' OPTCD=RSPQUED 99 63
    RPLKEEP X'40' OPTCD=KEEP 99 63
    RPLTRUNC X'20' OPTCD=TRUNC 99 63
    RPLNIBTK X'10' OPTCD=NIBTK 99 63
    RPLQSESS X'08' OPTCD=QSESSLIM 99 63
    RPLQNOTE X'04' OPTCD=QNOTENAB 99 63
    RPLQALL X'02' OPTCD=QALL 99 63
    RPLFMHDR X'01' OPTCD=FMHDR 99 63
PARMS RPLSONCD   XL1 PARMS=SONCODE=code UNBIND type code (Son code) 31 1F
POST RPVTFL1 RPLRSPNM X'02' At least one response on normal flow inbound response queue 19 13
    RPLRSPQR X'01' At least one QRI response on normal flow inbound data queue. 19 13
POST RPLVTFL2 RPLSCHED X'80' POST=SCHED 20 14
RECLEN RPLRLEN A RECLEN value 48 30
REQ  RPLREQ RPLQUISE X'15' SETLOGON 2 2
    RPLSMLGO X'16' SIMLOGON 2 2
    RPLOPNDS X'17' OPNDST 2 2
    RPLCHNG X'19' CHANGE 2 2
    RPLINQIR X'1A' INQUIRE 2 2
    RPLINTPT X'1B' INTRPRET 2 2
    RPLCLOSE X'1F' CLSDST 2 2
    RPLSNDCD X'22' SEND 2 2
    RPLRCVCD X'23' RECEIVE 2 2
    RPLRSRCD X'24' RESETSR 2 2
    RPLSSCCD X'25' SESSIONC 2 2
    RPLSDCMD X'27' SENDCMD 2 2
    RPLRVCMD X'28' RCVCMD 2 2
    RPLTREQS X'29' REQSESS 2 2
    RPLTOPNS X'2A' OPNSEC 2 2
    RPLTRMS X'2C' TERMSESS 2 2
    RPL6APPC X'62' APPCCMD 2 2
RESPOND RPLVTFL2 RPLQRI X'08' RESPOND=QRESP 20 14
    RPLEX X'04' RESPOND=EX 20 14
    RPLNFME X'02' RESPOND=NFME 20 14
    RPLRRN X'01' RESPOND=RRN 20 14
RPLLEN RPLLEN XL1 RPL length 3 3
RTNCD RPLRTNCD XL1 RPL return code (see Return codes and sense fields for RPL-based macroinstructions and ISTUSFBC DSECT in this appendix) 13 D
RTYPE RPLSRTYP RPLRRESP X'08' RTYPE=RESP 17 11
    RPLNFSYN X'04' RTYPE=NDFSYN 17 11
    RPLDFASY X'02' RTYPE=DFASY 17 11
SEQNO RPLSEQNO XL2 Sequence number 66 42
  RPLEXTDS RPLXSRV X'01' Entire XBUFLST accepted by VTAM® 68 44
SIGDATA RPLSIGDA XL4 Signal data 108 6C
SSENSEI RPLSSEI RPLPATHI X'80' SSENSEI=PATH 88 58
    RPLCPMI X'40' SSENSEI=CPM 88 58
    RPLSTATI X'20' SSENSEI=STATE 88 58
    RPLFII X'10' SSENSAI=FI 88 58
    RPLRRI X'08' SSENSEI=RR 88 58
SSENSEO RPLSSEO RPLCPMO X'40' SSENSEO=CPM 100 64
    RPLSTATO X'20' SSENSEO=STATE 100 64
    RPLFIO X'10' SSENSEO=FI 100 64
    RPLRRO X'08' SSENSEO=RR 100 64
SSENSMI RPLSSMI XL1 System sense modifier input 89 59
SSENSMO RPLSSMO XL1 System sense modifier output 101 65
STYPE RPLSRTYP RPLSRESP X'80' STYPE=RESP 17 11
USENSEI RPLUSNSI XL2 User sense input 90 5A
USENSEO RPLUSNSO XL2 User sense output 102 66
USER RPLUSFLD XL4 User data field 92 5C
  RPLURH XL3 User RH 28 1C
  RPLACTIV X'FF' RPL is active (cleared by CHECK macro) 69 45

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014