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

Package: Lab Service

Routine: LRMLRCP


Information

LRMLRCP ;BPFO/DTG - FILE 60 ITEMS WITHOUT MLTF REPORT PGM FOR NTRT PROCESS ;02/10/2016

Source Information

Source file <LRMLRCP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
ST ;
DEVICE
DO
DONE ; exit
BK ;entry if queued
PRT ; print report
PL ; Step down the B X-ref - exclude synomyms
PLE
PDONE ; print done
HEADER ;Description: Prints the report header.
PAUSE
GET664 ; get file 66.4 info
GET60T ; get top of file 60 test info

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?(IOM-$L(HD)\2),HD,!!!
  • Line Location: ST+2
Function Call: WRITE
  • Prompt: !,*7,"Starting Date Not Selected"
  • Line Location: ST+7
Function Call: WRITE
  • Prompt: !,*7,"Ending Date Not Selected"
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: !,*7,"No Device Selected"
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !,LRTSTN,?42,"Create Date: ",LRTC,?67,"Inactive: "
  • Line Location: PLE+6
Function Call: WRITE
  • Prompt: $S(B="":"N",1:B)
  • Line Location: PLE+6
Function Call: WRITE
  • Prompt: !,?2,D,?35,K,?47,C,?57,E
  • Line Location: PLE+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,?11,HD
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,?27,"Date Printed: "_$$FMTE^XLFDT(DT),?70,"Page ",PAGE,!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,?2,"Specimen",?35,"Create DT",?47,"Inactive",?57,"Exception"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,ULINE
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,LRTSTN
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
60.01 GETS^DIQ
^LAB(66.4 - [#66.4] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call