PXRMPDRP ;SLC/AGP,PKR - Patient List Demographic report print routine ;03/03/2011
Source file <PXRMPDRP.m>
| Package | Total | Call Graph | 
|---|---|---|
| Clinical Reminders | 2 | $$EDATE^PXRMDATE $$INSCHR^PXRMEXLC | 
| Kernel | 1 | $$FMTE^XLFDT | 
| VA Fileman | 1 | ^DIR | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ADDTXT(TEXT) | ;Accumulate text in ^TMP. | |
| PFACPR(DFN,DDATA,SUB) | ;Print the patient's preferred facility. | |
| APPHDR(DC,DDATA,SUB) | ;Build the appointment header. | |
| PREMDATA(DFN,DC,DDATA,SUB) | ;Print the reminder data. | |
| APPPRINT(DFN,DDATA,SUB) | ;Print appointment data. | |
| DELIMHDR(DC,DDATA,SUB) | ;Build the delimited header for a data type. | |
| TITLE(PLIEN,DELIM) | ;Print the report title. | |
| FINDPR(DFN,DDATA,SUB) | ;Print finding information. | |
| REMPR(DFN,DDATA,SUB) | ;Print reminder status information. | |
| PFINDATA(DFN,DC,DDATA,SUB) | ;Print the finding data. | |
| REMHDR(DC,DDATA,SUB) | ;Build the reminder data delimited header. | |
| PFACHDR(DDATA,SUB) | ;Build the preferred facility header. | |
| DELIMPR(DC,PLIEN,DDATA) | ; | |
| REGPR(PLIEN,DDATA,SUB) | ; | |
| VADPTPR(DFN,DNAME,DTYPE,DDATA,SUB) | ;Print data returned by a VADPT call. | |
| PAPPDATA(DFN,DC,DDATA,SUB) | ;Print the delimited appointment data. | |
| OUTPUT | ;Output the text. | |
| PFACDATA(DFN,DDATA,SUB) | ;Print the patient's preferred facility data, delimited. | |
| DELTITLE(DC,DATALIST,DDATA) | ;Combine all the headers to create the delimited title. | |
| PAGE | ; | |
| PDELDATA(DFN,DC,DDATA,SUB) | ;Print the delimited data. | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PXRMXP(810.5 - [#810.5] | TITLE+2 | 
| ^TMP("PXRMPDEM" | ADDTXT+2*, OUTPUT+6, REGPR+3!, REGPR+23! | 
| ^TMP("PXRMPLD" | APPPRINT+14, FINDPR+7, PAPPDATA+5, PDELDATA+2, PFACDATA+2, PFACPR+3, PFINDATA+6, PREMDATA+7, REGPR+13, REMPR+8 , VADPTPR+4 | 
| ^TMP("PXRMPLN" | DELIMPR+26, DELIMPR+28, REGPR+7, REGPR+9 | 
| Name | Line Occurrences | 
|---|---|
| ADDTXT | APPPRINT+10, APPPRINT+11, APPPRINT+12, APPPRINT+18, FINDPR+2, FINDPR+4, FINDPR+10, PFACPR+2, PFACPR+3, REGPR+10 , REGPR+11, REMPR+2, REMPR+4, REMPR+19, TITLE+9, TITLE+10, TITLE+11, VADPTPR+2, VADPTPR+3, VADPTPR+15 | 
| APPHDR | DELIMPR+17 | 
| APPPRINT | REGPR+15 | 
| DELIMHDR | DELIMPR+16, DELIMPR+18, DELIMPR+19, DELIMPR+20, DELIMPR+21 | 
| DELTITLE | DELIMPR+24 | 
| FINDPR | REGPR+18 | 
| OUTPUT | REGPR+22 | 
| PAGE | OUTPUT+8 | 
| PAPPDATA | DELIMPR+32 | 
| PDELDATA | DELIMPR+31, DELIMPR+33, DELIMPR+34, DELIMPR+36 | 
| PFACDATA | DELIMPR+37 | 
| PFACHDR | DELIMPR+22 | 
| PFACPR | REGPR+20 | 
| PFINDATA | DELIMPR+35 | 
| PREMDATA | DELIMPR+38 | 
| REMHDR | DELIMPR+23 | 
| REMPR | REGPR+21 | 
| TITLE | DELIMPR+13, REGPR+5 | 
| VADPTPR | REGPR+14, REGPR+16, REGPR+17, REGPR+19 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CLINIC | APPPRINT+1~ | 
| DATALIST | DELIMPR+2~, DELIMPR+24, DELTITLE~ | 
| DATALIST( | DELIMPR+4*, DELIMPR+5*, DELIMPR+6*, DELIMPR+7*, DELIMPR+8*, DELIMPR+9*, DELIMPR+10*, DELIMPR+11*, DELIMPR+16, DELIMPR+17 , DELIMPR+18, DELIMPR+19, DELIMPR+20, DELIMPR+21, DELIMPR+22, DELIMPR+23, DELIMPR+31, DELIMPR+32, DELIMPR+33, DELIMPR+34 , DELIMPR+35, DELIMPR+36, DELIMPR+37, DELIMPR+38, DELTITLE+3 | 
| DATALIST(0 | DELIMPR+12*, DELTITLE+3 | 
| DATATYPE | REGPR+2~, REGPR+12*, REGPR+13*, REGPR+14, REGPR+15, REGPR+16, REGPR+17, REGPR+18, REGPR+19, REGPR+20 , REGPR+21 | 
| DATE | APPPRINT+1~ | 
| DC | APPHDR~, APPHDR+10, DELIMHDR~, DELIMHDR+10, DELIMHDR+11, DELIMPR~, DELIMPR+16, DELIMPR+17, DELIMPR+18, DELIMPR+19 , DELIMPR+20, DELIMPR+21, DELIMPR+23, DELIMPR+24, DELIMPR+29, DELIMPR+31, DELIMPR+32, DELIMPR+33, DELIMPR+34, DELIMPR+35 , DELIMPR+36, DELIMPR+38, DELTITLE~, DELTITLE+1, PAPPDATA~, PAPPDATA+11, PDELDATA~, PDELDATA+12, PDELDATA+14, PFINDATA~ , PFINDATA+7, PREMDATA~, PREMDATA+6, PREMDATA+8, REMHDR~, REMHDR+5 | 
| >> DCREAT | TITLE+7, TITLE+11 | 
| DDATA | APPHDR~, APPPRINT~, DELIMHDR~, DELIMPR~, DELIMPR+16, DELIMPR+17, DELIMPR+18, DELIMPR+19, DELIMPR+20, DELIMPR+21 , DELIMPR+22, DELIMPR+23, DELIMPR+24, DELIMPR+31, DELIMPR+32, DELIMPR+33, DELIMPR+34, DELIMPR+35, DELIMPR+36, DELIMPR+37 , DELIMPR+38, DELTITLE~, FINDPR~, PAPPDATA~, PDELDATA~, PFACHDR~, PFACDATA~, PFACPR~, PFINDATA~, PREMDATA~ , REGPR~, REGPR+14, REGPR+15, REGPR+16, REGPR+17, REGPR+18, REGPR+19, REGPR+20, REGPR+21, REMHDR~ , REMPR~, VADPTPR~ | 
| DDATA( | APPHDR+1, APPHDR+4, APPHDR+5, APPHDR+6, APPHDR+8, APPHDR+9, APPHDR+11*, APPPRINT+3, APPPRINT+4, APPPRINT+8 , APPPRINT+9, APPPRINT+14, DELIMHDR+1, DELIMHDR+4, DELIMHDR+5, DELIMHDR+7, DELIMHDR+8, DELIMHDR+9, DELIMHDR+12*, DELTITLE+3 , FINDPR+5, FINDPR+6, FINDPR+9, PAPPDATA+2, PAPPDATA+4, PAPPDATA+6, PAPPDATA+7, PAPPDATA+9, PAPPDATA+10, PDELDATA+4 , PDELDATA+5, PDELDATA+7, PDELDATA+10, PFACHDR+1*, PFACDATA+1, PFACPR+1, PFINDATA+2, PFINDATA+4, PFINDATA+5, PREMDATA+2 , PREMDATA+4, PREMDATA+5, PREMDATA+6, PREMDATA+7, REMHDR+3, REMHDR+4, REMHDR+6*, REMPR+5, REMPR+6, REMPR+7 , REMPR+13, REMPR+14, VADPTPR+5, VADPTPR+6, VADPTPR+8, VADPTPR+11, VADPTPR+14 | 
| DDATA("ADD" | DELIMPR+4 | 
| DDATA("APP" | DELIMPR+5 | 
| DDATA("DEM" | DELIMPR+6 | 
| DDATA("ELIG" | DELIMPR+7 | 
| DDATA("FIND" | DELIMPR+8 | 
| DDATA("INP" | DELIMPR+9 | 
| DDATA("PFAC" | DELIMPR+10 | 
| DDATA("REM" | DELIMPR+11 | 
| DELIM | TITLE~, TITLE+3, TITLE+8 | 
| DFN | APPPRINT~, APPPRINT+14, DELIMPR+2~, DELIMPR+27*, DELIMPR+28*, DELIMPR+31, DELIMPR+32, DELIMPR+33, DELIMPR+34, DELIMPR+35 , DELIMPR+36, DELIMPR+37, DELIMPR+38, FINDPR~, FINDPR+7, PAPPDATA~, PAPPDATA+5, PDELDATA~, PDELDATA+2, PFACDATA~ , PFACDATA+2, PFACPR~, PFACPR+3, PFINDATA~, PFINDATA+6, PREMDATA~, PREMDATA+7, REGPR+2~, REGPR+8*, REGPR+9* , REGPR+11, REGPR+13, REGPR+14, REGPR+15, REGPR+16, REGPR+17, REGPR+18, REGPR+19, REGPR+20, REGPR+21 , REMPR~, REMPR+8, VADPTPR~, VADPTPR+4 | 
| DIR | PAGE+2~, PAGE+5! | 
| DIR(0 | PAGE+3* | 
| DNAME | VADPTPR~, VADPTPR+3 | 
| >> DTOUT | OUTPUT+9, PAGE+6 | 
| DTYPE | VADPTPR~, VADPTPR+4 | 
| DUE | REMPR+1~, REMPR+11*, REMPR+15, REMPR+16 | 
| >> DUOUT | OUTPUT+9, PAGE+6 | 
| HDR | APPHDR+2~, APPHDR+3*, APPHDR+10*, APPHDR+11, APPPRINT+1~, APPPRINT+7*, APPPRINT+8*, APPPRINT+9*, APPPRINT+12, DELIMHDR+2~ , DELIMHDR+3*, DELIMHDR+10*, DELIMHDR+11*, DELIMHDR+12, REMHDR+1~, REMHDR+2*, REMHDR+5*, REMHDR+6 | 
| IND | APPHDR+2~, APPHDR+3*, APPHDR+4*, APPHDR+10, APPPRINT+1~, APPPRINT+3*, APPPRINT+4, APPPRINT+14*, DELIMHDR+2~, DELIMHDR+3* , DELIMHDR+4*, DELIMHDR+5, DELIMPR+2~, DELIMPR+15*, DELIMPR+16, DELIMPR+17, DELIMPR+18, DELIMPR+19, DELIMPR+20, DELIMPR+21 , DELIMPR+22, DELIMPR+23, DELIMPR+30*, DELIMPR+31, DELIMPR+32, DELIMPR+33, DELIMPR+34, DELIMPR+35, DELIMPR+36, DELIMPR+37 , DELIMPR+38, DELTITLE+2~, DELTITLE+3*, FINDPR+1~, FINDPR+5*, FINDPR+6, OUTPUT+1~, OUTPUT+4*, OUTPUT+9*, PAPPDATA+1~ , PAPPDATA+4*, PAPPDATA+5, PDELDATA+1~, PDELDATA+4*, PDELDATA+5, PFINDATA+1~, PFINDATA+4*, PFINDATA+5, PREMDATA+1~, PREMDATA+4* , PREMDATA+5, REMHDR+1~, REMHDR+3*, REMHDR+4, REMPR+1~, REMPR+5*, REMPR+6, VADPTPR+1~, VADPTPR+5*, VADPTPR+6 | 
| IO | PAGE+1, PAGE+8 | 
| IO(0 | PAGE+1, PAGE+8 | 
| IOF | PAGE+7, PAGE+8, TITLE+4 | 
| IOSL | OUTPUT+2 | 
| IOST | PAGE+1, PAGE+8 | 
| JND | APPHDR+2~, APPHDR+5*, APPHDR+6, APPPRINT+1~, APPPRINT+4*, APPPRINT+5, APPPRINT+6, DELIMHDR+2~, DELIMHDR+5*, DELIMHDR+7 , DELIMHDR+8, DELIMHDR+9, FINDPR+1~, FINDPR+6*, FINDPR+7, FINDPR+9, PAPPDATA+1~, PAPPDATA+6*, PAPPDATA+7, PDELDATA+1~ , PDELDATA+5*, PDELDATA+7, PDELDATA+10, PFINDATA+1~, PFINDATA+5*, PFINDATA+6, PREMDATA+1~, PREMDATA+5*, PREMDATA+6, PREMDATA+7 , REMHDR+1~, REMHDR+4*, REMHDR+5, REMPR+1~, REMPR+6*, REMPR+7, REMPR+13, REMPR+14, VADPTPR+1~, VADPTPR+6* , VADPTPR+8, VADPTPR+11, VADPTPR+14 | 
| KND | APPHDR+2~, APPHDR+6*, APPHDR+8, APPHDR+9, DELIMHDR+2~, DELIMHDR+6*, DELIMHDR+7*, DELIMHDR+8, DELIMHDR+9, PAPPDATA+1~ , PAPPDATA+7*, PAPPDATA+9, PAPPDATA+10, PDELDATA+1~, PDELDATA+6*, PDELDATA+7*, PDELDATA+10, PDELDATA+12, PDELDATA+14, VADPTPR+1~ , VADPTPR+7*, VADPTPR+8*, VADPTPR+9, VADPTPR+11, VADPTPR+14 | 
| LAST | REMPR+1~, REMPR+12*, REMPR+17, REMPR+18 | 
| LC | OUTPUT+1~, OUTPUT+3*, OUTPUT+5*, OUTPUT+6 | 
| LINCNT | ADDTXT+1*, ADDTXT+2, OUTPUT+4, OUTPUT+9, REGPR+2~, REGPR+4* | 
| LINE | APPPRINT+1~, APPPRINT+15*, APPPRINT+16*, APPPRINT+17*, APPPRINT+18, FINDPR+1~, FINDPR+3*, FINDPR+4, FINDPR+9*, FINDPR+10 , PAPPDATA+1~, PAPPDATA+3*, PAPPDATA+11*, PAPPDATA+12, PDELDATA+1~, PDELDATA+3*, PDELDATA+12*, PDELDATA+14*, PDELDATA+15, PFINDATA+1~ , PFINDATA+3*, PFINDATA+7*, PFINDATA+8, PREMDATA+1~, PREMDATA+3*, PREMDATA+6*, PREMDATA+8*, PREMDATA+9, REMPR+1~, REMPR+3* , REMPR+4, REMPR+14*, REMPR+15, REMPR+16*, REMPR+17, REMPR+18*, REMPR+19, VADPTPR+1~, VADPTPR+14*, VADPTPR+15 | 
| LISTNAME | TITLE+1~, TITLE+2*, TITLE+6, TITLE+10 | 
| LND | APPHDR+2~, APPHDR+7*, APPHDR+8*, APPHDR+9, DELIMHDR+2~, DELIMHDR+11*, PAPPDATA+1~, PAPPDATA+8*, PAPPDATA+9*, PDELDATA+1~ , PDELDATA+14*, VADPTPR+1~, VADPTPR+13*, VADPTPR+14 | 
| LO | OUTPUT+1~, OUTPUT+3*, OUTPUT+5*, OUTPUT+7, OUTPUT+10* | 
| MAX | DELIMHDR+2~, DELIMHDR+9*, DELIMHDR+10, DELIMHDR+11, PDELDATA+1~, PDELDATA+10*, PDELDATA+12, PDELDATA+14, VADPTPR+1~, VADPTPR+11* , VADPTPR+12*, VADPTPR+13 | 
| NDT | DELIMPR+2~, DELIMPR+3*, DELIMPR+4*, DELIMPR+5*, DELIMPR+6*, DELIMPR+7*, DELIMPR+8*, DELIMPR+9*, DELIMPR+10*, DELIMPR+11* , DELIMPR+12, DELIMPR+15, DELIMPR+30 | 
| NSP | REMPR+1~, REMPR+13*, REMPR+14, REMPR+15*, REMPR+16, REMPR+17*, REMPR+18 | 
| PCLINIC | APPPRINT+1~, APPPRINT+2*, APPPRINT+6*, APPPRINT+9, APPPRINT+17 | 
| PDATE | APPPRINT+1~, APPPRINT+2*, APPPRINT+5*, APPPRINT+8, APPPRINT+16 | 
| PIECE | PAPPDATA+1~, PAPPDATA+10*, PAPPDATA+11 | 
| PLIEN | DELIMPR~, DELIMPR+13, REGPR~, REGPR+5, TITLE~, TITLE+2 | 
| PNAME | DELIMPR+2~, DELIMPR+25*, DELIMPR+26*, DELIMPR+28, DELIMPR+29, REGPR+2~, REGPR+6*, REGPR+7*, REGPR+9, REGPR+11 | 
| RIEN | REMPR+1~, REMPR+7*, REMPR+8 | 
| STATUS | REMPR+1~, REMPR+10*, REMPR+14 | 
| SUB | APPHDR~, APPHDR+1, APPHDR+4, APPHDR+5, APPHDR+6, APPHDR+8, APPHDR+9, APPHDR+11, APPPRINT~, APPPRINT+3 , APPPRINT+4, APPPRINT+8, APPPRINT+9, APPPRINT+14, DELIMHDR~, DELIMHDR+1, DELIMHDR+4, DELIMHDR+5, DELIMHDR+7, DELIMHDR+8 , DELIMHDR+9, DELIMHDR+12, FINDPR~, FINDPR+5, FINDPR+6, FINDPR+9, PAPPDATA~, PAPPDATA+2, PAPPDATA+4, PAPPDATA+6 , PAPPDATA+7, PAPPDATA+9, PAPPDATA+10, PDELDATA~, PDELDATA+2, PDELDATA+4, PDELDATA+5, PDELDATA+7, PDELDATA+10, PFACHDR~ , PFACHDR+1, PFACDATA~, PFACDATA+1, PFACPR~, PFACPR+1, PFINDATA~, PFINDATA+2, PFINDATA+4, PFINDATA+5, PREMDATA~ , PREMDATA+2, PREMDATA+4, PREMDATA+5, PREMDATA+6, PREMDATA+7, REGPR~, REMHDR~, REMHDR+3, REMHDR+4, REMHDR+6 , REMPR~, REMPR+5, REMPR+6, REMPR+7, REMPR+13, REMPR+14, VADPTPR~, VADPTPR+5, VADPTPR+6, VADPTPR+8 , VADPTPR+11, VADPTPR+14 | 
| TEMP | APPHDR+2~, APPHDR+9*, APPHDR+10, APPPRINT+1~, APPPRINT+14*, APPPRINT+16, APPPRINT+17, DELIMHDR+2~, DELIMHDR+8*, DELIMHDR+10 , DELIMHDR+11, FINDPR+1~, FINDPR+7*, FINDPR+8, FINDPR+9, PAPPDATA+1~, PAPPDATA+5*, PAPPDATA+11, PDELDATA+1~, PDELDATA+2* , PDELDATA+12, PDELDATA+14, PFINDATA+1~, PFINDATA+6*, PFINDATA+7, PREMDATA+1~, PREMDATA+7*, PREMDATA+8, REMPR+1~, REMPR+8* , REMPR+9, REMPR+10, REMPR+11, REMPR+12, VADPTPR+1~, VADPTPR+4*, VADPTPR+9 | 
| TEXT | ADDTXT~, ADDTXT+2 | 
| TTEMP | PDELDATA+1~, PDELDATA+14*, VADPTPR+1~, VADPTPR+9*, VADPTPR+14 | 
| U | APPHDR+9, APPPRINT+8, APPPRINT+9, APPPRINT+16, APPPRINT+17, DELIMHDR+8, DELIMHDR+9, FINDPR+9, PAPPDATA+10, PAPPDATA+11 , PDELDATA+10, PDELDATA+12, PDELDATA+14, PREMDATA+8, REMPR+10, REMPR+11, REMPR+12, TITLE+2, VADPTPR+9, VADPTPR+11 , VADPTPR+14 | 
| VSIZE | OUTPUT+1~, OUTPUT+2*, OUTPUT+7 |