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

Package: Registration

Routine: DGENRPT4


Information

DGENRPT4 ;ALB/DW,LBD/EG - EGT Actual Detailed Impact Report ; 1/20/05 1:04pm

Source Information

Source file <DGENRPT4.m>

Entry Points

Name Comments DBIA/ICR reference
ENPT ;Actual Detailed Report selected.
INFAP ;Ask the user if Future Appointments is wanted on the report.
RPDT ;Ask the user the Report Begin Date and Report End Date.
RPDT2
PRESORT ;First get the current EGT Setting from file #27.16.
PRESRT1 ;Sort for patient's current record and get the potentially affected.
EGTP ;Get patients EGT Priority.
BYSRT ;Sort patients by last name for "BY(0)".
PT ;Get the patient NAME and SSN
EP ;Get the patient EGT Priority.
ENRED ;Get the patient ENROLLMENT END DATE.
ENRST ;Get the patient ENROLLMENT STATUS.
WRD ;Get the patient WARD.
FAP1 ;Get the patient FUTURE APPOINTMENTS.
FAP0 ;See if the patient has future appointment.
PCPVD ;Get the patient PC PROVIDER.
PFCLTY ;Get the patient PREFFERED FACILITY.
DETHD ;General header for the Preliminary Detailed Report.
DETHD1 ;Header for the Preliminary Detailed Report, with Future Appointments.
DETHD0 ;Header for the Preliminary Detailed Report, no Future Appointments.
END ;At the end of the display.
EXIT ;Clean up upon exit of the routine.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** This report requires a 132 column printer. ***",!!
  • Line Location: ENPT+7
Function Call: WRITE
  • Prompt: *7
  • Line Location: INFAP+5
Function Call: WRITE
  • Prompt: *7
  • Line Location: RPDT+7
Function Call: WRITE
  • Prompt: *7
  • Line Location: RPDT2+5
Function Call: WRITE
  • Prompt: !,"No EGT setting on file.",!
  • Line Location: PRESORT+4
Function Call: WRITE
  • Prompt: !,"No EGT setting on file.",!
  • Line Location: PRESORT+8
Function Call: WRITE
  • Prompt: X
  • Line Location: FAP1+11
Function Call: WRITE
  • Prompt: !,?79,X
  • Line Location: FAP1+12
Function Call: WRITE
  • Prompt: !,?79,"More Appts"
  • Line Location: FAP1+13
Function Call: WRITE
  • Prompt: !,?((IOM-33)\2),"EGT Actual Detailed Impact Report"
  • Line Location: DETHD+7
Function Call: WRITE
  • Prompt: !,?((IOM-38-$L(DT1_DT2))\2),"Date Range of Enrollment End Date: ",DT1," - ",DT2
  • Line Location: DETHD+8
Function Call: WRITE
  • Prompt: !,?((IOM-22-$L(RDT))\2),"Date/Time Report Run: ",RDT
  • Line Location: DETHD+9
Function Call: WRITE
  • Prompt: !,?((IOM-45-$L(RLEGT_EGTSUB_EGTTP_EGTEDT))\2),"EGT Setting: ",RLEGT_EGTSUB," EGT Type: ",EGTTP," EGT Effective Date: ",EGTEDT
  • Line Location: DETHD+10
Function Call: WRITE
  • Prompt: !,?((IOM-28-$L(EGTLDT))\2),"Date/Time Last EGT Setting: ",EGTLDT
  • Line Location: DETHD+11
Function Call: WRITE
  • Prompt: !!,"IMPORTANT NOTE: Actual report is based on a comparison of the EGT Setting and the Enrollment Category as provided by HEC."
  • Line Location: DETHD+12
Function Call: WRITE
  • Prompt: !!,"NAME",?21,"SSN",?32,"EP",?36,"ENROLLMENT",?48,"ENROLLMENT",?62,"WARD",?79,"FUTURE",?109,"PC",?120,"PREF"
  • Line Location: DETHD1+2
Function Call: WRITE
  • Prompt: !,?36,"END DATE",?48,"STATUS",?79,"APPOINTMENTS",?109,"PROVIDER",?120,"FACILITY",!!
  • Line Location: DETHD1+3
Function Call: WRITE
  • Prompt: !!,"NAME",?21,"SSN",?32,"EP",?36,"ENROLLMENT",?48,"ENROLLMENT",?62,"WARD",?79,"FUTURE",?87,"PC",?99,"PREF"
  • Line Location: DETHD0+2
Function Call: WRITE
  • Prompt: !,?36,"END DATE",?48,"STATUS",?79,"APPTS",?87,"PROVIDER",?99,"FACILITY",!!
  • Line Location: DETHD0+3
Function Call: WRITE
  • Prompt: !,"TOTAL PATIENTS (UNIQUE SSNS) FOR THIS FACILITY: ",COUNT
  • Line Location: END+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGEN(27.11 - [#27.11] Classic Fileman Calls,  EXTERNAL^DILFD
^DGEN(27.16 - [#27.16] EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call