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 |  All
Print Page as PDF
Routine: NURSALE0

Package: Nursing Service

Routine: NURSALE0


Information

NURSALE0 ;HIRMFO/RM-LOCATION FILE EDIT ROUTINE ;11/4/89

Source Information

Source file <NURSALE0.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  (,IX1)^DIK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Nursing Service 1 NURSALED  

Entry Points

Name Comments DBIA/ICR reference
DELB ;
VERIFY ;
DELM ;
EDM ;
DMAS ;
ADD ;
ADDB ;
ASKB ;
ADDM ;
DIC

External References

Name Field # of Occurrence
^DIC DIC
^DIE EDM+3, DMAS+2
^DIK DELM+2, DELB+2
IX1^DIK ADD+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Would you like to (A)dd new AMIS bed sections"
  • Line Location: ASKB+2
Function Call: WRITE
  • Prompt: ", (D)elete existing AMIS",!,"bed sections from the above listing, (E)dit the associated MAS ward",!,"relationship,"
  • Condition for execution: NURSOBED
  • Line Location: ASKB+2
Function Call: WRITE
  • Prompt: "this prompt (A"_$S(NURSOBED:"/D/E",1:"")_"/B): "_$S(NURSOBED:"B",NURSNEW:"A",1:"B")_"// "
  • Line Location: ASKB+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASKB+4
Function Call: WRITE
  • Prompt: !?4,$C(7),"ANSWER WITH A IF YOU WOULD LIKE TO ADD MORE AMIS BED SECTIONS FOR",!?18,"THIS UNIT"
  • Line Location: ASKB+5
Function Call: WRITE
  • Prompt: !?13,"OR B IF YOU WOULD LIKE TO DO NOTHING AND BYPASS THIS PROMPT."
  • Line Location: ASKB+7
Function Call: WRITE
  • Prompt: !?4,$C(7),"INVALID ENTRY, TYPE ? TO GET MORE HELP"
  • Line Location: ASKB+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDM+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: DELM+1
Function Call: WRITE
  • Prompt: !,"Select the number",$S(OMAS>1:"(s)",1:"")," of the entries you wish to delete (1",$S(OMAS>1:"-"_OMAS,1:""),"): "
  • Line Location: DELM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDM+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDB+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: DELB+1
Function Call: WRITE
  • Prompt: !,"Select the number",$S(OBED>1:"(s)",1:"")," of the entries you wish to delete (1",$S(OBED>1:"-"_OBED,1:""),"): "
  • Line Location: DELB+1
Function Call: WRITE
  • Prompt: !?5,$C(7),"ANSWER WITH A NUMBER"_$S(NURSW=1:" ",1:", OR RANGE OF NUMBERS, ")_" WITHIN THE RANGE (1"_$S(NURSW=1:"",1:"-"_NURSW)_")"
  • Line Location: VERIFY+3
Routine Call
  • DIE
  • Line Location:
    • EDM+3
    • DMAS+2
Routine Call
  • DIC
  • Line Location:
    • DIC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls
^NURSF(213.3 - [#213.3] Classic Fileman Calls
^DIC(42 - [#42] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^NURSF(211.4 - [#211.4] EDM+2, ADD+1, ADD+2, ADD+3*, ADD+5, DMAS+2

Label References

Name Line Occurrences
ADD ADDM+2, ADDB+2
ADDB ADDB+3
ADDM ADDM+3
ASKB ASKB+7, ASKB+8
DELB DELB+1
DELM DELM+1
DIC ADDM+1, EDM+1, ADDB+1
DMAS DELB+2
EDM EDM+4
VERIFY DELM+1, DELB+1

Naked Globals

Name Field # of Occurrence
^(0 ADD+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA DELM+2*, EDM+2*, DELB+2*, ADD+2*, ADD+3, ADD+5, DMAS+2*
>> DA(1 ADDM+2*, DELM+2*, EDM+3*, ADDB+2*, DELB+2*, ADD+1, ADD+2, ADD+3, ADD+5, DMAS+2
DIC ADDM+1*, EDM+1*, ADDB+1*, DIC!
DIC("A" ADDM+1*, EDM+1*, ADDB+1*
DIC("S" ADDM+1*, EDM+1*, ADDB+1*
DIC(0 ADDM+1*, EDM+1*, ADDB+1*
DIDEL DMAS+2*, DMAS+3!
>> DIE EDM+3*, DMAS+2*
DIK DELM+2*, DELB+2*, ADD+4*!
>> DR EDM+3*, DMAS+2*
DTIME ASKB+4, DELM+1, DELB+1
DTOUT DIC!
DUOUT DIC!
>> NURSA VERIFY+2*
>> NURSB VERIFY+2*, DMAS+1*, DMAS+2
>> NURSC VERIFY+2*
NURSD DELM+2*, DELB+2*, VERIFY+1!, DMAS+1
NURSD( DELM+2, DELB+2, VERIFY+2*
>> NURSMLT ADDM+2*, ADDB+2*, ADD+1, ADD+2, ADD+3, ADD+5
>> NURSNEW ASKB+3, ASKB+4
>> NURSOBED ASKB+1, ASKB+2, ASKB+3, ASKB+4, ASKB+6
>> NURSSBF ADD+1*
>> NURSW DELM+1*, DELB+1*, VERIFY+2, VERIFY+3
>> NURSWARD ADDM+2, DELM+2, EDM+2, EDM+3, ADDB+2, DELB+2
>> NURSX ASKB+4*, ASKB+5, DELM+1*, EDM+3*, DELB+1*, DIC*
>> NURSY DELM+1, DELB+1, VERIFY+1*, VERIFY+2*, VERIFY+3*
>> NURSZ VERIFY+2*
>> NURSZ(0 VERIFY+2*
>> NURSZN ADD+2*, ADD+3
>> OBED DELB+1
>> OBED( DELB+2, DMAS+1
>> OMAS DELM+1
>> OMAS( DELM+2
>> X ASKB+4*, ADDM+2*, DELM+1*, ADDB+2*, DELB+1*, ADD+3, VERIFY+2
>> Y ADDM+1, ADDM+2, EDM+1, EDM+2, EDM+3, ADDB+1, ADDB+2
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 |  All