Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSJ200

Package: Inpatient Medications

Routine: PSJ200


Information

PSJ200 ;BIR/RSB-UTILITY TO CORRECT CHANGED USER NAMES IN IV'S ;30 APR 97 / 8:39 AM

Source Information

Source file <PSJ200.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 (C,NOW)^%DTC  ^DIC  ^DIE  ^DIR  
Inpatient Medications 1 EN1^PSJHL2  
Kernel 1 ^%ZTLOAD  
List Manager 1 RESET^VALM4  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 13

Package Total Caller Graph
Inpatient Medications 13 PSJ LM BRIEF PATIENT INFO MENU  PSJ LM DETAILED ALLERGY MENU  PSJ LM FINISH MENU  PSJ LM IV OE MENU  PSJ LM OE MENU  PSJ LM PENDING ACTION  PSJ PC IV AC/EDIT ACTION  PSJCLOR1  
PSJI 200  PSJI LM ACTIVE MENU  PSJI LM PENDING ACTION  PSJU LM ACCEPT MENU  PSJU LM ACTIONS MENU  

Entry Points

Name Comments DBIA/ICR reference
200()
201
PRIV() ;
SEARCH ;
CONVERT(DFN,TYPE) ;
; Convert existing UD orders to new format. Only run once/patient, and
; only converts orders with a stop date<(5.0 Install date-365)
; DFN = Patient IEN
; TYPE = Background or Interactive mode
M ; sends mail message when complete
A(LONG,SHORT,SHRINK)

External References

Name Field # of Occurrence
C^%DTC CONVERT+8
NOW^%DTC CONVERT+8
^%ZTLOAD PSJ200+24
^DIC 201+2
^DIE SEARCH+6
^DIR 201+3
EN1^PSJHL2 SEARCH+7
RESET^VALM4 A+5
^XMD M+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!," The following user names were found in IV orders. These names have either",!," been deleted, changed, or are duplicates in the NEW PERSON file.",!
  • Line Location: PSJ200+10
Function Call: WRITE
  • Prompt: !!," Please do one of the following:"
  • Line Location: PSJ200+13
Function Call: WRITE
  • Prompt: !," a. If the name has changed, pick the correct name from the NEW PERSON file."
  • Line Location: PSJ200+14
Function Call: WRITE
  • Prompt: !," b. If the person has been deleted from the file, please see the appropriate",!?3," person to get this named added back into the NEW PERSON file and rerun this",!?3," option."
  • Line Location: PSJ200+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: PSJ200+16
Function Call: WRITE
  • Prompt: !!," Finished. Please have IRM remove this option"
  • Line Location: PSJ200+19
Function Call: WRITE
  • Prompt: " (PSJI 200) from",!," your menu, as it is no longer needed."
  • Line Location: PSJ200+20
Function Call: WRITE
  • Prompt: !!,"Not all names have been corrected, PLEASE RERUN THIS OPTION!"
  • Line Location: PSJ200+21
Function Call: WRITE
  • Prompt: !
  • Line Location: 201+0
Function Call: WRITE
  • Prompt: !," You must hold the PSJI MGR security to run this routine"
  • Line Location: PRIV+2
Routine Call
  • DIC
  • Line Location:
    • 201+2
Routine Call
  • DIE
  • Line Location:
    • SEARCH+6
Routine Call
  • DIR
  • Line Location:
    • 201+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] CONVERT+12
^PS(52.6 - [#52.6] CONVERT+12
^PS(52.7 - [#52.7] CONVERT+12
^PS(55 - [#55] SEARCH+7, CONVERT+6, CONVERT+10, CONVERT+11, CONVERT+12*
^VA(200 - [#200] 201+3
^XTMP("PSJ NEW PERSON" PSJ200+5, PSJ200+11, PSJ200+16, SEARCH+2, SEARCH+4, SEARCH+8!, M+1
^XTMP("PSJ NEW1" PSJ200+18*, SEARCH+1, SEARCH+6, SEARCH+10!
^XUSEC("PSJI MGR" PRIV+1

Label References

Name Line Occurrences
$$200 PSJ200+17
$$PRIV PSJ200+8
201 201+3
CONVERT SEARCH+3
M SEARCH+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CONVERT+8
ADS CONVERT+7~, CONVERT+11*, CONVERT+12
ADS1 CONVERT+7~, CONVERT+11*
DA SEARCH+5!*, SEARCH+6!
DA(1 SEARCH+5*
DDRG CONVERT+7~
DFN CONVERT~, CONVERT+6, CONVERT+10, CONVERT+11, CONVERT+12
DIC 201!*, 201+2!
DIC("A" 201+1*
DIC(0 201*
DIE SEARCH+5!*, SEARCH+6!
>> DIR("A" 201+3*
>> DIR(0 201+3*
>> DR SEARCH+6*
DTOUT PSJ200+9!, 201!
DUOUT PSJ200+9!, PSJ200+16, 201!
DUZ PRIV+1, M+2
IOF PSJ200+10
LONG A~, A+2
ND CONVERT+7~, CONVERT+11*, CONVERT+12
ON CONVERT+7~, CONVERT+10*, CONVERT+11, CONVERT+12
ON1 CONVERT+7~, CONVERT+11*
PSGDT CONVERT+7~, CONVERT+8*, CONVERT+10
PSJ1 PSJ200+22!, SEARCH+1*, SEARCH+2, SEARCH+4, SEARCH+6, SEARCH+8, SEARCH+10, M+6!
PSJ1(1 M+3*
PSJ1(2 M+4*
PSJ1(3 M+4*
PSJ1(4 M+5*
PSJ1(5 M+6*
PSJ2 PSJ200+22!, SEARCH+2*, SEARCH+3, SEARCH+4, SEARCH+5, SEARCH+7, SEARCH+8
PSJ3 PSJ200+22!, SEARCH+4*, SEARCH+5, SEARCH+7, SEARCH+8
PSJ4 PSJ200+22!
PSJB PSJ200+18*, PSJ200+19, PSJ200+22!
PSJBM A+2~*, A+3, A+4
PSJC PSJ200+22!, SEARCH+9*
PSJDFN PSJ200+22!
PSJL PSJ200+9!, PSJ200+11*, PSJ200+12, PSJ200+16*, PSJ200+18, PSJ200+22!, 201+1
PSJNUM PSJ200+22!
PSJORD PSJ200+22!
PSJPT PSJ200+9!, PSJ200+17!*, PSJ200+18, PSJ200+22!, 201+2*, 201+3, 201+4
PSOC SEARCH+7*, CONVERT+7~
SHORT A~, A+2
SHRINK A~, A+2
STAT CONVERT+7~
STPDT CONVERT+7~, CONVERT+10*
STS CONVERT+7~
TYPE CONVERT~, CONVERT+12
U CONVERT+12
>> VALM("BM" A+3, A+4*
>> VALM("LINES" A+4*
>> VALM("TM" A+4
>> VALMBCK A+3*
>> VALMCC A+5
>> VALMMENU A+2
X SEARCH+7*, CONVERT+7~, CONVERT+8
X1 CONVERT+7~, CONVERT+8*
X2 CONVERT+7~, CONVERT+8*
XMDUZ M+3*, M+6!
XMSUB M+2*, M+6!
XMTEXT M+2*, M+6!
XMY M+2!
XMY( M+2*
XX CONVERT+7~, CONVERT+11*, CONVERT+12*
>> Y 201+2, 201+3
>> ZTDESC PSJ200+23*
>> ZTDTH PSJ200+24*
>> ZTIO PSJ200+23*, SEARCH+11*
>> ZTRTN PSJ200+23*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All