©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
XGSA ;SFISC/VYD - screen attribute primitives ;03/15/95 13:50 [ 04/02/2003 8:29 AM ]
Source file <XGSA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ESC(XGATR) | ;return ESC codes of all attributes in XGATR
|
|
| CNV(ATR) | ;convert attribute from character to binary and vice-versa
|
|
| SET(XGNEWATR) | ;set screen attributes return only the ESC codes
|
|
| CHG(XGATR) | ;XGATR=passed attribute string ie: R1B0G1
|
|
| STAT(XGATR) | ;returns the state of a specific attribute
|
|
| CHG99(XGATR) | ;XGATR=passed attribute string ie: R1B0G1
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XUTL("XGATR" | SET+6, CHG99+15, CHG+12 |
| ^XUTL("XGATR1" | CHG99+4, CHG99+14 |
| Name | Line Occurrences |
|---|---|
| $$CNV | ESC+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CHG99+2~, CHG99+6*, CHG+2~, CHG+4*, ESC+2~, ESC+7* |
| ATR | CNV~, CNV+4, CNV+5 |
| >> IORESET | ESC+6, ESC+8 |
| U | ESC+7 |
| X | CHG99+2~, CHG+2~, ESC+2~, ESC+7*, CNV+3~, CNV+4*, CNV+5* |
| XGATR | CHG99~, CHG99+6, CHG~, CHG+4, STAT~, STAT+4, ESC~, ESC+3, ESC+5 |
| XGATRASC | CHG+2~, CHG+3*, CHG+8*, CHG+9*, CHG+10*, CHG+11 |
| XGATRLTR | CHG99+2~, CHG99+6*, CHG99+7, CHG99+8, CHG+2~, CHG+4*, CHG+5, CHG+6 |
| XGATRNO | CHG99+2~, CHG99+8*, CHG99+9 |
| >> XGATRSET( | ESC+7 |
| XGBIN | ESC+2~, ESC+5*, ESC+7 |
| XGBIT | CHG+2~, CHG+6*, CHG+8 |
| >> XGCURATR | SET+5*, CHG99+4, CHG99+14*, CHG99+15, CHG+3, CHG+11*, CHG+12, STAT+4 |
| XGCURBIN | CHG99+2~, CHG99+4*, CHG99+9*, CHG99+10*, CHG99+12*, CHG99+14 |
| >> XGEMPATR | ESC+3 |
| XGESC | CHG99+2~, ESC+2~, ESC+6*, ESC+7*, ESC+8*, ESC+9 |
| XGNEWATR | SET~, SET+5, SET+6 |
| XGONOFF | CHG99+2~, CHG99+6*, CHG99+9, CHG+2~, CHG+4*, CHG+8 |
| Y | CNV+3~, CNV+4*, CNV+5*, CNV+6*, CNV+7 |