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

Package: Automated Information Collection System

Routine: IBDFFT


Information

IBDFFT ;ALB/MAF - FORMS TRACKING ; JUL 6 1995@800

Source Information

Source file <IBDFFT.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$HTE^XLFDT  DISP^XQORM1  
VA FileMan 5 ^%DT  HELP^%DTC  WAIT^DICD  YN^DICN  ^DIR  
Automated Information Collection System 4 $$FNDSDOE^IBDFDE  $$REQ^IBDFDE0  START^IBDFFT1  ^IBDFFT3  
List Manager 2 EN^VALM  FULL^VALM1  
Registration 1 (DIVISION,FIRST,PATIENT)^VAUTOMA  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Automated Information Collection System 7 IBDF FORMS TRACKING  IBDF FT CHANGE LIST  IBDF FT REPORT  IBDFDEA  IBDFFRFT  IBDFFT1  IBDFFT3  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
OUT
OKQ
SAVE ; -- save variables for queue
QUEUE
CLEAR ; -- Clean up variables if task is not queued
HDR ; -- header code
CLN
PAT
GRP
GRP1
CHECK(CLIN) ; -- Check to see if clinic has a form and its one that is not for
; future use only.
EXIT ; -- Code executed at action exit
EXIT1 ;
DAT ; -- DATE RANGE
BEG
END
HELP ; -- help code
CHGLST ; -- Code to change list display
KILL ; -- Kill extra array variables
QUIT ; -- Kill variables and reset to last display if no change has taken place
SCHSTAT(DFN,APPT) ; -- return text of scheduling status
YN

External References

Name Field # of Occurrence
^%DT BEG, END
HELP^%DTC END
^%ZIS QUEUE+2
HOME^%ZIS QUEUE+3
^%ZISC QUEUE+4, EXIT1+3
^%ZTLOAD QUEUE+3
WAIT^DICD OKQ+4
YN^DICN OKQ
^DIR OUT+1
$$FNDSDOE^IBDFDE SCHSTAT+3
$$REQ^IBDFDE0 SCHSTAT+3
START^IBDFFT1 OKQ+7, QUIT+8
^IBDFFT3 CLEAR+1
EN^VALM OKQ+6
FULL^VALM1 CHGLST+1
DIVISION^VAUTOMA OUT+8
FIRST^VAUTOMA CLN, GRP
PATIENT^VAUTOMA PAT
$$HTE^XLFDT OKQ+5
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"** Report requires 132 columns and a page length of 80 lines. **",!
  • Line Location: QUEUE+0
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued Task="_ZTSK,1:"Request Canceled")
  • Line Location: QUEUE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!?5,"The ending date cannot be before the beginning date"
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !?10,"Choose:",!?25,"Y for YES",!?25,"N for NO",!
  • Line Location: YN+0
Routine Call
  • DIR
  • Line Location:
    • OUT+1
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+2
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+3
Routine Call
  • VALM
  • Line Location:
    • OKQ+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBD(357.99 - [#357.99] Classic Fileman Calls
^SC - [#44] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] OUT+9, GRP1+9
^DG(43 - [#43] OUT+6
^DPT - [#2] SCHSTAT+3
^IBD(357.99 - [#357.99] GRP1+2, GRP1+6, GRP1+9
^SC - [#44] GRP1+6, GRP1+7, GRP1+10
^SD(409.95 - [#409.95] CHECK+4, CHECK+5, CHECK+6
^TMP("CNT" EXIT1+2!
^TMP("COUNT" EXIT1+2!
^TMP("FRM" EXIT1+2!
^TMP("FRMIDX" EXIT1+2!
^TMP("FTRK" EXIT1+2!
^TMP("STAIDX" EXIT1+2!
^TMP("STATS" EXIT1+2!

Label References

Name Line Occurrences
@( OUT+10
DAT OUT+11
END END, END+2
EXIT OUT+2, OKQ+1, QUEUE+2, QUEUE+3, CLEAR+2, QUIT+7
EXIT1 CHGLST+12
KILL OKQ+7, QUIT+8
OKQ OKQ
OUT CHGLST+12
QUEUE OKQ+3
QUIT OUT+3, OUT+8, OUT+10, OUT+11
SAVE QUEUE+3
YN OKQ

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% OKQ*, OKQ+1, OKQ+2, EXIT+2!
%DT EXIT+1!, BEG*
%DT("A" BEG*, END*
%IS QUEUE+2!
%ZIS QUEUE+2!*, EXIT+2!
%ZIS("A" QUEUE+2*
APPT EXIT+2!, SCHSTAT~, SCHSTAT+3
CLIN CHECK~, CHECK+4, CHECK+5, EXIT+2!
D0 EXIT+2!
DA EXIT+2!
DFN EXIT1+1!, SCHSTAT~, SCHSTAT+3
DIC CLN*, GRP*, EXIT+2!
DIC("S" CLN*
DIK EXIT+2!
DIR OUT+2!, EXIT+1!
DIR("A" OUT+1*
DIR("B" OUT+1*
DIR(0 OUT+1*
DIRUT OUT+2, OUT+3, EXIT+2!
DNKA EXIT+1!
IBCLI GRP1+5~, GRP1+6*
IBCLNUM GRP1+5~, GRP1+6*, GRP1+7, GRP1+10*
IBDCNT EXIT+3!
IBDCNT1 EXIT+3!
IBDF1 OUT+2, OUT+3, OKQ+6, OKQ+7, EXIT+2!, QUIT+1, QUIT+7
IBDF2 OUT*, CLN*, PAT*, GRP*, EXIT1+1!
IBDFBEG EXIT+1!, BEG*, CHGLST+2, QUIT+1*
IBDFBEG1 EXIT+1!, CHGLST+2*, QUIT+1
IBDFBG EXIT+1!, BEG*, END+2, CHGLST+2, QUIT+1*
IBDFBG1 EXIT+1!, CHGLST+2*, QUIT+1
IBDFC1 EXIT+1!, CHGLST+3*, QUIT+1
IBDFCL CHECK+2~, CHECK+5*, CHECK+6, EXIT+3!
IBDFCLI EXIT1+1!
IBDFCLIN EXIT1+2!
IBDFDA EXIT1+1!
IBDFDAT OKQ+5*, EXIT1+1!
IBDFDIV EXIT1+2!
IBDFDV OUT+9*, EXIT+3!
IBDFDV1 EXIT+1!, CHGLST+3*, QUIT+1
IBDFEND EXIT+1!, END+1*, END+2, CHGLST+2, QUIT+1*
IBDFEND1 EXIT+1!, CHGLST+2*, QUIT+1
IBDFG1 EXIT+1!, CHGLST+4*, QUIT+1
IBDFGR EXIT+3!
IBDFGRO EXIT+1!
IBDFGROP EXIT1+2!
IBDFIFN EXIT1+1!
IBDFL OUT+7*, OUT+10, EXIT+1!, CHGLST+2, KILL+2, QUIT+1*
IBDFL1 EXIT+1!, CHGLST+2*, QUIT+1
IBDFMUL OUT+6*, OUT+8, OUT+9, EXIT1+1!
IBDFN EXIT+1!
IBDFN1 EXIT+1!, CHGLST+3*, QUIT+1
IBDFNODE CHECK+2~, CHECK+6*, CHECK+7, EXIT1+2!
IBDFPAGE EXIT+3!
IBDFSA EXIT1+1!
IBDFSR OUT+5*, OUT+7, EXIT1+1!
IBDFT EXIT1+1!
IBDFVAL EXIT1+1!
IBDFXX KILL+1~, KILL+2*, KILL+3, KILL+4, KILL+5
IBDIV GRP1+5~, GRP1+9*
IBDIVNUM GRP1+5~, GRP1+9*, GRP1+10
IBDNKA EXIT1+1!
IBDVAL EXIT1+1!
IBDVAL1 EXIT1+1!
IBDX EXIT1+1!
IBGROUP GRP1~, GRP1+2*, GRP1+4*, GRP1+6, GRP1+7, GRP1+9, GRP1+10
IBQUEUE OKQ~, OKQ+2*, OKQ+3
IBX CHGLST+9~, CHGLST+10*
IFN EXIT+3!
IO("Q" QUEUE+3!
IOP QUEUE+2!*, EXIT+2!
POP QUEUE+2, EXIT+1!
QUIT CHECK+3*, CHECK+7*, EXIT1+1!
VAL EXIT+1!
VALMBCK OKQ+7*, EXIT+2!, QUIT+8*
VALMBG OKQ+7*, EXIT+2!, QUIT+8*
VALMCNT EXIT+3!
VALMHDR EXIT+2!
VALMHDR(1 HDR+1*
VALMHDR(2 HDR+2*
VALMY EXIT+3!
VAUTC EXIT+1!, CHGLST+3, CHGLST+6, KILL+3!, KILL+5!, QUIT+1*, QUIT+3
VAUTC( CHGLST+6, QUIT+3*
VAUTC1 EXIT+1!
VAUTC1( CHGLST+6*, QUIT+3
VAUTD OUT+9*, EXIT+1!, CHGLST+3, CHGLST+5, QUIT+1*, QUIT+2
VAUTD( OUT+9*, CHGLST+5, QUIT+2*
VAUTD1 EXIT+1!
VAUTD1( CHGLST+5*, QUIT+2
VAUTG GRP1+1, EXIT+1!, CHGLST+4, CHGLST+8, KILL+3!, KILL+4!, QUIT+1*, QUIT+5
VAUTG( GRP1+2*, GRP1+4, GRP1+7*, GRP1+10*, CHGLST+11, QUIT+6*
VAUTG1 EXIT+2!
VAUTG1( CHGLST+11*, QUIT+6
VAUTN EXIT+1!, CHGLST+3, CHGLST+7, KILL+4!, KILL+5!, QUIT+1*, QUIT+4
VAUTN( CHGLST+7, QUIT+4*
VAUTN1 EXIT+1!
VAUTN1( CHGLST+7*, QUIT+4
VAUTNI CLN*, PAT*, GRP*, EXIT+2!
VAUTSTR CLN*, GRP*, EXIT+2!
VAUTVB CLN*, GRP*, EXIT+1!
X OUT+4*, OUT+5, QUEUE+1~, CHECK+2~, CHECK+7*, EXIT+2!, BEG, END, HELP+1*, CHGLST+5*
, CHGLST+6*, CHGLST+7*, CHGLST+11*, QUIT+2*, QUIT+3*, QUIT+4*, QUIT+6*, SCHSTAT+2~, SCHSTAT+3*, SCHSTAT+4*
, SCHSTAT+5
X1 EXIT+2!
X2 EXIT+2!
Y OUT+2, OUT+8, OUT+10, OUT+11, QUEUE+1~, CLN, PAT, GRP, BEG*, END*
, END+1, CHGLST+11*, QUIT+6*
ZTDESC QUEUE+1~, QUEUE+3*
ZTDTH QUEUE+1~
ZTION QUEUE+1~
ZTQUEUED QUEUE+4, EXIT+2!
ZTRTN QUEUE+1~, QUEUE+3*
ZTSAVE QUEUE+1~
ZTSAVE("IB*" QUEUE+3*
ZTSAVE("VA*" SAVE+1*
ZTSAVE("VAUTC(" SAVE+1*
ZTSAVE("VAUTG(" SAVE+1*
ZTSAVE("VAUTN(" SAVE+1*
ZTSAVE("^TMP(""CNT"",$J," SAVE+1*
ZTSAVE("^TMP(""COUNT"",$J," SAVE+1*
ZTSAVE("^TMP(""FRM"",$J," SAVE+1*
ZTSAVE("^TMP(""FTRK"",$J," SAVE+1*, QUEUE+3*
ZTSAVE("^TMP(""STATS"",$J," SAVE+1*
ZTSK QUEUE+1~, QUEUE+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 |  Local Variables  | All