ORPR02 ; slc/dcm/rv - Dances with Prints ;09/13/06 13:30
Source file <ORPR02.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 7 | ORCACT2 ORCSIGN OREVNT1 ORPR01 ORPR03 ORPRS06 ORWD1 | 
| IHS Electronic Health Record | 1 | BEHORXPS | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ARAY(ARAY) | ;Set aray up by package in ^TMP("ORAL",$J,package,orifn;action) | |
| END | ;Leave | |
| WORK(ARAY,PARAM) | ;Work Copy | |
| CHART(ARAY,PARAM) | ;Chart copies | |
| SERV(ARAY,PARAM,SARAY,NOQUE) | ;Service copies | |
| DEVICE(PRMT,DEF,ZTRTN,ORTIMES) | ; Gets device for output | |
| PARAM(LOC) | ;Get Print parameters | |
| GUI(ARAY,DEVICE,FMT,LOC,TASK,ORTIMES) | ;Silence of the Prints | |
| REQ(ARAY,PARAM) | ;Requisitions | |
| PRINT(ORVP,ARAY,SARAY,LOC,SELECT,ALTPRAM,NOQUE,ORTIMES) | ;Decisions | |
| TEST | ;Test call | |
| LOC(ARAY) | ;Get location if not passed | |
| PAT(ARAY) | ;Get patient if not passed | |
| LABEL(ARAY,PARAM,ORTIMES) | ;Labels | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(9.4 - [#9.4] | REQ+7 | 
| ^OR(100 - [#100] | REQ+9, PAT+3, LOC+3, TEST+3, ARAY+3 | 
| ^ORD(101.41 - [#101.41] | REQ+10 | 
| ^TMP("ORAL" | PRINT+17!, ARAY+3*, GUI+13! | 
| ^TMP("ORPARAY" | TEST+2!, TEST+3*, TEST+7! | 
| Name | Line Occurrences | 
|---|---|
| $$DEVICE | CHART+4, WORK+2, LABEL+8, REQ+12, GUI+23 | 
| $$LOC | PRINT+14, GUI+16 | 
| $$PAT | PRINT+13, GUI+14 | 
| @( | GUI+22 | 
| ARAY | PRINT+20, GUI+17 | 
| CHART | PRINT+21, PRINT+22 | 
| END | PRINT+13, PRINT+14, PRINT+15, PRINT+21, PRINT+23 | 
| LABEL | PRINT+21, PRINT+22 | 
| PARAM | PRINT+19 | 
| TEST+5 | |
| REQ | PRINT+21, PRINT+22 | 
| SERV | PRINT+21, PRINT+22 | 
| WORK | PRINT+21, PRINT+22 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZIS | DEVICE+5~, DEVICE+16*, DEVICE+20 | 
| %ZIS("A" | DEVICE+13* | 
| %ZIS("B" | DEVICE+14* | 
| ALTPRAM | PRINT~, PRINT+18, PRINT+19 | 
| ARAY | PRINT~, PRINT+12, PRINT+13, PRINT+14, PRINT+20, PRINT+21, PRINT+22, CHART~, CHART+3*, WORK~ , WORK+1*, LABEL~, LABEL+2*, LABEL+5, REQ~, REQ+2*, REQ+5, REQ+8, SERV~, SERV+2* , SERV+3, SERV+4, DEVICE+17, PAT~, PAT+1*, PAT+2, PAT+3, LOC~, LOC+1*, LOC+2 , LOC+3, ARAY~, ARAY+1*, ARAY+3, GUI~, GUI+10*, GUI+14, GUI+16, GUI+17, GUI+18!* | 
| DALE | TEST+1~ | 
| DEF | DEVICE~, DEVICE+7, DEVICE+9, DEVICE+11 | 
| DEVICE | GUI~, GUI+23 | 
| DIC | DEVICE+5~, DEVICE+10~, DEVICE+11* | 
| DIC(0 | DEVICE+11* | 
| DIR | DEVICE+5~ | 
| DIR("?" | DEVICE+8* | 
| DIR("A" | DEVICE+8* | 
| DIR("B" | DEVICE+8* | 
| DIR(0 | DEVICE+8* | 
| FMT | GUI~, GUI+11, GUI+18, GUI+19, GUI+20, GUI+21 | 
| FORCEQUE | DEVICE+5~, DEVICE+19*, DEVICE+20 | 
| GLOB | SERV+1~, SERV+3*, SERV+6, DEVICE+5~, DEVICE+17* | 
| >> I | PARAM+5*, PARAM+6 | 
| IFN | PRINT+11~, ARAY+2~*, ARAY+3* | 
| IO | GUI+11 | 
| IOF | TEST+4 | 
| IOP | DEVICE+5~ | 
| LOC | PRINT~, PRINT+14*, PRINT+15, PRINT+19, PARAM~, PARAM+4, PARAM+6, GUI~, GUI+16* | 
| NOQUE | PRINT~, PRINT+21, PRINT+22, SERV~, SERV+5 | 
| ORAL | PRINT+16~, PRINT+18*, PRINT+21, PRINT+22, GUI+12~, GUI+14*, GUI+18 | 
| ORDLG | REQ+1~, REQ+9*, REQ+10 | 
| OREND | DEVICE+5~, TEST+1~* | 
| >> ORI | TEST+3* | 
| ORIFN | PRINT+16~, REQ+1~, REQ+8*, REQ+9 | 
| ORION | DEVICE+5~, DEVICE+15*, DEVICE+20 | 
| ORIOPTR | DEVICE+5~, DEVICE+16*, DEVICE+20 | 
| ORPARAY | PRINT+11~, PRINT+12*, PRINT+15, GUI+9~, GUI+10*, GUI+11 | 
| ORPLF | LABEL+1~, LABEL+4*, LABEL+5, LABEL+6*, LABEL+7, REQ+1~, REQ+4*, REQ+5, REQ+6*, REQ+10* , REQ+11 | 
| ORPRMT | LABEL+1~, LABEL+7*, LABEL+8, REQ+1~, REQ+11*, REQ+12 | 
| ORTIMES | PRINT~, PRINT+21, PRINT+22, LABEL~, LABEL+8, DEVICE~, GUI~ | 
| ORTKG | LABEL+1~, LABEL+4*, LABEL+5*, LABEL+6, REQ+1~, REQ+4*, REQ+5*, REQ+6, REQ+7, REQ+8 | 
| ORVP | PRINT~, PRINT+13*, ARAY+3, GUI+12~, GUI+14*, GUI+15 | 
| PARAM | PRINT+11~, PRINT+18*, PRINT+21, PRINT+22, CHART~, CHART+4, WORK~, WORK+2, LABEL~, LABEL+3 , LABEL+7, LABEL+8, REQ~, REQ+3, REQ+11, REQ+12, SERV~, PARAM+6* | 
| PRMT | DEVICE~, DEVICE+6, DEVICE+7, DEVICE+8, DEVICE+13, DEVICE+14, DEVICE+16, DEVICE+18, DEVICE+19 | 
| SARAY | PRINT~, PRINT+15, PRINT+21, PRINT+22, SERV~ | 
| SELECT | PRINT~, PRINT+21, PRINT+22 | 
| TASK | GUI~, GUI+21*, GUI+22, GUI+23 | 
| U | REQ+9 | 
| VAR | PRINT+11~, PRINT+13, PRINT+14, GUI+9~, GUI+15 | 
| VAR("ARAY" | PRINT+13*, PRINT+14*, GUI+15* | 
| X | CHART+4*, WORK+2*, LABEL+8*, REQ+12*, DEVICE+5~, DEVICE+10~, DEVICE+11*, PAT+3*, PAT+4, LOC+3* , LOC+4, ARAY+2~, ARAY+3*, GUI+12~, GUI+19*, GUI+23* | 
| Y | DEVICE+5~, DEVICE+8, DEVICE+13, DEVICE+14, DEVICE+15, DEVICE+16 | 
| ZTDESC | SERV+7*, DEVICE+5~, DEVICE+18*, DEVICE+20 | 
| ZTDTH | SERV+1~, SERV+6*, DEVICE+5~, DEVICE+19*, DEVICE+20 | 
| ZTIO | SERV+1~, SERV+6*, DEVICE+5~ | 
| ZTRTN | SERV+1~, SERV+6*, DEVICE~, DEVICE+20, GUI+12~, GUI+20*, GUI+22, GUI+23 | 
| ZTSAVE | SERV+1~, DEVICE+20 | 
| ZTSAVE( | SERV+6*, DEVICE+17* | 
| ZTSAVE("ARAY" | SERV+6*, DEVICE+17* | 
| ZTSAVE("CHART" | SERV+6* | 
| ZTSAVE("LOC" | SERV+6*, DEVICE+18* | 
| ZTSAVE("LOC(" | SERV+6*, DEVICE+18* | 
| ZTSAVE("ORCUM(" | DEVICE+18* | 
| ZTSAVE("ORPRES" | SERV+6*, DEVICE+18* | 
| ZTSAVE("ORRACT" | DEVICE+18* | 
| ZTSAVE("ORSEQ" | DEVICE+18* | 
| ZTSAVE("ORTIMES" | DEVICE+18* | 
| ZTSAVE("ORTKG" | DEVICE+18* | 
| ZTSAVE("ORVP" | SERV+6*, DEVICE+18* | 
| ZTSAVE("PARAM" | SERV+6* | 
| ZTSAVE("SARAY(" | SERV+6* | 
| ZTSK | SERV+1~ |