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
Print Page as PDF
Routine: LRVRAP4

Package: Lab Service

Routine: LRVRAP4


Information

LRVRAP4 ;DALOI/STAFF - LAB AP INTERFACE ;06/19/13 11:48

Source Information

Source file <LRVRAP4.m>

Entry Points

Name Comments DBIA/ICR reference
DISPLAY ; Display AP results
DQ ;
EXIT ;
HDG ;
DATA ;
PRTSR ; Print Supplemental Report
ACCEPT ; Ask if want to accept results
STORE ;
; First, some setup stuff
COMMENT ;
SRPT ; SUPPLEMENTARY REPORT
PURG ; Ask if the entry should be purged from ^LAH(
PAUSE ; Check for end of page

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Abort- Not an AP accession"
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !,"Accession #: ",$G(LRACC)," UID: ",$G(LRUID)
  • Line Location: HDG+2
Function Call: WRITE
  • Prompt: !,"Name: ",$G(PNM)," SSN: ",$G(SSN)," DOB: ",$$FMTE^XLFDT($G(DOB),"1M")," Age: ",$G(AGE(2))
  • Line Location: HDG+3
Function Call: WRITE
  • Prompt: ?(IOM-10),"PAGE: ",LRPAGE
  • Line Location: HDG+4
Function Call: WRITE
  • Prompt: !,"Collection Date: ",$$FMTE^XLFDT($G(LRCDT))
  • Line Location: HDG+5
Function Call: WRITE
  • Prompt: !,LRLINE
  • Line Location: HDG+7
Function Call: WRITE
  • Prompt: !,LRLINE,!,FLDNM
  • Line Location: DATA+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: STORE+30
Function Call: WRITE
  • Prompt: !
  • Line Location: PURG+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAUSE+5
Info |  Source |  Entry Points |  Interaction Calls