ORRHCQ ; SLC/KCM/JLI - CPRS Query Tools - Utilities ;2/1/03 11:10
Source file <ORRHCQ.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 1 | ORRHCQ1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CLEAR(OK) | ; Clear/Cancel the query | |
| SUBDTA(LST,FIRST,LAST) | ; Return name-value pairs for subset of query data | |
| QRYITR(VAL,ORRITR) | ; Do query for the current iterator ; VAL=PtSearched^RecordsFound^Iterator | |
| ADDTO(IEN,CLINDT) | ;Add active location to lst | |
| NXTITER(X) | ; Return the iterator for the next patient ; ITER=Subscript;DFN;Item# | |
| WCFDIV(DIVLST) | ;Get wards/clinics for division | |
| DETAIL(REF,ID) | ; Return results of order identified by ID | |
| RNGFM(ORY,RNG) | ||
| SETPTS(SUB) | ; Set up to iterate through a patient list | |
| SORTBY(SEQ,FNM,FWD) | ; Sort by a particular field | |
| PTINFO(VAL,ID) | ; Return patient info given an order, consult, or note | |
| PTSCRN(PATID) | ; Return 1 if should continue with this patient | |
| DODIV | ; find Wards/Clinics for divisions | |
| SETUP(ITR,QRY) | ; Setup the query ; use ^TMP("ORRHCQ",$J,"QRY") for the query ; use ^TMP("ORRHCQ",$J,"COL") for the columns ; use ^TMP("ORRHCQD",$J) for the query data | |
| NXTDFN(SUB,ITM) | ; Return the next patient^item within a subscript | |
| QRYPT(PATID) | ; Search for records and return the number found | 
| Name | Field # of Occurrence | 
|---|---|
| ORDERS^ORCXPND1 | DETAIL+5 | 
| ORDERS^ORCXPND2 | DETAIL+6 | 
| TEAMPTS^ORQPTQ1 | SETPTS+4 | 
| PROVPTS^ORQPTQ2 | SETPTS+6 | 
| SPECPTS^ORQPTQ2 | SETPTS+5 | 
| $$ACT^ORQRY | PTSCRN+16, PTSCRN+17 | 
| $$PP^ORQRY | PTSCRN+10 | 
| BYPT^ORQRY | QRYPT+5 | 
| CLINPTS^ORQRY01 | SETPTS+2 | 
| $$RNG2FM^ORRHCU | SETUP+10, SETUP+29, RNGFM+2 | 
| BYWARD^ORWPT | SETPTS+3 | 
| $$ACTLOC^ORWU | ADDTO+3, ADDTO+5 | 
| $$NEXTPAT^RORAPI01 | NXTDFN+6 | 
| $$PATITER^RORAPI01 | SETPTS+10 | 
| RPC Name | Call Tags | 
|---|---|
| ORRHCQ SETUP | SETUP | 
| ORRHCQ SORTBY | SORTBY | 
| ORRHCQ SUBDTA | SUBDTA | 
| ORRHCQ DETAIL | DETAIL | 
| ORRHCQ PTINFO | PTINFO | 
| ORRHCQ CLEAR | CLEAR | 
| ORRHCQ QRYITR | QRYITR | 
| ORRHCQ RNGFM | RNGFM | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | PTINFO+7 | 
| ^OR(100 - [#100] | DETAIL+4, PTINFO+3 | 
| ^ORD(100.98 - [#100.98] | SETUP+22 | 
| ^ORD(102.22 - [#102.22] | SETUP+9, SETUP+10 | 
| ^SC - [#44] | ADDTO+3, ADDTO+5, ADDTO+6, WCFDIV+6, WCFDIV+7, DODIV+9 | 
| ^TIU(8925 - [#8925] | PTINFO+4 | 
| ^TMP("ORRHCQ" | SETUP+11*, SETUP+12*, SETUP+38*, CLEAR+1!, NXTITER+7, NXTDFN+5, NXTDFN+7*, NXTDFN+10, NXTDFN+11, SETPTS+2* , SETPTS+7*, SETPTS+11*, PTSCRN+1, PTSCRN+3, PTSCRN+4, PTSCRN+5, PTSCRN+18*, QRYPT+4, QRYPT+7*, SORTBY+3 , SUBDTA+2 | 
| ^TMP("ORRHCQB" | CLEAR+2!, SORTBY+2!, SORTBY+8*, SORTBY+9, SORTBY+10 | 
| ^TMP("ORRHCQD" | CLEAR+1!, QRYPT+8*, SORTBY+4, SORTBY+5, SUBDTA+9 | 
| ^TMP("ORRHCQP" | QRYPT+2!, QRYPT+6, QRYPT+8, QRYPT+9! | 
| ^TMP("ORRHCQS" | CLEAR+2!, SORTBY+2!, SORTBY+12*, SUBDTA+4, SUBDTA+5 | 
| ^TMP("ORXPND" | DETAIL+1!, DETAIL+7!, DETAIL+8 | 
| Name | Line Occurrences | 
|---|---|
| $$NXTDFN | NXTITER+5 | 
| $$NXTITER | SETUP+39, QRYITR+4 | 
| $$PTSCRN | QRYITR+2 | 
| $$QRYPT | QRYITR+3 | 
| ADDTO | WCFDIV+7 | 
| CLEAR | SETUP+4 | 
| SETPTS | NXTITER+9 | 
| WCFDIV | DODIV+12 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | PTINFO+7 | 
| ^("Consults" | QRYPT+6 | 
| ^("Orders" | QRYPT+6 | 
| ^("Visits" | QRYPT+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CDTR | WCFDIV+1~, WCFDIV+2*, WCFDIV+4*, WCFDIV+7 | 
| CID | SETUP+5~, SETUP+9*, SETUP+10 | 
| CLINDT | ADDTO~, ADDTO+4 | 
| CNT | QRYPT+1~, QRYPT+6*, QRYPT+7, QRYPT+10 | 
| COL | SUBDTA+1~, SUBDTA+2* | 
| COL( | SUBDTA+7, SUBDTA+9 | 
| CONT | PTSCRN+2~, PTSCRN+5*, PTSCRN+11*, PTSCRN+12, PTSCRN+16*, PTSCRN+17*, PTSCRN+18, PTSCRN+19 | 
| CSLTGRP | SETUP+5~*, SETUP+22*, SETUP+23 | 
| DATRNG | PTSCRN+2~, PTSCRN+5*, PTSCRN+15, PTSCRN+16, PTSCRN+17 | 
| DFN | NXTDFN+2~*, NXTDFN+8*, NXTDFN+11*, NXTDFN+12, PTINFO+1~, PTINFO+2*, PTINFO+3*, PTINFO+4*, PTINFO+6, PTINFO+7 | 
| DFNITM | NXTITER+2~, NXTITER+4, NXTITER+5*, NXTITER+6, NXTITER+11, NXTITER+12 | 
| DIVLST | WCFDIV~, DODIV+1~, DODIV+2*, DODIV+6, DODIV+12 | 
| DIVLST( | WCFDIV+3, WCFDIV+4, WCFDIV+7, DODIV+4*, DODIV+10, DODIV+11 | 
| DIVPTR | DODIV+1~, DODIV+2*, DODIV+9*, DODIV+11 | 
| DTRNG | SETUP+5~, SETUP+29*, SETUP+31, SETUP+33*, SETUP+34, SETUP+35, SETUP+36, SETUP+37 | 
| FIRST | SUBDTA~, SUBDTA+3 | 
| FND | PTSCRN+9~*, PTSCRN+10*, PTSCRN+11 | 
| FNM | SORTBY~, SORTBY+5 | 
| FWD | SORTBY~, SORTBY+3, SORTBY+11 | 
| I | SETUP+5~, SETUP+6*, SETUP+7 | 
| ICOL | SETUP+5~*, SETUP+12*, SUBDTA+1~, SUBDTA+7*, SUBDTA+9 | 
| ID | SORTBY+1~, SORTBY+4*, SORTBY+5, SORTBY+8, SORTBY+10*, SORTBY+12, SUBDTA+1~, SUBDTA+5*, SUBDTA+6, SUBDTA+9 , DETAIL~, DETAIL+3*, DETAIL+4, DETAIL+5*, PTINFO~, PTINFO+2, PTINFO+3, PTINFO+4 | 
| IEN | ADDTO~, ADDTO+3, ADDTO+4, ADDTO+5, ADDTO+6 | 
| IEN42 | ADDTO+1~, ADDTO+2*, ADDTO+6*, ADDTO+7 | 
| ILST | SUBDTA+1~*, SUBDTA+6*, SUBDTA+8*, SUBDTA+9 | 
| IPP | PTSCRN+9~*, PTSCRN+10* | 
| ITM | NXTITER+2~, NXTITER+3*, NXTITER+5, NXTITER+10*, NXTDFN~, NXTDFN+8*, NXTDFN+10*, NXTDFN+11, NXTDFN+12 | 
| ITR | SETUP~, SETUP+5*, SETUP+39*, NXTDFN+4~, NXTDFN+5*, NXTDFN+6, NXTDFN+7, SETPTS+9~, SETPTS+10, SETPTS+11 | 
| KEY | SORTBY+1~, SORTBY+5*, SORTBY+6*, SORTBY+7*, SORTBY+8, SORTBY+9*, SORTBY+10 | 
| LAST | SUBDTA~, SUBDTA+3 | 
| LCNT | DETAIL+2~* | 
| LOCLST | PTSCRN+2~, PTSCRN+4*, PTSCRN+16, PTSCRN+17 | 
| LST | SETPTS+1~, SETPTS+2, SETPTS+3, SETPTS+4, SETPTS+5, SETPTS+6, SETPTS+7, SUBDTA~ | 
| LST( | SUBDTA+6*, SUBDTA+9* | 
| NAM | SETUP+5~, SETUP+7*, SETUP+9, SETUP+11, SETUP+12 | 
| NN | DODIV+1~, DODIV+2*, DODIV+4* | 
| NNN | WCFDIV+1~, WCFDIV+2* | 
| OK | SETUP+4, CLEAR~, CLEAR+3* | 
| ORESULTS | DETAIL+2~* | 
| ORID | DETAIL+2~, DETAIL+4*, DETAIL+5 | 
| ORRITR | QRYITR~, QRYITR+2, QRYITR+3, QRYITR+4 | 
| ORVP | DETAIL+2~, DETAIL+4* | 
| ORY | RNGFM~, RNGFM+2* | 
| PATID | PTSCRN~, PTSCRN+1, PTSCRN+10, PTSCRN+16, PTSCRN+17, PTSCRN+18, QRYPT~, QRYPT+5 | 
| PRILST | PTSCRN+2~, PTSCRN+3*, PTSCRN+8 | 
| PRILST( | PTSCRN+10 | 
| QROOT | SETUP+5~, SETUP+14*, SETUP+15, SETUP+16, SETUP+17, SETUP+18, SETUP+19, SETUP+20, SETUP+21, SETUP+23 , SETUP+24, SETUP+25, SETUP+28, SETUP+30, SETUP+31, SETUP+33, SETUP+34, SETUP+35, SETUP+36, SETUP+37 , ADDTO+4, ADDTO+7, DODIV+3, DODIV+5, DODIV+8, DODIV+11 | 
| QRY | SETUP~, QRYPT+1~, QRYPT+4*, QRYPT+5 | 
| QRY( | SETUP+6, SETUP+7 | 
| RC | NXTDFN+4~, NXTDFN+6*, NXTDFN+8 | 
| REF | DETAIL~, DETAIL+8* | 
| RNG | RNGFM~, RNGFM+1, RNGFM+2 | 
| ROOT | QRYPT+1~, QRYPT+3*, QRYPT+5 | 
| SEQ | SORTBY~, SORTBY+3*, SORTBY+11*, SORTBY+12, SUBDTA+1~, SUBDTA+3*, SUBDTA+4, SUBDTA+5 | 
| SUB | NXTITER+2~, NXTITER+3*, NXTITER+4, NXTITER+5, NXTITER+7*, NXTITER+8, NXTITER+9, NXTITER+12, NXTDFN~, NXTDFN+1 , NXTDFN+3, NXTDFN+5, NXTDFN+7, NXTDFN+10, NXTDFN+11, SETPTS~, SETPTS+2, SETPTS+3, SETPTS+4, SETPTS+5 , SETPTS+6, SETPTS+7, SETPTS+10, SETPTS+11 | 
| U | SETUP+10, ADDTO+3, ADDTO+5, WCFDIV+7, DODIV+9, NXTDFN+8, QRYITR+3, QRYITR+4, DETAIL+4, PTINFO+3 , PTINFO+4, PTINFO+8 | 
| VAL | SETUP+5~, SETUP+7*, SETUP+10*, SETUP+11, SETUP+12, QRYITR~, QRYITR+2*, QRYITR+3*, QRYITR+4*, PTINFO~ , PTINFO+2*, PTINFO+8* | 
| WCLST | DODIV+1~ | 
| X | SETUP+5~, SETUP+27*, SETUP+28*, SETUP+29, SETUP+30, SETUP+31, NXTITER~, NXTITER+3, PTINFO+1~, PTINFO+2* , PTINFO+3, PTINFO+4 | 
| X0 | PTINFO+1~, PTINFO+7*, PTINFO+8 | 
| X1 | PTINFO+1~, PTINFO+7*, PTINFO+8 | 
| X101 | PTINFO+1~, PTINFO+7*, PTINFO+8 | 
| XI | DODIV+1~, DODIV+2*, DODIV+3*, DODIV+4, DODIV+5, DODIV+7*, DODIV+10*, DODIV+11 | 
| XJ | DODIV+1~, DODIV+2*, DODIV+8*, DODIV+9, DODIV+11 | 
| XXI | WCFDIV+1~, WCFDIV+2*, WCFDIV+3*, WCFDIV+4, WCFDIV+7 | 
| XXJ | WCFDIV+1~, WCFDIV+5*, WCFDIV+6*, WCFDIV+7 |