©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
DGPFAA3 ;ALB/RPM - PRF ASSIGNMENT API'S CONTINUED ; 3/28/03
Source file <DGPFAA3.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | ($$FNDASGN,$$GETASGN,$$STOALL)^DGPFAA ($$ACTIONOK,$$ADDOK)^DGPFAA2 ($$GETFLAG,$$PARENT)^DGPFUT1 |
| Kernel | 1 | ($$FMTH,$$HTFM)^XLFDT |
| VA Fileman | 1 | BLD^DIALOG |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETRDT(DGFLG,DGADT) | ;calculate the review date
|
|
| NOTIFYDT(DGFLG,DGRDT) | ;calculate the notificaton date
|
|
| HL7EDTOK(DGDFN,DGFLG,DGORIG,DGACT,DGEROOT) | ;Is site allowed to edit assignment?
; This function acts as wrapper for $$EDTOK and $$ACTIONOK for edits ; that originate from PRF HL7 message processing. |
|
| STOHL7(DGPFA,DGPFAH,DGEROOT) | ;store a valid assignment from HL7 message
; This function files an assignment if the originating site is ; authorized to update an existing record and if the action is valid for ; the status of an existing record. |
|
| LOCK(DGAIEN) | ;Lock assignment record.
|
|
| UNLOCK(DGAIEN) | ;Unlock assignment record.
|
| Name | Field # of Occurrence |
|---|---|
| $$FNDASGN^DGPFAA | HL7EDTOK+48 |
| $$GETASGN^DGPFAA | HL7EDTOK+49 |
| $$STOALL^DGPFAA | STOHL7+48 |
| $$ACTIONOK^DGPFAA2 | HL7EDTOK+67 |
| $$ADDOK^DGPFAA2 | STOHL7+42 |
| $$GETFLAG^DGPFUT1 | NOTIFYDT+18, GETRDT+17, HL7EDTOK+58 |
| $$PARENT^DGPFUT1 | HL7EDTOK+54 |
| BLD^DIALOG | STOHL7+36, STOHL7+37, STOHL7+38, STOHL7+39, STOHL7+49, HL7EDTOK+42, HL7EDTOK+43, HL7EDTOK+44, HL7EDTOK+45, HL7EDTOK+50 , HL7EDTOK+55, HL7EDTOK+60, HL7EDTOK+64 |
| $$FMTH^XLFDT | NOTIFYDT+25, GETRDT+23 |
| $$HTFM^XLFDT | NOTIFYDT+26, GETRDT+24 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPF(26.13 - [#26.13] | LOCK+11, UNLOCK+9 |
| Name | Line Occurrences |
|---|---|
| $$HL7EDTOK | STOHL7+45 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGACT | STOHL7+21~, STOHL7+29*, STOHL7+39, STOHL7+42, STOHL7+45, HL7EDTOK~, HL7EDTOK+33*, HL7EDTOK+43, HL7EDTOK+67 |
| DGADT | GETRDT~, GETRDT+14, GETRDT+23*, GETRDT+24 |
| DGAIEN | LOCK~, LOCK+11, UNLOCK~, UNLOCK+9 |
| DGDFN | STOHL7+18~, STOHL7+26*, STOHL7+36, STOHL7+42, STOHL7+45, HL7EDTOK~, HL7EDTOK+34*, HL7EDTOK+42, HL7EDTOK+48 |
| DGEROOT | STOHL7~, STOHL7+36, STOHL7+37, STOHL7+38, STOHL7+39, STOHL7+42, STOHL7+45, STOHL7+49, HL7EDTOK~, HL7EDTOK+30* , HL7EDTOK+31, HL7EDTOK+42, HL7EDTOK+43, HL7EDTOK+44, HL7EDTOK+45, HL7EDTOK+50, HL7EDTOK+55, HL7EDTOK+60, HL7EDTOK+64, HL7EDTOK+67 |
| DGFARRY | HL7EDTOK+24~, HL7EDTOK+58 |
| DGFARRY("STAT" | HL7EDTOK+59 |
| DGFARRY("TIUTITLE" | HL7EDTOK+63 |
| DGFLG | NOTIFYDT~, NOTIFYDT+15, NOTIFYDT+18, GETRDT~, GETRDT+14, GETRDT+17, STOHL7+19~, STOHL7+27*, STOHL7+37, STOHL7+42 , STOHL7+45, HL7EDTOK~, HL7EDTOK+35*, HL7EDTOK+45, HL7EDTOK+48 |
| DGFLGA | NOTIFYDT+11~, NOTIFYDT+18, GETRDT+10~, GETRDT+17 |
| DGFLGA("NOTIDAYS" | NOTIFYDT+24*, NOTIFYDT+26 |
| DGFLGA("REVFREQ" | NOTIFYDT+21, GETRDT+20, GETRDT+24 |
| DGIEN | HL7EDTOK+22~, HL7EDTOK+48*, HL7EDTOK+49 |
| DGMSG | STOHL7+22~, STOHL7+48 |
| DGNDT | NOTIFYDT+12~, NOTIFYDT+14*, NOTIFYDT+26*, NOTIFYDT+28 |
| DGORIG | STOHL7+20~, STOHL7+28*, STOHL7+38, STOHL7+45, HL7EDTOK~, HL7EDTOK+36*, HL7EDTOK+44, HL7EDTOK+54 |
| DGOWNER | HL7EDTOK+25~, HL7EDTOK+53*, HL7EDTOK+54 |
| DGPFA | STOHL7~, STOHL7+48, HL7EDTOK+23~, HL7EDTOK+49, HL7EDTOK+67 |
| DGPFA("DFN" | STOHL7+26 |
| DGPFA("FLAG" | STOHL7+27, HL7EDTOK+58 |
| DGPFA("OWNER" | HL7EDTOK+53 |
| DGPFA("SNDFAC" | STOHL7+28 |
| DGPFAH | STOHL7~, STOHL7+48 |
| DGPFAH("ACTION" | STOHL7+29 |
| DGRDT | NOTIFYDT~, NOTIFYDT+15, NOTIFYDT+25*, NOTIFYDT+26, GETRDT+11~, GETRDT+13*, GETRDT+24*, GETRDT+26 |
| DGRSLT | STOHL7+23~, STOHL7+31*, STOHL7+52*, STOHL7+54, HL7EDTOK+26~, HL7EDTOK+37*, HL7EDTOK+70*, HL7EDTOK+72 |
| DIERR | STOHL7+24~, HL7EDTOK+27~ |
| U | HL7EDTOK+58, HL7EDTOK+63 |