Programming Interface Information: This information is NOT intended to be
used as Programming Interfaces of VM/ESA. It is to be used for diagnosis only.

CSLPL

Prolog  

Control Block Contents  

CSLPL DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

CSLPL Prolog

 NAME       : HCPCSLPL
 DESCRIPTION: Console macro parameter list
 DSECT      : CSLPL
 STATUS     : VM/ESA Version 2, Release 4.0
 LOCATED BY : HCPCONSL passes the address in a register
 CREATED BY : The HCPCSLPL is created by the HCPCONSL macro
              whenever a read or write is to be done.
 DELETED BY : The HCPCSLPL is deleted by the HCPCONSL macro
 REFERENCES : None.
 SERIALIZED : HCPCONSL gets free storage for each instance of this
              control block, so only one processor will be looking at
              any one instance of this control block at any one time.

 

CSLPL Control Block Content


CSLPL DSECT

Hex Dec Type/Val Lng Label (dup) Comments ---- ---- --------- ---- -------------- -------- 0000 0 Structure CSLPL Console macro parameter list 0000 0 Character 2 CSLCOMMN (0) common part 0000 0 Bitstring 2 CSLNEST how many caller's register to go back 0002 2 Character 1 CSLFUNDE (0) start of variable length data 0002 2 Character 12 CSLWRITE (0) 0002 2 Signed 2 CSLDADDR bddd of data 0004 4 Bitstring 1 CSLDATA data information flags 1... .... CSLNUM X'80' repository entry number .1.. .... CSLNUMRG X'40' repository entry number ..1. .... CSLIST X'20' list of repository numbers ...1 .... CSLDLNRG X'10' length of data is in a register .... 1... CSLSUBDT X'08' substitution data is passed .... .1.. CSLSUBRG X'04' substitution data is in a register .... ..1. CSLHLNRG X'02' header length is in a register .... ...1 CSLVMDRG X'01' VMDBK address is in a register 0005 5 Bitstring 1 CSLTYPE data type flags 1... .... CSLEMSG X'80' error message .1.. .... CSLIMSG X'40' informational message ..1. .... CSLFEMSG X'20' full error message ...1 .... CSLCRESP X'10' command response .... 1... CSLRDISP X'08' input redisplay .... .1.. CSLWNG X'04' warning message .... ..1. CSLMSG X'02' message to a user .... ...1 CSLMSGNH X'01' message no-header to a user 0006 6 Bitstring 1 CSLDFLG destination flags 1... .... CSLALTVM X'80' alternate vmdbk is specified .1.. .... CSLOPER X'40' data to be sent to the operator ..1. .... CSLTERM X'20' send data to terminal(not over IUCV, Diag 8 to buff,etc...) ...1 .... CSLGSDBK X'10' return data in a GSDBK .... 1... CSLTRMA X'08' force data to terminal also .... .1.. CSLTRMO X'04' force data to terminal only .... ..1. CSLINITP X'02' initial logon prompt .... ...1 CSLISSUS X'01' issuer's userid is specified 0007 7 Bitstring 1 CSLEFLG data edit flags .1.. .... CSLADTIM X'40' add timestamp to data ..1. .... CSLSPTIM X'20' suppress time stamp and cpu id ...1 .... CSLBRITE X'10' hilight this data .... 1... CSLCOLFM X'08' error message in column format .... .1.. CSLBLNKS X'04' do not delete trailing blanks .... ...1 CSLPRND X'01' prompt with no-display read 0008 8 Bitstring 1 CSLSFLG screen control flags 1... .... CSLALARM X'80' sound alarm .1.. .... CSLHIPRI X'40' this is high priority data, if user is in full screen, post an attention to the user ..1. .... CSLNDISP X'20' do not display data (or spool for reads) ...1 .... CSLCLEAR X'10' clear screen prior to displaying data .... 1... CSLIOCMP X'08' return after users IO completed .... .1.. CSLSCRFL X'04' return if data can fit on current screen .... ..1. CSLDROP X'02' drops the connection .... ...1 CSLIMMED X'01' if the user is in full screen, this message will break the user out of full screen. 0009 9 Bitstring 1 CSLPFLG Parameter address flag (address of address) 1... .... CSLDPTR X'80' parameter list points to address of data .1.. .... CSLIPTR X'40' parameter list points to address of issuers USERID ..1. .... CSLAPTR X'20' parameter list points to address of alternate VMDBK ...1 .... CSLSPTR X'10' parameter list points to address of substitution data/reg .... 1... CSLLPTR X'08' parameter list points to address of data length .... .1.. CSLHPTR X'04' parameter list points to address of header length 000A 10 Signed 2 CSLISSID bddd of the issuer's userid 000C 12 Signed 2 CSLVMDBK bddd of alternate VMDBK address @PA556FM 000E 14 Address 2 CSLCMPID bddd of 3-char component ID 0010 16 Character 1 CSLWTYDE (0) start of variable length data Write Type dependent parts 0010 16 Character 2 CSLSUBDA (0) 0010 16 Signed 2 CSLSBDAT bddd of substitution data 00000012 CSLSSIZE *-CSLPL 0010 16 Character 2 CSLSUBR (0) 0010 16 Signed 2 CSLSBREG register containing substitution data 00000012 CSLESIZE *-CSLPL 0010 16 Character 4 CSLBDAT (0) 0010 16 Signed 2 CSLDLGTH bddd of length of data being passed 0012 18 Signed 2 CSLHDRSZ bddd of length of message header 0014 20 Character 1 CSLPRMDE (0) start of variable length data 00000014 CSLQSIZE *-CSLPL The following CKMAINT invocations will detect when the CSLPRMDE field is not on the largest write dependent piece. If CKMAINT detects that it is not on the largest then the CSLPRMDE field should be moved to the largest and the CKMAINT invocations should be adjusted to properly detect the problem according to the new situation. 0014 20 Address 4 * (0) IEV075 wi ll result if *-CSLBDAT LT *-CSLSUBDA @P3714FM 0014 20 Address 4 * (0) IEV075 wil l result if *-CSLBDAT LT *-CSLSUBR @P3714FM Read dependent parts Any changes to the read fields should also be made to the prompted read fields. 0002 2 Character 1 CSLREAD (0) 0002 2 Bitstring 1 CSLRPARM read data flags 1... .... CSLNODSP X'80' do not display or spool this data .1.. .... CSLNOLED X'40' do not perform line editing ..1. .... CSLUPPER X'20' translate input line to upper case ...1 .... CSLCDRDR X'10' data from a card reader 00000003 CSLRSIZE *-CSLPL Prompted read dependent parts Any changes to the prompted read fields should also be made to the read fields. 0014 20 Character 1 CSLPREAD (0) 0014 20 Bitstring 1 CSLRFLAG read data flags 1... .... CSLNODIS X'80' do not display or spool this data .1.. .... CSLPNLED X'40' do not perform line editing ..1. .... CSLUPPR X'20' translate input line to upper case ...1 .... CSLCARDR X'10' data from a card reader 00000015 CSLPSIZE *-CSLPL Labels for XRef Purposes only .... .... CSLWRTEF X'00' WRITE to console specified .... .... CSLFRMTF X'00' WRITE(format) to GSDBK .... .... CSLREADF X'00' READ func specified .... .... CSLPRMPT X'00' PROMPT func specified .... .... CSLWAITF X'00' WAIT func specified .... .... CSLDATAK X'00' DATA keyword specified .... .... CSLCPDAT X'00' DATATYPE NONE .... .... CSLDSPCH X'00' DESTINATION dispatched .... .... CSLXNDSP X'00' DISPLAY NO .... .... CSLXNLED X'00' LINEEDIT NO .... .... CSLXUPPR X'00' CASE UPPER .... .... CSLXCRDR X'00' DEVICE CARDRDR

 

CSLPL Storage Layout

*** CSLPL - Console macro parameter list
*
*     +-------------+-----------------------------------------+
*   0 |  CSLNEST    |                                         |
*     +-------------+                                         |
*   8 |                                                       |
*     =                       CSLFUNDE                        =
*     |                                                       |
*     +-------------------------------------------------------+
*
*** CSLPL - Console macro parameter list
*** Overlay for CSLFUNDE in CSLPL
*
*                   +-------------+------+------+------+------+
*   0 ...         2 |  CSLDADDR   |:DATA |:TYPE |:DFLG |:EFLG |
*     +------+------+-------------+------+------+------+------+
*   8 |:SFLG |:PFLG |  CSLISSID   |  CSLVMDBK   |  CSLCMPID   |
*     +------+------+-------------+-------------+-------------+
*  10 |                                                       |
*     =                       CSLWTYDE                        =
*     |                                                       |
*     +-------------------------------------------------------+
*
*** Overlay for CSLFUNDE in CSLPL
*** Overlay for CSLWTYDE in CSLPL
*
*     +-------------+
*  10 |  CSLSBDAT   | 12
*     +-------------+
*
*** Overlay for CSLWTYDE in CSLPL
*** Overlay for CSLWTYDE in CSLPL
*
*     +-------------+
*  10 |  CSLSBREG   | 12
*     +-------------+
*
*** Overlay for CSLWTYDE in CSLPL
*** Overlay for CSLWTYDE in CSLPL
*
*     +-------------+-------------+
*  10 |  CSLDLGTH   |  CSLHDRSZ   | 14
*     +-------------+-------------+
*
*** Overlay for CSLWTYDE in CSLPL
*** Overlay for CSLFUNDE in CSLPL
*
*                   +------+
*   0 ...         2 |:RPARM| 3
*                   +------+
*
*** Overlay for CSLFUNDE in CSLPL
*** Overlay for CSLPRMDE in CSLPL
*
*                                 +------+
*  10 ...                      14 |:RFLAG| 15
*                                 +------+
*
*** Overlay for CSLPRMDE in CSLPL

 

CSLPL Cross Reference

(contains links to field and bit definitions)
Symbol         Dspl Value
-------------- ---- -----

CSLADTIM 0007 40

CSLALARM 0008 80

CSLALTVM 0006 80

CSLAPTR 0009 20

CSLBDAT 0010

CSLBLNKS 0007 04

CSLBRITE 0007 10

CSLCARDR 0014 10

CSLCDRDR 0002 10

CSLCLEAR 0008 10

CSLCMPID 000E

CSLCOLFM 0007 08

CSLCOMMN 0000

CSLCPDAT 0014 00

CSLCRESP 0005 10

CSLDADDR 0002

CSLDATA 0004

CSLDATAK 0014 00

CSLDFLG 0006

CSLDLGTH 0010

CSLDLNRG 0004 10

CSLDPTR 0009 80

CSLDROP 0008 02

CSLDSPCH 0014 00

CSLEFLG 0007

CSLEMSG 0005 80

CSLESIZE 0010 00000012

CSLFEMSG 0005 20

CSLFRMTF 0014 00

CSLFUNDE 0002

CSLGSDBK 0006 10

CSLHDRSZ 0012

CSLHIPRI 0008 40

CSLHLNRG 0004 02

CSLHPTR 0009 04

CSLIMMED 0008 01

CSLIMSG 0005 40

CSLINITP 0006 02

CSLIOCMP 0008 08

CSLIPTR 0009 40

CSLISSID 000A

CSLISSUS 0006 01

CSLIST 0004 20

CSLLPTR 0009 08

CSLMSG 0005 02

CSLMSGNH 0005 01

CSLNDISP 0008 20

CSLNEST 0000

CSLNODIS 0014 80

CSLNODSP 0002 80

CSLNOLED 0002 40

CSLNUM 0004 80

CSLNUMRG 0004 40

CSLOPER 0006 40

CSLPFLG 0009

CSLPNLED 0014 40

CSLPREAD 0014

CSLPRMDE 0014

CSLPRMPT 0014 00

CSLPRND 0007 01

CSLPSIZE 0014 00000015

CSLQSIZE 0014 00000014

CSLRDISP 0005 08

CSLREAD 0002

CSLREADF 0014 00

CSLRFLAG 0014

CSLRPARM 0002

CSLRSIZE 0002 00000003

CSLSBDAT 0010

CSLSBREG 0010

CSLSCRFL 0008 04

CSLSFLG 0008

CSLSPTIM 0007 20

CSLSPTR 0009 10

CSLSSIZE 0010 00000012

CSLSUBDA 0010

CSLSUBDT 0004 08

CSLSUBR 0010

CSLSUBRG 0004 04

CSLTERM 0006 20

CSLTRMA 0006 08

CSLTRMO 0006 04

CSLTYPE 0005

CSLUPPER 0002 20

CSLUPPR 0014 20

CSLVMDBK 000C

CSLVMDRG 0004 01

CSLWAITF 0014 00

CSLWNG 0005 04

CSLWRITE 0002

CSLWRTEF 0014 00

CSLWTYDE 0010

CSLXCRDR 0014 00

CSLXNDSP 0014 00

CSLXNLED 0014 00

CSLXUPPR 0014 00


This information is based on VM/ESA 2.4.0.
Last updated on 3 Aug 1999 at 11:48:50 EDT.
Copyright IBM Corporation, 1990, 1999