PXRMETT ; SLC/PJH - Extract Summary Display ;04/09/2007
Source file <PXRMETT.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
START(IEN) | ||
BLDLIST(IEN,FINDINGS,PATIENT) | ;Build workfile.
|
|
ENTRY | ;Entry code
|
|
EXIT | ;Exit code
|
|
FBLD(PATIENT) | ;Build finding list
|
|
FLIST | ;Toggle list with/without finding totals
|
|
FRE(NUMBER,NAME,SNAME,TOT,APPL,NAPPL,DUE,NDUE) | ;Format reminder entry
|
|
FREF(NUMBER,NAME,SNAME,TOT,APPL,NAPPL,DUE,NDUE,ETYP) | ;Format finding entry
|
|
HDR | ; Header code
|
|
HLP | ;Help code
|
|
INIT | ;Init
|
|
PBLD(IEN,IND,SUB) | ;
|
|
PEXIT | ;Protocol exit code
|
|
PLIST(IEN) | ;Patient list display
|
|
PLIST1 | ;Toggle list with/without finding totals
|
|
XQORM | ||
XSEL | ;PXRM EXTRACT TOTALS SELECT ENTRY validation
|
Name | Field # of Occurrence |
---|---|
ENDR^%ZISS | START+2 |
GETS^DIQ | BLDLIST+14 |
$$TXT^PXRMEPM | FBLD+19 |
START^PXRMLPP | PLIST+11, XSEL+14 |
EN^VALM | START+4, HLP+3 |
FULL^VALM1 | EXIT+4 |
CLEAN^VALM10 | EXIT+3 |
EN^VALM2 | PLIST+2 |
$$FMTE^XLFDT | HDR+2, HDR+3 |
$$LJ^XLFSTR | FBLD+19, FRE+4, FREF+4, PBLD+12 |
$$RJ^XLFSTR | BLDLIST+29, FBLD+17, FRE+5, FRE+6, FRE+7, FRE+8, FRE+9, FREF+5, FREF+7, FREF+8 , FREF+9, FREF+10, PBLD+7 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | PBLD+5 |
^ORD(101 - [#101] | XQORM |
^PXD(811.9 - [#811.9] | BLDLIST+11, BLDLIST+12 |
^PXRMD(811.5 - [#811.5] | FBLD+7 |
^PXRMXP(810.5 - [#810.5] | BLDLIST+25 |
^PXRMXT(810.3 - [#810.3] | BLDLIST+8, BLDLIST+9, FBLD+4, FBLD+5, HDR+1, HDR+2, HDR+3, PBLD+3, PBLD+4 |
^TMP("PXRMETT" | BLDLIST+2!, BLDLIST+23*, BLDLIST+24*, BLDLIST+27*, BLDLIST+28*, BLDLIST+29*, BLDLIST+31*, BLDLIST+32*, BLDLIST+36*, EXIT+1! , FBLD+14*, FBLD+15*, FBLD+17*, FBLD+18*, FBLD+19*, FBLD+20*, FBLD+22*, FBLD+23*, FBLD+26*, FBLD+27* , PBLD+7*, PBLD+8, PBLD+9*, PBLD+12*, PBLD+13*, PBLD+15*, PBLD+16*, PLIST+10, XSEL+13 |
^TMP("PXRMETTH" | EXIT+2! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APPL | BLDLIST+4~, BLDLIST+17*, BLDLIST+31, FBLD+1~, FBLD+9*, FBLD+22, FRE~, FRE+6, FREF~, FREF+7 |
ARRAY | PBLD+1~ |
ARRAY( | PBLD+6*, PBLD+10 |
CNT | PBLD+1~, PBLD+2*, PBLD+6*, PBLD+7 |
DATA | BLDLIST+4~, BLDLIST+9*, BLDLIST+10, BLDLIST+13, BLDLIST+17, BLDLIST+18, BLDLIST+19, FBLD+1~, FBLD+5*, FBLD+6 , FBLD+8, FBLD+9, FBLD+10 |
DFN | PBLD+1~, PBLD+4*, PBLD+5 |
DUE | BLDLIST+4~, BLDLIST+18*, BLDLIST+31, FBLD+1~, FBLD+10*, FBLD+22, FRE~, FRE+8, FREF~, FREF+9 |
ETYP | FBLD+1~, FBLD+8*, FBLD+19, FBLD+22, FREF~, FREF+6 |
EVAL | FBLD+1~ |
FINDINGS | BLDLIST~, BLDLIST+34 |
GNAM | FBLD+1~, FBLD+8*, FBLD+11, FBLD+16, FBLD+17 |
GTYP | FBLD+1~, FBLD+8*, FBLD+19 |
IEN | START~, BLDLIST~, BLDLIST+8, BLDLIST+9, ENTRY+1, FBLD+4, FBLD+5, FBLD+24, FLIST+4, HDR+1 , HDR+2, HDR+3, PBLD~, PBLD+3, PBLD+4, PLIST~, PLIST1+3 |
IND | BLDLIST+4~, BLDLIST+8*, BLDLIST+9, FBLD+4, FBLD+5, FBLD+24, PBLD~, PBLD+3, PBLD+4, PLIST+1~ , PLIST+7*, PLIST+8*, PLIST+10 |
LEN | PBLD+1~, PBLD+8* |
LIST | BLDLIST+4~ |
NAME | FRE~, FRE+3, FREF~, FREF+3, PBLD+1~, PBLD+5*, PBLD+6, PBLD+10*, PBLD+12 |
NAPPL | BLDLIST+4~, BLDLIST+17*, BLDLIST+31, FBLD+2~, FBLD+9*, FBLD+22, FRE~, FRE+7, FREF~, FREF+8 |
NDUE | BLDLIST+4~, BLDLIST+18*, BLDLIST+31, FBLD+2~, FBLD+10*, FBLD+22, FRE~, FRE+9, FREF~, FREF+10 |
NUMBER | FRE~, FREF~ |
OGNAM | FBLD+2~, FBLD+3*, FBLD+11, FBLD+12, FBLD+16* |
OLIST | BLDLIST+4~, BLDLIST+7*, BLDLIST+20, BLDLIST+25* |
ORU | HLP+1~ |
ORUPRMT | HLP+1~ |
PATIENT | BLDLIST~, BLDLIST+34, FBLD~, FBLD+24 |
PCNT | PBLD+1~, PBLD+3*, PBLD+4 |
PLCNT | BLDLIST+5~, BLDLIST+7*, BLDLIST+21, BLDLIST+24, BLDLIST+26*, BLDLIST+27, BLDLIST+28, BLDLIST+29, BLDLIST+32, FBLD+15 , FBLD+18, FBLD+20, FBLD+23, FBLD+27, PBLD+9, PBLD+13, PBLD+16 |
PLIEN | PLIST+1~, PLIST+10*, PLIST+11, XSEL+1~, XSEL+13*, XSEL+14 |
PLIST | BLDLIST+5~, BLDLIST+19*, BLDLIST+20, BLDLIST+25, BLDLIST+28 |
>> PLNAME | BLDLIST+25*, BLDLIST+29 |
>> PXRMDONE | PLIST+6*, PLIST+8 |
RIEN | BLDLIST+5~, BLDLIST+10*, BLDLIST+11, BLDLIST+12 |
RNAME | BLDLIST+5~, BLDLIST+11*, BLDLIST+12*, BLDLIST+31 |
SARRAY | BLDLIST+5~, BLDLIST+13* |
SARRAY(4 | BLDLIST+15 |
SEL | XSEL+1~, XSEL+2*, XSEL+4*, XSEL+6, XSEL+9, XSEL+10, XSEL+13 |
SEQ | BLDLIST+5~, FBLD+2~, FBLD+8*, FBLD+22 |
SNAME | BLDLIST+5~, BLDLIST+15*, BLDLIST+16*, BLDLIST+31, FRE~, FRE+3, FREF~ |
STATION | BLDLIST+5~, BLDLIST+13*, BLDLIST+14, BLDLIST+15, BLDLIST+16 |
SUB | FBLD+2~, FBLD+3*, FBLD+4*, FBLD+5, FBLD+24, HLP+2*, PBLD~, PBLD+3, PBLD+4 |
TEMP | FRE+1~, FRE+2*, FRE+4*, FRE+5*, FRE+6*, FRE+7*, FRE+8*, FRE+9*, FRE+10, FREF+1~ , FREF+2*, FREF+4*, FREF+5*, FREF+7*, FREF+8*, FREF+9*, FREF+10*, FREF+11 |
TIEN | FBLD+2~, FBLD+6*, FBLD+7 |
TNAME | FBLD+2~, FBLD+7*, FBLD+22, FRE+1~, FRE+3*, FRE+4, FREF+1~, FREF+3*, FREF+4 |
TOGGLE | START~, START+3*, ENTRY+1, FLIST+1*, FLIST+2, FLIST+4, PLIST1+3 |
TOGGLE1 | START~, START+3*, ENTRY+1, FLIST+2*, FLIST+4, PLIST1+1*, PLIST1+3 |
TOT | BLDLIST+5~, BLDLIST+17*, BLDLIST+31, FBLD+9*, FBLD+22, FRE~, FRE+5, FREF~, FREF+5 |
TOTAL | FBLD+2~ |
TSOURCE | FRE+1~, FREF+1~ |
U | BLDLIST+10, BLDLIST+11, BLDLIST+12, BLDLIST+13, BLDLIST+17, BLDLIST+18, BLDLIST+19, BLDLIST+25, FBLD+6, FBLD+7 , FBLD+8, FBLD+9, FBLD+10, HDR+1, HDR+2, HDR+3, PBLD+4, PBLD+5, XQORM |
USTR | PBLD+1~, PBLD+8*, PBLD+12 |
>> VALMAR | XSEL+9 |
VALMBCK | START~, EXIT+5*, FLIST+6*, PLIST+12*, PLIST1+5*, XSEL+8*, XSEL+11*, XSEL+15* |
VALMBG | START~, FLIST+6*, PLIST1+5* |
VALMCNT | START~, START+3*, BLDLIST+7*, BLDLIST+22*, BLDLIST+23, BLDLIST+24, BLDLIST+26*, BLDLIST+27, BLDLIST+29, BLDLIST+30* , BLDLIST+31, BLDLIST+32, BLDLIST+36, FBLD+13*, FBLD+14, FBLD+15, FBLD+16*, FBLD+17, FBLD+18*, FBLD+19 , FBLD+20, FBLD+21*, FBLD+22, FBLD+23, FBLD+25*, FBLD+26, FBLD+27, INIT+1*, PBLD+2*, PBLD+7 , PBLD+8, PBLD+9, PBLD+11*, PBLD+12, PBLD+13, PBLD+14*, PBLD+15, PBLD+16, XQORM, XSEL+9 |
>> VALMHDR(1 | HDR+1* |
>> VALMHDR(2 | HDR+2*, HDR+3* |
VALMSG | START~, HDR+4*, PEXIT+1* |
VALMY | PLIST+1~, PLIST+4 |
VALMY( | PLIST+8 |
X | START~, START+1* |
XMZ | START~ |
XQORM | START~, HLP+1~ |
XQORM("#" | XQORM* |
XQORM("A" | XQORM+1* |
XQORNOD | START~ |
XQORNOD(0 | PLIST+2, XSEL+2 |