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
Print Page as PDF
Routine: IBDF1B1

Package: Automated Information Collection System

Routine: IBDF1B1


Information

IBDF1B1 ;ALB/CJM - ENCOUNTER FORM PRINT (IBDF1B continued - print encounter forms for selected appts); 3/1/93

Source Information

Source file <IBDF1B1.m>

Entry Points

Name Comments DBIA/ICR reference
ENPT ;print encounter forms for each appt
SORT1 ;case of sort by div/clinic/patient
SORT2 ;case of sort by div/terminal digit
SORT3 ;case of sort by div/clinic/terminal digits
APPT(IBDIV,CLNCNAME,IBCLINIC,PNAME,DFN,IBAPPT,TDIGIT) ;print everything for single appt
HDRPG(CLINIC,IBDIV) ;print a header page for clinic
TRLR ;prints a trailer page
EARLIEST(DFN,APPT) ;determines if APPT is the earliest appt on the list for DFN

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DIVISION: ",IBDIV,@IOF
  • Line Location: ENPT+11
Function Call: WRITE
  • Prompt: !,"TASK STOPPED AT USER'S REQUEST"
  • Line Location: APPT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRPG+3
Function Call: WRITE
  • Prompt: !!!!!,?((IOM-$L(LN))\2),LN
  • Line Location: HDRPG+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRPG+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDRPG+6
Function Call: WRITE
  • Prompt: !!!!!,?((IOM-$L(LN))\2),LN
  • Line Location: TRLR+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TRLR+4
Info |  Source |  Entry Points |  Interaction Calls