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

Package: Nursing Service

Routine: NURSCEP1


Information

NURSCEP1 ;HIRMFO/JH/MH-LIST STAFF (#210) FILE DISCREPANCIES - CONT. ;7/15/97

Source Information

Source file <NURSCEP1.m>

Entry Points

Name Comments DBIA/ICR reference
WRT ;
PRINT ; WRITE POSITION CONTROL REPORT DETAIL LINE
STAT(NOD) ; DETERMINE IF THE NURSING LOCATION IS ACTIVE BASED ON A NURS
; POSITION CONTROL FILE POINTER (NOD)
HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,NURSDA,?10,NAME
  • Line Location: NURSCEP1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: NURSCEP1+3
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD HAS NO CORRESPONDING NEW PERSON (#200) FILE ENTRY."
  • Line Location: WRT+3
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD CONTAINS MISSING/INVALID DATA IN NAME FIELD."
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD CONTAINS MISSING/INVALID STATUS DATA."
  • Line Location: WRT+5
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD MISSING THE `B' INDEX ENTRY."
  • Line Location: WRT+6
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD HAS ACTIVE STATUS AND NO CURRENT FILE 211.8 ASSIGNMENT(S)."
  • Line Location: WRT+7
Function Call: WRITE
  • Prompt: !?6,"STAFF RECORD HAS `B' INDEX ENTRY AND NO DATA ON ZEROTH NODE."
  • Line Location: WRT+8
Function Call: WRITE
  • Prompt: ?15,$P($G(^VA(200,+NAM,0)),U)
  • Condition for execution: '(NURTYPE=3) !,NOD_",1,"_NDA_",0)" W:$G(NURTYPE)=3 !,$P($G(^VA(200,+NAM,0)),U) W:'(NURTYPE=3)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?40,$P(NURX,U),?53,$E($P(NURX,U,2),1,10),?65,$P(NURX,U,3),?72,$P(NURX,U,4)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: "NURS POSITION CONTROL/NURS STAFF File Integrity Report "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?57,Y,?71," PAGE: ",NURPAGE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"RECORD#",?12,"NAME",!,?6,"DISCREPANCY"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?40,"POSITION",?53,"UNIT",?64,"FTEE",?70,"START DATE"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",80)
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!,"The following assignments are duplicates in the NURS Position Control (211.8)",!,"File. To deactivate a specific assignment use the global root ^NURSF(211.8,",!,"and the global reference indicated for that assignment:",!!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,"The following assignments have no corresponding Nurs Staff (#210) File entry.",!,"To remove the assignment use the global root ^NURSF(211.8, and the global",!,"reference indicated for that assignment:",!!
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!,"The following active employees are assigned to inactive nursing locations.",!,"To deactivate or edit a specific assignment use the Status and Position Option",!,"[NURAED-STF-STAT/POS] of the Staff Record Edit",!!
  • Line Location: HDR+8
Info |  Source |  Entry Points |  Interaction Calls