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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGVPTIB5

Package: Registration

Routine: DGVPTIB5


Information

DGVPTIB5 ;alb/mjk - IBOVOP1 for export with PIMS v5.3; 4/21/93

Source Information

Source file <DGVPTIB5.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 2 $$PT^IBEFUNC  ($$DAT1,PAUSE)^IBOUTL  
Registration 1 $$BIL^DGMTUB  
Scheduling 1 $$STATUS^SDAM1  
VA Fileman 1 Y^DIQ  

Entry Points

Name Comments DBIA/ICR reference
HDR ; print header
CHRGS ; find OP charges for day, if any.
; build string for print
APPT ; scan visits for NSC patients
; field 2="CLINIC APPT"
; field 4=clinic
; field 5=appt type
; field 6=status
REGS ; registrations for day
FLD3(Y) ; time - convert date/time to time only, no seconds
IBOVOP1 ;ALB/RLW - Report of Visits for NSC Outpatients ; 12-JUN-92
STOPCD ; scan ADD/EDIT STOP CODES for day
; field 2="STOP CODE"
; field 4=stop code
; field 5=appt type
PRINT ; retrieve data for printing
MAIN ; perform report for day(s)
FLD5(I) ; get appointment type name
FLD1(DFN) ; patient - get patient name and l-4 ssn id

External References

Name Field # of Occurrence
$$BIL^DGMTUB APPT+9, STOPCD+5, REGS+5
Y^DIQ REGS+7, REGS+10, CHRGS+6
$$PT^IBEFUNC FLD1+2
$$DAT1^IBOUTL HDR+1, HDR+4
PAUSE^IBOUTL CHRGS+7, PRINT+9, PRINT+10
$$STATUS^SDAM1 APPT+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: CHRGS+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?(80-$L(IBTITLE))\2,IBTITLE
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?(80-$L(IBTITLE))\2,IBTITLE,?70,"Page: "_IBPAGE
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!,"Patient/Event",?20,"Time",?26,"Clinic/Stop",?44,"Appt.Type",?63,"(Status)",!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: LINE
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!,"NONE"
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !?5,IBFLD2
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !?5,IBFLD2
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,IBFLD1,!?5,IBFLD2
  • Line Location: PRINT+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" FLD3+2
^DD(2.101 REGS+7, REGS+10
^DD(350 CHRGS+6
^DIC(40.7 - [#40.7] STOPCD+8
^DPT - [#2] APPT+10, REGS+5
^DPT("ADIS" REGS+2, REGS+3, REGS+4
^IB - [#350] CHRGS+5
^IB("AD" CHRGS+5
^IB("AFDT" CHRGS+3, CHRGS+4
^IBE(350.1 - [#350.1] CHRGS+8
^SC - [#44] APPT+6, APPT+7, APPT+8
^SC("AC" APPT+6
^SD(409.1 - [#409.1] FLD5+1
^SDV - [#409.5] STOPCD+5, STOPCD+6, STOPCD+7
^TMP("IBOVOP" MAIN+3!, APPT+11*, STOPCD+8*, REGS+12*, PRINT+1, PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+8

Label References

Name Line Occurrences
$$FLD1 APPT+11, STOPCD+8, REGS+6, REGS+12
$$FLD3 APPT+11, STOPCD+8, REGS+6, REGS+12
$$FLD5 APPT+11, STOPCD+8
APPT MAIN+2
CHRGS PRINT+2
HDR MAIN+2, CHRGS+7, PRINT+2, PRINT+8, PRINT+9
PRINT MAIN+2
REGS MAIN+2
STOPCD MAIN+2

Naked Globals

Name Field # of Occurrence
^( APPT+8, STOPCD+6, PRINT+6
^(0 APPT+10, CHRGS+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C REGS+7*, REGS+10*, CHRGS+6*!
DFN MAIN+3!, APPT+8*, APPT+9, APPT+10, APPT+11, STOPCD+5*, STOPCD+8, REGS+2*, REGS+3*, REGS+4
, REGS+5, REGS+6, REGS+12, CHRGS+2, CHRGS+3, CHRGS+4, PRINT+1*, PRINT+6*, FLD1~, FLD1+1
, FLD1+2
DT HDR+4
I STOPCD+6*, STOPCD+7, FLD5~, FLD5+1
>> IB STOPCD+5*, STOPCD+6*
>> IBACT CHRGS+8*, CHRGS+9
>> IBAIEN REGS+4*, REGS+5
>> IBAMT CHRGS+8*, CHRGS+9
IBAPPT MAIN+3!
>> IBCL APPT+5*, APPT+6*, APPT+7, APPT+8, APPT+11
>> IBDATA STOPCD+7*, STOPCD+8, REGS+5*, REGS+6, REGS+9, CHRGS+5*, CHRGS+6, CHRGS+8, PRINT+6*
>> IBDATE APPT+6, APPT+7, STOPCD+4, STOPCD+5, REGS+1, REGS+2, CHRGS+3, CHRGS+4, HDR+1
>> IBFLD1 REGS+6*, CHRGS+7, PRINT+1*, PRINT+2*, PRINT+3, PRINT+4, PRINT+5, PRINT+8, PRINT+9
>> IBFLD2 PRINT+3*, PRINT+4, PRINT+5, PRINT+8, PRINT+9
>> IBFLD3 REGS+6*, PRINT+4*, PRINT+5, PRINT+7, PRINT+8
>> IBFLD4 APPT+6*, APPT+11, STOPCD+4*, REGS+1*, REGS+8*, REGS+12, PRINT+6*, PRINT+7*
>> IBFLD5 REGS+1*, REGS+11*, REGS+12, PRINT+6*, PRINT+7*
>> IBFLD6 PRINT+6*, PRINT+7*
>> IBIEN APPT+7*, APPT+8*, CHRGS+4*, CHRGS+5*
IBJ MAIN+3!
>> IBLINE CHRGS+9*, HDR+1*, PRINT+2, PRINT+7*, PRINT+8
>> IBPAGE HDR+1*, HDR+2, HDR+5
>> IBPRNT CHRGS+3*, CHRGS+4*, CHRGS+5
>> IBQUIT CHRGS+4, CHRGS+5, CHRGS+7, PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+9, PRINT+10
>> IBRECNO HDR+1*
>> IBSDATA APPT+10*, APPT+11
>> IBSEQ APPT+5*, APPT+11, STOPCD+4*, STOPCD+8*, REGS+12, PRINT+5*, PRINT+6, PRINT+8
>> IBSTAT CHRGS+6*, CHRGS+9
>> IBTITLE HDR+1*, HDR+3, HDR+4*, HDR+5
IOF HDR+2
IOM HDR+7
IOSL CHRGS+7, PRINT+9
IOST HDR+2
J MAIN+3!, APPT+5*, APPT+6*, APPT+7*, APPT+8, APPT+9, APPT+10, APPT+11, STOPCD+4~*, STOPCD+5*
, STOPCD+6, STOPCD+7, STOPCD+8, REGS+1~*, REGS+2*, REGS+3, REGS+4, REGS+6, REGS+12
LINE HDR+7*!
X FLD1+2~*, FLD1+3
Y REGS+6*, REGS+7, REGS+8, REGS+9*, REGS+10, REGS+11, CHRGS+6*!, HDR+5!, FLD3~, FLD3+1
, FLD3+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All