©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
NURQEDT0 ;HIRMFO/MH,RM,YH-EDIT NURQ QI SUMMARY FILE, 217 ;1/22/97 15:30
Source file <NURQEDT0.m>
| Package | Total | Call Graph |
|---|---|---|
| Nursing Service | 3 | RELIND^NURQEDT1 $$SURGENVR^NURQUTL1 EN1^NURSAUTL |
| VA Fileman | 3 | ^DIC FILE^DICN ^DIE |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QDF | ; Quit GETDF procedure and clean up variables
|
|
| 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. |
|
| E8 | ; Edit Other QI Summary Data
|
|
| EN8 | ; Entry from Other QI Summary Data [NURQA-PT-OTHER] option.
|
|
| Q | ; Clean up and exit
|
|
| EN1 | ; Entry from Important Functions [NURQA-PT-KEYFUNC] option.
|
|
| EN2 | ; Entry from Receiver of Results [NURQA-PT-ROFR] option.
|
|
| EN3 | ; Entry from Data [NURQA-PT-DATA] option.
|
|
| EN4 | ; Entry from Survey Generator [NURQA-PT-INDIC] option.
|
|
| EN5 | ; Entry from Disciplines [NURQA-PT-RESP] option.
|
|
| EN7 | ; Entry from References [NURQA-PT-REFR] option.
|
|
| E5 | ; Edit Disciplines
|
|
| ROR | ; Come back here to edit a new receiver of results.
|
|
| 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. |
|
| E1 | ; Edit Important Functions Data
|
|
| E7 | ; Edit References
|
|
| E3 | ; Edit Data
|
|
| E2 | ; Edit Receiver of Results
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^NURSF(211.4 - [#211.4] | Classic Fileman Calls |
| ^NURQ(217 - [#217] | Classic Fileman Calls |
| 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 |
| 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 |
| >> | 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 |