©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
ORSNAST ;SLC/RAF - Policy order search ;06/25/2007
Source file <ORSNAST.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | ^%ZIS ^%ZISC ^%ZTLOAD |
| Order Entry Results Reporting | 1 | EN^ORSNAST1 |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 1 | OR NATURE/STATUS ORDER SEARCH |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SORT | ||
| SERV | ;sets the variable SERVICE equal to 1 if the user wants to sort by
|
|
| SDATE | ;sets DIR call to ask the user for a starting date
|
|
| EN | ;
|
|
| FORMAT | ;allows choice of formats for evaluation purpose
|
|
| LONER | ;sets DIR call to allow the user to select a single service/section
|
|
| CKDATE | ; Make sure the end date is not older than the start date.
|
|
| SINGLE | ;sets variable SINGLE to set up a search of a single service
|
|
| TASK | ;
|
|
| EXIT | ;
|
|
| EDATE | ;sets DIR call to ask the user for an ending date (optional)
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("ORNS" | EN+1!, EXIT+1! |
| ^TMP("ORSERV" | EN+1!, EXIT+1! |
| Name | Line Occurrences |
|---|---|
| CKDATE | SORT+9, CKDATE+5 |
| EDATE | SORT+8, CKDATE+4 |
| EXIT | SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+1, TASK+10 |
| SDATE | SORT+7, CKDATE+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | TASK+1* |
| DASH | EN+3~ |
| DATE | EN+3~ |
| DFN | EN+3~ |
| DIR | EN+3~, SORT+3!, SORT+6!, FORMAT+4!, SERV+7!, SINGLE+5!, LONER+5!, SDATE+4!, EDATE+4! |
| DIR("?" | SORT+2*, FORMAT+3*, SERV+5*, SINGLE+4*, SDATE+3*, EDATE+3* |
| DIR("A" | SORT+1*, SORT+5*, FORMAT+2*, SERV+4*, SINGLE+3*, LONER+4*, SDATE+2*, EDATE+2* |
| DIR("B" | SERV+6*, SINGLE+2* |
| DIR(0 | SORT*, SORT+4*, FORMAT+1*, SERV+3*, SINGLE+2*, LONER+3*, SDATE+1*, EDATE+1* |
| DTOUT | EN+3~, SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+5 , SDATE+4, EDATE+4, CKDATE+3, CKDATE+4 |
| DUOUT | EN+3~, SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+5 , SDATE+4, EDATE+4, CKDATE+3, CKDATE+4 |
| EDATE | EN+3~, EDATE+4*, EDATE+5*, CKDATE+1 |
| FORMAT | EN+3~, FORMAT+4*, SERV+2, SINGLE+1, LONER+1 |
| HDR | EN+3~ |
| HDR1 | EN+3~ |
| IEN | EN+3~ |
| IO | TASK+9 |
| IO("Q" | TASK+2! |
| IOF | EN+2 |
| ION | TASK+3 |
| LOC | EN+4~ |
| LONER | EN+4~, LONER+1 |
| LONER( | LONER+5* |
| ORIGVIEW | EN+4~ |
| PAGE | EN+4~ |
| PNM | EN+4~ |
| >> POP | TASK+1 |
| PROV | EN+4~ |
| QUIT | EN+4~, LONER+1, LONER+2, LONER+5* |
| REF | EN+4~ |
| RPDT | EN+4~ |
| SDATE | EN+4~, SDATE+4*, SDATE+5*, CKDATE+1 |
| SEARCH | EN+5~, SORT+6* |
| SER | EN+4~ |
| SERVICE | EN+4~, SERV+7*, SINGLE+1, LONER+1 |
| SIGNED | EN+5~ |
| SINGLE | EN+5~, SINGLE+5*, LONER+1 |
| SNAME | EN+5~, SORT+6* |
| SORT | EN+5~, SORT+3*, SORT+4, SORT+5 |
| SSN | EN+5~ |
| STATUS | EN+5~ |
| STOP | EN+4~ |
| SUB | EN+5~ |
| TEXT | EN+4~ |
| TEXTSUB | EN+4~ |
| U | EN+1*, SORT+6, LONER+5 |
| VA | EN+6~ |
| VADM | EN+6~ |
| WHEN | EN+6~ |
| WHO | EN+6~ |
| Y | EN+6~, SORT+3, SORT+6, FORMAT+4, SERV+7, SINGLE+5, LONER+2, LONER+5, SDATE+4, EDATE+4 |
| >> ZTDESC | TASK+3* |
| >> ZTIO | TASK+3* |
| >> ZTRTN | TASK+4* |
| >> ZTSAVE("ED1" | TASK+7* |
| >> ZTSAVE("EDATE" | TASK+5* |
| >> ZTSAVE("FORMAT" | TASK+4* |
| >> ZTSAVE("LONER*" | TASK+7* |
| >> ZTSAVE("SD1" | TASK+6* |
| >> ZTSAVE("SDATE" | TASK+5* |
| >> ZTSAVE("SEARCH" | TASK+5* |
| >> ZTSAVE("SERVICE" | TASK+6* |
| >> ZTSAVE("SINGLE" | TASK+7* |
| >> ZTSAVE("SNAME" | TASK+6* |
| >> ZTSAVE("SORT" | TASK+4* |
| >> ZTSK | TASK+8 |