Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBD(357.99 - [#357.99] Classic Fileman Calls
^SC - [#44] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call