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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BCHUDEL

Package: IHS RPMS CHR System

Routine: BCHUDEL


Information

BCHUDEL ; IHS/CMI/LAB - DELETE CHR RECORD ;

Source Information

Source file <BCHUDEL.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
IHS RPMS CHR System 6 HDR^BCHUAR  GATHER^BCHUARL  EN^BCHUDEL  EN^BCHUDSP  ($$PPAFFL,$$PPCLSC,$$PPINI)^BCHUTIL  PAUSE^BCHUTIL1  
VA Fileman 3 FILE^DICN  ^DIK  ^DIR  
Registration 2 FULL^VALM1  EN^VALM2  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS RPMS CHR System 3 BCHHL7F  BCHUADD  BCHUDEL  
IHS Support HL7 Interfaces 1 BHLBCH2  

Entry Points

Name Comments DBIA/ICR reference
DISP ;
P1
DELREC ;
EOJ ; EOJ CLEANUP
P ;get providers (1-4)
EN ;EP
DEL ;EP entry point from delete protocol from list manager , select record in list manager and then call EN^BCHUDEL
LBLK(V,L) ;left blank fill
EXIT ;EP
DELETE2 ;
DELETE ;EP; Entry Point to Delete Record ;IHS/CMI/TMJ PATCH #6

External References

Name Field # of Occurrence
HDR^BCHUAR EXIT+5
GATHER^BCHUARL EXIT+3
EN^BCHUDEL DISP+6
EN^BCHUDSP DISP+2
$$PPAFFL^BCHUTIL P+3
$$PPCLSC^BCHUTIL P+4
$$PPINI^BCHUTIL P+5
PAUSE^BCHUTIL1 EXIT+2
FILE^DICN P1+4
^DIK DELREC+3, DELETE2+3
^DIR DISP+3
FULL^VALM1 EN+1, DISP+1
EN^VALM2 DEL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),$C(7)
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"No records selected."
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !,"No record selected."
  • Line Location: DEL+3
Function Call: WRITE
  • Prompt: !,"Not a valid CHR RECORD."
  • Line Location: DEL+5
Function Call: WRITE
  • Prompt: !!,"Nothing deleted.!",!
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !!,"Nothing deleted.!",!
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !,"Record deleted."
  • Line Location: DISP+7
Routine Call
  • DIR
  • Line Location:
    • DISP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BCHR - [#90002] Classic Fileman Calls
^BCHEXDEL - [#90002.95] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BCHR - [#90002] DELETE+3, DELETE+4, P+1, P+2, P1+4, DEL+5
^BCHRPROB("AD" P1+2
^BCHTPROG - [#90002.51] P1+4
^DIC - [#1] DELETE+5, DELETE2+1, DELETE2+2

Label References

Name Line Occurrences
$$LBLK P1+1
DELETE2 DELETE+5
EOJ DELREC+2, DELREC+5
EXIT DEL+2, DEL+3, DEL+4, DEL+5, DISP+4, DISP+5, DISP+8
P DELETE+2

Naked Globals

Name Field # of Occurrence
^(0 DELETE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LBLK+1~, LBLK+2*, EOJ+2!
BCHAFF P+3*, P1, EOJ+1!
BCHDISC P+4*, P1, EOJ+1!
BCHDR EXIT+6!
>> BCHEV("VFILES" DELETE+3*, DELETE+4*
BCHF EXIT+6!
BCHINI P+5*, P1, EOJ+1!
BCHP P1+1*, P1+4, EOJ+1!
BCHQUIT EXIT+6!
BCHR DELETE+1, DELETE+3, DELETE+4, DELREC+3, P+1, P+2, P+3, P+4, P+5, P1+2
, P1+4, DEL+3*!, DEL+4*!, DEL+5!, EXIT+6!, EOJ+1!
>> BCHRCNT EXIT+4
>> BCHSTOP DELREC+2
BCHV EXIT+6!
BCHVDFN DELETE2+3*, EOJ+1!
BCHVDG DELETE2+2*, DELETE2+3, EOJ+1!
BCHVDLT EXIT+6!
BCHVFLE DELETE+5*, DELETE2+1, DELETE2+2, EOJ+1!
BCHVI DELETE2+3*, EOJ+1!
BCHVIGR DELETE2+2*, DELETE2+3, EOJ+1!
BCHVL DELETE+5*, EOJ+1!
BCHVNM DELETE2+1*, EOJ+1!
>> BCHVRECS("IDX" DEL+4
>> C P1+2*
D EOJ+3!
D0 EOJ+3!
DA DELREC+3*!, DELETE2+3*, P1+5!, EOJ+3!
DD P1+4!
DFN EXIT+6!
DIADD P1+4*, P1+5!
DIC P1+4*, P1+5!, EOJ+3!
DIC("DR" P1+4*
DIC(0 P1+4*
DICR EOJ+3!
DIE P1+5!, EOJ+3!
DIG EOJ+3!
DIH EOJ+3!
DIK DELREC+3*!, DELETE2+3*, EOJ+3!
DIR DISP+3!
DIR("A" DISP+3*
DIR("B" DISP+3*
DIR(0 DISP+3*
>> DIRUT DISP+3*, DISP+4
DIU EOJ+3!
DIV EOJ+3!
DIW EOJ+3!
DLAYGO P1+4*, P1+5!
DO P1+4!
DQ EOJ+3!
DR P1+5!, EOJ+3!
DT P1+4
>> DUOUT DISP+3
>> F DELETE+4*
I P1+2*, LBLK+1~, LBLK+2*
L LBLK~, LBLK+2
>> N DELETE+4*
U DELETE+3, DELETE+4, DELETE2+1, P+1, P+2, P1+4
V LBLK~, LBLK+2*, LBLK+3
>> VALMBCK EXIT+1*
>> VALMCNT EXIT+4*
VALMY DEL+2, DEL+3!
VALMY(0 DEL+3
X DELETE+4*, P1*, P1+1*, P1+4*, P1+5!, EOJ+2!
XQORNOD DEL+3!
XQORNOD(0 DEL+1
Y P1+5!, DISP+5
>> Z P1+2*, P1+3, P1+4, LBLK+2*
>> ZTQUEUED DELETE2+3
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 |  Naked Globals |  Local Variables |  All