BTPWPPAT ;VNGT/HS/ALA-Get list of procedures by patient ; 12 Feb 2009 10:23 AM
Source file <BTPWPPAT.m>
Package | Total | Call Graph |
---|---|---|
Tracking Procedure Workflow | 5 | $$SCOMM^BTPWPDS1 ($$CAT,$$FLG)^BTPWPDSP ($$FND,$$FUP,$$INTER,$$NOT)^BTPWPEVT $$FNDS^BTPWPLND ($$LNK,$$QLNK)^BTPWPTRG |
Kernel | 2 | ^%ZTER $$NOW^XLFDT |
VA Fileman | 2 | DT^DICRW ($$GET1,GETS)^DIQ |
iCare | 2 | ($$FMTE,$$TKO)^BQIUL1 ($$ICD0,$$ICD9,$$ICPT)^BQIUL3 |
Order Entry Results Reporting | 1 | AGET^ORWORR |
Name | Comments | DBIA/ICR reference |
---|---|---|
QU(DFN,STATE) | ; EP - Loop through and retrieve Queued Events
|
|
NOT(TIEN) | ;Calculate latest notification date
|
|
TR(DFN,STATE) | ; EP - Loop through and retrieve Tracked Events
|
|
ERR | ;
|
|
FND(TIEN) | ;Calculate latest finding date
|
|
RET(DATA,DFN,VIEW,STATE,CMLST) | ; EP - BTPW GET CMET BY PATIENT
; Description ; Get the grid values for a specific patient for either queued or tracked events ; Input ; DFN - Patient internal entry number ; VIEW - 'T' for tracked events, 'Q' for queued events, 'N' for planned ; STATE - State or status ; CMLST - List of file IENs to include (optional) |
|
GORD(TIEN) | ;EP - Field BTPWFUOR
|
|
ORD(DFN,ORDITM) | ;EP - Return active order information for selected test
|
|
FOL(TIEN) | ;Calculate latest follow-up date
|
|
QREC(QIEN,RESULT) | ; EP - Get a queued event record
|
|
DONE | ;
|
|
PREC(QIEN,RESULT) | ; EP - Get a planned event record
|
|
FLG(DFN) | ; EP - Return TICKLER INDICATOR for patient
|
|
TREC(TIEN,RESULT) | ; EP - Get a tracked event record
|
|
XGORD | ||
PL(DFN) | ; Loop through and retrieve Planned Events
|
Name | Field # of Occurrence |
---|---|
^%ZTER | ERR+1 |
$$FMTE^BQIUL1 | TREC+14, TREC+36, PREC+6, PREC+12, PREC+14, QREC+7, QREC+8, FND+11, FOL+12, NOT+12 , ORD+21 |
$$TKO^BQIUL1 | QREC+12 |
$$ICD0^BQIUL3 | QREC+23 |
$$ICD9^BQIUL3 | QREC+22 |
$$ICPT^BQIUL3 | QREC+24 |
$$SCOMM^BTPWPDS1 | QREC+27 |
$$CAT^BTPWPDSP | TREC+12, PREC+4, QREC+4 |
$$FLG^BTPWPDSP | FLG+7 |
$$FND^BTPWPEVT | TREC+26 |
$$FUP^BTPWPEVT | TREC+27 |
$$INTER^BTPWPEVT | TREC+30 |
$$NOT^BTPWPEVT | TREC+28 |
$$FNDS^BTPWPLND | TREC+15 |
$$LNK^BTPWPTRG | TREC+18 |
$$QLNK^BTPWPTRG | QREC+30 |
DT^DICRW | RET+13 |
$$GET1^DIQ | TREC+9, TREC+32, TREC+35, TREC+36, PREC+8, PREC+14, QREC+5, QREC+10, QREC+19, QREC+20 , ORD+17, GORD+5, GORD+6, GORD+7 |
GETS^DIQ | FND+2, FOL+3, NOT+3 |
AGET^ORWORR | ORD+6 |
$$NOW^XLFDT | ERR+3 |
RPC Name | Call Tags |
---|---|
BTPW GET CMET BY PATIENT | RET |
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | GET1^DIQ |
^BTPWP - [#90620] | GET1^DIQ, GETS^DIQ |
^BTPW(90621 - [#90621] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BTPW(90621 - [#90621] | TREC+11, PREC+3, QREC+3 |
^BTPW(90621.1 - [#90621.1] | QREC+16, QREC+18 |
^BTPWP - [#90620] | TREC+5, PREC+2 |
^BTPWP("AD" | TR+17, FLG+6 |
^BTPWP("AE" | TR+10, PL+7 |
^BTPWQ( | QREC+2, QREC+11 |
^BTPWQ("AD" | QU+19 |
^BTPWQ("AE" | QU+9 |
^DD("DD" | ERR+3 |
^OR(100 - [#100] | ORD+13, ORD+19, ORD+20 |
^TMP("BTPWPPAT" | RET+11 |
^TMP("ORR" | ORD+5!, ORD+9, ORD+10, ORD+12, ORD+22! |
Name | Line Occurrences |
---|---|
$$FND | TREC+22 |
$$FOL | TREC+23 |
$$NOT | TREC+24 |
$$ORD | PREC+9, GORD+8 |
DONE | RET+26, RET+32, RET+33, RET+34 |
PL | RET+34 |
PREC | PL+12 |
QREC | QU+17, QU+27 |
QU | RET+33 |
TR | RET+32 |
TREC | TR+15, TR+22 |
XGORD | GORD+5, GORD+6, GORD+11 |
Name | Field # of Occurrence |
---|---|
^(0 | QREC+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BMXSEC | RET+26*, ERR+4* |
CAT | TREC+1~, TREC+12*, TREC+38, PREC+1~, PREC+4*, PREC+17, QREC+1~, QREC+4*, QREC+33 |
CDT | FND+1~, FND+9*, FOL+2~, FOL+10*, NOT+2~, NOT+10* |
CMLST | RET~, RET+21, RET+23, TR+13, TR+20, PL+10, QU+12, QU+22 |
CMLST( | RET+23*, TR+13, TR+20, PL+10, QU+12, QU+22 |
CNT | ORD+2~, ORD+10*, ORD+12 |
DATA | RET~, RET+11*, RET+12, RET+28, RET+29, RET+30, DONE+1, ERR+5, TR+5, TR+6 , TR+7, TR+8, TR+16, TR+23, PL+5, PL+13, QU+5, QU+6, QU+7, QU+18 , QU+28 |
DFN | RET~, RET+32, RET+33, RET+34, TR~, TR+10, TR+17, PL~, PL+7, PREC+9 , QU~, QU+9, QU+19, FLG~, FLG+4, FLG+6, ORD~, ORD+6, GORD+2~, GORD+5* , GORD+8 |
DT | RET+13 |
DTIEN | ORD+11~, ORD+19*, ORD+20 |
DUE | PREC+1~, PREC+6*, PREC+17 |
ERRDTM | ERR+2~, ERR+3*, ERR+4 |
FC | QREC+1~, QREC+11* |
FCOM | QREC+1~ |
>> FCOMM | QREC+11*, QREC+12*, QREC+33 |
FDATA | FND+1~, FOL+2~ |
FDATA( | FND+4, FND+7, FND+9, FOL+5, FOL+8, FOL+10 |
FDT | FND+1~, FND+4*, FND+9*, FND+11*, FND+12, FOL+2~, FOL+5*, FOL+10*, FOL+12*, FOL+13 |
FIEN | FND+1~, FND+4*, FND+7, FND+9, FOL+2~, FOL+5*, FOL+8, FOL+10 |
FIL | QREC+17~, QREC+18*, QREC+19, QREC+20 |
>> FIND | QREC+10*, QREC+33 |
FLD | QREC+17~, QREC+18*, QREC+19, QREC+20 |
FLG | FLG+2~, FLG+6*, FLG+7*, FLG+8*, FLG+10*, FLG+11 |
FND | TREC+1~, TREC+26*, TREC+38 |
FNDDT | TREC+1~, TREC+22*, TREC+38 |
FSUMM | TREC+2~, TREC+15*, TREC+38 |
>> FULLE | QREC+14*, QREC+16*, QREC+19*, QREC+22*, QREC+23*, QREC+24*, QREC+33 |
>> FULLR | QREC+13*, QREC+30*, QREC+33 |
FUP | TREC+1~, TREC+27*, TREC+38 |
FUPDT | TREC+1~, TREC+23*, TREC+38 |
HFND | TREC+2~, TREC+26*, TREC+38 |
HFUP | TREC+2~, TREC+27*, TREC+38 |
HINT | TREC+2~, TREC+30*, TREC+38 |
HNOT | TREC+2~, TREC+28*, TREC+38 |
HRES | TREC+2~, TREC+18*, TREC+38, QREC+1~, QREC+30*, QREC+33 |
I | RET+22~, RET+23* |
IEN | RET+22~, RET+23* |
II | RET+9~, RET+15*, RET+28, RET+29, RET+30, DONE+1*, ERR+5*, TR+5, TR+6, TR+7 , TR+8, TR+16*, TR+23*, PL+5, PL+13*, QU+5, QU+6, QU+7, QU+18*, QU+28* |
INT | TREC+2~, TREC+30*, TREC+38 |
>> LIEN | QREC+20*, QREC+22, QREC+23, QREC+24 |
LMBY | QREC+1~, QREC+9*, QREC+33 |
LMDT | QREC+1~, QREC+8*, QREC+33 |
NDATA | NOT+2~ |
NDATA( | NOT+5, NOT+8, NOT+10 |
NDT | NOT+2~, NOT+5*, NOT+10*, NOT+12*, NOT+13 |
NIEN | NOT+2~, NOT+5*, NOT+8, NOT+10 |
NOT | TREC+1~, TREC+28*, TREC+38 |
NOTDT | TREC+1~, TREC+24*, TREC+38 |
ORD | PREC+1~, PREC+2*, PREC+8*, PREC+9*, PREC+10, PREC+11, PREC+12, ORD+11~, ORD+12*, ORD+13 , ORD+17, ORD+19, ORD+20, ORD+21, GORD+2~, GORD+4*, GORD+8*, GORD+11, GORD+14*, XGORD |
ORDDT | PREC+1~, PREC+12*, PREC+17, ORD+11~, ORD+16*, ORD+17*, ORD+18, ORD+20*, ORD+21 |
ORDINFO | ORD+2~ |
ORDITM | ORD~, ORD+13 |
ORDNM | PREC+1~, PREC+11*, PREC+17 |
ORDYN | PREC+1~, PREC+10*, PREC+17 |
>> ORINFO | ORD+9*, ORD+10, ORD+21*, ORD+23 |
ORLIST | ORD+2~, ORD+9*, ORD+10, ORD+12 |
PEV | TREC+1~, TREC+20* |
PRC | GORD+2~, GORD+6*, GORD+7*, GORD+8 |
PRCDT | TREC+1~, TREC+14*, TREC+38, QREC+1~, QREC+7*, QREC+33 |
PROC | TREC+1~, TREC+11*, TREC+12, TREC+38, PREC+1~, PREC+3*, PREC+4, PREC+8, QREC+1~, QREC+3* , QREC+4 |
PROCNM | TREC+1~, TREC+11*, TREC+38, PREC+1~, PREC+3*, PREC+17, QREC+1~, QREC+3*, QREC+33 |
PRV | PREC+1~, PREC+7*, PREC+14, PREC+17 |
>> PRVDT | PREC+14*, PREC+17 |
PRVEVT | PREC+1~, PREC+14*, PREC+17 |
PTNAME | PREC+1~, QREC+1~ |
QIEN | TREC+1~, TREC+8*, TREC+9, PREC~, PREC+2, PREC+17, QREC~, QREC+2, QREC+5, QREC+10 , QREC+11, QREC+27, QREC+30, QREC+33 |
>> RCFILE | QREC+15*, QREC+16, QREC+18 |
>> RCIEN | QREC+15*, QREC+19, QREC+20 |
RES | TREC+1~, TREC+18*, TREC+38, QREC+1~, QREC+30*, QREC+33 |
RESULT | RET+9~, TR+2~, TR+15, TR+16, TR+22, TR+23, TREC~, TREC+4*, TREC+38*, PL+2~ , PL+12, PL+13, PREC~, PREC+17*, QU+2~, QU+17, QU+18, QU+27, QU+28, QREC~ , QREC+33* |
RIEN | RET+9~, TR+2~, TR+10*, TR+13, TR+15, TR+17*, TR+20, TR+22, TREC+2~, PL+2~ , PL+7*, PL+10, PL+12, QU+2~, QU+9*, QU+12, QU+17, QU+19*, QU+22, QU+27 |
SCOMM | QREC+1~, QREC+27*, QREC+33 |
STAT | QREC+1~, QREC+5*, QREC+33 |
STATE | RET~, RET+18*, RET+32, RET+33, TR~, TR+10, TR+17, TREC+1~, TREC+32*, TREC+33 , TREC+38, QU~, QU+9, QU+19 |
STATUS | TREC+1~, TREC+9* |
>> TAB | QREC+18*, QREC+21, QREC+22, QREC+23, QREC+24 |
TDATA | TREC+1~, TREC+5*, TREC+8, TREC+11, TREC+13, TREC+14, TREC+20, PREC+1~, PREC+2*, PREC+3 , PREC+5, PREC+6, PREC+7, QREC+1~, QREC+2*, QREC+3, QREC+6, QREC+7, QREC+8, QREC+9 , QREC+13, QREC+15 |
TIEN | TREC~, TREC+5, TREC+15, TREC+18, TREC+22, TREC+23, TREC+24, TREC+26, TREC+27, TREC+28 , TREC+30, TREC+32, TREC+35, TREC+36, TREC+38, QREC+13*, FND~, FND+2, FOL~, FOL+3 , NOT~, NOT+3, FLG+2~, FLG+6*, FLG+7, GORD~, GORD+5, GORD+6 |
U | RET+13, TREC+8, TREC+11, TREC+13, TREC+14, TREC+20, TREC+38, PREC+3, PREC+5, PREC+6 , PREC+7, PREC+11, PREC+12, PREC+17, QREC+3, QREC+6, QREC+7, QREC+8, QREC+9, QREC+13 , QREC+15, QREC+33, ORD+12, ORD+21, GORD+14 |
UID | RET+9~, RET+10*, RET+11 |
VIEW | RET~, RET+18*, RET+26, RET+32, RET+33, RET+34 |
VISIT | TREC+1~, TREC+13*, TREC+38, PREC+1~, PREC+5*, PREC+17, QREC+1~, QREC+6*, QREC+33 |
WHEN | TREC+1~, TREC+36*, TREC+38 |
WHO | TREC+1~, TREC+35*, TREC+38 |
Y | ERR+2~, ERR+3* |
>> ZTSK | RET+10 |