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

Package: Nursing Service

Routine: NURAED5


Information

NURAED5 ;HIRMFO/MD-PROCESS POSITION MODIFICATIONS 12/8/98

Source Information

Source file <NURAED5.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 ^%DT  ^DIC  YN^DICN  ^DIE  D^DIQ  
Nursing Service 3 EDVD^NURAED7  EN7^NURSAUTL  EN4^NURSUT3  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Nursing Service 1 NURAED2  

Entry Points

Name Comments DBIA/ICR reference
EDSP ; EDIT SERVICE POSITION, WILL STUFF IN NEW SERVICE CATEGORY
EDFT ; EDIT FTEE
EDST ; EDIT START DATE
EDEVAL ; EDIT NAME OF DATE OF PROFICIENCY/NAME OF EVALUATOR
EDTR ;EDIT TOUR OF DUTY
EDREST ; EDIT REST OF DATA
EDLO ; EDIT LOCATION
EDPRI ; EDIT PRIMARY ASSIGNMENT FLAG
SDTCK ;
EDTFLD ; SETS THE NURSNPOS = LOC^SCAT^(9 PIECES OF ZEROTH NODE)
; DEFAULT VALUES STORED IN NURSOPOS
DTR

External References

Name Field # of Occurrence
^%DT EDST+5
^DIC EDLO+4, EDEVAL+3, EDSP+6, DTR+2
YN^DICN EDPRI+2, DTR
^DIE EDEVAL+4
D^DIQ EDEVAL+2, EDST+1
EDVD^NURAED7 EDREST+1
EN7^NURSAUTL EDLO+1
EN4^NURSUT3 EDST+5, SDTCK+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Is this a primary assignment"
  • Line Location: EDPRI+2
Function Call: WRITE
  • Prompt: !?5,$C(7),"ANSWER YES IF THIS POSITION IS A PRIMARY ASSIGNMENT FOR THIS EMPLOYEE,",!?5,"ELSE ANSWER NO."
  • Line Location: EDPRI+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EDLO+1
Function Call: WRITE
  • Prompt: !,"LOCATION: "_$S(NURSDFLT'="":NURSDFLT_"// ",1:"") R X:DTIME S:'$T
  • Line Location: EDLO+1
Function Call: WRITE
  • Prompt: !?5,$C(7),"Nursing location for this position.",!
  • Line Location: EDLO+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EDSP+3
Function Call: WRITE
  • Prompt: !,"SERVICE POSITION: "_$S(NURSDFLT'="":NURSDFLT_"// ",1:"") R X:DTIME S:'$T
  • Line Location: EDSP+3
Function Call: WRITE
  • Prompt: !?5,$C(7),"Service position for this position.",!
  • Line Location: EDSP+5
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EDST+2
Function Call: WRITE
  • Prompt: !,"STARTING DATE: "_$S(NURSDFLT'="":NURSDFLT_"// ",1:"") R X:DTIME S:'$T
  • Line Location: EDST+2
Function Call: WRITE
  • Prompt: !?5,$C(7),"Starting date for this position.",!
  • Line Location: EDST+4
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EDTR+2
Function Call: WRITE
  • Prompt: !,"ASSIGN TOUR OF DUTY: "_$S(NURSDFLT'="":NURSDFLT_"// ",1:"") R X:DTIME S:'$T
  • Line Location: EDTR+2
Function Call: WRITE
  • Prompt: !,?3,$C(7),"SURE YOU WANT TO DELETE"
  • Line Location: DTR+0
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Condition for execution: %=2
  • Line Location: DTR+0
Function Call: WRITE
  • Prompt: !?5,$C(7),"ANSWER YES OR NO"
  • Line Location: DTR+0
Function Call: WRITE
  • Prompt: !?5,$C(7),"Tour of duty for this position.",!
  • Line Location: DTR+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EDFT+2
Function Call: WRITE
  • Prompt: !,"FTEE: "_$S(NURSDFLT'="":NURSDFLT_"// ",1:"") R X:DTIME S:'$T
  • Line Location: EDFT+2
Function Call: WRITE
  • Prompt: !?5,$C(7),"The amount of FTEE assigned to this employee for this position.",!!?5,"Type a number between 0 and 1, 3 decimal digits."
  • Line Location: EDFT+4
Routine Call
  • DIE
  • Line Location:
    • EDEVAL+4
Routine Call
  • DIC
  • Line Location:
    • EDLO+4
    • EDEVAL+3
    • EDSP+6
    • DTR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(210 - [#210] Classic Fileman Calls
^NURSF(211.3 - [#211.3] Classic Fileman Calls
^NURSF(211.4 - [#211.4] Classic Fileman Calls
^NURSF(211.6 - [#211.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^NURSF(210 - [#210] EDEVAL+2
^NURSF(211.3 - [#211.3] EDSP+2
^NURSF(211.6 - [#211.6] EDTR+1

Label References

Name Line Occurrences
DTR DTR
EDEVAL EDLO+2
EDFT EDTR+3, DTR, EDFT+3, EDFT+4
EDLO EDLO+2, EDLO+5
EDPRI EDPRI+3
EDREST EDFT+3
EDSP EDSP+4, EDSP+7
EDST EDSP+4, EDST+3, EDST+5
EDTR EDST+3, DTR, DTR+3
SDTCK EDST+3

Naked Globals

Name Field # of Occurrence
^(0 EDEVAL+2*, EDSP+2, EDTR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EDPRI+2*, EDPRI+3, EDPRI+4, DTR*
>> %DT EDST+5*
DA EDEVAL+1~, EDEVAL+4*
DA(1 EDEVAL+3*
DIC EDLO+4*!, EDEVAL+1~, EDEVAL+3*, EDEVAL+4!, EDSP+6*, DTR+2*
DIC("B" EDEVAL+2*
DIC("DR" EDEVAL+3*
DIC(0 EDLO+4*, EDEVAL+3*, EDSP+6*, DTR+2*
DIE EDEVAL+1~, EDEVAL+4*!
>> DLAYGO EDEVAL+3*, DTR+2*
DR EDEVAL+1~, EDEVAL+4*
DTIME EDLO+1, EDSP+3, EDST+2, EDTR+2, EDFT+2
>> DTOUT EDLO+4, EDSP+6, DTR+2
>> DUOUT EDLO+4, EDEVAL+3, EDSP+6, DTR+2
NBAD EDST+1!, EDST+3, SDTCK+1*
>> NPWARD EDLO+1*
>> NUROUT EDPRI+2*, EDLO+1*, EDLO+4*, EDEVAL+3*, EDEVAL+5*, EDSP+1, EDSP+3*, EDSP+6*, EDST+2*, EDTR+2*
, DTR*, DTR+2*, EDFT+2*
>> NURSBAD EDST+5*, SDTCK+1*
>> NURSDBA EDEVAL+2, EDEVAL+3
>> NURSDFLT EDPRI+1*, EDPRI+2, EDLO+1*, EDLO+2, EDSP+2*, EDSP+3, EDSP+4, EDST+1*, EDST+2, EDST+3
, EDTR+1*, EDTR+2, EDTR+3, DTR, EDFT+1*, EDFT+2, EDFT+3
NURSNPOS EDTFLD+2!, EDPRI+4*, EDLO+2*, EDLO+5*, EDEVAL+1, EDSP+4*, EDSP+7*, EDST+3*, EDST+5, EDST+6*
, EDTR+3*, DTR*, DTR+3*, EDFT+3*, EDFT+5*
>> NURSOPOS EDPRI+1, EDLO+1, EDLO+2, EDSP+2, EDSP+4, EDST+1, EDST+3, EDTR+1, EDTR+3, EDFT+1
, EDFT+3, SDTCK+1
NURX EDEVAL+1~, EDEVAL+2*
U EDEVAL+1, EDEVAL+2, EDEVAL+4, EDST+3, SDTCK+1
X EDLO+1*, EDLO+2, EDLO+3, EDEVAL+1~, EDSP+3*, EDSP+4, EDSP+5, EDST+2*, EDST+3, EDST+4
, EDTR+2*, EDTR+3, DTR, DTR+1, EDFT+2*, EDFT+3, EDFT+4, EDFT+5
Y EDLO+5, EDEVAL+1~, EDEVAL+2*, EDEVAL+3, EDEVAL+4, EDSP+7, EDST+1*, EDST+5, EDST+6, DTR+3
Y("" EDEVAL+5
Y(0 EDSP+7
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