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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: FHWADM

Package: Dietetics

Routine: FHWADM


Information

FHWADM ; HISC/REL - Set up admission ;12/4/00 10:35

Source Information

Source file <FHWADM.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Dietetics 11 ALG^FHCLN  DID^FHDPA  UPD^FHMTK7  ADD^FHOMDPA  (CANAO,CANEL,CANRM,CANTF)^FHOMRC1  (SETGM,SETSM)^FHOMRO2  MSHCA^FHOMUTL  ^FHORX  
UPDFP^FHWGMR  EVSEND^FHWOR  DO^FHWOR2  
Kernel 2 $$PATCH^XPDUTL  MSG^XQOR  
VA Fileman 2 (C,NOW)^%DTC  ^DIE  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Dietetics 7 FHDPA  FHWDIS  FHWDISD  FHWMAS  FHWOR  FHWTRN  FHXIN  

Entry Points

Name Comments DBIA/ICR reference
WRD ; Update Room/Bed & Ward for current admission
KIL ;
CANGM ;
CNTF100 ;Backdoor message to update file #100 with TF cancel order
UPD
CNSM100 ;Backdoor message to update file #100 with SM cancel order
UPALFP ;Update Food Preferences for all Patient's based on Allergies
CNSMEL
CNAO100 ;Backdoor message to update file #100 with AO cancel order
ADD ; Add diet associated Diet Restriction
CAN ;
OPM ; Delete any future outpatient meals orders upon patient admission
CANRM ;
NEW ; New Ward
CANSM ;
CNEL100 ;Backdoor message to update file #100 with EL cancel order

External References

Name Field # of Occurrence
C^%DTC OPM+2
NOW^%DTC FHWADM+10, FHWADM+27, ADD+1
^DIE CANSM+5, CANGM+3
ALG^FHCLN UPALFP+2
DID^FHDPA WRD+1
UPD^FHMTK7 ADD+3
ADD^FHOMDPA FHWADM+6
CANAO^FHOMRC1 CANRM+7
CANEL^FHOMRC1 CANRM+8
CANRM^FHOMRC1 CANRM+1
CANTF^FHOMRC1 CANRM+9
SETGM^FHOMRO2 CANGM+5
SETSM^FHOMRO2 CANSM+7
MSHCA^FHOMUTL CAN+2
^FHORX FHWADM+22, FHWADM+25, WRD+4, NEW+2
UPDFP^FHWGMR UPALFP+3
EVSEND^FHWOR CAN+2
DO^FHWOR2 FHWADM+27
$$PATCH^XPDUTL CAN+1
MSG^XQOR FHWADM+28

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] FHWADM+10
^DIC(42 - [#42] FHWADM+16
^DPT - [#2] FHWADM+11, FHWADM+14, FHWADM+16
^DPT("CN" WRD+1
^FH(111 - [#111] FHWADM+23
^FH(111.1 - [#111.1] ADD+2
^FH(119.6 - [#119.6] FHWADM+15, FHWADM+16, FHWADM+17, NEW+4
^FHPT - [#115] FHWADM+7*, FHWADM+11, FHWADM+12*, FHWADM+13*, FHWADM+20*, FHWADM+21*, FHWADM+22*, FHWADM+24*, FHWADM+25*, FHWADM+28*
, UPD*, WRD+2, WRD+3, WRD+4, NEW+1*, NEW+4, NEW+5*, NEW+6, OPM+1, OPM+3
, OPM+4, OPM+5, CANRM+2, CANRM+3, CANRM+4, CANRM+7, CANRM+8, CANRM+9, CNAO100+1, CNEL100+1
, CNTF100+1, CANSM+2, CANSM+3, CANSM+6, CNSM100+1, CNSMEL, CANGM+4
^FHPT("AW" NEW+2!*
^ORD(101 - [#101] FHWADM+5
^TMP($J ADD+4!, UPALFP+2, UPALFP+3, UPALFP+4!

Label References

Name Line Occurrences
ADD FHWADM+26, FHWADM+28
CAN CANRM+6, CNAO100+1, CNEL100+1, CNTF100+1, CNSM100+1, CNSMEL+1
CANGM OPM+5
CANRM OPM+3
CANSM OPM+4
CNAO100 CANRM+7
CNEL100 CANRM+8
CNTF100 CANRM+9
KIL FHWADM+11, FHWADM+28, UPD
NEW WRD+3
OPM FHWADM+9
UPALFP FHWADM+8
UPD FHWADM+11, FHWADM+18, FHWADM+22, FHWADM+26
WRD FHWADM+28, UPD

Naked Globals

Name Field # of Occurrence
^( FHWADM+11*
^(0 FHWADM+10, FHWADM+12*, WRD+3, WRD+4*, NEW+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% FHWADM+10, FHWADM+19, FHWADM+22, FHWADM+24, FHWADM+27, ADD+1, KIL+1!
%H KIL+1!
%I KIL+1!
>> ADM FHWADM+10, FHWADM+11, FHWADM+12, FHWADM+13, FHWADM+20, FHWADM+21, FHWADM+22, FHWADM+24, FHWADM+25, FHWADM+27
, FHWADM+28, UPD, WRD+1*, WRD+2, WRD+3, WRD+4, NEW+1, NEW+2, NEW+4, NEW+5
, NEW+6
COM ADD+4!
D1 FHWADM+27*, FHWADM+28!
D2 FHWADM+27*, FHWADM+28!
>> DA CANSM+1*, CANSM+3, CANGM+1*
>> DA(1 CANSM+1*, CANSM+3, CANSM+4, CANGM+1*, CANGM+2
>> DFN FHWADM+6, FHWADM+11, FHWADM+14, FHWADM+16, WRD+1
DIC KIL+1!
DIE CANSM+4*, CANGM+2*, KIL+1!
DIR KIL+1!
DPAT ADD+2*, ADD+4!
>> DR CANSM+5*, CANGM+3*
DT OPM+2
DUZ FHWADM+22, FHWADM+24, FHWADM+27
EVT FHWADM+22*, FHWADM+25*, WRD+3*, WRD+4*, NEW+2*, ADD+4!
>> FHACT CANSM+7*, CANGM+5*
>> FHDA CANSM+1*, CANSM+2, CANSM+6, CANSM+7, CNSM100+1, CNSMEL, CNSMEL+1, CANGM+1*, CANGM+4, CANGM+5
>> FHDFN FHWADM+7, FHWADM+11, FHWADM+12, FHWADM+13, FHWADM+20, FHWADM+21, FHWADM+22, FHWADM+24, FHWADM+25, FHWADM+28
, UPD, WRD+2, WRD+3, WRD+4, NEW+1, NEW+2, NEW+4, NEW+5, NEW+6, UPALFP+1
, OPM+1, OPM+3, OPM+4, OPM+5, CANRM+2, CANRM+3, CANRM+4, CANRM+7, CANRM+8, CANRM+9
, CNAO100+1, CNEL100+1, CNTF100+1, CANSM+1, CANSM+2, CANSM+6, CNSM100+1, CNSMEL, CANGM+1, CANGM+4
FHDT OPM+2*, OPM+3, OPM+4, OPM+5, KIL+1!
FHDT2 CANRM+4*, CANRM+5, KIL+1!
>> FHGM OPM+5*, CANGM+1
FHGMRN UPALFP+3*, UPALFP+4!
FHMISS UPALFP+2!
>> FHMPNUM CANRM+3*, CANRM+5
FHMSAL UPALFP+4!
FHMSFP UPALFP+4!
FHMSPT UPALFP+4!
FHNEW FHWADM+27*, FHWADM+28!
FHNOW FHWADM+10*, KIL+1!
>> FHOPDT CANSM+7*, CANGM+5*
>> FHOPTY CANSM+7*, CANGM+5*
FHOR FHWADM+26*!, FHWADM+27*, FHWADM+28!, ADD+2
>> FHORN CANRM+2*, CNAO100+1*, CNEL100+1*, CNTF100+1*, CANSM+2*, CNSM100+1*, CNSMEL*
FHPV FHWADM+27*, FHWADM+28!
FHRMB WRD+1~, WRD+4, NEW+1, NEW+2, KIL+2!
FHRMDT OPM+3*, KIL+1!
FHRNUM OPM+3*, CANRM+2, CANRM+3, CANRM+4, CANRM+7, CANRM+8, CANRM+9, CNAO100+1, CNEL100+1, CNTF100+1
, KIL+1!
>> FHSM OPM+4*, CANSM+1
>> FHSTAT CANSM+1*, CANGM+1*
FHWF FHWADM+5~*, FHWADM+26
FHWRD WRD+1~, WRD+3, WRD+4, NEW+1, NEW+2, NEW+4, KIL+2!
FHX1 FHWADM+14*, FHWADM+15*, FHWADM+16*, FHWADM+17*, FHWADM+18*, FHWADM+22, FHWADM+23, FHWADM+24, FHWADM+26, FHWADM+27
, KIL+1!
FHX2 FHWADM+14*, FHWADM+18*, FHWADM+23*, FHWADM+24, NEW+6*, KIL+1!
FHX3 FHWADM+10*, FHWADM+19, NEW+4*, NEW+5*, NEW+6, KIL+1!
>> FHZ115 FHWADM+6*
>> FHZN CANSM+6*, CANGM+4*
>> FILL CANRM+5*, CNAO100+1*, CNEL100+1*, CNTF100+1*, CNSM100+1*, CNSMEL+1*
FP ADD+4!
L ADD+4!
LN ADD+4!
LP ADD+4!
LS ADD+4!
M ADD+4!
M1 ADD+4!
M2 ADD+4!
MEAL ADD+4!
MSG FHWADM+28!
N ADD+4!
NM ADD+4!
NO ADD+4!
NOW FHWADM+27*, FHWADM+28!, ADD+1*
NUM ADD+4!
NX ADD+4!
OPAT ADD+4!
P ADD+4!
PNN ADD+4!
PNO ADD+4!
PP ADD+4!
R1 ADD+4!
SF ADD+4!
SP ADD+4!
U CANRM+2, CANRM+3, CANRM+4, CNAO100+1, CNEL100+1, CNTF100+1, CANSM+2, CNSM100+1, CNSMEL
WARD WRD+1~, WRD+3*, NEW+2
X FHWADM+10*, FHWADM+11, FHWADM+13, FHWADM+19*, FHWADM+20, FHWADM+22, FHWADM+24, FHWADM+27, OPM+2, KIL+2!
>> X1 OPM+2*
>> X2 OPM+2*
X3 ADD+4!
Z ADD+4!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All