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: DGHTRPT1

Package: Registration

Routine: DGHTRPT1

Information

DGHTRPT1 ;ALB/JRC - Home Telehealth Transmissions Report ; 10/14/05 12:38pm

Source Information

Source file <DGHTRPT1.m>

Entry Points

Name	Comments	DBIA/ICR reference
EN	;entry point from option
EN1	;Tasked entry point
GETDATES	;Prompt for start date
GETSORT	;Select sort, 1 for patient or 2 for trans date
GETDATA	;Get data
HEADER	;print header
DETAIL	;Print detailed line
TOTAL	;Report totals
WAIT	;End of page logic
EXIT	;Kill temp global

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+3
Function Call: WRITE	Prompt: !,"Home Telehealth Patient Summary Report ",?65,"Page: ",PAGENUM Line Location: HEADER+4
Function Call: WRITE	Prompt: !!,"Report for ",$$FMTE^XLFDT(DGSD)," thru ",$$FMTE^XLFDT(DGED) Line Location: HEADER+5
Function Call: WRITE	Prompt: !!,?1,"Patient",?25,"Status",?34,"Date of Last Change",?56,"HT Vendor" Line Location: HEADER+6
Function Call: WRITE	Prompt: !?1,LN Line Location: HEADER+7
Function Call: WRITE	Prompt: !!?1,"Total Number of Active Patient Record(s): ",?45,$J($FNUMBER(ACNT,",",0),8) Line Location: TOTAL+1
Function Call: WRITE	Prompt: !?1,"Total Number of Inactive Patient Record(s): ",?45,$J($FNUMBER(ICNT,",",0),8) Line Location: TOTAL+2
Function Call: WRITE	Prompt: !?1,"Total Number of Patient Record(s): ",?45,$J($FNUMBER(CNT,",",0),8) Line Location: TOTAL+3
Function Call: WRITE	Prompt: ! Line Location: WAIT+8

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ

Info | Source | Entry Points | Interaction Calls | FileMan Files Accessed Via FileMan Db Call