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

Package: Lab Service

Routine: LR7OSUM


Information

LR7OSUM ;DALOI/STAFF - Silent Patient cum ;11/19/09 18:15

Source Information

Source file <LR7OSUM.m>

Entry Points

Name Comments DBIA/ICR reference
DFN
LRLLOC ;
END ; Cleanup variables
EN(Y,DFN,SDATE,EDATE,COUNT,LRGIOM,SUBHEAD) ; Enter here to get silent lab results
; Results in "CH" subscript are stored in the Cumulative format
; Headers for each format are found in ^TMP("LRH",$J,name)=ln count
; Index for where tests are found in ^TMP("LRT",$J,print name)=header^line # of1st occurance. Entries without a header means that the test exists in the report, but no result.
; Formatted reports are found in ^TMP("LRC",$J,ifn)
; DFN = Patient
; SDATE = Start date to search for results (optional)
; EDATE = End date to search for results (optional)
; COUNT = Count of results to send (optional)
; LRGIOM = Right margin
; SUBHEAD = Array of subheaders from file 64.5, misc, micro & AP to show results. Null param = get all results
  • ICR #1958
    • Status: Active
    • Usage: Supported
  • ICR #2766
    • Status: Active
    • Usage: Supported
    TEST ; Test the output
    GET64(Y) ; Get minor headers from file 64.5
  • ICR #1958
    • Status: Active
    • Usage: Supported
  • ICR #2766
    • Status: Active
    • Usage: Supported
    PT ; Test with a loop thru multiple patients
    CLEAN ; Clean up TMP globals
    AP(DFN) ; Get just the AP results
  • ICR #2766
    • Status: Active
    • Usage: Supported

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,^(IFN,0)
    • Line Location: TEST+2
    Function Call: READ
    • Variable: X
    • Timeout: DTIME
    • Line Location: PT+2
    Function Call: WRITE
    • Prompt: !!,"How many patients: "
    • Line Location: PT+2
    Function Call: WRITE
    • Prompt: !!,"Enter a number"
    • Line Location: PT+3
    Function Call: WRITE
    • Prompt: !!!!,"////////////////////"_$P(^DPT(DFN,0),"^")_" LRDFN:"_+^DPT(DFN,"LR")_"////////////////////",!!
    • Line Location: PT+5
    Info |  Source |  Entry Points |  Interaction Calls