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

Package: IHS HIV Management System

Routine: BKMVA5


Information

BKMVA5 ;PRXM/HC/JGH - HMS PATIENT REGISTER; [ 1/19/2005 7:16 PM ] ; 10 Jun 2005 1:36 PM

Source Information

Source file <BKMVA5.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
VA Fileman 6 EN^DDIOL  FILE^DICN  ^DIE  ^DIK  $$IENS^DILF  $$GET1^DIQ  
IHS HIV Management System 3 ($$BKMPRIV,$$HIVIEN,$$VALID,NOGO)^BKMIXX3  $$PAD^BKMIXX4  ($$SELECT,$$YNP)^BKMVD2  
Registration 3 EN^VALM  ($$SETFLD,FULL)^VALM1  SET^VALM10  
Kernel 2 ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT  DISP^XQORM1  
IHS VA Utilities 1 ^XBFMK  

Entry Points

Name Comments DBIA/ICR reference
HELP ; -- help code
EN ;ENTRY POINT -- ListMan template BKMV PCC MED UPDATE
; Called by Add New Data option for Medications
; Assumes existence of DFN,DUZ
HDR ; -- header code
; Assumes existence of DUZ
ADD1 ; Edit Exam fields in subfile
EDIT ; Edit File 90459
GETALL(DFN) ; Build ListMan display array of patient medication information
; Input variables:
; DFN - IEN for File 2
; Output variables:
; VALMAR - Builds ListMan array
; VALMCNT - List array count
; VALM0
ADD ; Add entry to File 90459
ADDX ; Add entry exit point
INIT ; -- init variables and list array
; Assumes existence of DFN
EXIT ;clean up used variables
DELETE ; Delete entry in File 90459

External References

Name Field # of Occurrence
$$BKMPRIV^BKMIXX3 EN+7
$$HIVIEN^BKMIXX3 EN+4
$$VALID^BKMIXX3 EN+6
NOGO^BKMIXX3 EN+7
$$PAD^BKMIXX4 HDR+4, GETALL+20
$$SELECT^BKMVD2 EDIT+4, DELETE+4
$$YNP^BKMVD2 DELETE+10
EN^DDIOL EDIT+1, DELETE+1
FILE^DICN ADD+14
^DIE ADD1+5, ADD1+25, EDIT+14, EDIT+27
^DIK ADD1+14, DELETE+15
$$IENS^DILF HDR+3, GETALL+17, ADD1+7
$$GET1^DIQ HDR+3, GETALL+24, GETALL+25, GETALL+26, GETALL+27, ADD+8, ADD1+8, ADD1+9, EDIT+17
EN^VALM EN+10
$$SETFLD^VALM1 GETALL+20, GETALL+23, GETALL+24, GETALL+25, GETALL+26, GETALL+27
FULL^VALM1 ADD+1, EDIT+2, DELETE+2
SET^VALM10 GETALL+28
^XBFMK EN+9, EN+11, GETALL+8, GETALL+30
$$DT^XLFDT ADD+7
$$FMADD^XLFDT ADD+9
$$FMTE^XLFDT GETALL+23
$$NOW^XLFDT ADD1+23, EDIT+25
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There is no HMS register defined."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: " *** Required field(s) missing, entry deleted! ***"
  • Line Location: ADD1+15
Function Call: WRITE
  • Prompt: " Edited!"
  • Line Location: EDIT+28
Function Call: WRITE
  • Prompt: " Deleted!"
  • Line Location: DELETE+16
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+1
Routine Call
  • VALM
  • Line Location:
    • EN+10
Routine Call
  • DIE
  • Line Location:
    • ADD1+5
    • ADD1+25
    • EDIT+14
    • EDIT+27

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BKM(90459 GETALL+10, GETALL+13, GETALL+15, ADD+3, EDIT+9, DELETE+11
^TMP("BKMVA5" EN+8!, ADDX+1!, EDIT+29!, DELETE+17!, EXIT+1!

Label References

Name Line Occurrences
ADDX ADD+15, ADD1+10
EXIT EN+12
GETALL INIT+2
INIT ADDX+2, EDIT+30, DELETE+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BKMDOD ADD+2~, ADD+8*, ADD+9
BKMDTM ADD+2~, ADD1+8*, ADD1+10, ADD1+16, ADD1+18, ADD1+19*, ADD1+21, ADD1+22*, ADD1+23*, ADD1+24
, EDIT+3~, EDIT+17*, EDIT+18, EDIT+20, EDIT+21*, EDIT+23, EDIT+24*, EDIT+25*, EDIT+26
BKMI EDIT+3~, EDIT+6*, DELETE+3~, DELETE+6*
BKMLST EDIT+3~, EDIT+4*, EDIT+5, EDIT+6, DELETE+3~, DELETE+4*, DELETE+5, DELETE+6
BKMMED ADD+2~, ADD1+9*, ADD1+10
DA HDR+2~, HDR+3*, GETALL+16*, GETALL+17, ADD+2~, ADD1+3*, ADD1+6!, ADD1+7*, ADD1+11!, ADD1+12*
, EDIT+3~, EDIT+11*, EDIT+16, EDIT+17, DELETE+3~, DELETE+13*
DA(1 GETALL+16*, ADD+3*, ADD+4, ADD+10, ADD1+3*, ADD1+7*, ADD1+12*, ADD1+13, EDIT+9*, EDIT+10
, EDIT+12, EDIT+17, DELETE+11*, DELETE+12, DELETE+14
DA0 GETALL+7~, GETALL+14*, GETALL+15*, GETALL+16, GETALL+28, ADD+2~, ADD+16*, ADD1+3, ADD1+7, ADD1+12
DA1 GETALL+7~, GETALL+10*, GETALL+11, GETALL+13, GETALL+15, GETALL+16, ADD+2~, ADD+3*, ADD1+1, ADD1+3
, ADD1+7, ADD1+12
DFN INIT+2, GETALL~, ADD+8
DIC ADD+2~, ADD+10*
DIC(0 ADD+11*
DIE ADD+2~, ADD1+1*, EDIT+3~, EDIT+12*
DIK ADD+2~, ADD1+13*, DELETE+3~, DELETE+14*
DO ADD+13!
DR ADD+2~, ADD1+4*, ADD1+24*, EDIT+3~, EDIT+13*, EDIT+26*
DUZ EN+6, EN+7
DUZ(2 HDR+3
HIVIEN EN+3~, EN+4*, EN+5
IENS HDR+2~, HDR+3*, GETALL+7~, GETALL+17*, GETALL+24, GETALL+25, GETALL+26, GETALL+27, ADD+2~, ADD1+7*
, ADD1+8, ADD1+9
MEDDT GETALL+7~, GETALL+12*, GETALL+13*, GETALL+15, GETALL+23, GETALL+29
PMEDDT GETALL+7~, GETALL+12*, GETALL+23, GETALL+29*
>> RCRDHDR HDR+5
SITE HDR+2~, HDR+3*, HDR+4
TEXT GETALL+7~, GETALL+19*, GETALL+20*, GETALL+23*, GETALL+24*, GETALL+25*, GETALL+26*, GETALL+27*, GETALL+28
VALM0 GETALL+9*, EXIT+2!
VALMAR GETALL+9*, EDIT+7, DELETE+7, EXIT+2!
VALMAT EDIT+3~, EDIT+7*, EDIT+8, EDIT+11, DELETE+3~, DELETE+7*, DELETE+8, DELETE+13
VALMCNT GETALL+9*, GETALL+18*, GETALL+20, GETALL+28, EDIT+1, DELETE+1, EXIT+2!
VALMHDR EXIT+2!
VALMHDR(1 HDR+4*
VALMHDR(2 HDR+5*
VALMI EDIT+3~, EDIT+6*, EDIT+7, DELETE+3~, DELETE+6*, DELETE+7, DELETE+10
>> X ADD+7*, ADD+9*, HELP+1*
Y ADD+2~, ADD+15, ADD+16
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All