PXRMEXLM ;SLC/PKR/PJH - Clinical Reminder Exchange List Manager routines. ;12/20/2013
Source file <PXRMEXLM.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 10 | ($$GETEHF,LHF)^PXRMEXHF START^PXRMEXIH BLDLIST^PXRMEXLC INITMPG^PXRMEXLM ($$GETMESSN,LMM)^PXRMEXMM CRE^PXRMEXPD DELETE^PXRMEXU1 $$LWEB^PXRMEXWB ($$SELECT,REMVAR)^PXRMINQ ($$QUERYAO,RDEF,REXL)^PXRMLIST |
| Registration | 3 | (CHGCAP,EN)^VALM (CLEAR,FULL)^VALM1 CLEAN^VALM10 |
| Kernel | 1 | (ENDR,KILL)^%ZISS |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Clinical Reminders | 3 | PXRM REMINDER EXCHANGE PXRMEXLM PXRMEXSI |
| PCE Patient Care Encounter | 1 | PXRM REMINDER EXCHANGE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INITMPG | ;Initialized all the ^TMP globals.
|
|
| XSEL | ;PXRM EXCH SELECT COMPONENT validation
|
|
| HELP | ;Help code
|
|
| LRDEF | ;List the name and print name of all reminder definitions.
|
|
| LDWEB | ;Load a host file from a web site into the repository.
|
|
| DEFINQ | ;Reminder definition inquiry.
|
|
| XQORM | ;Set the range for selection.
|
|
| LDMM | ;Load a MailMan message into the repository.
|
|
| PEXIT | ;PXRM EXCH MENU protocol exit code
|
|
| START | ;Main entry point for PXRM EXCHANGE
|
|
| INIT | ;Init
|
|
| EXIT | ;Exit code
|
|
| CRE | ;Create a packed reminder and store it in the repository.
|
|
| ENTRY | ;Entry code
|
|
| LDHF | ;Load a host file into the repository.
|
|
| HDR | ; Header code
|
| Name | Field # of Occurrence |
|---|---|
| ENDR^%ZISS | START+10 |
| KILL^%ZISS | START+13 |
| ^DIR | XSEL+28 |
| $$GETEHF^PXRMEXHF | LDHF+4 |
| LHF^PXRMEXHF | LDHF+8 |
| START^PXRMEXIH | XSEL+48 |
| BLDLIST^PXRMEXLC | ENTRY+2, LDHF+22, LDMM+12, LDMM+23, LDWEB+9 |
| INITMPG^PXRMEXLM | ENTRY+1, EXIT+1 |
| $$GETMESSN^PXRMEXMM | LDMM+4 |
| LMM^PXRMEXMM | LDMM+7 |
| CRE^PXRMEXPD | CRE+2 |
| DELETE^PXRMEXU1 | XSEL+41 |
| $$LWEB^PXRMEXWB | LDWEB+2 |
| $$SELECT^PXRMINQ | DEFINQ+5 |
| REMVAR^PXRMINQ | DEFINQ+9 |
| $$QUERYAO^PXRMLIST | LRDEF+5 |
| RDEF^PXRMLIST | LRDEF+7 |
| REXL^PXRMLIST | XSEL+44 |
| CHGCAP^VALM | LRDEF+10 |
| EN^VALM | DEFINQ+11, HELP+4, LRDEF+11, START+11, XSEL+35 |
| CLEAR^VALM1 | LDHF+3, LDMM+3 |
| FULL^VALM1 | CRE+1, EXIT+3, XSEL+17 |
| CLEAN^VALM10 | EXIT+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ORD(101 - [#101] | XQORM+3 |
| ^TMP("PXRMEXDGH" | INITMPG+2! |
| ^TMP("PXRMEXDH" | INITMPG+1! |
| ^TMP("PXRMEXDL" | INITMPG+3! |
| ^TMP("PXRMEXFND" | INITMPG+5! |
| ^TMP("PXRMEXHF" | INITMPG+4! |
| ^TMP("PXRMEXIA" | INITMPG+6! |
| ^TMP("PXRMEXIAD" | INITMPG+7! |
| ^TMP("PXRMEXID" | INITMPG+8! |
| ^TMP("PXRMEXIH" | INITMPG+9! |
| ^TMP("PXRMEXLC" | INITMPG+10!, XSEL+36! |
| ^TMP("PXRMEXLD" | INITMPG+11!, LRDEF+2, LRDEF+6*, LRDEF+8*, LRDEF+10 |
| ^TMP("PXRMEXLHF" | INITMPG+12! |
| ^TMP("PXRMEXLMM" | INITMPG+13! |
| ^TMP("PXRMEXLR" | INITMPG+14!, XQORM+2, XSEL+14, XSEL+43!, XSEL+45 |
| ^TMP("PXRMEXMH" | INITMPG+15! |
| ^TMP("PXRMEXMM" | INITMPG+16! |
| ^TMP("PXRMEXRI" | INITMPG+17! |
| ^TMP("PXRMEXTMP" | INITMPG+18! |
| ^TMP("PXRMEXTXT" | INITMPG+19! |
| ^TMP("PXRMRINQ" | DEFINQ+8!, DEFINQ+10, DEFINQ+12! |
| ^TMP($J | INITMPG+20!, INITMPG+21!, INITMPG+22!, INITMPG+23! |
| Name | Line Occurrences |
|---|---|
| XQORM | ENTRY+3, PEXIT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARO | LRDEF+4~, LRDEF+5*, LRDEF+6, LRDEF+7 |
| COUNT | XSEL+39~ |
| DEFLIST | LRDEF+4~, LRDEF+7, LRDEF+8 |
| DEFLIST("VALMCNT" | LRDEF+9 |
| DELLIST | XSEL+39~, XSEL+41 |
| DELLIST( | XSEL+40* |
| DIR | XSEL+20~ |
| DIR("?" | XSEL+26* |
| DIR("??" | XSEL+27* |
| DIR("A" | XSEL+24* |
| DIR("B" | XSEL+25* |
| DIR(0 | XSEL+21*, XSEL+22*, XSEL+23* |
| DIROUT | XSEL+20~, XSEL+29 |
| DIRUT | XSEL+20~, XSEL+29 |
| DTOUT | XSEL+20~, XSEL+30 |
| DUOUT | XSEL+20~, XSEL+30 |
| FILE | LDHF+1~, LDHF+7*, LDHF+8, LDHF+11, LDHF+13 |
| GBL | DEFINQ+1~, DEFINQ+2*, DEFINQ+3*, DEFINQ+9 |
| IEN | DEFINQ+1~, DEFINQ+5*, DEFINQ+6*, DEFINQ+7, DEFINQ+9, XSEL+39~ |
| IND | LDHF+1~, LDHF+15*, LDHF+16*, LDHF+17, LDHF+18, LDHF+19, LDMM+1~, LDMM+16*, LDMM+17*, LDMM+18 , LDMM+19, LDMM+20, XSEL+39~ |
| >> IORESET | START+12 |
| NEXCHE | XQORM+1~, XQORM+2*, XQORM+3 |
| OPTION | XSEL+20~, XSEL+31*, XSEL+34, XSEL+38, XSEL+48 |
| ORU | HELP+3~ |
| ORUPRMT | HELP+3~ |
| PATH | LDHF+1~, LDHF+6*, LDHF+8, LDHF+11, LDHF+13 |
| PXRMDONE | START+1~, START+3* |
| PXRMIGDS | EXIT+5! |
| PXRMINST | EXIT+5! |
| PXRMNMCH | START+1~ |
| PXRMRIEN | XSEL+1~, XSEL+14*, XSEL+40 |
| PXRMROOT | DEFINQ+1~, DEFINQ+4*, DEFINQ+5 |
| RBL | LDHF+1~, LDHF+9*, LDHF+17*, LDHF+22, LDMM+1~, LDMM+8*, LDMM+18*, LDMM+23 |
| RELIST | XSEL+39~ |
| SEL | XSEL+1~, XSEL+2*, XSEL+4*, XSEL+6, XSEL+9, XSEL+10, XSEL+14 |
| SUCCESS | LDHF+1~, LDHF+8, LDHF+9, LDHF+10, LDMM+7, LDMM+8, LDMM+9, LDWEB+1~, LDWEB+2*, LDWEB+3 , LDWEB+9 |
| SUCCESS( | LDHF+16, LDHF+17, LDHF+18, LDMM+17, LDMM+18, LDMM+19 |
| TEMP | LDHF+1~, LDHF+4*, LDHF+5, LDHF+6, LDHF+7, LDHF+14*, LDHF+18*, LDHF+19*, LDHF+20, LDMM+1~ , LDMM+15*, LDMM+19*, LDMM+20*, LDMM+21, LDWEB+1~ |
| U | DEFINQ+6, LDHF+6, LDHF+7, XQORM+3, XSEL+21, XSEL+27 |
| URL | LDWEB+1~, LDWEB+2, LDWEB+4, LDWEB+6, LDWEB+7 |
| >> VALMAR | XSEL+9 |
| VALMBCK | CRE+3*, DEFINQ+7*, DEFINQ+13*, EXIT+4*, LDHF+5*, LDHF+23*, LDMM+6*, LDMM+24*, LDWEB+10*, START+8~ , XSEL+8*, XSEL+11*, XSEL+29*, XSEL+30*, XSEL+46*, XSEL+50* |
| VALMCNT | DEFINQ+1~, DEFINQ+10*, INIT+1*, LRDEF+1~, LRDEF+2*, LRDEF+9*, XSEL+9, XSEL+45* |
| >> VALMHDR(1 | HDR+1*, LDHF+11*, LDHF+13*, LDMM+10*, LDMM+14*, LDWEB+4*, LDWEB+6*, LDWEB+7*, XSEL+46* |
| >> VALMHDR(2 | LDHF+20*, LDMM+21*, XSEL+46* |
| VALMSG | HDR+2*, PEXIT+1*, START+8~ |
| VALMY | XSEL+39~ |
| X | START+8~, START+9*, XSEL+20~ |
| XMZ | LDMM+1~, LDMM+4*, LDMM+5, LDMM+6, LDMM+7, LDMM+10, LDMM+14, START+8~ |
| XQORM | HELP+3~ |
| XQORM("#" | XQORM+3* |
| XQORM("A" | XQORM+4* |
| >> XQORNOD(0 | XSEL+2 |
| Y | XSEL+20~, XSEL+31 |