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

Package: Registration

Routine: DGMTOREQ


Information

DGMTOREQ ;ALB/TET,CAW,CKN - List Means Test Status ; 5/6/92 ; 07/22/02 11:00am

Source Information

Source file <DGMTOREQ.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point to list required/pending means tests
ST ;select means test status
ST1
DTB ;select beginning date
Q ;select device and print
DQ ;gather data and print
SORT ;sort data into tmp global
PRINT ;print data from tmp global
EXIT ;clean up and quit
HDR ;header
DATE(X) ;function to return date in external format
PID(X) ;function to return pid
CR ;read for display
PAGE ;new page

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Future dates are not allowed.",*7
  • Line Location: DTB+2
Function Call: WRITE
  • Prompt: !!?10,DGM
  • Line Location: SORT+1
Function Call: WRITE
  • Prompt: !!?10,DGM
  • Line Location: SORT+11
Function Call: WRITE
  • Prompt: ?71,$P(DG0,U,4)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?(IOM-$L(DGC(I))/2),DGC(I)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?66,"Page ",DGPG,!,DGDASH,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?38,$S(DGMTYPT=1:"Means",1:"Copay")_" Test",?56,"Date of"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?67,"Pend. Adj."
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"Patient Name",?24,"Patient ID",?40,"Source",?58,"Test"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?69,"Status"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,"------------",?24,"----------",?38,"----------",?56,"-------"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: ?67,"----------"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: CR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAGE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(408.32 - [#408.32] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call