©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
AQAOPR7 ; IHS/ORDC/LJF - REVIEWED OCCURRENCES REPORT ;
Source file <AQAOPR7.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS | ; >>> ask if user wants to select closed or deleted occ
|
|
| DATES | ; >> ask user to choose date range
|
|
| END | ; >>> eoj
|
|
| USERS | ; >> ask user to screen by user
|
|
| DEV | ; >>> get print device
|
|
| TEAMS | ; >> ask user to screen by teams
|
|
| TYPE | ; >> ask user what type of report to print
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | DEV+2 |
| HOME^%ZIS | END+1 |
| ^%ZISC | DEV+8 |
| ^%ZTLOAD | DEV+8 |
| $$BDATE^AQAOLKP | DATES+1 |
| $$EDATE^AQAOLKP | DATES+2 |
| ^AQAOPR71 | DEV+3 |
| $$IND^AQAOPU | TYPE+7 |
| $$KF^AQAOPU | TYPE+7 |
| $$FACR^AQAOPU1 | TYPE+7 |
| EXPORT^AQAOUTIL | DEV+1 |
| KILL^AQAOUTIL | DEV+8, END+1 |
| ^DIR | STATUS+5, TYPE+5, USERS+2, USERS+6, TEAMS+2, TEAMS+5 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("AQAOPR7" | TYPE+1!, TYPE+8!, END+1! |
| Name | Line Occurrences |
|---|---|
| DATES | DATES+2, DEV+1 |
| END | STATUS+5, TYPE+5, DATES+1, DATES+2, DEV+2 |
| STATUS | USERS+3 |
| TEAMS | DATES+1 |
| TYPE | TYPE+5, TYPE+9 |
| USERS | TEAMS+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | DEV+2* |
| >> AQAOBD | DATES+1* |
| >> AQAODLM | DEV+7 |
| >> AQAOED | DATES+2* |
| >> AQAOO("TEAM" | TEAMS+3*, TEAMS+6* |
| >> AQAOO("USR" | USERS+3*, USERS+8*, USERS+9* |
| >> AQAOSTAT | STATUS+5* |
| >> AQAOTP | TYPE+7*, TYPE+9 |
| >> AQAOUA("USER" | DEV+1 |
| DIR | STATUS+2!, TYPE+1!, USERS+1!, USERS+5!, TEAMS+1!, TEAMS+5! |
| DIR("?" | TYPE+4* |
| DIR("A" | STATUS+2*, STATUS+3*, STATUS+4*, TYPE+3*, USERS+2*, USERS+5*, TEAMS+2* |
| DIR("B" | USERS+1*, TEAMS+1* |
| DIR(0 | STATUS+2*, TYPE+2*, USERS+1*, USERS+5*, TEAMS+1*, TEAMS+5* |
| >> DIRUT | STATUS+5, TYPE+5, USERS+3, USERS+4, USERS+6, TEAMS+3, TEAMS+4, TEAMS+5 |
| >> I | DEV+5* |
| IO | DEV+3 |
| IO("Q" | DEV+3, DEV+4! |
| >> POP | DEV+2 |
| U | TYPE+9, USERS+8, USERS+9, TEAMS+6, DATES+1, DATES+2, DEV+1 |
| >> X | TYPE+6*, TYPE+7 |
| >> Y | STATUS+5, TYPE+5, TYPE+7, USERS+4, USERS+7, USERS+8, USERS+9, TEAMS+4, TEAMS+6, DEV+1 |
| >> ZTDESC | DEV+4* |
| >> ZTRTN | DEV+4* |
| >> ZTSAVE( | DEV+5* |
| >> ZTSAVE("AQAODLM" | DEV+7* |
| >> ZTSAVE("^TMP(""AQAOPR7"",$J," | DEV+6* |
| ZTSK | DEV+8! |