USRU ; SLC/PKR - Utility subroutines for USR ;1/24/00 11:03
Source file <USRU.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Authorization Subscription | 6 | USRCLST USRHELP USRMEMBR USRRULA USRUMMBR ^USR(8930.3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| READ(TYPE,PROMPT,DEFAULT,HELP,SCREEN) | ; Calls reader, returns response
|
|
| READX | ||
| VALID(Y) | ; USES DA TO FIND RECORD(8930.3)
; Check to verify Expiration date is not less than Effective date |
|
| VALID2(Y) | ; USES DA TO FIND RECORD(8930.3)
; Check and verify Effective date is not greater than Expiration |
|
| STOP(PROMPT,SCROLL) | ; Call DIR at bottom of screen
|
|
| STOPX |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^USR(8930.3 - [#8930.3] | VALID+3, VALID2+3, VALID2+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | VALID+10, VALID2+11, VALID2+12! |
| A(1 | VALID+6*, VALID2+7* |
| A(2 | VALID+7*, VALID2+8* |
| A(3 | VALID+8*, VALID+9*, VALID2+9*, VALID2+10* |
| >> DA | VALID+3, VALID2+3, VALID2+4 |
| DEFAULT | READ~, READ+5 |
| DIR | READ+1~, STOP+1~ |
| DIR("?" | READ+6*, STOP+5* |
| DIR("A" | READ+4*, STOP+4* |
| DIR("B" | READ+5* |
| DIR("S" | READ+3* |
| DIR(0 | READ+2*, STOP+4* |
| DIRUT | STOP+6! |
| >> DTOUT | STOP+7 |
| HELP | READ~, READ+6 |
| >> IORVOFF | VALID+9, VALID2+10 |
| >> IORVON | VALID+6, VALID2+7 |
| IOSL | STOP+3 |
| IOST | STOP+2 |
| PROMPT | READ~, READ+4, STOP~, STOP+4 |
| SCREEN | READ~, READ+3 |
| SCROLL | STOP~, STOP+3 |
| TYPE | READ~, READ+2 |
| U | READ+9, VALID+3, VALID2+3, VALID2+4, STOP+7 |
| X | READ+1~, READ+8, VALID+4*, VALID2+5*, STOP+1~ |
| Y | READ+1~, READ+8*, READ+9*, READX, VALID~, VALID+2, VALID+3, VALID2~, VALID2+2, VALID2+4 , STOP+1~, STOP+2*, STOP+6, STOP+7*, STOPX |
| Y(0 | READ+9 |
