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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSJVINI1

Package: Inpatient Medications

Routine: PSJVINI1


Information

PSJVINI1 ;BIR/-APR-1994;

Source Information

Source file <PSJVINI1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 6 WAIT^DICD  YN^DICN  DT^DICRW  IXALL^DIK  I^DITR  EN^DIU2  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 PSJVINIT  

Entry Points

Name Comments DBIA/ICR reference
DIE ;INPUT TEMPLATE
B36(X)
DIB ;SORT TEMPLATE
MSG ;
M1
M0
FUN ;FUNCTION
DIP ;PRINT TEMPLATE
DIS ;SCREEN TEMPLATE
DATA
RTN ;ROUTINE DOCUMENTATION NOTE
BUL ;BULLETIN
ASK
NT
IX
N(%)
W
HEL ;HELP FRAME
OPT ;OPTION
SBF ;FILE AND SUB FILE NUMBERS
KEY ;SECURITY KEY
SAVE

External References

Name Field # of Occurrence
WAIT^DICD ASK+4
YN^DICN ASK, ASK+2, W+1
DT^DICRW PSJVINI1+4, ASK+4
IXALL^DIK IX+1, IX+2
I^DITR DATA+1
EN^DIU2 ASK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"SHALL I WRITE OVER FILE SECURITY CODES"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"ARE YOU SURE EVERYTHING'S OK"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !?6,"Answer YES to replace the current "_Y_"S with the incoming ones."
  • Line Location: W+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: IX+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC - [#1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( IX
^DIC - [#1] IX+2
^UTILITY( ASK+4!, ASK+6, DATA, DATA+1, DATA+2!
^UTILITY("DIK" ASK+4!
^XMB(3.9 - [#3.9] MSG+1, MSG+2, NT

Label References

Name Line Occurrences
$$B36 ASK+5
$$N B36
@( ASK+5
DATA DATA+2
IX ASK+6
M0 M0
M1 M0
NT M0, SAVE, SAVE+1
SAVE M0, SAVE+2
W ASK+1, W+1

Naked Globals

Name Field # of Occurrence
^( ASK+6!, DATA+1, IX!, NT
^(0 DATA+1, MSG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PSJVINI1+4*, PSJVINI1+5, ASK*, ASK+2*, W+1*, W+2, IX*, N~, SAVE+2, M1*
, M1+2*, M1+3*, M1+4*
A0 SAVE+1*!
D PSJVINI1+4!, ASK+6*, DATA*, DATA+1, IX, IX+1, IX+2, M1*, M1+2
D0 PSJVINI1+4!, DATA+1*
DA PSJVINI1+4!
DA(1 IX+1*
DDF PSJVINI1+4!, DATA+2!
DDF(1 DATA*, DATA+1, DATA+2
DDT PSJVINI1+4!, DATA+2!
DDT(0 DATA*
DFN DATA+2!
DFR PSJVINI1+4!, DATA+2!
DFR(1 DATA+1*
DIC PSJVINI1+4!
>> DIDIU ASK+3*
DIDUZ PSJVINI1+4!
DIF PSJVINI1+4!
>> DIFKEP ASK+3
>> DIFKEP( ASK+3
DIFQ PSJVINI1+5!, ASK!, ASK+1, ASK+2!, W+2!
DIFQ( ASK+6, W+2*, M1
DIFQ(0 ASK, W
>> DIFQR( DATA+1, M1+2
DIK PSJVINI1+4!, IX*, IX+1*, IX+2*
DIR PSJVINI1+4!
>> DIU ASK+3*
>> DIU(0 ASK+3*
DIX PSJVINI1+4!
>> DKP DATA+1*
DLAYGO PSJVINI1+4!
>> DMRG DATA+1*
>> DN ASK+5*
>> DSEC PSJVINI1+4*, ASK*, M1
DTN PSJVINI1+4!, DATA+2!
DTO PSJVINI1+4!, DATA+1*, DATA+2!
DTO(0 DATA+1*
DZ PSJVINI1+4!
>> NO PSJVINI1+5*
>> R ASK+5*
U PSJVINI1+4*, PSJVINI1+5, ASK+4, ASK+6, DATA, DATA+1, DATA+2, MSG+1
X ASK+1*, W+2, B36~, MSG+2*, M0, NT*, SAVE, SAVE+1*, SAVE+2, M1
>> XCN MSG+2, NT*
>> XMZ MSG+1, MSG+2, NT
>> Y W*, W+1, SAVE*, SAVE+2, M1*, M1+1, M1+2, M1+3
>> Z DATA+1*

Marked Items

Name Field # of Occurrence
$T(@X W
$T(@Y M1+4
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 |  Naked Globals |  Local Variables |  Marked Items |  All