Hi all,
I want to change the logon panel 's color.I cannot find
how to control the color of the TEXT in USSTAB.Anybody
know where IBM explain how to control that?Thanks a lot.
BR
YY
My usstabis look like that:
USSN TITLE '-- ACF/VTAM USS TABLE FOR NONSNA DEVICES'
SPACE
*/* ------------------------------------------------------------------
*/*
*/* USS TABLE FOR NONSNA DEVICES ...
*/*
*/* . CAN USE 3270 CONTROL CHARACTERS
*/*
*/* ------------------------------------------------------------------
SPACE
USSN USSTAB FORMAT=DYNAMIC
SPACE
LOGON USSCMD CMD=LOGON,REP=LOGON,FORMAT=BAL
USSPARM PARM=P1,REP=DATA,DEFAULT=' '
USSPARM PARM=LOGMODE
USSPARM PARM=APPLID,DEFAULT='TSO'
SPACE
CICSA USSCMD CMD=CICSA,REP=LOGON,FORMAT=BAL
USSPARM PARM=P1,REP=DATA
USSPARM PARM=LOGMODE
USSPARM PARM=APPLID,DEFAULT='CICSA'
EJECT
USSMSG10 USSMSG MSG=10,BUFFER=(BUF010,SCAN)
BUF010 DS 0H
DC AL2(END010-BUF010)
*
DC X'F5C7' COMMAND + WCC
DC X'11',AL2(((24-1)*80)+(80-1)) R=24,C=80
DC X'1DC8' PROTECTED,INTENSIFIED
*
DC X'11',AL2(((02-1)*80)+(01-1)) R=01,C=01
DC C' IBM z/OS SYSTEM V1R9 '
DC C' IP Address = @@@@@@@@@IPADDR '
*
DC X'11',AL2(((03-1)*80)+(01-1)) R=02,C=01
DC C' '
DC C' VTAM Terminal = @@LUNAME '
*
DC X'11',AL2(((19-1)*80)+(01-1)) R=19,C=01
DC C' STARTED DATE : 20'
DC C'08-03-27 '
*
DC X'11',AL2(((23-1)*80)+(80-1)) R=23,C=80
DC X'1D40' UNPROTECTED
DC X'13' INSERTCURSOR
END010 EQU *
EJECT
END USSEND
END , END OF ASSEMBLY
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
