©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
AGLSSN ; IHS/ASDS/EFG - LISTING OF PATIENTS W/O SSN ;
Source file <AGLSSN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WRITE | ;
|
|
| END | ;
|
|
| HDR | ||
| QUIT | ||
| PTS | ;
|
|
| PRQUE | ;ENTER FROM TASK MANAGER
|
|
| QUE | ||
| W1 | ||
| PROC | ;
|
| Name | Line Occurrences |
|---|---|
| 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) |
|---|---|
| ^AUPNPAT - [#9000001] | PROC+10, PROC+16, PROC+19 |
| ^AUTTLOC - [#9999999.06] | HDR+3 |
| ^DPT - [#2] | PROC+8, PROC+11, PROC+14, PROC+17, PROC+18 |
| ^TMP($J | PROC+1!, PROC+24*, WRITE+7, WRITE+8, WRITE+9, WRITE+10, END+2! |
| Name | Line Occurrences |
|---|---|
| END | WRITE+19, WRITE+21 |
| HDR | WRITE+5, WRITE+20 |
| PROC | W1+1 |
| QUE | W1+1 |
| QUIT | W1, QUE+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | W1* |
| >> %ZIS("B" | W1* |
| AG | QUIT!, QUE* |
| AG("ION" | W1+1* |
| AGBM | PROC+2*, WRITE+17, END+5! |
| AGD | WRITE+14*, WRITE+15, END+5! |
| AGDATE | PROC+6*, HDR+2, END+5! |
| AGDEC | PROC+11*, PROC+12, END+5! |
| AGDOB | PROC+18*, PROC+21*, PROC+24, WRITE+6*, WRITE+10*, WRITE+12, END+3! |
| >> AGEND | WRITE+6*, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+19*, WRITE+21 |
| AGFLAG | WRITE+4*, END+5! |
| AGHRN | PROC+19*, PROC+20, PROC+24, WRITE+6*, WRITE+9*, WRITE+10, WRITE+15, END+3! |
| AGIEN | END+5! |
| AGMVDF | END+5! |
| AGNAME | PROC+17*, PROC+23, PROC+24, WRITE+6*, WRITE+8*, WRITE+9, WRITE+10, WRITE+15, END+3! |
| AGNONACT | PROC+10*, PROC+12, END+5! |
| AGPAGE | WRITE+2*, HDR+3, HDR+6*, END+5! |
| AGPTS | PTS+6*, PROC+12, END+4! |
| AGR | WRITE+11*, WRITE+15, END+5! |
| AGREASON | PROC+16*, PROC+22*, PROC+24, WRITE+6*, WRITE+7*, WRITE+8, WRITE+9, WRITE+10, WRITE+11, END+3! |
| AGRECS | WRITE+1!, WRITE+3*, WRITE+16*, END+1, END+4! |
| AGSSN | PROC+14*, PROC+15, END+4! |
| D0 | PROC+7*, PROC+8*, PROC+10, PROC+11, PROC+14, PROC+16, PROC+17, PROC+18, PROC+19, END+4! |
| >> DFOUT | PTS+7 |
| DIR | PTS+5! |
| DIR("A" | PTS+2*, PTS+3* |
| DIR("B" | PTS+4* |
| DIR(0 | PTS+1* |
| >> DTOUT | PTS+7, WRITE+19 |
| >> DUOUT | PTS+7, WRITE+19 |
| DUZ(2 | PROC+10, PROC+19, HDR+3 |
| IO | W1, HDR |
| IO("Q" | W1+1, QUE! |
| ION | W1+1 |
| IOSL | PROC+2 |
| IOST | HDR |
| >> POP | W1 |
| U | PROC+10, PROC+11, PROC+14, PROC+16, PROC+17, PROC+18, PROC+19, HDR+3 |
| >> X | PROC+4, HDR+5* |
| >> Y | PTS+6, PROC+4*, PROC+6, WRITE+12*, WRITE+14 |
| >> ZTDESC | QUE* |
| >> ZTRTN | QUE* |
| >> ZTSAVE("AG*" | QUE* |
| >> ZTSK | QUE+1 |