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

Package: PAID

Routine: PRSNEC


Information

PRSNEC ;WOIFO/PLT - Correct Release Nurse POC Data ; 08/14/2009 7:56 AM

Source Information

Source file <PRSNEC.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
PAID 6 SMAN^PRSNEE  ETAPOC^PRSNEE0  $$ISNURSE^PRSNUT01  ACCESS^PRSNUT02  $$PICKNURS^PRSNUT03  ADD^PRSU1B1  
VA FileMan 3 ^%DT  EN^DDIOL  $$EXTERNAL^DILFD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PAID 1 PRSN CORRECT RELEASED POC DATA  

Entry Points

Name Comments DBIA/ICR reference
ENT ;option entry
Q1
Q2
EXIT
CREL ;start correct released poc time record
EDIT ;start editing
DLOCK
MISSED ;No previous POC entry before PP was released, needs ETA record for default
ADD
NURSE(PPI,DFN,PRSNDAY,PRSNDT) ;test one single nurse

External References

Name Field # of Occurrence
^%DT Q1
EN^DDIOL Q1+2
$$EXTERNAL^DILFD MISSED+3
SMAN^PRSNEE EDIT+1
ETAPOC^PRSNEE0 MISSED+6
$$ISNURSE^PRSNUT01 MISSED+1
ACCESS^PRSNUT02 ENT+4
$$PICKNURS^PRSNUT03 Q2
ADD^PRSU1B1 CREL+12, CREL+20, ADD+2, ADD+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"POC Record has a status - ",$S($P($G(^(0)),U,2)="A":"APPROVED",$P($G(^(0)),U,2)="E":"ENTERED",1:"Unknown or no POC data entered")," and it is not released yet!"
  • Line Location: Q2+2
Function Call: WRITE
  • Prompt: !!,"The Correct Released POC Record has a status - APPROVED, ask Coordinator to",!,"return the record for editing."
  • Line Location: Q2+4
Function Call: WRITE
  • Prompt: !!,"File is in use, Try it later!"
  • Line Location: CREL+5
Function Call: WRITE
  • Prompt: !,"Nurse POC file in use, try it later!"
  • Line Location: CREL+13
Function Call: WRITE
  • Prompt: !,"Nurse POC file in use, try it later!"
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !,"Nurse POC file in use, try it later!"
  • Line Location: ADD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRSN(451.1 - [#451.1] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSN(451 - [#451] Q2+2, Q2+3, CREL+5, CREL+6, CREL+12, CREL+13, CREL+16, DLOCK, ADD+2, ADD+3
, ADD+5, ADD+6
^PRST(458 - [#458] Q1+1, Q1+3, NURSE+2

Label References

Name Line Occurrences
CREL Q2+5, NURSE+3
DLOCK CREL+13, MISSED+2, ADD, ADD+3, ADD+6
EDIT CREL+7, ADD+7
EXIT Q1, Q1+2
MISSED CREL+9
Q1 Q2
Q2 Q2+2, Q2+4, Q2+5

Naked Globals

Name Field # of Occurrence
^( CREL+16
^(0 Q2+2
^(2 Q1+3, NURSE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT Q1*
>> %DT("A" Q1*
>> %DT("B" Q1*
A ENT+4, ENT+7!, CREL+16*, CREL+18, CREL+19
A( ENT+7
A(0 ENT+5, ENT+6, ENT+7
DFN ENT+1~, Q2+1*, Q2+2, Q2+3, CREL+5, CREL+6, CREL+12, CREL+13, CREL+16, CREL+20
, DLOCK, MISSED+1, ADD+2, ADD+3, ADD+5, ADD+6, NURSE~
DT ENT+4
PPI ENT+1~, Q1+1*, Q1+2, Q1+3, Q2+2, Q2+3, CREL+5, CREL+6, CREL+12, CREL+13
, CREL+16, CREL+20, DLOCK, ADD+2, ADD+3, ADD+5, ADD+6, NURSE~, NURSE+2
PRSNA CREL+1~, CREL+15*, CREL+16*, CREL+20
PRSNCR ENT+1~, ENT+3*, NURSE+1*
PRSNDAY ENT+1~, Q1+1*, Q1+3, Q2+3, CREL+6, CREL+12, CREL+13, CREL+16, CREL+20, ADD+2
, ADD+3, ADD+5, ADD+6, NURSE~, NURSE+2
PRSNDT ENT+1~, Q1+1*, NURSE~
PRSNEW CREL+1~, CREL+4*, CREL+12*, ADD+2*, ADD+5*, NURSE+1*
PRSNG ENT+1~, ENT+7*, Q2, CREL+1~, CREL+3*, NURSE+1*
PRSNLOC CREL+1~
PRSNPC CREL+1~, MISSED+4!, ADD
PRSNPC("" ADD
PRSNPP ENT+1~, Q1+3*, NURSE+2*
PRSNQ CREL+1~, MISSED+1*, ADD
PRSNSTS ENT+1~, Q2+3*, Q2+4, CREL+7
PRSNUR CREL+1~, MISSED+1*, MISSED+2, MISSED+3*
PRSNVER CREL+1~, CREL+6*, CREL+8*, CREL+12, CREL+13, CREL+20, ADD+5, ADD+6
PRSNVERO CREL+1~, CREL+8*, CREL+9, CREL+16
PRSNX CREL+1~, CREL+4*, MISSED+1*
U ENT+5, ENT+6, Q1+3, Q2, Q2+2, Q2+3, CREL+3, CREL+12, CREL+18, CREL+19
, MISSED+3, ADD, ADD+2, ADD+5, NURSE+2
X CREL+11!, CREL+12*, CREL+17~, CREL+18*, CREL+20, ADD+2!*, ADD+5!*
X("DR" CREL+19*
Y Q1, Q1+1*, Q2*, Q2+1, CREL+11!, CREL+12, CREL+17~, CREL+20, ADD+2!, ADD+5!
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