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

Package: Enrollment Application System

Routine: EASMTRP3


Information

EASMTRP3 ; ALB/GAH - MEANS TEST ANV DATES BY APPT DATE ; 10/10/2006

Source Information

Source file <EASMTRP3.m>

Entry Points

Name Comments DBIA/ICR reference
QUE ; Que off the appointment list search by MT anniversary date
EN ; Main entry point for appointment list by MT anniversary date
LOOP ; Loop through a clinic's appointment list
PRINT ; Print Report
HDR(EASCLN) ; Report Header
PAUSE ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"No MT Anniversary dates found for this appointment date."
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,^TMP("EASAP",$J,"CLN",EACLN)
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !?3,$$GET1^DIQ(2,DFN,.01)
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: ?30,VA("BID")
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: ?38,$S(ANVDT>0:$$FMTE^XLFDT(ANVDT),1:"")
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: ?55,$$FMTE^XLFDT(APDT,"2P"),!
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: "Means Test Expiration Report by Appt Date "_$S(CLINIC]"":"for "_CLINIC,1:"")
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !!,"For Appointment Date: ",$$FMTE^XLFDT(^TMP("EASAP",$J,"APDT"))
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: !,"Print Date: ",$$FMTE^XLFDT($$NOW^XLFDT)
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: ?TAB,"Page "_PAGE
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !!?30,"Last",?38,"Anniversary",?55,"Appointment"
  • Line Location: HDR+18
Function Call: WRITE
  • Prompt: !?3,"Name",?30,"Four",?38,"Date",?55,"Time"
  • Line Location: HDR+19
Function Call: WRITE
  • Prompt: !,LINE,!
  • Line Location: HDR+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DGMT(408.31 - [#408.31] GET1^DIQ
^SC - [#44] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call