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 |  Local Variables  | All
Print Page as PDF
Routine: NURQEDT0

Package: Nursing Service

Routine: NURQEDT0


Information

NURQEDT0 ;HIRMFO/MH,RM,YH-EDIT NURQ QI SUMMARY FILE, 217 ;1/22/97 15:30

Source Information

Source file <NURQEDT0.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Nursing Service 3 RELIND^NURQEDT1  $$SURGENVR^NURQUTL1  EN1^NURSAUTL  
VA FileMan 3 ^DIC  FILE^DICN  ^DIE  

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

Package Total Caller Graph
Nursing Service 8 NURQA-PT-DATA  NURQA-PT-INDIC  NURQA-PT-KEYFUNC  NURQA-PT-OTHER  NURQA-PT-REFR  NURQA-PT-RESP  NURQA-PT-ROFR  NURQEDT1  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Entry from Important Functions [NURQA-PT-KEYFUNC] option.
E1 ; Edit Important Functions Data
EN2 ; Entry from Receiver of Results [NURQA-PT-ROFR] option.
E2 ; Edit Receiver of Results
ROR ; Come back here to edit a new receiver of results.
EN3 ; Entry from Data [NURQA-PT-DATA] option.
E3 ; Edit Data
EN4 ; Entry from Survey Generator [NURQA-PT-INDIC] option.
EN5 ; Entry from Disciplines [NURQA-PT-RESP] option.
E5 ; Edit Disciplines
EN7 ; Entry from References [NURQA-PT-REFR] option.
E7 ; Edit References
EN8 ; Entry from Other QI Summary Data [NURQA-PT-OTHER] option.
E8 ; Edit Other QI Summary Data
Q ; Clean up and exit
EDTCOMM(NURQIP) ; Select Survey and Location and edit common fields.
; Input Parameters: NURQIP = 0 if just query for survey
; 1 if query for survey and location
; Output variables: NURQOUT = 0 initialize this variable
; Var. NURQIP Value of variable
; ---- ------ -----------------
; DA 0 IEN of 217, or -1 if failed
; 1 IEN of 217.04, or -1 if failed
; DA(1) 0 Not returned.
; 1 IEN of 217, or undefined if failed
GETLOC(NURQSURV) ; This function will return a Location (217.04)
; multiple IEN.
; Input parameter: NURQSURV = NURQ QI Summary (217) file IEN.
GETDF ; This procedure will get the default location (if any) and the
; screen for a lookup on Nurs Location.
; Input Variable: DUZ = user doing lookup
; Output Variables: NURDICS = M code for screen on lookup.
; NURDFLT = Default location (text) or null if
; no default exists.
; NURSZLO( = array of locations set from NURSAUTL.
; NUROUT = 1 if security not proper, else 0.
QDF ; Quit GETDF procedure and clean up variables

External References

Name Field # of Occurrence
^DIC ROR+1, EDTCOMM+13, GETLOC+8
FILE^DICN GETLOC+12
^DIE E1+1, ROR+3, E3+1, E5+1, E7+1, E8+1, EDTCOMM+15
RELIND^NURQEDT1 EN4+3
$$SURGENVR^NURQUTL1 EN1+1, EN2+1, EN3+1, EN4+1, EN5+1, EN7+1, EN8+1
EN1^NURSAUTL GETDF+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ROR+1
Routine Call
  • DIC
  • Line Location:
    • ROR+1
    • EDTCOMM+13
    • GETLOC+8
Routine Call
  • DIE
  • Line Location:
    • E1+1
    • ROR+3
    • E3+1
    • E5+1
    • E7+1
    • E8+1
    • EDTCOMM+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls
^NURQ(217 - [#217] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^NURQ(217 - [#217] E2+2, GETLOC+10, GETDF+13, GETDF+15
^NURSF(211.4 - [#211.4] GETDF+13
^SC - [#44] GETDF+16

Label References

Name Line Occurrences
$$GETLOC EDTCOMM+17
E1 EN1+3
E2 EN2+3
E3 EN3+3
E5 EN5+3
E7 EN7+3
E8 EN8+3
EDTCOMM EN1+2, EN2+2, EN3+2, EN4+2, EN5+2, EN7+2, EN8+2
GETDF GETLOC+5
Q EN1+4, EN2+4, EN3+4, EN4+4, EN5+4, EN7+4, EN8+4
QDF GETDF+10
ROR ROR+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EN1+3, EN2+3, ROR+3*, EN3+3, EN4+3, EN5+3, EN7+3, EN8+3, Q+1!, EDTCOMM+11!
, EDTCOMM+14*, EDTCOMM+15*, EDTCOMM+16*, EDTCOMM+17*, GETLOC+4~, GETLOC+10*, GETLOC+12*, GETLOC+13
DA(1 E1+1, EN2+3*, E2+1, E2+2, ROR+1*, ROR+3, EN4+3*, EDTCOMM+17*!, GETLOC+4*, GETLOC+10
, GETLOC+11, GETDF+13, GETDF+15
DA(2 EN4+3*
DD GETLOC+12!
DIC ROR+1*!, EDTCOMM+12*, EDTCOMM+13!, GETLOC+7*, GETLOC+8!, GETLOC+11*, GETLOC+12!
DIC("A" EDTCOMM+12*, GETLOC+7*
DIC("B" E2+3*, GETLOC+6*
DIC("P" ROR+1*, GETLOC+11*
DIC("S" GETLOC+6*
DIC(0 ROR+1*, EDTCOMM+12*, GETLOC+7*, GETLOC+11*
DIE E1+1*!, ROR+3*, ROR+5!, E3+1*!, E5+1*!, E7+1*!, E8+1*!, EDTCOMM+15*!
DLAYGO ROR+1*, EDTCOMM+12*, EDTCOMM+13!, GETLOC+11*, GETLOC+12!
DO GETLOC+12!
DR E1+1*!, ROR+3*, ROR+5!, E3+1*!, E5+1*!, E7+1*!, E8+1*!, EDTCOMM+15*!
>> DTOUT ROR+2
>> DUOUT ROR+2
NSW Q+1!
NURDFLT EDTCOMM+11~, GETLOC+6, GETDF+11*, GETDF+13*, GETDF+15*, GETDF+16*
NURDICS EDTCOMM+11~, GETLOC+6, GETDF+11*
NUROUT GETLOC+4*, GETLOC+5!, GETLOC+8!, GETDF+10
>> NURQ GETDF+13*
NURQ44 GETDF+13*, QDF+1!
NURQIP EDTCOMM~, EDTCOMM+17
NURQOUT E1+2*, ROR+2*, ROR+4*, E3+2*, E5+2*, E7+2*, E8+2*, Q+1!, EDTCOMM+11*
NURQSDA E2+1~*, ROR+1, Q+1!
NURQSURV GETLOC~, GETLOC+4
NURQWRD EDTCOMM+11~, GETLOC+9*, GETLOC+10, GETLOC+11
NURSZAP GETDF+11, GETDF+12, QDF+1!
NURSZDA QDF+1!
NURSZFAC QDF+1!
NURSZLO EDTCOMM+11~, GETDF+12
NURSZLO( GETDF+13
NURSZSP QDF+1!
U E2+2, GETLOC+9, GETDF+13, GETDF+15, GETDF+16
X E2+1~, E2+2*, E2+3, GETLOC+11*, GETDF+9~, GETDF+13*, GETDF+15*, GETDF+16*
Y E1+2, ROR+2, ROR+3, ROR+4, E3+2, E5+2, E7+2, E8+2, EDTCOMM+11~, EDTCOMM+14
, EDTCOMM+15, EDTCOMM+16, GETLOC+8, GETLOC+9, GETLOC+12
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 |  Local Variables  | All