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

Package: IHS RPMS CHR System

Routine: BCHDLA


Information

BCHDLA ; IHS/TUCSON/LAB - DOWNLOAD PATIENT DATA TO REMOTE ; [ 06/17/02 7:27 AM ]

Source Information

Source file <BCHDLA.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
IHS RPMS CHR System 5 ^BCHDLA1  DEL^BCHRL  SELECT^BCHRL0  ADD1^BCHRL01  SHOW^BCHRLS  
VA Fileman 4 ^%DTC  WAIT^DICD  ^DIE  ^DIR  
IHS VA Utilities 1 ^XBDBQUE  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS RPMS CHR System 1 BCH MUTL DOWNLOAD NEW PTS  

Entry Points

Name Comments DBIA/ICR reference
XIT1 ;
CONT ;
ZIS ;call to xbdbque
CONFIRM ;
FACHRN ;
SCREEN ;EP
ADD ;
QUEUE ;EP
START ;EP
CHR ;
XIT ;clean up and exit
QUEUE1 ;
SMENU ;EP

External References

Name Field # of Occurrence
^%DTC SCREEN+1
^BCHDLA1 QUEUE+5
DEL^BCHRL ADD+4
SELECT^BCHRL0 SCREEN+8
ADD1^BCHRL01 ADD+1
SHOW^BCHRLS SCREEN+9
WAIT^DICD QUEUE+5
^DIE CONFIRM+8
^DIR CONT+1, CONFIRM+6, QUEUE+2, SCREEN+4, SCREEN+10
^XBDBQUE QUEUE1+2
$$FMTE^XLFDT START+16
$$NOW^XLFDT SCREEN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?9,"**** DOWNLOAD NEW AND CHANGED PATIENT DEMOGRAPHIC DATA TO REMOTE ****",!!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"This option is used to download new and changed patient demographic"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"data to the CHR remote computer. This routine is to be run"
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,"periodically and in coordination with the CHR program."
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,"This file will be placed in the same directory that all export"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"files are placed. In most cases, that will be /usr/spool/uucppublic."
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !,"See your site manager for assistance in finding the file once it has"
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !,"been created.",!!,"Once you get the file it needs to be forwarded"
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !,"to the CHR."
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !!,"A first time patient download has never been done for"
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !!!,"Patients entered or changed after "_$$FMTE^XLFDT($P($G(^BCHSITE(DUZ(2),0)),U,15))," will be downloaded.",!
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !!,"The file(s) created will be placed in the ",$S($P(^AUTTSITE(1,0),U,21)=1:"/usr/spool/uucppublic",1:"C:\EXPORT")," directory."
  • Line Location: CONFIRM+1
Function Call: WRITE
  • Prompt: !,"The file will be called: ",BCHFILE,!
  • Line Location: CONFIRM+2
Function Call: WRITE
  • Prompt: !!,"It may be several hours (or overnight) before your flat file is finished.",!
  • Line Location: CONFIRM+3
Function Call: WRITE
  • Prompt: !,"As a reminder, the records that are generated and placed in the file(s)"
  • Line Location: CONFIRM+4
Function Call: WRITE
  • Prompt: !,"are in a standard, pre-defined record format. For a definition of the format",!,"please see your user manual.",!
  • Line Location: CONFIRM+5
Function Call: WRITE
  • Prompt: !,"Okay .. you '^'ed or timed out ..Goodbye"
  • Line Location: QUEUE+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: SCREEN+10
Function Call: WRITE
  • Prompt: !!,"The Patients downloaded can be selected based on any of the following criteria:",!
  • Line Location: SMENU+3
Function Call: WRITE
  • Prompt: ?40,J,") ",$E($P(^BCHSORT(BCHSEL(J),0),U),1,30)
  • Line Location: SMENU+8
Function Call: WRITE
  • Prompt: !!?9,"<Enter a list or a range. E.g. 1-4,5,20 or 10,12,20,30>"
  • Line Location: SMENU+9
Function Call: WRITE
  • Prompt: !?9,"<<HIT RETURN to conclude selections or bypass screens>>"
  • Line Location: SMENU+10
Routine Call
  • DIE
  • Line Location:
    • CONFIRM+8
Routine Call
  • DIR
  • Line Location:
    • CONT+1
    • CONFIRM+6
    • QUEUE+2
    • SCREEN+4
    • SCREEN+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BCHTRPT - [#90002.42] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTSITE(1 CONFIRM+1
^BCHSITE - [#90002.31] START+12, START+16
^BCHSORT - [#90002.41] SMENU+7, SMENU+8
^BCHSORT("AD" SMENU+4
^DIC(4 - [#4] START+14

Label References

Name Line Occurrences
QUEUE1 QUEUE+3
SCREEN ADD+3, SCREEN+14
SMENU SCREEN+3
XIT START+13, CONT+2, CONT+3, ADD+2, ADD+4, CONFIRM+7, ZIS+1, QUEUE+3, QUEUE+4, QUEUE+5
, QUEUE1+3, SCREEN+5, SCREEN+6
XIT1 QUEUE+3, QUEUE+4, QUEUE+5, QUEUE1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMQQTAX XIT+2!
BCHANS XIT+1!
BCHCHR XIT1+1!
BCHCNT XIT+1!
BCHCRIT XIT+1!
BCHCUT SMENU+5*, SMENU+8, XIT+1!
BCHDISP SMENU+1!, XIT+1!
BCHDISP( SMENU+6, SMENU+7*, SMENU+8*
>> BCHDLDT START+12*, START+13
BCHFILE CONFIRM+2, CONFIRM+8, SCREEN+2*, XIT1+1!
BCHFOUN XIT+3!
BCHGBD XIT+1!
BCHGDE XIT+1!
BCHGDS XIT+1!
BCHHIGH SCREEN+4, SMENU+1!, SMENU+4*, SMENU+5, XIT+1!
BCHI XIT+1!
BCHJD SCREEN+1*, XIT+3!
BCHPCNT XIT+3!
BCHPROC XIT+3!
BCHPTVS SCREEN+2*, SCREEN+10, XIT1+1!
BCHQUIT ADD+2, ADD+4, CONFIRM+7*, SCREEN+12*, XIT+1!
BCHR XIT+3!
BCHRAR XIT+1!
BCHRPT CONFIRM+8, XIT1+1!
BCHSEL SMENU+1!, XIT+1!
BCHSEL( SMENU+4*, SMENU+6, SMENU+7, SMENU+8
BCHSKIP XIT+3!
BCHTEXT XIT+1!
BCHTYPE SCREEN+2*, XIT1+1!
BCHX XIT+3!
BCHY XIT+1!
D XIT+4!
D0 XIT+4!
DA CONT+1!, CONFIRM+6!, CONFIRM+8*, CONFIRM+9!
DFN XIT+4!
DI XIT+4!
DIC XIT+4!
DIE CONFIRM+8*, CONFIRM+9!
DIR CONT+1!, CONFIRM+6!, QUEUE+2!, SCREEN+4!, SCREEN+10!
DIR("A" CONT+1*, CONFIRM+6*, QUEUE+2*, SCREEN+4*, SCREEN+10*
DIR("B" CONT+1*, CONFIRM+6*, QUEUE+2*, SCREEN+10*
DIR(0 CONT+1*, CONFIRM+6*, QUEUE+2*, SCREEN+4*, SCREEN+10*
>> DIRUT CONT+2, CONFIRM+7, QUEUE+2*, QUEUE+4, SCREEN+4*, SCREEN+6, SCREEN+11*, SCREEN+12
DQ XIT+4!
DR CONFIRM+8*, CONFIRM+9!
DT SCREEN+1
>> DUOUT QUEUE+2, SCREEN+4, SCREEN+11
DUZ(2 START+12, START+14, START+16
>> I SMENU+6*, SMENU+7, SMENU+8
IOF START+1, SMENU+2
IOSL SMENU+2
J SMENU+6*, SMENU+8*, XIT+4!
U START+12, START+14, START+16, CONFIRM+1, SMENU+7, SMENU+8
>> X SCREEN+1, SMENU+4*
>> X1 SCREEN+1*
>> X2 SCREEN+1*
XBFLG XIT+4!
>> XBFQ QUEUE1+1*
>> XBIOP QUEUE1+1*
>> XBNS QUEUE1+1*
>> XBRC QUEUE1+1*
>> XBRX QUEUE1+1*
Y CONT+3, CONFIRM+7, QUEUE+3, SCREEN+5, SCREEN+13, XIT+4!
ZTSK QUEUE+1!
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