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 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  
Registration 3 EN^VALM  FULL^VALM1  (DIVISION,FIRST,PATIENT)^VAUTOMA  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Automated Information Collection System 5 IBDF FORMS TRACKING  IBDFDEA  IBDFFRFT  IBDFFT1  IBDFFT3  
Integrated Billing 1 IBDF FORMS TRACKING  

Entry Points

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

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+3
YN^DICN OKQ
^DIR OUT+1
$$FNDSDOE^IBDFDE SCHSTAT+3
$$REQ^IBDFDE0 SCHSTAT+3
START^IBDFFT1 OKQ+6, QUIT+8
^IBDFFT3 CLEAR+1
EN^VALM OKQ+5
FULL^VALM1 CHGLST+1
DIVISION^VAUTOMA OUT+8
FIRST^VAUTOMA CLN, GRP
PATIENT^VAUTOMA PAT
$$HTE^XLFDT OKQ+4
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
  • VALM
  • Line Location:
    • OKQ+5
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+3
Routine Call
  • DIR
  • Line Location:
    • OUT+1
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+2

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, QUEUE+2, QUEUE+3, CLEAR+2, QUIT+7
EXIT1 CHGLST+12
KILL OKQ+6, QUIT+8
OKQ OKQ
OUT CHGLST+12
QUEUE OKQ+2
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
>> %DT BEG*
>> %DT("A" BEG*, END*
%IS QUEUE+2!
%ZIS QUEUE+2!*
%ZIS("A" QUEUE+2*
APPT SCHSTAT~, SCHSTAT+3
CLIN CHECK~, CHECK+4, CHECK+5
DFN EXIT1+1!, SCHSTAT~, SCHSTAT+3
>> DIC CLN*, GRP*
>> DIC("S" CLN*
DIR OUT+2!
DIR("A" OUT+1*
DIR("B" OUT+1*
DIR(0 OUT+1*
>> DIRUT OUT+2, OUT+3
DNKA EXIT+1!
IBCLI GRP1+5~, GRP1+6*
IBCLNUM GRP1+5~, GRP1+6*, GRP1+7, GRP1+10*
>> IBDF1 OUT+2, OUT+3, OKQ+5, OKQ+6, 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
IBDFCLI EXIT1+1!
IBDFCLIN EXIT1+2!
IBDFDA EXIT1+1!
IBDFDAT OKQ+4*, EXIT1+1!
IBDFDIV EXIT1+2!
>> IBDFDV OUT+9*
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 CHGLST+4*, QUIT+1
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!
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+1*, OKQ+2
IBX CHGLST+9~, CHGLST+10*
IO("Q" QUEUE+3!
IOP QUEUE+2!*
>> POP QUEUE+2
QUIT CHECK+3*, CHECK+7*, EXIT1+1!
>> VALMBCK OKQ+6*, QUIT+8*
>> VALMBG OKQ+6*, QUIT+8*
>> VALMHDR(1 HDR+1*
>> VALMHDR(2 HDR+2*
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( 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*
>> VAUTSTR CLN*, GRP*
>> VAUTVB CLN*, GRP*
X OUT+4*, OUT+5, QUEUE+1~, CHECK+2~, CHECK+7*, 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
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
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