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

Package: IHS RPMS CHR System

Routine: BCHUADD


Information

BCHUADD ; IHS/CMI/LAB - ADD NEW CHR ACTIVITY RECORDS ;

Source Information

Source file <BCHUADD.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
IHS RPMS CHR System 7 (DIRX,FMKILL)^BCHUADD  (GETPAT,RECCHECK)^BCHUADD1  HDR^BCHUAR  GATHER^BCHUARL  EN^BCHUDEL  PAUSE^BCHUTIL1  ^BCHVD  
VA Fileman 4 ^DDS  FILE^DICN  ^DIE  ^DIR  
Registration 2 TERM^VALM0  FULL^VALM1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS RPMS CHR System 3 BCHEGR  BCHUADD  BCHUADD1  

Entry Points

Name Comments DBIA/ICR reference
EXIT ;CLEAN UP AND EXIT
MEAS ;
GETSUBJ ;
ADDR ;EP
PNP ;
CREATE ;create new record
DIRX ;EP
EXITMSG ;EP - display message, delete record, q
GETPAT ; GET PATIENT
RECD ;
GETMEAS ;
FMKILL ;EP
DEL ;
NF(R) ;not found?
GETRECD ;EP
DR ;set up BCHDR string
CHECK ;check record
BV ;EP - called from protocol

External References

Name Field # of Occurrence
DIRX^BCHUADD EXIT+7
FMKILL^BCHUADD EXIT+7
GETPAT^BCHUADD1 GETPAT+1
RECCHECK^BCHUADD1 RECD+3
HDR^BCHUAR EXIT+5
GATHER^BCHUARL EXIT+3
EN^BCHUDEL DEL+3
PAUSE^BCHUTIL1 DEL+4
^BCHVD BV+1
^DDS GETRECD+3, GETRECD+4, GETSUBJ+4, GETMEAS+8
FILE^DICN CREATE+2
^DIE GETRECD+14, GETRECD+22
^DIR PNP+2, GETSUBJ+1, GETMEAS+5
TERM^VALM0 EXIT+1
FULL^VALM1 ADDR+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Provider not entered."
  • Line Location: ADDR+2
Function Call: WRITE
  • Prompt: !!,"Date not entered."
  • Line Location: ADDR+3
Function Call: WRITE
  • Prompt: !!,"Program not entered."
  • Line Location: ADDR+4
Function Call: WRITE
  • Prompt: !,"Creating new CHR record...",!
  • Line Location: CREATE+1
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Unable to create CHR Record record, record not complete!! Deleting Record.",!
  • Line Location: CREATE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: GETRECD+2
Function Call: WRITE
  • Prompt: !,"Record Not Saved (F1 Q), deleting record."
  • Line Location: GETRECD+5
Function Call: WRITE
  • Prompt: !,"error updating pov's with patient, NOTIFY PROGRAMMER"
  • Line Location: GETRECD+16
Function Call: WRITE
  • Prompt: !,"error updating education's with patient, NOTIFY PROGRAMMER"
  • Line Location: GETRECD+24
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: GETRECD+27
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: GETSUBJ+6
Function Call: WRITE
  • Prompt: !
  • Line Location: GETMEAS+4
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: GETMEAS+10
Function Call: WRITE
  • Prompt: !,"Record deleted."
  • Line Location: DEL+4
Function Call: WRITE
  • Prompt: !,"Incomplete record. Deleting record. "
  • Line Location: EXITMSG+1
Routine Call
  • DIE
  • Line Location:
    • GETRECD+14
    • GETRECD+22
Routine Call
  • DDS
  • Line Location:
    • GETRECD+3
    • GETRECD+4
    • GETSUBJ+4
    • GETMEAS+8
Routine Call
  • DIR
  • Line Location:
    • PNP+2
    • GETSUBJ+1
    • GETMEAS+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BCHR - [#90002] Classic Fileman Calls
^BCHRPROB - [#90002.01] Classic Fileman Calls
^BCHRPED - [#90002.02] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHR - [#90002] GETMEAS+2, DEL+1
^BCHRPED("AD" GETRECD+20
^BCHRPROB - [#90002.01] GETRECD+9!, GETRECD+10!, NF+3
^BCHRPROB("AD" GETRECD+8, NF+3
^BCHTSERV - [#90002.54] NF+3

Label References

Name Line Occurrences
CREATE PNP+6
DEL CREATE+3, EXITMSG+1
EXIT PNP+3, PNP+4, PNP+7, PNP+8, RECD+2, RECD+4, CHECK+4, BV+2
EXITMSG PNP+8, RECD+2, RECD+4
FMKILL CREATE+2, GETRECD+26, GETSUBJ+5, GETMEAS+9
GETPAT PNP+8
GETRECD RECD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCDOVRR GETRECD+1*
>> BCHDATE ADDR+3, CREATE+2
BCHDR DR+1*, DR+2*, DR+3*, EXIT+6!
BCHERROR RECD+4, EXIT+6!
BCHF DR+2, DR+3, DIRX+2!, EXIT+6!
BCHNAME EXIT+6!
BCHPNP PNP+1*, PNP+5*, PNP+8, GETRECD+3, GETRECD+4, GETRECD+11, GETMEAS+1, EXIT+6!
>> BCHPROG ADDR+4, CREATE+1
>> BCHPROV ADDR+2, CREATE+1
BCHPTSV EXIT+6!
BCHQUIT ADDR+5*, PNP+7, PNP+8, RECD+2, CREATE+3*, GETRECD+27*, GETSUBJ+6*, GETMEAS+10*, EXIT+6!
BCHR CREATE+4*, GETRECD+3, GETRECD+4, GETRECD+8, GETRECD+20, GETSUBJ+4, GETMEAS+2, GETMEAS+8, DEL+1, DEL+2
, EXIT+6!
BCHR0 EXIT+6!
>> BCHRCNT EXIT+4
BCHRDEL DEL+2*, EXIT+6!
>> BCHUABFO GETRECD+3, GETRECD+4, GETMEAS+5, GETMEAS+8
BCHV DR+2, DR+3, DIRX+2!, EXIT+6!
BCHVDLT DEL+1*, EXIT+6!
BCHX GETRECD+8*, GETRECD+9, GETRECD+10, GETRECD+13, GETRECD+19!, GETRECD+20*, GETRECD+21, EXIT+6!
D FMKILL+1!
D0 CREATE+1!, FMKILL+1!
D1 FMKILL+1!
DA PNP+2!, CREATE+1!, GETRECD+3*, GETRECD+4*, GETRECD+13*, GETRECD+15!, GETRECD+21*, GETRECD+23!, GETSUBJ+1!, GETSUBJ+4*
, GETMEAS+8*, FMKILL+1!, DIRX+1!
DD CREATE+1!, CREATE+2!, FMKILL+1!
DDSFILE GETRECD+3*, GETRECD+4*, GETSUBJ+4*, GETMEAS+8*, FMKILL+1!
>> DDSPARM GETRECD+3*, GETRECD+4*
DFN PNP+1*, GETRECD+12, GETRECD+13, GETRECD+18, GETRECD+21, GETMEAS+2, EXIT+6!
DIADD CREATE+2*, FMKILL+1!
DIC CREATE+1!, CREATE+2*, FMKILL+1!, DIRX+1!
DIC("DR" CREATE+1*
DIC(0 CREATE+2*
DIE GETRECD+13*, GETRECD+15!, GETRECD+21*, GETRECD+23!, FMKILL+1!
DIG FMKILL+1!, DIRX+1!
DIMSG GETRECD+27!, GETSUBJ+6!, GETMEAS+10!
DINUM CREATE+1!
DIR PNP+2!, GETSUBJ+1!, GETMEAS+5!, DIRX+1!
DIR("A" PNP+2*, GETSUBJ+1*, GETMEAS+5*
DIR("B" PNP+2*, GETSUBJ+1*, GETMEAS+5*
DIR(0 PNP+2*, GETSUBJ+1*, GETMEAS+5*
DIRUT PNP+3, GETSUBJ+2, GETMEAS+5*, GETMEAS+6, DIRX+1!
DITC GETRECD+13*, GETRECD+15!, GETRECD+21*, GETRECD+23!
DIU GETRECD+15!, GETRECD+23!, FMKILL+1!
DIV GETRECD+15!, GETRECD+23!, FMKILL+1!
DIW GETRECD+15!, GETRECD+23!, FMKILL+1!
DIY GETRECD+15!, GETRECD+23!, FMKILL+1!
DLAYGO CREATE+2*, FMKILL+1!
DO CREATE+1!, CREATE+2!, FMKILL+1!
DR CREATE+1!, GETRECD+3*, GETRECD+4*, GETRECD+13*, GETRECD+15!, GETRECD+21*, GETRECD+23!, GETSUBJ+4*, GETMEAS+8*, FMKILL+1!
DTOUT DIRX+1!
DUOUT GETMEAS+5, DIRX+1!
DUZ CREATE+1
R NF~, NF+1, NF+3
U DEL+1, NF+3
>> VALMBCK EXIT+2*
>> VALMCNT EXIT+4*
X CREATE+2*, FMKILL+1!, DIRX+1!, NF+2~, NF+3*
Y PNP+4, PNP+5, CREATE+3, CREATE+4, GETRECD+16, GETRECD+24, GETSUBJ+3, GETMEAS+7, DIRX+1!, NF+2~
, NF+3*, NF+4
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