©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
XUSG1 ;SF-ISC/STAFF - SIGNON from GUI screen ;9/28/94 14:54 [ 04/02/2003 8:29 AM ]
Source file <XUSG1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OK2 | ;OK button from welcome
|
|
| NEXT | ;
|
|
| USERG | ;Call from in OK Callback
|
|
| DIVSET | ;Setup the DIV list box
|
|
| DD(Y) | ||
| CHVC | ;The Verify code needs changing
|
|
| DIV | ;Select a div
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | DIVSET+2, DIVSET+5 |
| ^VA(200 - [#200] | DIVSET+2, DIVSET+4 |
| Name | Line Occurrences |
|---|---|
| CHVC | USERG+2, USERG+3 |
| DIVSET | USERG+11 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DIVSET+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | DIVSET+2, DIVSET+4, CHVC+3* |
| DUZ(2 | DIVSET+7*, DIV+3* |
| FOCUS | USERG+1~, USERG+13, DIVSET+1*, DIVSET+3* |
| G | DIV+1~*, DIV+2, DIV+3 |
| >> J | USERG+6*, USERG+7, USERG+8, USERG+9, DIVSET+4*, DIVSET+5 |
| >> N | USERG+7*, USERG+8, USERG+9 |
| U | USERG+2, USERG+3, DIVSET+5 |
| WIN | USERG+1~ |
| WIN("XUS2" | USERG+7*, USERG+8*, USERG+9*, USERG+12, DIVSET+1*!, DIVSET+3*, DIVSET+5*, DIVSET+7* |
| WNM | DIV+1~*, DIV+2, DIV+3 |
| >> X | DIVSET+2*, DIV+3* |
| >> XGWIN | DIV+2, DIV+3 |
| >> XOPT | USERG+3 |
| XUJ | CHVC+1~, CHVC+3 |
| XUJ(1 | CHVC+2* |
| XUJ(2 | CHVC+2* |
| XUJ(3 | CHVC+2* |
| >> XUM | USERG+4*, CHVC+3* |
| >> XUSER(1 | USERG+2, USERG+3 |
| XUTEXT | USERG+1! |
| XUTEXT( | USERG+6, USERG+8 |
| Y | DIVSET+2*, DIVSET+7, DD~ |