Routine: BQITDPNL

Information

BQITDPNL ;PRXM/HC/ALA-Get Patient Tags by Panel ; 20 Nov 2007 2:20 PM

Source file <BQITDPNL.m>

Package	Total	Call Graph
iCare	4	$$GETDATA^BQITDLST $$ACT^BQITDUTL $$FMTE^BQIUL1 $$SENS^BQIULPT
Kernel	2	^%ZTER $$NOW^XLFDT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
iCare	1	BQITDLST

Name	Comments	DBIA/ICR reference
ERR	;
PPAT(BQIDFN,INC)	; Get data by patient
EN(DATA,OWNR,PLIEN,PLIST)	;EP - BQI GET DX CAT BY PANEL
TAG(IEN,INC,FULL)	;EP - Get current tag data ; Check status ; INC - if set to 0 only include tag if active ; if set to 1 only include tag if active or Not Accepted tags ; if set to anything else include tag regardless of status ; FULL if set to 0, don't include full demographics ; if set to 1, include full demographics
PAT(DATA,DFN)	;EP - BQI GET DX CAT BY PATIENT
DONE	; Finish the RPC call

RPC Name	Call Tags
BQI GET DX CAT BY PANEL	EN
BQI GET DX CAT BY PATIENT	PAT

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^BQIREG - [#90509]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BQICARE - [#90505]	EN+28, EN+32, EN+33
^BQIPAT(	PPAT+5
^BQIREG - [#90509]	TAG+14, TAG+16, TAG+20, TAG+21
^BQIREG("AC"	PPAT+5, PPAT+14
^DD("DD"	ERR+3
^TMP("BQITDPNL"	EN+10
^TMP("BQITDPT"	PAT+3

Name	Field # of Occurrence
>> BMXSEC	ERR+4*
BN	EN+20~, EN+24, EN+25
BQI	EN+20~, EN+27*
BQIDFN	EN+20~, EN+27, EN+28, EN+29, EN+31, EN+32*, EN+33, EN+34, PPAT~, PPAT+2 , PPAT+3, PPAT+5, PPAT+10, PPAT+14
BQIDOD	PPAT+1~, PPAT+3*, PPAT+6, PPAT+10
DATA	EN~, EN+10, EN+11, EN+17, EN+18, DONE+1, ERR+5, PPAT+6, PPAT+10, TAG+22 , TAG+23, PAT~, PAT+3, PAT+4, PAT+9, PAT+10
DEMOG	EN+20~, PPAT+1~, PPAT+2*, PPAT+6, PPAT+10, TAG+22, TAG+23
DFN	PAT~, PAT+12
ERRDTM	ERR+2~, ERR+3*, ERR+4
FULL	TAG~, TAG+13*, TAG+22, TAG+23
IEN	TAG~, TAG+8, TAG+9, TAG+10, TAG+14, TAG+16, TAG+17, TAG+20, TAG+21
II	EN+8~, EN+13, EN+17, EN+18, DONE+1, ERR+5, PPAT+6, PPAT+10, TAG+22, TAG+23* , PAT+1~, PAT+6*, PAT+9, PAT+10
INC	PPAT~, PPAT+4*, PPAT+10, PPAT+15, TAG~, TAG+11, TAG+12
LIST	EN+20~, EN+24, EN+25, EN+26
OCN	PPAT+1~, TAG+19, TAG+20, TAG+21
OCOM	PPAT+1~, TAG+18, TAG+21, TAG+22, TAG+23
OWNR	EN~, EN+28, EN+32, EN+33
PLIEN	EN~, EN+28, EN+32, EN+33
PLIST	EN~, EN+22, EN+23, EN+26!*, EN+27
PLIST(	EN+25
QFL	PPAT+1~, PPAT+13*
SCOM	PPAT+1~, TAG+17*, TAG+22, TAG+23
STAT	PPAT+1~, TAG+10*, TAG+11, TAG+12, TAG+22, TAG+23
TAGDTU	PPAT+1~, TAG+14, TAG+15, TAG+22, TAG+23
TAGIEN	PPAT+1~, TAG+8*, TAG+22, TAG+23
TAGNM	PPAT+1~, TAG+9*, TAG+22, TAG+23
TIEN	PPAT+1~, PPAT+13, PPAT+14, PPAT+15
U	EN+33, PPAT+2, PPAT+6, PPAT+10, TAG+14, TAG+16, TAG+22, TAG+23
UID	EN+8~, EN+9, EN+10, PAT+1~, PAT+2, PAT+3
WHO	PPAT+1~, TAG+16*, TAG+22, TAG+23
Y	ERR+2~, ERR+3*
>> ZTSK	EN+9, PAT+2