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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGMTO1

Package: Registration

Routine: DGMTO1


Information

DGMTO1 ;ALB/CAW,AEG/EG - AGREED TO PAY DEDUCTIBLE PRINT (CON'T) ; 1/21/05 8:08am

Source Information

Source file <DGMTO1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Registration 4 $$SR^DGMTAUD1  $$MTIEN^DGMTU3  ($$FDATE,$$FTIME,CLOSE)^DGMTUTL  PID^VADPT6  
VA Fileman 2 NOW^%DTC  ^DIR  
Scheduling 1 $$SDAPI^SDAMA301  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGMTO  

Entry Points

Name Comments DBIA/ICR reference
CATCOUT ;
PAUSE ;
HDR ;
PRINT ;
CHK ;Check to pause on screen
START ;
; loop through cat Cs for active ones
QTC
ACTIVE ;
CATCLST
LEGEND ;Legend at end of report

External References

Name Field # of Occurrence
NOW^%DTC HDR+3
$$SR^DGMTAUD1 CATCLST+5
$$MTIEN^DGMTU3 CATCLST+2
$$FDATE^DGMTUTL HDR+3, LEGEND+3, LEGEND+4
$$FTIME^DGMTUTL HDR+3
CLOSE^DGMTUTL START+7
^DIR PAUSE+1
$$SDAPI^SDAMA301 ACTIVE+12
PID^VADPT6 PRINT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)["C-"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "Active Patients Who Have Not Agreed To Pay Deductible",?70,"Page: "_DGPAGE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"Date Range: "_$$FDATE^DGMTUTL(DGYRAGO)_" to "_$$FDATE^DGMTUTL(DGTODAY)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?51,"Run Date: "_$E($$FTIME^DGMTUTL(%),1,18)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,""
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?37,"PATIENT",?47,"MEANS TEST"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?25,"STATUS",?40,"ID",?49,"SOURCE",?58,"PAST",?64,"INHOUSE",?73,"FUTURE"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,DGLINE
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !!,"ACTIVE= Sched. Admissions, Dispositions, Pt. Movements, or Clinic Appts."
  • Line Location: LEGEND+1
Function Call: WRITE
  • Prompt: !!,?10,"INHOUSE = Current Inpatient"
  • Line Location: LEGEND+2
Function Call: WRITE
  • Prompt: !,?10,"PAST = ",$$FDATE^DGMTUTL(DGYRAGO)," to ",$$FDATE^DGMTUTL(DGTODAY)
  • Line Location: LEGEND+3
Function Call: WRITE
  • Prompt: !,?10,"FUTURE = After ",$$FDATE^DGMTUTL(DGTODAY)
  • Line Location: LEGEND+4
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGMT(408.31 - [#408.31] CATCLST+2, CATCLST+3, CATCLST+4, CATCLST+5
^DGPM("APRD" ACTIVE+38, ACTIVE+39
^DPT - [#2] CATCLST+1, ACTIVE+32, ACTIVE+34
^DPT("ACS" START+3
^TMP("DGMTO" START+6!, CATCLST+5*, ACTIVE+3, ACTIVE+4, ACTIVE+20!*, ACTIVE+24, ACTIVE+25, ACTIVE+40*, ACTIVE+41!, CATCOUT+2
, CATCOUT+3, CATCOUT+4, PRINT+2, PRINT+3, CHK+2
^TMP($J ACTIVE+13*, ACTIVE+14!, ACTIVE+20, ACTIVE+27, ACTIVE+28, ACTIVE+42!

Label References

Name Line Occurrences
ACTIVE START+4
CATCLST START+3
CATCOUT START+5
CHK PRINT+6
HDR CATCOUT+1, CHK+1, CHK+2
LEGEND CATCOUT+2
PAUSE CHK+1
PRINT CATCOUT+2

Naked Globals

Name Field # of Occurrence
^( CATCLST+1, PRINT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDR+3
ACNT ACTIVE+1~, ACTIVE+2*, ACTIVE+5, ACTIVE+7*
APPTDT ACTIVE+23~, ACTIVE+28*, ACTIVE+30
APT ACTIVE+1~, ACTIVE+32*, ACTIVE+33
APWHEN ACTIVE+1~, ACTIVE+23~, ACTIVE+32*, ACTIVE+33*, ACTIVE+34*, ACTIVE+35*, ACTIVE+37, ACTIVE+38*, ACTIVE+39*, ACTIVE+40
, ACTIVE+41
CK1 ACTIVE+1~, ACTIVE+38*
CK3 ACTIVE+1~, ACTIVE+39*
CLIEN ACTIVE+23~, ACTIVE+27*, ACTIVE+28
DFN START+3*, START+6!, CATCLST+1, CATCLST+2, CATCLST+5, PRINT+3*, CHK+2
DGARRAY ACTIVE+1~, ACTIVE+12, ACTIVE+14!
DGARRAY("FLDS" ACTIVE+11*
DGARRAY(4 ACTIVE+11*
>> DGCAT START+3*, CATCLST+1, CATCLST+3, CATCLST+5
DGDT CATCLST~, CATCLST+2*
>> DGLINE HDR+7*, HDR+8
DGNAME PRINT+1*, PRINT+2*, PRINT+3, PRINT+7!, CHK+2
>> DGP CHK+1*
>> DGPAGE START+2*, HDR+1*, HDR+2
>> DGSTOP START+2*, PRINT+2, PRINT+3, CHK+1*
>> DGTODAY CATCLST+2, ACTIVE+32, ACTIVE+38, ACTIVE+39, HDR+3, LEGEND+3, LEGEND+4
>> DGX PRINT+3*, PRINT+5
>> DGYRAGO CATCLST+2, ACTIVE+33, ACTIVE+38, HDR+3, LEGEND+3
DIR PAUSE+1!
DIR(0 PAUSE+1*
DT ACTIVE+35
I ACTIVE+1~, ACTIVE+10*, ACTIVE+11
IEN CATCLST~, CATCLST+2*, CATCLST+3, CATCLST+4, CATCLST+5
IO CATCOUT+1
IOF HDR+2
IOM HDR+7
IOSL CHK+1, CHK+2
IOST HDR+2, CHK+1, CHK+2
NODE0 CATCLST~, CATCLST+1*, CATCLST+5
PATAPPT ACTIVE+23~, ACTIVE+36!
PATAPPT( ACTIVE+30*
PATAPPT("" ACTIVE+35
PATIEN ACTIVE+23~, ACTIVE+25*, ACTIVE+27, ACTIVE+28, ACTIVE+32, ACTIVE+34, ACTIVE+38, ACTIVE+39, ACTIVE+40, ACTIVE+41
PATNAM ACTIVE+1~, ACTIVE+24*, ACTIVE+25, ACTIVE+30, ACTIVE+40, ACTIVE+41
PIEN ACTIVE+1~, ACTIVE+4*, ACTIVE+5
PNAME ACTIVE+1~, ACTIVE+3*, ACTIVE+4
RCNT ACTIVE+1~, ACTIVE+2*, ACTIVE+5*, ACTIVE+7*
SDCNT ACTIVE+1~, ACTIVE+12*
U CATCLST+1, CATCLST+3, CATCLST+4, CATCLST+5, ACTIVE+33, ACTIVE+34, ACTIVE+35, ACTIVE+38, ACTIVE+39, PRINT+5
VA PRINT+7!
VA("PID" PRINT+5
VAPTYP PRINT+7!
VETARRAY ACTIVE+1~
VETARRAY( ACTIVE+5*, ACTIVE+10, ACTIVE+11
>> Y CHK+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All