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

Package: Lab Service

Routine: LRMLACM


Information

LRMLACM ;BPFO/DTG - LAB ASSOCIATE TEST/SPECIMEN TO MLTF ;02/10/2016

Source Information

Source file <LRMLACM.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point for association
ENA
ENB ; pick up specimen
ENM ; mltf lookup
ENS
OUT ; exit
GET60T ; get top of file 60 test info
CHKSPEC ;Check that specimen of MLTF LOINC code same as specimen of test
MSD ; delete the mltf from the 60 file
MSET ;save the mltf to the 60 file

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Subscript is "_AA_" Skipping"
  • Line Location: ENA+11
Function Call: WRITE
  • Prompt: !," Test Type is: "_AA_" Skipping"
  • Line Location: ENA+14
Function Call: WRITE
  • Prompt: !," "_LRN_" Missing LOCATION(Data Name) Skipping"
  • Line Location: ENA+16
Function Call: WRITE
  • Prompt: !," Test "_LRN_" does NOT have any Specimens associated. Skippping"
  • Line Location: ENA+17
Function Call: WRITE
  • Prompt: !,"TEST: ",LRN,!,"SPECIMEN: ",LRSN,!
  • Line Location: ENM+30
Function Call: WRITE
  • Prompt: !,"NOT able to Save"
  • Line Location: ENS+0
Function Call: WRITE
  • Prompt: !!,"Test/Specimen: ",LRN," / ",LRSN,!," Saved With MLTF: ",A,!
  • Line Location: ENS+2
Function Call: WRITE
  • Prompt: !!,"The MLTF LOINC code that you have selected does not have the"
  • Line Location: CHKSPEC+5
Function Call: WRITE
  • Prompt: !,"same specimen that you chose to test/specimen."
  • Line Location: CHKSPEC+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
60.01 GET1^DIQ
^LRMLTF - [#66.3] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call