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

Package: IHS RPMS CHR System

Routine: BCHUEDT


Information

BCHUEDT ; IHS/CMI/LAB - EDIT A CHR RECORD ;

Source Information

Source file <BCHUEDT.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS RPMS CHR System 5 RECCHECK^BCHUADD1  (GETDATE,GETPROV,HDR)^BCHUAR  GATHER^BCHUARL  EN^BCHUDSP  PAUSE^BCHUTIL1  
VA Fileman 4 ^DDS  ^DIE  ^DIK  ^DIR  
Registration 3 TERM^VALM0  FULL^VALM1  EN^VALM2  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS RPMS CHR System 2 BCHUADD1  BCHUEDT1  

Entry Points

Name Comments DBIA/ICR reference
DISP ;EP
APOV ;add a new pov
EN ;EP
EPOV ;edit an existing pov
CF1
REF ;
CF ;EP - CHANGE FORM
DISPPOVS ;
CD ;EP - CHANGE DATE
1 ;PATIENT demographic
2 ;EP - OTHER record data
XIT ;eof
EOJ
CP ;EP - CHANGE PROVIDER
TYPE ; get type of data to edit
DPOV ;delete pov

External References

Name Field # of Occurrence
RECCHECK^BCHUADD1 DISP+6
GETDATE^BCHUAR CD+3
GETPROV^BCHUAR CP+3
HDR^BCHUAR REF+6, CP+9, CD+9, CF1+5
GATHER^BCHUARL REF+4, CP+7, CD+7, CF1+3
EN^BCHUDSP DISP+1
PAUSE^BCHUTIL1 EN+4, EN+5, CP+4, CD+4, CF1
^DDS 2+3
^DIE 1+4, 1+10, 1+17, 1+25, 1+26, 1+27, 1+28, 1+29, 2+2, 2+11
, 2+18, EPOV+6, APOV+2
^DIK DPOV+10
^DIR TYPE+3, EPOV+2, DPOV+2, DPOV+7
TERM^VALM0 REF+3, CP+6, CD+6, CF1+2
FULL^VALM1 EN+6, CP+1, CD+1, CF+1
EN^VALM2 EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No records selected."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"No record selected."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"Not a valid CHR RECORD."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"PLEASE RE-EDIT THE RECORD AND CORRECT THIS ERROR!!!",!
  • Line Location: DISP+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: TYPE+2
Function Call: WRITE
  • Prompt: !,"error updating pov's with patient, NOTIFY PROGRAMMER"
  • Line Location: 1+12
Function Call: WRITE
  • Prompt: !,"error updating educ's with patient, NOTIFY PROGRAMMER"
  • Line Location: 1+19
Function Call: WRITE
  • Prompt: !!,"If this is a registered patient, enter their name or chart number",!,"otherwise type an ""^"" to update a non-registered patient's data.",!!
  • Line Location: 1+24
Function Call: WRITE
  • Prompt: !
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: 2+5
Function Call: WRITE
  • Prompt: !,"error updating pov's with patient, NOTIFY PROGRAMMER"
  • Line Location: 2+13
Function Call: WRITE
  • Prompt: !,"error updating educ's with patient, NOTIFY PROGRAMMER"
  • Line Location: 2+20
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPPOVS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EPOV+2
Function Call: WRITE
  • Prompt: !!,"Invalid choice."
  • Line Location: EPOV+5
Function Call: WRITE
  • Prompt: !!,"ERROR ENCOUNTERED IN EDITING A POV"
  • Line Location: EPOV+7
Function Call: WRITE
  • Prompt: !!,"Adding a NEW POV...",!
  • Line Location: APOV+1
Function Call: WRITE
  • Prompt: !!,"NO POV ADDED!"
  • Line Location: APOV+3
Function Call: WRITE
  • Prompt: !!,"Invalid choice."
  • Line Location: DPOV+5
Function Call: WRITE
  • Prompt: !,"Okay, not deleted."
  • Line Location: DPOV+9
Function Call: WRITE
  • Prompt: !,"POV DELETED"
  • Line Location: DPOV+10
Function Call: WRITE
  • Prompt: !!,"No provider selected."
  • Line Location: CP+4
Function Call: WRITE
  • Prompt: !!,"No new date selected."
  • Line Location: CD+4
Function Call: WRITE
  • Prompt: !,"Form changed to 535 Comprehensive."
  • Line Location: CF+2
Function Call: WRITE
  • Prompt: !,"Form changed to 535-1 Abbreviated."
  • Line Location: CF+3
Routine Call
  • DIE
  • Line Location:
    • 1+4
    • 1+10
    • 1+17
    • 1+25
    • 1+26
    • 1+27
    • 1+28
    • 1+29
    • 2+2
    • 2+11
    • 2+18
    • EPOV+6
    • APOV+2
Routine Call
  • DDS
  • Line Location:
    • 2+3
Routine Call
  • DIR
  • Line Location:
    • TYPE+3
    • EPOV+2
    • DPOV+2
    • DPOV+7

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
^BCHRPAT - [#90002.11] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNPOV - [#9999999.27] DISPPOVS+3
^BCHR - [#90002] EN+5, DISP+3, 1+2, 1+3, 1+5, 1+26, 1+28, 2+6
^BCHRPED("AD" 1+15, 2+16
^BCHRPROB - [#90002.01] DISPPOVS+3, DISPPOVS+4
^BCHRPROB("AD" 1+8, 2+9, DISPPOVS+2
^BCHTPROB - [#90002.53] DISPPOVS+4
^BCHTSERV - [#90002.54] DISPPOVS+4
^DPT - [#2] 1+3

Label References

Name Line Occurrences
@( TYPE+7
CF1 CF+2
DISPPOVS EPOV+1, DPOV+1
EOJ REF+1
TYPE DISP+5
XIT EN+2, EN+3, EN+4, EN+5, DISP+5, DISP+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BCHC EOJ!, DISPPOVS+2*, DISPPOVS+4, EPOV+2, EPOV+5, DPOV+2, DPOV+5
>> BCHDATE CD+2, CD+4*
>> BCHEN1 REF+1
BCHERROR DISP+7, EOJ!
>> BCHODATE CD+2*, CD+4
>> BCHODFN 1+4*, 1+6
>> BCHOPROV CP+2*, CP+4
>> BCHPROV CP+2, CP+4*
>> BCHQUIT 2+5*
BCHR EN+3*!, EN+4*!, EN+5!, DISP+3, EOJ!, 1+2, 1+3, 1+4, 1+5, 1+8
, 1+15, 1+25, 1+26, 1+27, 1+28, 1+29, 2+2, 2+3, 2+6, 2+9
, 2+16, DISPPOVS+2, APOV+2
BCHR0 DISP+3*, DISP+4, EOJ!
>> BCHRCNT REF+5, CP+8, CD+8, CF1+4
BCHRDEL EN+4!, EN+5!
BCHRPOV EOJ!
BCHRPOV( DISPPOVS+2*, EPOV+5, EPOV+6, DPOV+5, DPOV+10
BCHRWDEL DISP+2*, DISP+7, EOJ!
BCHTYPE DISP+5*, TYPE+1*, TYPE+6*, TYPE+7, EOJ!, EOJ+1!
BCHUABFO 2+3, CF+2!, CF+3*
BCHUEDT DISP+2*, EOJ!
>> BCHVRECS("IDX" EN+4
BCHX EOJ!, 1+8*, 1+9, 1+15*, 1+16, 2+9*, 2+10, 2+16*, 2+17
>> BCHXX 1+26*, 1+28*, 1+29
DA 1+4*!, 1+9*, 1+11!, 1+16*, 1+18!, 1+25*!, 1+26*!, 1+27*!, 1+28*!, 1+29*!
, 1+30!, 2+2*!, 2+3*, 2+4!, 2+10*, 2+12!, 2+17*, 2+19!, EPOV+6*!, APOV+2*!
, DPOV+10*!
DDSFILE 1+30!, 2+3*, 2+4!
DFN DISP+4*, EOJ!, 1+4, 1+5*, 1+6, 1+9, 1+16, 2+6*, 2+7, 2+10
, 2+17
DIC 1+30!, 2+4!
DIE 1+4*!, 1+9*, 1+11!, 1+16*, 1+18!, 1+25*!, 1+26*!, 1+27*!, 1+28*!, 1+29*!
, 1+30!, 2+2*!, 2+4!, 2+10*, 2+12!, 2+17*, 2+19!, EPOV+6*!, APOV+2*!
DIK DPOV+10*!
DIMSG 2+5!
DIR TYPE+3!, EPOV+2!, DPOV+2!, DPOV+7!
DIR("A" TYPE+3*, EPOV+2*, DPOV+2*, DPOV+7*
DIR("B" DPOV+7*
DIR(0 TYPE+3*, EPOV+2*, DPOV+2*, DPOV+7*
>> DIRUT TYPE+3*, TYPE+4, EPOV+2*, EPOV+3, DPOV+2*, DPOV+3, DPOV+7*, DPOV+8
DITC 1+9*, 1+11!, 1+16*, 1+18!, 2+10*, 2+12!, 2+17*, 2+19!
DIU 1+11!, 1+18!, 1+27!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIV 1+11!, 1+18!, 1+27!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIW 1+11!, 1+18!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIY 1+11!, 1+18!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DR 1+4*!, 1+9*, 1+11!, 1+16*, 1+18!, 1+25*!, 1+26*!, 1+27*!, 1+28*!, 1+29*!
, 1+30!, 2+2*, 2+3*, 2+4!, 2+10*, 2+12!, 2+17*, 2+19!, EPOV+6*!, APOV+2*!
DT 2+2
>> DUOUT TYPE+3, EPOV+2, DPOV+2, DPOV+7
>> N DISPPOVS+3*, DISPPOVS+4
U DISP+4, 1+2, 1+3, 1+5, 1+26, 1+28, 2+6, DISPPOVS+3, DISPPOVS+4
>> VALMBCK REF+2*, CP+5*, CD+5*, CF1+1*
>> VALMCNT REF+5*, CP+8*, CD+8*, CF1+4*
VALMY EN+2, EN+3!
VALMY(0 EN+3
>> X DISPPOVS+2*, DISPPOVS+3, DISPPOVS+4
XQORNOD EN+3!
XQORNOD(0 EN+1
>> Y TYPE+5, TYPE+6, 1+12, 1+19, 2+13, 2+20, EPOV+4, EPOV+6, EPOV+7, APOV+3
, DPOV+4, DPOV+9, DPOV+10
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