MAGDHOWE ;WOIFO/PMK/JSJ - Clinical Specialty MWL & HL7 Editor ; Apr 27, 2022@11:43:08
Source file <MAGDHOWE.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 |
---|---|---|
Imaging | 1 | MAGD EDIT CLIN SPEC DICOM/HL7 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTRY | ; entry point from menu
|
|
CHOICE | ; option driver
|
|
UPDATE(IEN) | ; delete or update the consult or procedure
|
|
UPDATE1 | ; update a the consult or procedure
|
|
CONSULT(SERVICE,PROCEDURE) | ;
|
|
PROC(PROCEDURE,SERVICE) | ;
|
|
ISPECIDX(ISPECIDX) | ;
|
|
IPROCIDX(IPROCIDX) | ;
|
|
LOCATION(LOCATION) | ;
|
|
HL7SUBL(HL7SUBLIST) | ;
|
|
QRSCP(QRSCP) | ;
|
|
CPT(CPT) | ;
|
|
CLINIC(CLINIC) | ;
|
|
LOOKUP(ITEM,NAME,FILE,FIELDS,REQUIRED) | ; lookup entry
|
|
GETVALUE(FILE,IEN,FIELDS) | ;
|
|
BLDPXLST | ;build alpha sorted procedure list filtered by specialty ;P278 added sub
|
|
DISPLAY | ; Display data
|
|
P(X) | ;
|
|
YESNO(PROMPT,DEFAULT,CHOICE) | ; generic YES/NO question driver
|
|
CHOOSE(PROMPT,DEFAULT,CHOICE,OPTION) | ; generic question driver
|
Name | Field # of Occurrence |
---|---|
UPDATE^DIE | CHOICE+45, CHOICE+53, UPDATE1+27, UPDATE1+39 |
^DIK | UPDATE+24, UPDATE1+34 |
$$GET1^DIQ | UPDATE+4, UPDATE+5, CPT+3, CPT+8, CPT+9, GETVALUE+4 |
GETS^DIQ | PROC+4, CPT+5, DISPLAY+21 |
^DIR | LOOKUP+35, YESNO+4, CHOOSE+8 |
$$IREQUEST^MAGDHOW1 | CHOICE+9 |
$$PICKSCP^MAGDSTQ9 | LOOKUP+25 |
HEADING^MAGDTRDX | ENTRY+7 |
WORKLIST^MAGDTRDX | CHOICE+1 |
SPEC^MAGSIXGT | BLDPXLST+11 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^GMR(123.3 - [#123.3] | GET1^DIQ, GETS^DIQ |
^GMR(123.5 - [#123.5] | GET1^DIQ, GETS^DIQ |
^MAG(2006.5831 - [#2006.5831] | Classic Fileman Calls |
^MCAR(697.2 - [#697.2] | GETS^DIQ |
^ICPT - [#81] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MAG(2005.85 - [#2005.85] | BLDPXLST+8, BLDPXLST+12, BLDPXLST+13, BLDPXLST+15, BLDPXLST+17 |
^MAG(2006.5831 - [#2006.5831] | UPDATE+2, UPDATE+12, UPDATE+13, UPDATE1+32 |
Name | Line Occurrences |
---|---|
$$CHOOSE | ENTRY+14, PROC+18 |
$$CLINIC | CHOICE+27, UPDATE1+9 |
$$CONSULT | CHOICE+4 |
$$CPT | CHOICE+24, UPDATE1+6 |
$$GETVALUE | UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+13, LOOKUP+41 |
$$HL7SUBL | CHOICE+25, UPDATE1+7 |
$$IPROCIDX | CHOICE+22, UPDATE1+4 |
$$ISPECIDX | CHOICE+21, UPDATE1+3 |
$$LOCATION | CHOICE+23, UPDATE1+5 |
$$LOOKUP | CONSULT+2, PROC+2, ISPECIDX+1, IPROCIDX+1, LOCATION+1, HL7SUBL+1, QRSCP+1, CPT+12, CLINIC+21 |
$$P | CLINIC+7, LOOKUP+6, DISPLAY+3, DISPLAY+4, DISPLAY+5, DISPLAY+6, DISPLAY+12, DISPLAY+13, DISPLAY+14, DISPLAY+15 , DISPLAY+17 |
$$PROC | CHOICE+7 |
$$QRSCP | CHOICE+26, UPDATE1+8 |
$$YESNO | CHOICE+32, UPDATE+17, UPDATE+20, UPDATE1+16, LOOKUP+7, LOOKUP+16, LOOKUP+20 |
BLDPXLST | LOOKUP+34 |
CHOICE | ENTRY+17 |
DISPLAY | CHOICE+29, UPDATE+15, UPDATE1+13 |
ENTRY | ENTRY+17 |
UPDATE | CHOICE+18 |
UPDATE1 | UPDATE+29 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | PROC+1~, CPT+2~, LOOKUP+1~ |
A( | PROC+5, PROC+6, PROC+7, CPT+6, CPT+7 |
CHANGE | ENTRY+1~, ENTRY+4*, UPDATE1+11, CLINIC+12*, CLINIC+23*, LOOKUP+9* |
CHOICE | ENTRY+1~, ENTRY+14, ENTRY+16, CHOICE+1, CHOICE+3, CHOICE+32, CHOICE+33, UPDATE+17, UPDATE+18, UPDATE+20 , UPDATE+21, UPDATE1+16, UPDATE1+17, PROC+1~, PROC+18, PROC+19, LOOKUP+7, LOOKUP+8, LOOKUP+16, LOOKUP+17 , LOOKUP+20, LOOKUP+21, YESNO~, YESNO+7*, CHOOSE~, CHOOSE+11* |
CLINIC | ENTRY+1~, CHOICE+27, UPDATE+1~, UPDATE1+9, CLINIC~, CLINIC+4, CLINIC+25! |
CLINIC( | CHOICE+50, CHOICE+52, UPDATE+13*, UPDATE1+36, UPDATE1+38, CLINIC+5, CLINIC+7, CLINIC+13, CLINIC+26*, DISPLAY+16 , DISPLAY+17 |
CPT | ENTRY+1~, CHOICE+24, CHOICE+42, UPDATE+1~, UPDATE+9*, UPDATE1+6, UPDATE1+24, CPT~, CPT+1, CPT+7* , CPT+8*, CPT+9*, CPT+12, DISPLAY+13 |
DA | UPDATE+22~, UPDATE+23*, UPDATE1+33~, UPDATE1+34* |
DA(1 | UPDATE1+34* |
DEFAULT | LOOKUP+13~, LOOKUP+14*, LOOKUP+15, LOOKUP+25, YESNO~, YESNO+3, CHOOSE~, CHOOSE+7 |
DIERR | ENTRY+3~, CHOICE+46, CHOICE+51~, UPDATE1+1~, UPDATE1+28, UPDATE1+37~ |
DIK | UPDATE+22~, UPDATE+23*, UPDATE1+33~, UPDATE1+34* |
DIR | LOOKUP+1~, YESNO+1~, CHOOSE+1~ |
DIR("A" | LOOKUP+30*, BLDPXLST+3*, YESNO+2*, CHOOSE+6* |
DIR("B" | LOOKUP+31*!, YESNO+3*, CHOOSE+7* |
DIR("L" | BLDPXLST+4!, BLDPXLST+5*, BLDPXLST+19* |
DIR(0 | LOOKUP+32*, LOOKUP+33*, BLDPXLST+2*, BLDPXLST+22*, YESNO+2*, CHOOSE+2*, CHOOSE+4* |
DIROUT | YESNO+1~, YESNO+5, CHOOSE+1~, CHOOSE+9 |
DIRUT | YESNO+1~, YESNO+6, CHOOSE+1~, CHOOSE+10 |
DONE | CLINIC+1~, CLINIC+6*, CLINIC+9*, CLINIC+14*, LOOKUP+1~, LOOKUP+3*, LOOKUP+5, LOOKUP+8*, LOOKUP+17*, LOOKUP+21* , LOOKUP+23 |
DTIME | CLINIC+8 |
DTOUT | LOOKUP+1~, LOOKUP+36 |
FIELDS | LOOKUP~, LOOKUP+41, GETVALUE~, GETVALUE+3, GETVALUE+4 |
FILE | LOOKUP~, LOOKUP+12, LOOKUP+33, LOOKUP+34, LOOKUP+40, LOOKUP+41, GETVALUE~, GETVALUE+4 |
FOUND | BLDPXLST+9~*, BLDPXLST+13*, BLDPXLST+14*, BLDPXLST+15*, BLDPXLST+16 |
HL7SUBLIST | ENTRY+1~, CHOICE+25, CHOICE+43, UPDATE+1~, UPDATE+10*, UPDATE1+7, UPDATE1+25, HL7SUBL~, HL7SUBL+1, DISPLAY+14 |
I | CHOICE+50*, CHOICE+52, UPDATE+1~, UPDATE+12*, UPDATE+13, UPDATE1+32*, UPDATE1+34, UPDATE1+36*, UPDATE1+38, PROC+1~ , PROC+5*, PROC+6, PROC+7, PROC+9*, PROC+10, PROC+12, PROC+13, PROC+14, CLINIC+1~, CLINIC+5* , CLINIC+7, CLINIC+9*, CLINIC+13, CLINIC+19*, CLINIC+21, CLINIC+22*, CLINIC+26*, LOOKUP+1~, GETVALUE+1~, GETVALUE+3* , GETVALUE+4, DISPLAY+1~, DISPLAY+16*, DISPLAY+17, DISPLAY+23*, DISPLAY+24, CHOOSE+1~, CHOOSE+2*, CHOOSE+3*, CHOOSE+4 |
IEN | ENTRY+1~, CHOICE+9*, CHOICE+10, CHOICE+18, CHOICE+48*, CHOICE+52, UPDATE~, UPDATE+2, UPDATE+12, UPDATE+13 , UPDATE+23, UPDATE1+20, UPDATE1+32, UPDATE1+34, UPDATE1+38, GETVALUE~, GETVALUE+2, GETVALUE+4, BLDPXLST+12*, BLDPXLST+13 , BLDPXLST+15, BLDPXLST+17, BLDPXLST+21 |
IENS | ENTRY+1~, ENTRY+3~, CHOICE+36*, CHOICE+37, CHOICE+38, CHOICE+39, CHOICE+40, CHOICE+41, CHOICE+42, CHOICE+43 , CHOICE+44, UPDATE1+1~, UPDATE1+20*, UPDATE1+21, UPDATE1+22, UPDATE1+23, UPDATE1+24, UPDATE1+25, UPDATE1+26 |
IPROCIDX | ENTRY+1~, CHOICE+22, CHOICE+40, UPDATE+1~, UPDATE+7*, UPDATE1+4, UPDATE1+22, IPROCIDX~, IPROCIDX+1, DISPLAY+6 , DISPLAY+8, DISPLAY+10 |
ISPECIDX | ENTRY+1~, CHOICE+21, CHOICE+39, UPDATE+1~, UPDATE+6*, UPDATE1+3, UPDATE1+21, ISPECIDX~, ISPECIDX+1, BLDPXLST+10 , BLDPXLST+11, DISPLAY+5, DISPLAY+7, DISPLAY+9 |
ITEM | LOOKUP~, LOOKUP+5, LOOKUP+6, LOOKUP+14, LOOKUP+17*, LOOKUP+21*, LOOKUP+25*, LOOKUP+26, LOOKUP+27*, LOOKUP+31 , LOOKUP+39*, LOOKUP+41* |
J | PROC+1~, PROC+5*, PROC+6, PROC+7, CLINIC+1~, CLINIC+2*, CLINIC+13*, CLINIC+19, CLINIC+26*, BLDPXLST+1~ , BLDPXLST+6*, BLDPXLST+18*, BLDPXLST+19, BLDPXLST+20, BLDPXLST+21 |
LLIST | BLDPXLST+1~, BLDPXLST+7*, BLDPXLST+20*, BLDPXLST+22 |
LOCATION | ENTRY+1~, CHOICE+23, CHOICE+41, UPDATE+1~, UPDATE+8*, UPDATE1+5, UPDATE1+23, LOCATION~, LOCATION+1, DISPLAY+12 |
MAGERR | ENTRY+3~, CHOICE+51~, UPDATE1+1~, UPDATE1+37~ |
MAGFDA | ENTRY+3~, CHOICE+51~, UPDATE1+1~, UPDATE1+37~ |
MAGFDA( | CHOICE+37*, CHOICE+38*, CHOICE+39*, CHOICE+40*, CHOICE+41*, CHOICE+42*, CHOICE+43*, CHOICE+44*, CHOICE+52*, UPDATE1+21* , UPDATE1+22*, UPDATE1+23*, UPDATE1+24*, UPDATE1+25*, UPDATE1+26*, UPDATE1+38* |
MAGIENS | ENTRY+3~, CHOICE+51~, UPDATE1+1~, UPDATE1+37~ |
MAGIENS(1 | CHOICE+48 |
MCAR6972 | CPT+2~, CPT+3*, CPT+4, CPT+5 |
MSG | ENTRY+2~, ENTRY+7 |
MSG(1 | ENTRY+5* |
MSG(2 | ENTRY+6* |
MSG(3 | ENTRY+5* |
NAME | LOOKUP~, LOOKUP+6, LOOKUP+30, BLDPXLST+1~, BLDPXLST+6*, BLDPXLST+8*, BLDPXLST+12, BLDPXLST+19, BLDPXLST+20 |
ND0 | BLDPXLST+9~, BLDPXLST+17* |
NEWCLINIC | CLINIC+20~, CLINIC+21, CLINIC+22, CLINIC+23 |
NONE | BLDPXLST+9~ |
OK | BLDPXLST+9~* |
OK(3 | BLDPXLST+15 |
OPTION | ENTRY+2~, ENTRY+14, PROC+1~, PROC+18, CHOOSE~ |
OPTION( | PROC+6*, PROC+12, PROC+13, PROC+14, PROC+19, CHOOSE+3, CHOOSE+4 |
OPTION("" | PROC+9 |
OPTION(1 | ENTRY+9* |
OPTION(2 | ENTRY+10* |
OPTION(3 | ENTRY+11* |
OPTION(4 | ENTRY+12* |
OPTIONIEN | PROC+1~ |
OPTIONIEN( | PROC+7*, PROC+13, PROC+19 |
PROCEDURE | ENTRY+2~, CHOICE+4, CHOICE+7, CHOICE+9, CHOICE+12, CHOICE+14, CHOICE+38, UPDATE+1~, UPDATE+3*, UPDATE+5* , CONSULT~, CONSULT+1*, PROC~, PROC+2, PROC+4, CPT+1, CPT+3, DISPLAY+4 |
PROMPT | ENTRY+2~, ENTRY+13*, ENTRY+14, PROC+17*, PROC+18, YESNO~, YESNO+2, CHOOSE~, CHOOSE+6 |
QRSCP | ENTRY+2~, CHOICE+26, CHOICE+44, UPDATE+11*, UPDATE1+8, UPDATE1+26, QRSCP~, QRSCP+1, DISPLAY+15 |
REQUIRED | LOOKUP~, LOOKUP+32, BLDPXLST+2 |
RETURN | LOOKUP+1~, LOOKUP+12, LOOKUP+17*, LOOKUP+21*, LOOKUP+26*, LOOKUP+27* |
SERVICE | ENTRY+2~, CHOICE+4, CHOICE+7, CHOICE+9, CHOICE+12, CHOICE+15, CHOICE+37, UPDATE+1~, UPDATE+3*, UPDATE+4* , CONSULT~, CONSULT+2, PROC~, PROC+13*, PROC+19*, DISPLAY+3, DISPLAY+21 |
SPEC | BLDPXLST+9~*, BLDPXLST+11* |
SPECX | BLDPXLST+14~*, BLDPXLST+15* |
TMP | CLINIC+1~, LOOKUP+1~, BLDPXLST+4! |
TMP( | CLINIC+13*, CLINIC+22, CLINIC+23*, CLINIC+26, LOOKUP+40, BLDPXLST+21* |
VALUE | GETVALUE+1~, GETVALUE+2*, GETVALUE+4*, GETVALUE+6 |
X | ENTRY+2~, ENTRY+14*, CHOICE+3, CHOICE+4*, CHOICE+6, CHOICE+7*, CHOICE+21*, CHOICE+22*, CHOICE+23*, CHOICE+24* , CHOICE+25*, CHOICE+26*, CHOICE+27*, CHOICE+32*, UPDATE+1~, UPDATE+2*, UPDATE+3, UPDATE+6, UPDATE+7, UPDATE+8 , UPDATE+9, UPDATE+10, UPDATE+11, UPDATE+17*, UPDATE+20*, UPDATE1+1~, UPDATE1+3*, UPDATE1+4*, UPDATE1+5*, UPDATE1+6* , UPDATE1+7*, UPDATE1+8*, UPDATE1+9*, UPDATE1+16*, PROC+1~, PROC+2*, PROC+3, PROC+18*, PROC+21, CLINIC+1~ , CLINIC+8*, CLINIC+9, CLINIC+10*, CLINIC+11, CLINIC+12, CLINIC+19, CLINIC+21*, LOOKUP+1~, LOOKUP+7*, LOOKUP+16* , LOOKUP+20*, DISPLAY+1~, P~, P+2, P+3, YESNO+1~, CHOOSE+1~ |
X( | DISPLAY+22, DISPLAY+23, DISPLAY+24 |
Y | LOOKUP+1~, LOOKUP+37, LOOKUP+38, LOOKUP+39, LOOKUP+40*, LOOKUP+41, YESNO+1~, CHOOSE+1~, CHOOSE+11 |
Y(0 | YESNO+7 |
Z | P+1~, P+2*, P+3*, P+4 |