Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: WVRPCPT

Package: Womens Health

Routine: WVRPCPT


Information

WVRPCPT ;HIOFO/FT - WV PATIENT FILE (790) APIS AND RPCS ;Mar 24, 2020@15:24

Source Information

Source file <WVRPCPT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Womens Health 7 NEW^WVRPCGF  $$GETLREC^WVRPCOR  $$CLRSRND^WVRPCPT1  (EXTRTDAT,NOTIFY)^WVRPCVPR  $$METHOD^WVTDALRT  ($$FMERROR,$$ISPREG,$$ISREG,$$MOA,$$VISITIEN,$$VSTRING)^WVUTL11  $$FMADD^WVUTL3  
Kernel 3 ($$DT,$$NOW)^XLFDT  $$REPLACE^XLFSTR  $$INSTALDT^XPDUTL  
VA FileMan 3 $$GET1^DID  (FILE,UPDATE)^DIE  $$EXTERNAL^DILFD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Womens Health 3 WVRPCNO  WVRPCPT1  WVRPCPT2  
Clinical Reminders 2 PXRMCWH1  PXRMRPCG  
Health Summary 1 GMTSWVC1  

Entry Points

Name Comments DBIA/ICR reference
BRTX(DFN,BRTX,BRDD,CRTX,CRDD,WVPDATE) ; Update the patient's treatment needs and
; due dates in WV PATIENT file (790)
; Input: DFN - patient DFN [required]
; BRTX - breast treatment need IEN (790.51) [optional]
; BRDD - breast treatment need offset (e.g., 1Y) [optional]
; CRTX - cervical treament need IEN (790.5) [optional]
; CRDD - cervical treatment need offset (e.g., 90D) [optional]
; WVPDATE - date procedure was performed [optional]
; default is today
; Output: <none>
GETDATA(RESULT,WVDFN,WVTYPE,WVSDATE,WVEDATE,WVMAX,WVDIR,WVDT) ;RETURN REQUESTED DATA
; INPUT: RESULT - SUBSCRIPT UNDER WHICH TO RETURN DATA OR ERROR MESSAGES
; [REQUIRED]
; WVDFN - IEN OF PATIENT IN WV PATIENT FILE [REQUIRED]
; WVTYPE - TYPE OF DATA TO RETURN [REQUIRED]:
; "P": PREGNANCY DATA
; "L": LACTATION DATA
; WVSDATE - START DATE IN INTERNAL FILEMAN FORMAT [OPTIONAL]
; DEFAULT: NO DATE RANGE RESTRICTION
; WVEDATE - END DATE IN INTERNAL FILEMAN FORMAT [OPTIONAL]
; DEFAULT: NO DATE RANGE RESTRICTION
; WVMAX - MAXIMUM NUMBER OF ENTRIES TO RETURN [OPTIONAL]
; DEFAULT: RETURN ALL DATA
; WVDIR - SEARCH DIRECTION [OPTIONAL]:
; 1:CHRONOLOGICAL ORDER
; -1: REVERSE CHRONOLOGICAL ORDER [DEFAULT]
; WVDT - THE DATE (IN FILEMAN INTERNAL FORMAT) TO USE AS TODAY'S DATE [OPTIONAL]
; DEFAULT: VALUE STORED IN DT VARIABLE
; OUTPUT: ^TMP(RESULT,$J)=NUMBER OF ENTRIES RETURNED
; -1^Error message
; ^TMP(RESULT,$J,N,"FIELD NAME")=INTERNAL_FORMAT^EXTERNAL FORMAT
PFIELDS ;PSEUDO-FIELD DEFINITIONS
SAVEDATA(WVRETURN,WVDATA) ;SAVE DATA FROM CLINICAL REMINDERS
; INPUT: WVRETURN - REFERENCE TO ARRAY IN WHICH TO RETURN STATUS
; [REQUIRED]
; WVDATA - REFERENCE TO ARRAY OF DATA TO SAVE
; [REQUIRED]
VALENTRY(WVFILE,WVENTRY,WVFDA,WVNEWREC) ;VALIDATE THE DATA TO FILE
CHKIENS(WVDATA) ;ENSURE IENS ARE COMPLETE AND ACCURATE
SETARRAY(WVFILE,WVFIELD,WVDATA,WVMSUB) ;SET DATA INTO THE RETURN ARRAY
; INPUT: WVFILE - FILE NUMBER CONTAINING THE FIELD [REQUIRED]
; WVFIELD - FIELD NUMBER [REQUIRED]
; WVDATA - INTERNAL VALUE OF THE FIELD [REQUIRED]
; WVMSUB - SUBSCRIPT WITHIN THE TMP GLOBAL TO RETURN DATA IN

External References

Name Field # of Occurrence
$$GET1^DID SETARRAY+13
FILE^DIE BRTX+28, SAVEDATA+47
UPDATE^DIE SAVEDATA+46
$$EXTERNAL^DILFD SETARRAY+14
NEW^WVRPCGF SAVEDATA+18
$$GETLREC^WVRPCOR SAVEDATA+32
$$CLRSRND^WVRPCPT1 SAVEDATA+19
EXTRTDAT^WVRPCVPR SAVEDATA+32
NOTIFY^WVRPCVPR SAVEDATA+57
$$METHOD^WVTDALRT SAVEDATA+56
$$FMERROR^WVUTL11 SAVEDATA+53
$$ISPREG^WVUTL11 GETDATA+103
$$ISREG^WVUTL11 SAVEDATA+12
$$MOA^WVUTL11 GETDATA+79
$$VISITIEN^WVUTL11 SAVEDATA+25
$$VSTRING^WVUTL11 GETDATA+64
$$FMADD^WVUTL3 BRTX+20, BRTX+25
$$DT^XLFDT GETDATA+50
$$NOW^XLFDT GETDATA+29, SAVEDATA+42
$$REPLACE^XLFSTR CHKIENS+23
$$INSTALDT^XPDUTL GETDATA+49

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP( GETDATA+22!, GETDATA+24*, GETDATA+28*, GETDATA+33*, GETDATA+35*, GETDATA+38*, GETDATA+47*, GETDATA+63*, GETDATA+64*, GETDATA+87
, GETDATA+88, GETDATA+90, GETDATA+92, GETDATA+93, GETDATA+94, GETDATA+96, GETDATA+98, GETDATA+99, GETDATA+100, GETDATA+103
, GETDATA+104, GETDATA+106, GETDATA+108, GETDATA+110, GETDATA+116*, SETARRAY+15*, SETARRAY+16*
^WV(790 - [#790] BRTX+11, GETDATA+32, GETDATA+53, GETDATA+54, GETDATA+62, GETDATA+68, GETDATA+73, GETDATA+75, GETDATA+76, GETDATA+82
, GETDATA+110, GETDATA+113

Label References

Name Line Occurrences
CHKIENS SAVEDATA+31
SETARRAY GETDATA+29, GETDATA+30, GETDATA+31, GETDATA+65, GETDATA+66, GETDATA+67, GETDATA+71, GETDATA+77, GETDATA+81, GETDATA+85
, GETDATA+90, GETDATA+91, GETDATA+92, GETDATA+94, GETDATA+96, GETDATA+99, GETDATA+101, GETDATA+103, GETDATA+104, GETDATA+105
, GETDATA+107, GETDATA+108, GETDATA+113, GETDATA+114, GETDATA+115
VALENTRY SAVEDATA+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BRDD BRTX~, BRTX+13*, BRTX+19, BRTX+20
BRTX BRTX~, BRTX+12*, BRTX+18
CRDD BRTX~, BRTX+15*, BRTX+24, BRTX+25
CRTX BRTX~, BRTX+14*, BRTX+23
DFN BRTX~, BRTX+10, BRTX+11, BRTX+18, BRTX+21, BRTX+23, BRTX+26
DT BRTX+16, GETDATA+30, GETDATA+79
RESULT GETDATA~, GETDATA+21*, GETDATA+22, GETDATA+24, GETDATA+28, GETDATA+33, GETDATA+35, GETDATA+38, GETDATA+47, GETDATA+63
, GETDATA+64, GETDATA+87, GETDATA+88, GETDATA+90, GETDATA+92, GETDATA+93, GETDATA+94, GETDATA+96, GETDATA+98, GETDATA+99
, GETDATA+100, GETDATA+103, GETDATA+104, GETDATA+106, GETDATA+108, GETDATA+110, GETDATA+116, SETARRAY+15, SETARRAY+16
U GETDATA+24, GETDATA+33, GETDATA+34, GETDATA+35, GETDATA+38, GETDATA+47, GETDATA+54, GETDATA+64, GETDATA+65, GETDATA+66
, GETDATA+67, GETDATA+69, GETDATA+70, GETDATA+71, GETDATA+77, GETDATA+79, GETDATA+83, GETDATA+84, GETDATA+85, GETDATA+87
, GETDATA+88, GETDATA+93, GETDATA+98, GETDATA+100, GETDATA+106, GETDATA+110, GETDATA+113, SAVEDATA+7, SAVEDATA+10, SAVEDATA+13
, SAVEDATA+30, SAVEDATA+35, SAVEDATA+37, SAVEDATA+53, SETARRAY+9, SETARRAY+10, SETARRAY+14
WV79005NR SAVEDATA+22~, SAVEDATA+51*, SAVEDATA+56
WVARRAY SAVEDATA+22~, SAVEDATA+36*, SAVEDATA+40
WVCMIEN SAVEDATA+22~, SAVEDATA+39, SAVEDATA+49*, SAVEDATA+50*, SAVEDATA+56
WVCMIEN(1 SAVEDATA+51*
WVCMNEW SAVEDATA+21~, SAVEDATA+56
WVCODE SETARRAY+7~, SETARRAY+10*, SETARRAY+11
WVCOUNT GETDATA+25~, GETDATA+26*, GETDATA+28*, GETDATA+57, GETDATA+61, GETDATA+62*, GETDATA+63, GETDATA+64, GETDATA+87, GETDATA+88
, GETDATA+90, GETDATA+92, GETDATA+93, GETDATA+94, GETDATA+96, GETDATA+98, GETDATA+99, GETDATA+100, GETDATA+103, GETDATA+104
, GETDATA+106, GETDATA+108, GETDATA+110, GETDATA+116, SETARRAY+15, SETARRAY+16
WVDATA SAVEDATA~, SAVEDATA+18, SAVEDATA+31, CHKIENS~, SETARRAY~, SETARRAY+14*, SETARRAY+15, SETARRAY+16
WVDATA("DATA" SAVEDATA+6, SAVEDATA+14, SAVEDATA+16, SAVEDATA+17*!, SAVEDATA+18, SAVEDATA+19, SAVEDATA+28, SAVEDATA+29, SAVEDATA+34, SAVEDATA+37
, SAVEDATA+40, SAVEDATA+55, CHKIENS+10, CHKIENS+12, CHKIENS+13, CHKIENS+24*, CHKIENS+25!, CHKIENS+28!
WVDATA("DFN" SAVEDATA+9, SAVEDATA+10, SAVEDATA+12, SAVEDATA+17, SAVEDATA+19, SAVEDATA+25, SAVEDATA+32, SAVEDATA+52, SAVEDATA+56, CHKIENS+7
WVDATA("DOCUMENT" SAVEDATA+44
WVDATA("VISIT" SAVEDATA+23, SAVEDATA+25, SAVEDATA+30
WVDATE BRTX+17~, BRTX+20*, BRTX+21, BRTX+25*, BRTX+26, GETDATA+39~, GETDATA+41, GETDATA+56*, GETDATA+57*, GETDATA+59
, GETDATA+60, GETDATA+61, GETDATA+112
WVDATE(1 GETDATA+40*, GETDATA+42, GETDATA+43*, GETDATA+44*, GETDATA+56
WVDATE(2 GETDATA+40*, GETDATA+42, GETDATA+43*, GETDATA+58, GETDATA+59, GETDATA+60
WVDATES GETDATA+48~, GETDATA+49
WVDATES(0 GETDATA+49
WVDFN GETDATA~, GETDATA+23, GETDATA+24, GETDATA+32, GETDATA+53, GETDATA+54, GETDATA+62, GETDATA+63, GETDATA+68, GETDATA+73
, GETDATA+75, GETDATA+76, GETDATA+79, GETDATA+82, GETDATA+103, GETDATA+110, GETDATA+113
WVDIR GETDATA~, GETDATA+36*, GETDATA+37, GETDATA+38, GETDATA+42, GETDATA+44, GETDATA+57, GETDATA+59, GETDATA+60, GETDATA+61
WVDSS GETDATA+86~, GETDATA+98, GETDATA+99*, GETDATA+102*
WVDT GETDATA~, GETDATA+79
WVDTE GETDATA+51~, GETDATA+52*, GETDATA+53*, GETDATA+55
WVEDATE GETDATA~, GETDATA+40
WVENTRY SAVEDATA+22~, SAVEDATA+38*, SAVEDATA+39*, SAVEDATA+40, VALENTRY~, VALENTRY+4, VALENTRY+7, VALENTRY+8, VALENTRY+9, VALENTRY+10
, CHKIENS+2~, CHKIENS+21*, CHKIENS+22*, CHKIENS+23*, CHKIENS+24, CHKIENS+26
WVERROR SAVEDATA+21~, SAVEDATA+53
WVEXIT GETDATA+51~, GETDATA+57, GETDATA+58, GETDATA+59*, GETDATA+60*, GETDATA+61
WVFDA BRTX+17~, BRTX+28, SAVEDATA+22~, SAVEDATA+41, SAVEDATA+45, VALENTRY~
WVFDA( SAVEDATA+42*, SAVEDATA+43*, SAVEDATA+44*, VALENTRY+4!, VALENTRY+7, VALENTRY+8, VALENTRY+9!, VALENTRY+10*
WVFDA(790 BRTX+18*, BRTX+21*, BRTX+23*, BRTX+26*
WVFIELD SAVEDATA+21~, VALENTRY+5~, VALENTRY+7*, VALENTRY+8, VALENTRY+9, VALENTRY+10, SETARRAY~, SETARRAY+6, SETARRAY+8, SETARRAY+12
, SETARRAY+13, SETARRAY+14
WVFILE GETDATA+25~, GETDATA+26*, GETDATA+29, GETDATA+30, GETDATA+65, GETDATA+66, GETDATA+67, GETDATA+71, GETDATA+85, SAVEDATA+5~
, SAVEDATA+6*, SAVEDATA+7, SAVEDATA+27*, SAVEDATA+28, SAVEDATA+29, SAVEDATA+34*, SAVEDATA+35, SAVEDATA+36, SAVEDATA+37, SAVEDATA+39
, SAVEDATA+40, SAVEDATA+42, SAVEDATA+43, SAVEDATA+44, SAVEDATA+45, SAVEDATA+48, VALENTRY~, VALENTRY+4, VALENTRY+7, VALENTRY+8
, VALENTRY+9, VALENTRY+10, CHKIENS+2~, CHKIENS+9*, CHKIENS+10, CHKIENS+12, CHKIENS+13, CHKIENS+19, CHKIENS+21, CHKIENS+22
, CHKIENS+24, CHKIENS+25, CHKIENS+28, SETARRAY~, SETARRAY+13, SETARRAY+14
>> WVFKST GETDATA+27
WVID SAVEDATA+15~, SAVEDATA+16*, SAVEDATA+17, CHKIENS+2~, CHKIENS+16*, CHKIENS+17, CHKIENS+18
WVIDX GETDATA+39~
WVIEN GETDATA+51~, GETDATA+61*, GETDATA+62, GETDATA+63, GETDATA+68, GETDATA+73, GETDATA+75, GETDATA+76, GETDATA+82, SAVEDATA+21~
, CHKIENS+2~
WVIEN( SAVEDATA+49, SAVEDATA+52, CHKIENS+19*, CHKIENS+21, CHKIENS+22
WVIEN(790 CHKIENS+7*
WVIENS CHKIENS+2~, CHKIENS+13*, CHKIENS+14, CHKIENS+15, CHKIENS+16, CHKIENS+19, CHKIENS+20, CHKIENS+24, CHKIENS+25, CHKIENS+26*
, CHKIENS+27
WVINDEX GETDATA+51~, GETDATA+53*, GETDATA+54, GETDATA+55
WVINDEX( GETDATA+55*, GETDATA+57, GETDATA+61, GETDATA+112
WVLEVEL GETDATA+78~, GETDATA+79*, GETDATA+80, CHKIENS+2~, CHKIENS+8*, CHKIENS+9, CHKIENS+20, CHKIENS+22
WVLEVELS CHKIENS+2~
WVLEVELS( CHKIENS+8, CHKIENS+9, CHKIENS+22
WVLEVELS(1 CHKIENS+4*, CHKIENS+5*
WVLEVELS(2 CHKIENS+4*, CHKIENS+5*
WVLEVELS(3 CHKIENS+4*
WVLINE SETARRAY+7~, SETARRAY+8*
WVMAX GETDATA~, GETDATA+45*, GETDATA+46, GETDATA+47, GETDATA+57, GETDATA+61
WVMIENS CHKIENS+2~, CHKIENS+12*, CHKIENS+28
WVMSUB SETARRAY~, SETARRAY+15
WVNEWPH CHKIENS+2~, CHKIENS+12*, CHKIENS+17*, CHKIENS+19
WVNEWREC SAVEDATA+21~, SAVEDATA+38*, SAVEDATA+42, SAVEDATA+45, SAVEDATA+46, SAVEDATA+47, SAVEDATA+49, SAVEDATA+51, SAVEDATA+52, VALENTRY~
, VALENTRY+9, VALENTRY+10
WVNODE GETDATA+51~, GETDATA+62*, GETDATA+64, GETDATA+65, GETDATA+66, GETDATA+67, GETDATA+68*, GETDATA+69, GETDATA+70, GETDATA+71
, GETDATA+76*, GETDATA+77, GETDATA+79, GETDATA+82*, GETDATA+83, GETDATA+84, GETDATA+85
WVNPFLAG SAVEDATA+11~, SAVEDATA+12*, SAVEDATA+13
WVPATDT GETDATA+48~, GETDATA+49*, GETDATA+50*, GETDATA+88
WVPDATE BRTX~, BRTX+16*, BRTX+20, BRTX+25
WVPDIENS CHKIENS+2~, CHKIENS+11!
WVPDIENS( CHKIENS+14, CHKIENS+26*, CHKIENS+27*
WVPFILE CHKIENS+2~, CHKIENS+22*
WVPIEN GETDATA+111~, GETDATA+112*, GETDATA+113
WVPLCHDR CHKIENS+2~, CHKIENS+17*, CHKIENS+18*, CHKIENS+19
WVPLCHDR( CHKIENS+17*, CHKIENS+18*
WVPNUM GETDATA+51~, GETDATA+69*, GETDATA+70, GETDATA+71, GETDATA+83*, GETDATA+84, GETDATA+85
WVREC SAVEDATA+21~, SAVEDATA+37*, SAVEDATA+38, SAVEDATA+39, SAVEDATA+40, SAVEDATA+42, SAVEDATA+43, SAVEDATA+44, SAVEDATA+45, SAVEDATA+49
, SAVEDATA+50, SAVEDATA+51, SAVEDATA+52
WVRETURN SAVEDATA~, SAVEDATA+8, SAVEDATA+18
WVRETURN(1 SAVEDATA+6, SAVEDATA+7*, SAVEDATA+10*, SAVEDATA+13*, SAVEDATA+19*, SAVEDATA+20, SAVEDATA+24, SAVEDATA+27, SAVEDATA+30*, SAVEDATA+34
, SAVEDATA+37, SAVEDATA+53*, SAVEDATA+54, SAVEDATA+56*, SAVEDATA+58*
WVRLEVEL GETDATA+74~, GETDATA+75, GETDATA+80*, GETDATA+81
WVSDATE GETDATA~, GETDATA+40
WVSEQ SAVEDATA+22~, SAVEDATA+49*, SAVEDATA+52
WVSIEN GETDATA+74~, GETDATA+75*, GETDATA+76, GETDATA+77
WVSTATUS GETDATA+86~, GETDATA+87*, GETDATA+89, GETDATA+91, GETDATA+95, GETDATA+97, GETDATA+107
WVSTRIP CHKIENS+2~, CHKIENS+23
WVSTRIP("+" CHKIENS+6*
WVSUB GETDATA+51~, GETDATA+52*, GETDATA+53, GETDATA+54, GETDATA+62, GETDATA+68, GETDATA+73, GETDATA+75, GETDATA+76, GETDATA+82
, GETDATA+110, GETDATA+113, SETARRAY+5~, SETARRAY+9*, SETARRAY+13*, SETARRAY+15, SETARRAY+16
WVTEMP GETDATA+39~, GETDATA+41*
WVTEMP(1 GETDATA+43
WVTEMP(2 GETDATA+43
WVTYPE GETDATA~, GETDATA+26, GETDATA+30, GETDATA+31, GETDATA+34, GETDATA+35, GETDATA+52, GETDATA+72, GETDATA+109
WVUPLVL CHKIENS+2~, CHKIENS+22*
WVVALUE VALENTRY+5~, VALENTRY+8*
WVVIEN SAVEDATA+22~, SAVEDATA+23*, SAVEDATA+25*, SAVEDATA+26, SAVEDATA+43
WVVPR SAVEDATA+21~, SAVEDATA+57
WVVPR("AFTER" SAVEDATA+52*

Marked Items

Name Field # of Occurrence
$T(PFIELDS+WVLINE SETARRAY+9, SETARRAY+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All