USREN23 ; SLC/MAM - Environment Check Rtn for USR*1*23;6/12/03
Source file <USREN23.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAIN | ; Check environment
; -- Set data for User Class to export: |
|
| SETXTMP | ; Set data for new User Class into ^XTMP:
; Use exterior data: |
|
| USRDUPS(SILENT) | ; Return IEN if site already has User Class
; If not, return 0 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^USR(8930 - [#8930] | USRDUPS+9 |
| ^XTMP("USR23" | SETXTMP+3*, SETXTMP+4*, SETXTMP+5*, SETXTMP+6*, SETXTMP+7*, USRDUPS+5, USRDUPS+8 |
| Name | Line Occurrences |
|---|---|
| $$USRDUPS | MAIN+5 |
| SETXTMP | MAIN+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DT | SETXTMP+3 |
| NAME | USRDUPS+2~, USRDUPS+8*, USRDUPS+9 |
| SILENT | USRDUPS~, USRDUPS+12 |
| U | SETXTMP+3 |
| USRDUPS | MAIN+4~, MAIN+5*, MAIN+6, USRDUPS+2~, USRDUPS+8*, USRDUPS+11*, USRDUPS+17 |
| USRY | USRDUPS+2~, USRDUPS+9*, USRDUPS+10, USRDUPS+11 |
| >> XPDABORT | MAIN+6* |