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

Package: Lab Service

Routine: LR138PO


Information

LR138PO ;DALISC/FHS - LR*5.2*138 POST INSTALL ROUTINE KIDS INSTALL

Source Information

Source file <LR138PO.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Builds Laboratory OOS Locations for each LMIP valid WKLD Divison
LOC ;
SET
MSG
END ;
LK ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Starting Post Install Process",80),!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !?5,"Cant lock ^LRO(69,AA) GLOBAL POST INSTALL ABORTED",!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"Option [LR WKLD LOCATIONS] was ",$S(X:"Added",1:"NOT ADDED")," to [LR LIM/WKLD] MENU ",!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,"Option [LR WKLD ACC AREA LOCATIONS] was ",$S(X:"Added",1:"NOT ADDED")," to [LR LIM/WKLD] MENU ",!!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("POST INSTALL ABORTED",80)
  • Line Location: LOC+5
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Creating Laboratory OOS Workload Locations",80),!!
  • Line Location: LOC+6
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("Database Upgrade Completed Successfully",80),!!
  • Line Location: SET+4
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("DEFAULT LAB OOS LOCATION IS",80),!!
  • Line Location: SET+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: SET+7
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SET+7
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(" Database Upgrade was INCOMPLETE ",80)
  • Line Location: SET+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: SET+9
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SET+9
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+10
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("PCE/VSIT ON (#615) field in LABORATORY SITE (#69.9) file",80)
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("has been set to BOTH PCE/VSIT AND STOP CODES",80),!!
  • Line Location: MSG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call