IBM SC34-5764-01 - Manual (Page 332)

State Codes
State codes for 12xx location codes:
01
panel name
02 protect/skip field
03 unprotect field
04 text within a protect/skip field
05 (not implemented yet)
06 explicit input field length number
07 unprotect variable
08 protect/skip variable
Input codes
Input codes for 12xx location codes:
01
Plain displayable text
02 Explicit length number
03 Protect field control character
04 Unprotect field control character
05 Variable control character
07 End of panel
08 Invalid or unknown input
Location Codes
Numbers under 1000 are in the mainline processor.
10xx
Panel generator common processor
11xx .DEFINE verb processor
12xx .PANEL verb processor
20xx Panel runtime command processor
21xx Dynamic attribute resolution processor
30xx Output 3270 data stream processor
40xx Input 3270 data stream and REXX variable assignment processor
90xx CICS interface processor
Examples of Sample Panels
Five examples of sample panel definitions follow.
Example 1
.DEFINE > prot blue
.DEFINE ? prot red
.DEFINE # unprot num green
.DEFINE < unprot invisible num
.DEFINE @ protect turq
.DEFINE + prot blue underline
.PANEL signon
> Panel signon
&companyname
?&message
@ Welcome to ACME On-Line Tax Services
+Please enter your Account Number and Personal ID Number and press ENTER>
>Account Number :#7&account_num
>PIN :<4&pin
Panel Facility
310 CICS TS for VSE/ESA: REXX Guide