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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VAFCPDT2

Package: Registration

Routine: VAFCPDT2


Information

VAFCPDT2 ;BIR/CML/ALS-DISPLAY MPI/PD INFORMATION FOR SELECTED PATIENT ;14 Nov 2018 4:20 PM

Source Information

Source file <VAFCPDT2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Registration 2 DEM^VADPT  (QUIT,SS)^VAFCPDAT  
VA FileMan 2 ($$GET1,GETS)^DIQ  EN^DIQ1  
Kernel 1 $$FMTE^XLFDT  

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: 1

Package Total Caller Graph
Registration 1 VAFCPDAT  

Entry Points

Name Comments DBIA/ICR reference
CMORHIS ;Find CMOR History
CMORCHG ;Find CMOR change request
EXT ;Extended patient demographic data
NC(NCIEN,TAB1,TAB2) ;**974,Story 841921 (mko): Get and write Name Components
CHISHDR
CCHGHDR

External References

Name Field # of Occurrence
$$GET1^DIQ CMORHIS+11, EXT+29, EXT+64
GETS^DIQ NC+5
EN^DIQ1 CMORHIS+9, CMORCHG+8, EXT+10
DEM^VADPT EXT+40
QUIT^VAFCPDAT EXT+4
SS^VAFCPDAT CMORHIS+3, CMORHIS+14, CMORCHG+3, CMORCHG+16, EXT+2
$$FMTE^XLFDT EXT+67

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Additional DPT Data for: ",NAME," (DFN #",DFN,")",!,LN2
  • Line Location: EXT+5
Function Call: WRITE
  • Prompt: !,"PLACE OF BIRTH [CITY]",?31,": ",COB
  • Line Location: EXT+26
Function Call: WRITE
  • Prompt: !,"PLACE OF BIRTH COUNTRY",?31,": ",$S(POBC:$$GET1^DIQ(779.004,POBC_",",2),1:"")
  • Line Location: EXT+29
Function Call: WRITE
  • Prompt: !,"FATHER'S NAME",?31,": ",FNM
  • Line Location: EXT+30
Function Call: WRITE
  • Prompt: !,"MOTHER'S NAME",?31,": ",MNM
  • Line Location: EXT+31
Function Call: WRITE
  • Prompt: !,"MOTHER'S MAIDEN NAME",?31,": ",MMNM
  • Line Location: EXT+32
Function Call: WRITE
  • Prompt: !,"NAME OF PRIMARY NEXT OF KIN",?31,": ",NOK
  • Line Location: EXT+33
Function Call: WRITE
  • Prompt: !,"NEXT OF KIN PHONE NUMBER",?31,": ",NOKN
  • Line Location: EXT+34
Function Call: WRITE
  • Prompt: !,"NAME OF DESIGNEE",?31,": ",DESIG
  • Line Location: EXT+35
Function Call: WRITE
  • Prompt: !,"EMERGENCY NAME",?31,": ",EMER
  • Line Location: EXT+36
Function Call: WRITE
  • Prompt: !,"MARITAL STATUS",?31,": ",MARS
  • Line Location: EXT+37
Function Call: WRITE
  • Prompt: !,"RELIGIOUS PREFERENCE",?31,": ",RELP
  • Line Location: EXT+38
Function Call: WRITE
  • Prompt: !,"ETHNICITY INFORMATION",?31,": ",$P(VADM(11,1),"^",2)
  • Line Location: EXT+42
Function Call: WRITE
  • Prompt: !?3,$P(VADM(12,RACEMUL),"^",2)
  • Line Location: EXT+47
Function Call: WRITE
  • Prompt: !,"PRIMARY ELIGIBILITY CODE",?31,": ",ELIG
  • Line Location: EXT+49
Function Call: WRITE
  • Prompt: !,"PATIENT TYPE",?31,": ",PATTYPE
  • Line Location: EXT+50
Function Call: WRITE
  • Prompt: !,"VETERAN (Y/N)?",?31,": ",VET
  • Line Location: EXT+51
Function Call: WRITE
  • Prompt: !,"SERVICE CONNECTED PERCENT",?31,": ",SRVCPCT
  • Line Location: EXT+52
Function Call: WRITE
  • Prompt: !,"PERIOD OF SERVICE",?31,": ",POSRVC
  • Line Location: EXT+53
Function Call: WRITE
  • Prompt: !,"POW STATUS INDICATED?",?31,": ",POW
  • Line Location: EXT+54
Function Call: WRITE
  • Prompt: !,"PATIENT NAME COMPONENTS:"
  • Line Location: EXT+72
Function Call: WRITE
  • Prompt: !,"PREFERRED NAME",?31,": ",DNODE(2,DFN,.2405,"E")
  • Line Location: EXT+84
Function Call: WRITE
  • Prompt: !,"DATE ENTERED IN PATIENT FILE",?31,": ",FILEDT
  • Line Location: EXT+86
Function Call: WRITE
  • Prompt: !!,"CMOR History:",!,"--------------"
  • Line Location: CHISHDR+0
Function Call: WRITE
  • Prompt: !!,"CMOR Change Request History:",!,"----------------------------"
  • Line Location: CCHGHDR+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(20 - [#20] GETS^DIQ
^DIC(23 - [#23] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^HL(779.004 - [#779.004] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] CMORHIS+1, CMORHIS+6, EXT+57, EXT+62, EXT+63, EXT+71, EXT+75, EXT+77, EXT+79, EXT+81
^MPIF(984.9 - [#984.9] CMORCHG+1, CMORCHG+6

Label References

Name Line Occurrences
CCHGHDR CMORCHG+5, CMORCHG+17
CHISHDR CMORHIS+5, CMORHIS+15
CMORCHG CMORHIS+1
EXT CMORCHG+1
NC EXT+72, EXT+81

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALIAS EXT+77*, EXT+79, EXT+81, EXT+88!
CHG CMORCHG+6*, CMORCHG+7, CMORCHG+9, CMORCHG+10, CMORCHG+11, CMORCHG+12, CMORCHG+13, CMORCHG+14, EXT+88!
CHGDT CMORHIS+12*, CMORHIS+16, CMORCHG+10*, CMORCHG+18, EXT+88!
CHGNODE EXT+88!
CHGNODE( CMORCHG+9, CMORCHG+10, CMORCHG+11, CMORCHG+12, CMORCHG+13, CMORCHG+14
CHGNUM CMORCHG+9*, CMORCHG+18, EXT+88!
CMORNODE EXT+88!
CMORNODE( CMORHIS+10, CMORHIS+12
COB EXT+9~, EXT+11*, EXT+26
DA CMORHIS+7*, CMORHIS+9!, CMORCHG+7*, CMORCHG+8!, EXT+6*, EXT+10!
DA( CMORHIS+7*
DESIG EXT+9~, EXT+14*, EXT+35
>> DFN CMORHIS+1, CMORHIS+4, CMORHIS+6, CMORHIS+7, CMORHIS+15, CMORCHG+1, CMORCHG+4, CMORCHG+6, CMORCHG+17, EXT+5
, EXT+6, EXT+11, EXT+12, EXT+13, EXT+14, EXT+15, EXT+16, EXT+17, EXT+18, EXT+19
, EXT+20, EXT+21, EXT+22, EXT+23, EXT+24, EXT+57, EXT+62, EXT+63, EXT+71, EXT+75
, EXT+77, EXT+79, EXT+81, EXT+84
DIC CMORHIS+7*, CMORHIS+9!, CMORCHG+7*, CMORCHG+8!, EXT+6*, EXT+10!
DIERR NC+3~, NC+5
DIHELP NC+3~
DIMSG NC+3~
DIQ CMORHIS+8*, CMORHIS+9!, CMORCHG+7*, CMORCHG+8!, EXT+6*, EXT+10!
DIQ(0 CMORHIS+8*, CMORCHG+8*, EXT+6*
>> DNODE(2 EXT+84
DR CMORHIS+7*, CMORHIS+9!, CMORCHG+7*, CMORCHG+8!, EXT+8*, EXT+10!
DR( CMORHIS+7*
ELIG EXT+9~, EXT+16*, EXT+49
EMER EXT+9~, EXT+15*, EXT+36
FILEDT EXT+9~, EXT+12*, EXT+86
FNM EXT+9~, EXT+12*, EXT+30
HIS CMORHIS+6*, CMORHIS+7, CMORHIS+10, CMORHIS+12, EXT+88!
HISCMOR CMORHIS+10*, CMORHIS+11*, CMORHIS+16, EXT+88!
IOF CMORHIS+4, CMORHIS+15, CMORCHG+4, CMORCHG+17, EXT+3
IOSL CMORHIS+2, CMORHIS+13, CMORCHG+2, CMORCHG+15
IOST CMORHIS+2, CMORHIS+13, CMORCHG+2, CMORCHG+15, EXT+1
>> LN2 CMORHIS+4, CMORHIS+15, CMORCHG+4, CMORCHG+17, EXT+5
>> LNQ CMORHIS+3*, CMORHIS+14*, CMORCHG+3*, CMORCHG+16*, EXT+2*
MARS EXT+9~, EXT+19*, EXT+37
MMNM EXT+9~, EXT+13*, EXT+32
MNM EXT+9~, EXT+13*, EXT+31
MSD EXT+9~, EXT+62*, EXT+63
MSDARR EXT+61!, EXT+88!
MSDARR( EXT+65*, EXT+66, EXT+67
MSG NC+3~
>> NAME CMORHIS+4, CMORHIS+15, CMORCHG+4, CMORCHG+17, EXT+5
NC NC+3~, NC+6*, NC+7*, NC+8*, NC+9*
NCIEN EXT+70~, EXT+71*, EXT+72, NC~, NC+1, NC+4
NCIENS NC+3~, NC+4*, NC+5, NC+6, NC+7, NC+8, NC+9
NODE EXT+9~, EXT+63*, EXT+64
NOK EXT+9~, EXT+14*, EXT+33
NOKN EXT+9~, EXT+21*, EXT+34
PATTYPE EXT+9~, EXT+22*, EXT+50
POBC EXT+9~, EXT+23*, EXT+29
POBP EXT+9~, EXT+24*, EXT+27, EXT+28
POSRVC EXT+9~, EXT+20*, EXT+53
POW EXT+9~, EXT+21*, EXT+54
>> QFLG CMORHIS+2, CMORHIS+3, CMORHIS+6, CMORHIS+13, CMORHIS+14, CMORCHG+2, CMORCHG+3, CMORCHG+6, CMORCHG+15, CMORCHG+16
, EXT+1, EXT+2, EXT+4
RACEMUL EXT+47*, EXT+88!
RELP EXT+9~, EXT+19*, EXT+38
SITE CMORCHG+13*, CMORCHG+19, EXT+88!
SOB EXT+9~, EXT+11*, EXT+27
SRVBR EXT+9~, EXT+17*, EXT+64*, EXT+65
SRVCPCT EXT+9~, EXT+20*, EXT+52
SRVEDT EXT+9~, EXT+18*, EXT+64*, EXT+65, EXT+66*, EXT+67
SRVNUM EXT+9~, EXT+17*, EXT+64*, EXT+65
SRVSDT EXT+9~, EXT+18*, EXT+64*, EXT+65
STATUS CMORCHG+14*, CMORCHG+20, EXT+88!
TAB1 NC~, NC+2*, NC+6, NC+7, NC+8, NC+9
TAB2 NC~, NC+2*, NC+6, NC+7, NC+8, NC+9
TARG NC+3~
TARG(20 NC+6, NC+7, NC+8, NC+9
TMSG CMORCHG+11*, CMORCHG+18, EXT+88!
TREQ CMORCHG+12*, CMORCHG+19, EXT+88!
VADM EXT+88!
VADM(11 EXT+42
VADM(12 EXT+45, EXT+47
VET EXT+9~, EXT+16*, EXT+51
XDATA EXT+88!
XDATA(2 EXT+11, EXT+12, EXT+13, EXT+14, EXT+15, EXT+16, EXT+17, EXT+18, EXT+19, EXT+20
, EXT+21, EXT+22, EXT+23, EXT+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All