Routine: PXRMARCH

Information

PXRMARCH ;SLC/PKR/BNT - Clinical Reminder ARCH routines. ;12/09/2011

Source file <PXRMARCH.m>

Name	Comments	DBIA/ICR reference
ISDUE(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,DATA,TEXT)	;Multiple occurrence ; computed finding for a Project ARCH Reminder Custom Date Due. ; The $$GETDELAY^FBARCH0 API returns a site defined numeric value that represents ; the number of days to delay the reminder from being due again after ; being declined or refused through one of the related health factors.
ELIG(DFN,NGET,BDT,EDT,NFOUND,TEST,DATE,DATA,TEXT)	;Multiple occurrence
LIST(NGET,BDT,EDT,PLIST,PARAM)	;List computed finding for building a list

Name	Line Occurrences (* Changed, ! Killed)
^AUTTHF("B"	ISDUE+13
^PXRMINDX(9000010.23	ISDUE+14, ISDUE+16
^TMP($J	LIST+6, LIST+10, LIST+12, LIST+14, LIST+15, LIST+16!

Name	Field # of Occurrence
ARCHDATA	ELIG+2~, ELIG+4
ARCHDATA(	ELIG+8, ELIG+10, ELIG+11
ARCHDLAY	ISDUE+8~, ISDUE+10*, ISDUE+16
ARCHVHF	ISDUE+8~
ARCHVHF(	ISDUE+11, ISDUE+16
ARCHVHF(" "	ISDUE+19
BDT	ELIG~, ELIG+4, LIST~, LIST+4, ISDUE~
CNT	LIST+2~, LIST+13, LIST+14, LIST+15
DATA	ELIG~, ISDUE~
DATE	ELIG~, LIST+2~, LIST+9, LIST+10, LIST+13, LIST+14*, LIST+15, ISDUE~
DATE(	ELIG+11, ISDUE+19
DFN	ELIG~, ELIG+4, LIST+2~, LIST+9, LIST+10, LIST+11, LIST+12*, LIST+14, LIST+15, ISDUE~ , ISDUE+14, ISDUE+16
EDT	ELIG~, ELIG+4, LIST~, LIST+4, ISDUE~
HFID	ISDUE+8~, ISDUE+13*, ISDUE+14, ISDUE+16
IND	ELIG+2~, ELIG+4, ELIG+7, ELIG+8, ELIG+10, ELIG+11, LIST+2~, LIST+5, LIST+6
NFOUND	ELIG~, ELIG+7, ELIG+8, ELIG+9, ELIG+10, ELIG+11, ELIG+12, ISDUE~, ISDUE+9*, ISDUE+17 , ISDUE+18, ISDUE+19
NGET	ELIG~, ELIG+5, ELIG+6*, ELIG+8, LIST~, LIST+14, ISDUE~
NL	LIST+2~, LIST+4*, LIST+5
PARAM	LIST~
PLIST	LIST~, LIST+15
SDIR	ELIG+2~, ELIG+5*, ELIG+8
TEMP	LIST+2~, LIST+6*, LIST+8, LIST+9
TEST	ELIG~, ISDUE~
TEST(	ELIG+10, ISDUE+17
TEXT	ELIG~, ISDUE~
TEXT(	ELIG+12, ISDUE+18
U	ELIG+10, ELIG+11, LIST+8, LIST+9, LIST+15
X	ISDUE+8~, ISDUE+13*