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

Package: Lab Service

Routine: LR493


Information

LR493 ;PBB - LR*5.2*493 PATCH ENVIRONMENT CHECK ROUTINE ;02/20/17

Source Information

Source file <LR493.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Does not prevent loading of the transport global.
; Environment check is done only during the install.
PRE ; KIDS Pre install for LR*5.2*493
POST ; KIDS Post install for LR*5.2*493
NLT1 ;
EN1 ;Find and correct existing spelling or duplicate numbers errors.
REINDEX ;Reindex LAM to fire new x-refs
CHK
SET ;
DEL ;
ERR ;
WRT ;
POST1 ;TRANSPORT FILE 64.81 INTO FILE 64 IF REQUIRED
P1
KIL
CHGNM ; CHANGE THE PROCEDURE NAME IN THE RECORD
CMP ; COMPARE FOUND CODES AND PROCEDURE NAMES
SCR(LRMSG) ;Store message in ^XTMP("LRNLT" Global
SETUP ; SETS UP THE FDA ARRAY TO ADD A NODE
GNDE ; RETRIEVES NODES FROM THE TRANSPORT MULTIPLE
AREC ; ADDS ENTRIES FROM THE TRANSPORT MULTIPLE TO FILE 64
ERMSG ;STUFF THE TEMP GLOBAL WITH ANY ERROR MESSAGES
KREC ; DELETES THE RECORD FROM THE FILE
DSS ;Update WKLD CODE file , DSS Feeder Key (#14) field to 'Yes"

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,LRIEN_" ( "_LRFILE_" ERROR"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: POST1+5
Function Call: WRITE
  • Prompt: ". "
  • Line Location: P1+12
Function Call: WRITE
  • Prompt: !,LRREC_" "
  • Line Location: P1+15
Function Call: WRITE
  • Prompt: !,"NEW IEN=",$G(LRSIXT4(LRTRIEN))
  • Line Location: GNDE+15
Function Call: WRITE
  • Prompt: !,$C(7),ERR
  • Line Location: DSS+16
Function Call: WRITE
  • Prompt: "*"
  • Line Location: DSS+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls,  FIND1^DIC,  FIND^DIC
^LAB(64.81 - [#64.81] Classic Fileman Calls
64.8117 GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call