Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

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

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
  • Variable: X
  • Timeout: DTIME
  • 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
  • Variable: X
  • Timeout: DTIME
  • 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
  • Variable: X
  • Timeout: DTIME
  • 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
  • Variable: X
  • Timeout: DTIME
  • 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
  • Variable: X
  • Timeout: DTIME
  • 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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call