PXRMLOCL ;SLC/PKR - Handle location findings. ;02/17/2016
Source file <PXRMLOCL.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Clinical Reminders | 5 | PXRM LOCATION LIST INQUIRY PXRM LOCATION LIST LIST PXRM ORDER CHECK ITEMS GROUP PXRMTERL PXRMXSL2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ALLLOCS(SUB) | ;Build a list of all hospital locations associated
|
|
EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate location term findings
|
|
FPLIST(FILENUM,HLOCL,NOCC,BDT,EDT,PLIST) | ;Find patient list data for
|
|
GPLIST(FILENUM,SNODE,ITEM,PFINDPA,PLIST) | ;Add to the patient list.
; Return the list in ^TMP($J,PLIST). |
|
PCSTOPL | ;Print the Clinic Stop list. Called by the print template PXRM
|
|
VISITOK(IEN) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT - [#9000010] | FPLIST+27 |
^AUPNVSIT("AHL" | ALLLOCS+6, FPLIST+17, FPLIST+24 |
^DIC(40.7 - [#40.7] | PCSTOPL+8, PCSTOPL+18 |
^PXRMD(810.9 - [#810.9] | GPLIST+15, PCSTOPL+4, PCSTOPL+5, PCSTOPL+12, PCSTOPL+16, PCSTOPL+17, PCSTOPL+22, PCSTOPL+24, PCSTOPL+25 |
^TMP($J | ALLLOCS+3!, ALLLOCS+6*, FPLIST+5!, FPLIST+14, FPLIST+32*, FPLIST+35, FPLIST+37, FPLIST+39, FPLIST+41*, FPLIST+42! , GPLIST+20, GPLIST+22, GPLIST+41*, GPLIST+42! |
Name | Line Occurrences |
---|---|
ALLLOCS | GPLIST+16 |
FPLIST | GPLIST+18 |
GPLIST | EVALPL+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMIS | PCSTOPL+2~, PCSTOPL+9*, PCSTOPL+11, PCSTOPL+20*, PCSTOPL+21 |
BDT | EVALPL+2~, FPLIST~, FPLIST+10, GPLIST+3~, GPLIST+8, GPLIST+18 |
BTIME | FPLIST+2~, FPLIST+10*, FPLIST+22 |
CASESEN | GPLIST+3~, GPLIST+12, GPLIST+35 |
COND | GPLIST+3~, GPLIST+12, GPLIST+35 |
CONVAL | GPLIST+3~, GPLIST+35*, GPLIST+36, GPLIST+40 |
CSTEXL | PCSTOPL+2~, PCSTOPL+22*, PCSTOPL+23, PCSTOPL+24 |
CSTOP | PCSTOPL+2~, PCSTOPL+6*, PCSTOPL+8*, PCSTOPL+11, PCSTOPL+19*, PCSTOPL+21 |
>> D0 | PCSTOPL+4, PCSTOPL+5, PCSTOPL+12, PCSTOPL+16, PCSTOPL+17, PCSTOPL+22, PCSTOPL+25 |
DAS | FPLIST+2~, FPLIST+23*, FPLIST+24*, FPLIST+27, FPLIST+29, FPLIST+32, FPLIST+38*, FPLIST+39*, FPLIST+41, GPLIST+3~ , GPLIST+27*, GPLIST+32 |
DATE | FPLIST+2~, FPLIST+30*, FPLIST+32, GPLIST+3~, GPLIST+31*, GPLIST+34 |
DEND | FPLIST+2~, FPLIST+6*, FPLIST+11 |
DFN | FPLIST+2~, FPLIST+31*, FPLIST+32, FPLIST+34*, FPLIST+35*, FPLIST+37, FPLIST+39, FPLIST+41, GPLIST+3~, GPLIST+19* , GPLIST+20*, GPLIST+22, GPLIST+40 |
DONE | FPLIST+2~, FPLIST+15*, FPLIST+17, FPLIST+19* |
DS | FPLIST+2~, FPLIST+12*, FPLIST+15 |
EDT | EVALPL+2~, FPLIST~, FPLIST+6, GPLIST+3~, GPLIST+8, GPLIST+18 |
ENODE | EVALPL~, EVALPL+4, EVALPL+6, EVALPL+8 |
ETIME | FPLIST+2~, FPLIST+11*, FPLIST+21 |
EXCLNCS | PCSTOPL+2~, PCSTOPL+25*, PCSTOPL+26 |
FIEVD | GPLIST+3~, GPLIST+32, GPLIST+35 |
FIEVD("DATE" | GPLIST+34* |
FIEVD("VALUE" | GPLIST+33 |
FILENUM | EVALPL+2~, EVALPL+4*, EVALPL+13, FPLIST~, GPLIST~, GPLIST+18, GPLIST+32, GPLIST+40 |
FINDPA | EVALPL~, EVALPL+12 |
FLIST | GPLIST+3~ |
HLOC | ALLLOCS+2~, ALLLOCS+4*, ALLLOCS+6*, FPLIST+2~, FPLIST+13*, FPLIST+14*, FPLIST+17, FPLIST+24, FPLIST+32 |
HLOCL | FPLIST~, FPLIST+14 |
ICOND | GPLIST+4~, GPLIST+12, GPLIST+35 |
IEN | GPLIST+4~, VISITOK~ |
IND | GPLIST+4~, GPLIST+23*, GPLIST+25*, GPLIST+26, PCSTOPL+2~, PCSTOPL+3*, PCSTOPL+4*, PCSTOPL+5, PCSTOPL+12, PCSTOPL+16 , PCSTOPL+17, PCSTOPL+22, PCSTOPL+25 |
INVBD | FPLIST+2~, FPLIST+10*, FPLIST+19, FPLIST+22 |
INVDATE | FPLIST+2~, FPLIST+18*, FPLIST+19, FPLIST+21, FPLIST+22 |
INVDT | FPLIST+2~, FPLIST+15*, FPLIST+17*, FPLIST+18, FPLIST+20, FPLIST+24, FPLIST+32, FPLIST+36*, FPLIST+37*, FPLIST+39 , FPLIST+41 |
INVED | FPLIST+2~, FPLIST+11*, FPLIST+12, FPLIST+21 |
IPLIST | GPLIST+4~, GPLIST+24!, GPLIST+41 |
IPLIST( | GPLIST+40* |
ITEM | EVALPL+2~, EVALPL+5*, EVALPL+6*, EVALPL+8, EVALPL+13, GPLIST~, GPLIST+15, GPLIST+17, GPLIST+40 |
JND | PCSTOPL+2~, PCSTOPL+15*, PCSTOPL+16*, PCSTOPL+17 |
LNAME | GPLIST+4~, GPLIST+15*, GPLIST+16, GPLIST+17 |
NFOUND | FPLIST+3~, FPLIST+36*, FPLIST+37, FPLIST+39, FPLIST+40*, FPLIST+41, GPLIST+4~, GPLIST+23*, GPLIST+25, GPLIST+38* , GPLIST+40 |
NGET | GPLIST+4~, GPLIST+13*, GPLIST+18 |
NOCC | FPLIST~, FPLIST+37, FPLIST+39, GPLIST+4~, GPLIST+8, GPLIST+11*, GPLIST+13, GPLIST+25 |
NP | GPLIST+4~ |
PFINDPA | EVALPL+2~, EVALPL+9!, EVALPL+12, EVALPL+13, GPLIST~, GPLIST+12 |
PFINDPA(0 | GPLIST+8 |
PLIST | EVALPL~, EVALPL+13, FPLIST~, FPLIST+41, GPLIST~, GPLIST+41 |
SAVE | GPLIST+4~, GPLIST+36*, GPLIST+37 |
SC | FPLIST+3~, FPLIST+28*, FPLIST+29, FPLIST+32 |
SKIP | PCSTOPL+2~, PCSTOPL+3*, PCSTOPL+10*, PCSTOPL+13*, PCSTOPL+27* |
SNODE | GPLIST~ |
STATUSA | EVALPL+3~, GPLIST+4~, GPLIST+13 |
SUB | ALLLOCS~, ALLLOCS+3, ALLLOCS+6 |
TEMP | EVALPL+3~, FPLIST+3~, FPLIST+27*, FPLIST+28, FPLIST+30, FPLIST+31, GPLIST+5~, GPLIST+26*, GPLIST+27, GPLIST+31 , GPLIST+40, PCSTOPL+2~, PCSTOPL+5*, PCSTOPL+6, PCSTOPL+9, PCSTOPL+17*, PCSTOPL+18*, PCSTOPL+19, PCSTOPL+20 |
TERMARR | EVALPL~ |
TERMARR("E" | EVALPL+6, EVALPL+8 |
TERMARR(20 | EVALPL+10 |
TFINDING | EVALPL+3~, EVALPL+7*, EVALPL+8*, EVALPL+10 |
TFINDPA | EVALPL+3~, EVALPL+9!, EVALPL+10*, EVALPL+12 |
TGLIST | FPLIST+3~, FPLIST+4*, FPLIST+5, FPLIST+32, FPLIST+35, FPLIST+37, FPLIST+39, FPLIST+41, FPLIST+42, GPLIST+5~ , GPLIST+6*, GPLIST+18, GPLIST+20, GPLIST+22, GPLIST+42 |
TIME | FPLIST+3~, FPLIST+20*, FPLIST+21, FPLIST+22 |
TPLIST | GPLIST+5~, GPLIST+21!, GPLIST+22* |
TPLIST( | GPLIST+25, GPLIST+26 |
U | FPLIST+28, FPLIST+30, FPLIST+31, FPLIST+32, FPLIST+41, GPLIST+15, GPLIST+27, GPLIST+31, GPLIST+40, PCSTOPL+6 , PCSTOPL+8, PCSTOPL+9, PCSTOPL+17, PCSTOPL+18, PCSTOPL+19, PCSTOPL+20, PCSTOPL+24 |
UCIFS | GPLIST+5~, GPLIST+12, GPLIST+13, GPLIST+36 |
VALUE | GPLIST+5~, GPLIST+33*, GPLIST+40 |
VSLIST | GPLIST+5~, GPLIST+12, GPLIST+35 |