ASUUHDG ; IHS/ITSC/LMH - SAMS MENU HEADINGS ;
Source file <ASUUHDG.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HDG | ;EP ; ----- TEXT OF THE MENU HEADING -----
|
|
| AC | ;EP ; ----- WRITES WARNING MESSAGE IF FILEMAN ACCESS CODE NOT RIGHT -----
|
|
| EN | ;EP
; ----- ENTRY POINT CALLED BY ENTRY ACTION FIELD ----- |
|
| WRITE(ASUUTXT,ASUUCTR,ASUU) | ||
| LOWCASE(X,Y) | ;
|
|
| HDR(ASUUM) | ||
| RV | ;EP ; ----- WRITES WARNING MESSAGE IF REVERSE VIDEO NOT DEFINED -----
|
|
| RVTXT | ;EP ; ----- TEXT FOR REVERSE VIDEO WARNING MESSAGE -----
|
|
| SETT | ;EP;
|
|
| SETU | ;EP;
|
|
| KILL | ;EP ; ----- CLEAN UP VARIABLES -----
|
|
| STR(ASUUX,ASUU) | ||
| HOME | ;EP ; ----- SETS HOME DEVICE IO VARIABLES -----
|
|
| SETY(X,ASUU) | ;EP;
|
|
| PAWS | ;EP ; ----- GIVE USER CHANCE TO ESCAPE -----
|
|
| ACTXT | ;EP ; ----- TEXT FOR FM ACCESS CODE WARNING MESSAGE -----
|
|
| CLS | ;EP ;FORM FEED OR CLEAR SCREEN
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(2 - [#3.2] | HOME+2 |
| ^DIC(9.4 - [#9.4] | HDR+6, HDR+7 |
| ^VA(200 - [#200] | HDR+11 |
| Name | Line Occurrences |
|---|---|
| LOWCASE | SETT+4 |
| SETY | SETU+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACROF | HOME+3*, RV+1 |
| >> ACRON | HOME+3*, RV+1 |
| >> ACRTRM | HOME+2*, HOME+3 |
| >> ASUF("WARN" | WRITE+7* |
| >> ASUK( | CLS+5 |
| >> ASUK("HDG" | HDR+5!, HDR+7*, HDR+8*, HDR+9*, HDR+10*, HDR+12*, HDR+13*, SETU+1, SETU+2, SETU+3 , SETU+4 |
| >> ASUK("PTR" | CLS+4, CLS+5 |
| >> ASUL(1 | HDR+8, HDR+9 |
| >> ASUL(11 | SETT+4, SETU+5 |
| >> ASUL(2 | HDR+10 |
| ASUU | RV+4!, RV+6, RV+8!, HDR+15, HDR+16!, WRITE~, WRITE+10, SETU+6, SETY~, SETY+2 , KILL+1!, STR~ |
| ASUU( | STR+7 |
| ASUU(1 | RV+5*, HDR+7*, SETU+1* |
| ASUU(2 | HDR+8*, HDR+9*, SETU+2* |
| ASUU(3 | HDR+10*, SETU+3* |
| ASUU(4 | HDR+12*, SETU+4* |
| ASUU(5 | HDR+13*, SETU+5* |
| ASUUCTR | WRITE~, WRITE+10, KILL+1! |
| ASUUI | WRITE+8*, KILL+1! |
| ASUUM | HDR~, HDR+13 |
| >> ASUUOUT | EN+4*, EN+6, PAWS+3* |
| ASUUTXT | WRITE~, KILL+1! |
| ASUUX | WRITE+9*, WRITE+10, KILL+1!, STR~, STR+6, STR+7*, STR+8 |
| DIR | PAWS+2! |
| DIR(0 | PAWS+2* |
| >> DIROUT | EN+3 |
| >> DTOUT | EN+3, HDR+9 |
| >> DUOUT | EN+3, HDR+9 |
| DUZ | HDR+11 |
| DUZ(0 | AC+1 |
| IOF | RV+2, HDR+14, CLS+1, CLS+2 |
| IOM | WRITE+10 |
| IOST | PAWS+1 |
| IOST(0 | HOME+2 |
| U | HOME+3, HDR+7, HDR+11, SETT+2, SETU+5 |
| X | SETT+1~, SETT+2*, SETT+4*, SETT+5, LOWCASE~, LOWCASE+1, SETY~ |
| XQUIT | EN+2!, EN+6* |
| >> XQY0 | SETT+2, SETU+5 |
| Y | HDR+5~, HDR+6*, HDR+7, HDR+11*, HDR+12, SETT+4*, SETT+5*, LOWCASE~, LOWCASE+4*, LOWCASE+5* , SETY+1*, SETY+2*, PAWS+3 |
| Z | LOWCASE+1~* |
| Z(1 | LOWCASE+1*, LOWCASE+2, LOWCASE+5 |
| Z(2 | LOWCASE+2*, LOWCASE+3 |
| Z(3 | LOWCASE+3*, LOWCASE+5 |
| Name | Field # of Occurrence |
|---|---|
| $T(@ASUUTXT+ASUUI | WRITE+8, WRITE+9 |
| $T(HDG+X | SETY+1 |