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

Package: Registration

Routine: VADPT6


Information

VADPT6 ;ALB/MJK - PATIENT ID VARIABLES ; 12 AUG 89 @1200

Source Information

Source file <VADPT6.m>

Caller Graph

Caller Graph Total: 186

Package Total Caller Graph
Registration 40 DG FEMALE HISTORICAL  DG FEMALE INPATIENTS  DG ISO SENSITIVE RCDS PRT  DG SI LIST  DG3PR1  DG53467P  DGA4001  DGADTRESVB  
DGBED  DGBLRV  DGDISPOSTIONS  DGDIST  DGDRGENTER  DGEN  DGFFP02  DGFFP03  
DGFFP04  DGMTDEL1  DGMTO1  DGMTOHD  DGMTOREQ  DGMTREQB  DGOINPT1  DGOINS1  
DGOPATM  DGOPENDISPOSITIONS  DGOPENPTF  DGOREL1  DGOVBC1  DGPASS  DGPFCNR  DGPM INPATIENT PRINT  
DGPMOLD1  DGPMRB  DGPMRBA1  DGPMVBUR  DGPTFFB  DGPTFRU1  VADPT0  VAFCMS01  
Scheduling 31 SCDXMSG2  SCDXRT02  SCENI0  SCENIA0  SCMCBK7  SCMCCON  SCMCPM  SCMCTMM  
SCMCTPM  SCMCTPU3  SCMRTMM  SCMRTPM  SCRPI01A  SCRPTP3  SCRPW81  SDAMEP1  
SDAMEX  SDAMODO2  SDAMOLP  SDAMOWP  SDC1  SDMHAD  SDMHAD1  SDMHAP  
SDMHAP1  SDMHNS1  SDMHPRO1  SDOEDX  SDPCE2  SDPPRT  SDWARD  
Social Work 25 SOWKAI  SOWKAWB  SOWKAWI  SOWKAWS  SOWKAWU  SOWKCLIS  SOWKCLIW  SOWKCLSS  
SOWKCLSW  SOWKCO  SOWKCP  SOWKDB  SOWKDBE  SOWKDBPA  SOWKDBPN  SOWKHIRH  
SOWKPC  SOWKPLC  SOWKPNTF  SOWKPTC  SOWKQAMR  SOWKQAR2  SOWKQAR4  SOWKQARI  
SOWKTC  
Outpatient Pharmacy 14 PSOADDR  PSOBAIR2  PSOBAIRP  PSOLLL1  PSOLLL5  PSOLLL7  PSOLLLH  PSOLLLHN  
PSOLLLI  PSORLLL5  PSORLLLI  PSOSULBL  PSOTPCRP  PSOTPPOS  
Adverse Reaction Tracking 9 GMRADGMV  GMRADSP5  GMRAEF  GMRAFDA3  GMRAMCB1  GMRAROBS  GMRASEN2  GMRASEND  
GMRAVAM0  
Beneficiary Travel 9 DGBT1  DGBT2  DGBTALTI  DGBTCD  DGBTCDSP  DGBTCR  DGBTEE1  DGBTOA2  
DGBTOA6  
Integrated Billing 9 IB20PT81  IB20PT89  IB20PT8B  IBCBULL  IBCONS1  IBNCPIV  IBOMBL  IBOSTUS1  
IBRCON1  
Controlled Substances 8 PSDACT1  PSDOPT  PSDOPTI  PSDOPTN  PSDOPTS  PSDOPTX  PSDOPTY  PSDOPTZ  
Enrollment Application System 7 EAS150P1  EASECDEL  EASMT65  EASMTL6A  EASMTRP1  EASMTRP3  EASMTUTL  
Incomplete Records Tracking 7 DGJBGJ  DGJOPRT2  DGJOTP2  DGJPDEF2  DGJTEE  DGJTVW1  DGJTVW3  
Imaging 5 MAGDQR03  MAGGTPT1  MAGJLST1  MAGJUTL1  MAGJUTL3  
Clinical Procedures 4 MDHL7A  MDHL7MCA  MDSTUDL  MDSTUDW  
Clinical Monitoring System 3 QAMAUTO3  QAMEDT5  QAMPFAL0  
Automated Medical Information Exchange 2 DVBAXA1  DVBAXA2  
Dietetics 2 FHDPA  FHWOR  
Event Capture 1 ECMLMN  
Fee Basis 1 FBAAUTL  
Income Verification Match 1 IVMRMCR1  
Lab Service 1 LRU  
Medicine 1 MCAR7A  
Occurrence Screen 1 QAOSSFR0  
Order Entry Results Reporting 1 ORWCSP  
PCE Patient Care Encounter 1 PXCEPAT  
Patient Data Exchange 1 VAQREQ06  
Radiology Nuclear Medicine 1 RAUTL  
Text Integration Utility 1 TIUTIUS  

Entry Points

Name Comments DBIA/ICR reference
13 ; -- Returns the patient id variables for DFN patient
; usually VA("PID")=123-45-6789 and VA("BID")="6789"
; for VA patients.
SET ;-- execute id format specific long id, short id and x-ref set logic
; input: VADFN == DFN
KILL1 ;
SET1Q
KILL2 ; -- long id (kill logic)
PID ;
KILL ; -- execute id format specific x-ref kill logic
; input: VADFN ==> DFN
SET1 ;
CHK ; -- ok to proceed ; fmt defined
PIDQ
KILL1Q

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(2.0361 SET1+7, SET1+10, KILL1+4, KILL2+2
^DIC(8 - [#8] CHK+2
^DIC(8.2 - [#8.2] SET1+4, CHK+2
^DPT - [#2] 13+13, 13+14, 13+16, 13+17, SET+3, SET+5, SET1+4*, SET1+9, KILL+3, KILL+5
, KILL1+3, KILL1+5*, KILL2+1, KILL2+3*

Label References

Name Line Occurrences
CHK SET1+1, KILL1+1
KILL1 KILL+5
KILL1Q KILL1+1, KILL2+1
KILL2 KILL1+3
PIDQ 13+13
SET1 SET+5
SET1Q SET1+1, SET1+6, SET1+9

Naked Globals

Name Field # of Occurrence
^( 13+16, SET+5, SET1+7, SET1+10, KILL+5, KILL1+4, KILL2+2
^("LONG" SET1+4
^(0 13+14, CHK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
B 13+11~*, 13+14*, 13+16*, 13+17*, PIDQ
DA SET+4~, SET+5*, SET+6!, SET1+4, SET1+9, KILL+4~, KILL+5*, KILL+6!, KILL1+3, KILL1+5
, KILL2+1, KILL2+3, CHK+2
DA(1 SET+4*, SET+5, SET1+4, SET1+9, KILL+4*, KILL+5, KILL1+3, KILL1+5, KILL2+1, KILL2+3
>> DFN 13+13, 13+14, 13+16, 13+17
L 13+11~*, 13+14*, 13+16*, 13+17*, PIDQ
U SET1+4, SET1+9, KILL1+3, KILL1+5, KILL2+1, KILL2+3, CHK+2
>> VA("BID" PIDQ*
>> VA("PID" PIDQ*
>> VADFN SET+3, SET+4, KILL+3, KILL+4
VAERR 13+11!, 13+13*
VAFMT SET1+1, SET1+4, SET1Q!, KILL1+1, KILL1Q!, CHK+1*, CHK+2*
VAIX SET1+7*, SET1+10*, SET1Q!, KILL1+4*, KILL2+2*, KILL1Q!
>> VAPTYP 13+14
VAX SET1+6*, SET1+7, SET1+9*, SET1+10, SET1Q!, KILL1+3*, KILL1+4, KILL2+1*, KILL2+2, KILL1Q!
X 13+11~, 13+14*, 13+16*, 13+17*, SET+4~, SET+6!, SET1+3*, SET1+4, SET1+6, SET1+7*
, SET1+9*, SET1+10*, SET1Q!, KILL+4~, KILL+6!, KILL1+3*, KILL1+4*, KILL2+1*, KILL2+2*
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All