DGPFAA ;ALB/RPM,ASMR/JD - PRF ASSIGNMENT API'S ; 11/16/16 6:47pm
Source file <DGPFAA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETALL(DGDFN,DGIENS,DGSTAT,DGCAT) | ;retrieve list of assignment IENs
|
|
| GETASGN(DGPFIEN,DGPFA,DGDBRS) | ;retrieve a single assignment record
|
|
| FNDASGN(DGPFDFN,DGPFFLG) | ;Find Assignment
; This function finds a patient record flag assignment record. |
|
| STOASGN(DGPFA,DGPFERR,DGPFUV) | ;
|
|
| STOALL(DGPFA,DGPFAH,DGPFERR,DGPFUV) | ;
|
|
| UU(DGIEN,DGPRF) | ;Fire off event protocol
; DGIEN - (required) Pointer to patient record flag assignment in ; PRF ASSIGNMENT (#26.13) file ; DGPRF - (required) array of assignment values to be filed (see ; $$GETASGN for array structure) |
|
| DBRS | ; DG*5.3*951
; add DBRS data to DGPFA() |
|
| FLAG(VARPTR) | ;
; Verify that variable flag pointer is BEHAVIORAL, Category I ; DGPFIN - required - variable pointer to 26.11 / 26.15 |
|
| UV() | ; return edited value for DGPFUV
; if '$D(DGPFUV) then set DGPFUV=-1 ; also called from ^DGPFUT62 |
| Name | Field # of Occurrence |
|---|---|
| $$FNDASGN^DGPFAA | STOASGN+33, STOALL+36 |
| $$GETASGN^DGPFAA | STOALL+38 |
| $$STOASGN^DGPFAA | STOALL+42 |
| $$ROLLBACK^DGPFAA2 | STOALL+52 |
| $$GETRDT^DGPFAA3 | STOASGN+50 |
| $$STOHIST^DGPFAAH | STOALL+48 |
| $$ISDIV^DGPFUT | STOASGN+46 |
| $$VALID^DGPFUT | STOASGN+31 |
| $$FLAG^DGPFUT6 | FLAG+3 |
| AASGN^DGPFUT6 | STOASGN+60, STOASGN+65 |
| FILE^DIE | STOASGN+79 |
| UPDATE^DIE | STOASGN+86 |
| GETS^DIQ | GETASGN+39 |
| $$NOW^XLFDT | STOASGN+50 |
| EN^XQOR | UU+8 |
| FileNo | Call Tags |
|---|---|
| ^DGPF(26.13 - [#26.13] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPF(26.13 - [#26.13] | GETALL+23, GETALL+30, GETALL+32, GETALL+33, GETASGN+32, FNDASGN+15 |
| ^ORD(101 - [#101] | UU+7 |
| Name | Line Occurrences |
|---|---|
| $$FLAG | STOASGN+60 |
| $$GETASGN | STOASGN+34 |
| $$UV | STOASGN+19, STOALL+35 |
| DBRS | GETASGN+52 |
| UU | STOALL+56 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | STOASGN+61~*, STOASGN+62, STOASGN+63, STOASGN+64 |
| ARR | GETASGN+36~, GETASGN+41*, DBRS+5~* |
| ARR( | GETASGN+43, GETASGN+44, GETASGN+45, GETASGN+46, GETASGN+47, GETASGN+48, DBRS+7, DBRS+8, DBRS+10, DBRS+11 |
| ARR(1 | GETASGN+50 |
| DF | GETASGN+36~, GETASGN+38*, GETASGN+39 |
| DGAHIEN | STOALL+28~, STOALL+32*, STOALL+48*, STOALL+49*, STOALL+50, STOALL+58 |
| DGAIEN | STOALL+27~, STOALL+32*, STOALL+42*, STOALL+43*, STOALL+44, STOALL+47, STOALL+52*, STOALL+56, STOALL+58 |
| DGCAT | GETALL~, GETALL+28*, GETALL+29*, GETALL+31 |
| DGCKS | GETALL+19~, GETALL+25*, GETALL+27*, GETALL+33 |
| DGCNT | GETALL+17~, GETALL+22*, GETALL+34*, GETALL+36 |
| DGCUR | STOASGN+32~, STOASGN+34 |
| DGCUR("REVIEWDT" | STOASGN+48 |
| DGDBRS | GETASGN~, GETASGN+38 |
| DGDBRSE | STOASGN+32~, STOASGN+76* |
| DGDFN | GETALL~, GETALL+23, GETALL+30, GETALL+32, GETALL+33, STOALL+29~, STOALL+33*, STOALL+36, UU+5~, UU+6* |
| DGERR | GETASGN+35~, GETASGN+40, STOASGN+78~, STOASGN+80, STOASGN+85~, STOASGN+87, STOASGN+88 |
| DGFDA | STOASGN+32~, STOASGN+65 |
| DGFDA( | STOASGN+37*, STOASGN+38*, STOASGN+39*, STOASGN+40*, STOASGN+41*, STOASGN+52*, STOASGN+54*, STOASGN+72 |
| DGFDAIEN | STOASGN+32~ |
| DGFDAIEN(1 | STOASGN+88 |
| DGFLAG | GETALL+20~, GETALL+24*, GETALL+30*, GETALL+31, GETALL+32 |
| DGFLD | STOASGN+18~, STOASGN+31 |
| DGFLD( | STOASGN+21* |
| DGFLD("ACTION" | STOASGN+29, STOASGN+45, STOASGN+61 |
| DGFLD("DFN" | STOASGN+33, STOASGN+37 |
| DGFLD("FLAG" | STOASGN+33, STOASGN+38, STOASGN+50, STOASGN+60 |
| DGFLD("NARR" | STOASGN+26*, STOASGN+54 |
| DGFLD("ORIGSITE" | STOASGN+41 |
| DGFLD("OWNER" | STOASGN+40, STOASGN+46 |
| DGFLD("REVIEWDT" | STOASGN+24*, STOASGN+46*, STOASGN+47*, STOASGN+50*, STOASGN+52 |
| DGFLD("STATUS" | STOASGN+29*, STOASGN+39, STOASGN+47 |
| DGFLDS | GETASGN+34~ |
| DGFLDS( | GETASGN+41, GETASGN+52, DBRS+4, DBRS+5 |
| DGFLG | STOALL+30~, STOALL+34*, STOALL+36 |
| DGIEN | GETALL+18~, GETALL+32*, GETALL+33, GETALL+35, FNDASGN+12~, FNDASGN+15*, FNDASGN+16, STOASGN+18~, STOASGN+33*, STOASGN+34 , STOASGN+35, STOASGN+80*, STOASGN+87*, STOASGN+88*, STOASGN+91, UU~ |
| DGIENS | GETALL~, GETASGN+33~, GETASGN+37*, GETASGN+39, GETASGN+41, STOASGN+32~, STOASGN+35*, STOASGN+36*, STOASGN+37, STOASGN+38 , STOASGN+39, STOASGN+40, STOASGN+41, STOASGN+52, STOASGN+54, STOASGN+65, STOASGN+70, STOASGN+87, STOASGN+88 |
| DGIENS( | GETALL+35* |
| DGOIEN | STOALL+25~, STOALL+36*, STOALL+38, STOALL+51 |
| DGPFA | GETASGN~, STOASGN~, STOASGN+65, STOALL~, STOALL+42, STOALL+56 |
| DGPFA( | STOASGN+21 |
| DGPFA("ACTION" | STOASGN+76, STOALL+41* |
| DGPFA("DBRS D | ATE" , DBRS+10* |
| DGPFA("DBRS O | THER" , DBRS+9* |
| DGPFA("DBRS S | ITE" , DBRS+11* |
| DGPFA("DBRS#" | DBRS+7* |
| DGPFA("DFN" | GETASGN+43*, STOALL+33 |
| DGPFA("FLAG" | GETASGN+44*, STOALL+34 |
| DGPFA("NARR" | GETASGN+50*, GETASGN+51!, STOASGN+26 |
| DGPFA("ORIGSITE" | GETASGN+47* |
| DGPFA("OWNER" | GETASGN+46* |
| DGPFA("REVIEWDT" | GETASGN+48*, STOASGN+24 |
| DGPFA("STATUS" | GETASGN+45* |
| DGPFAH | STOALL~, STOALL+48 |
| DGPFAH("ACTION" | STOALL+41 |
| DGPFAH("ASSIGN" | STOALL+47* |
| DGPFDFN | FNDASGN~, FNDASGN+14, FNDASGN+15 |
| DGPFERR | STOASGN~, STOASGN+18~, STOASGN+31, STOASGN+65, STOASGN+67, STOALL~, STOALL+42, STOALL+43, STOALL+48, STOALL+49 |
| DGPFFLG | FNDASGN~, FNDASGN+14, FNDASGN+15 |
| DGPFIEN | GETASGN~, GETASGN+32, GETASGN+37 |
| DGPFOA | STOALL+26~, STOALL+38, STOALL+51, STOALL+52 |
| DGPFOA("DFN" | STOALL+51* |
| DGPFUV | STOASGN~, STOASGN+19*, STOASGN+60, STOASGN+62*, STOASGN+63*, STOASGN+64*, STOASGN+65, STOALL~, STOALL+35*, STOALL+42 , UV+5*, UV+6 |
| DGPRF | UU~ |
| DGPRF("DFN" | UU+6 |
| DGRSLT | GETASGN+29~, GETASGN+31*, GETASGN+42*, GETASGN+54 |
| DGSTAT | GETALL~, GETALL+26*, GETALL+27, GETALL+33 |
| DGSUB | STOASGN+18~, STOASGN+21* |
| DIERR | GETASGN+36~, STOASGN+78~, STOASGN+85~ |
| I | STOASGN+18~, STOASGN+21*, STOASGN+71~, STOASGN+72*, DBRS+2~, DBRS+3*, DBRS+6*, DBRS+7, DBRS+9, DBRS+10 , DBRS+11 |
| IENS | DBRS+2~, DBRS+3*, DBRS+4*, DBRS+5 |
| J | STOASGN+71~, STOASGN+72* |
| RET | UV+3~, UV+4*, UV+7*, UV+8*, UV+9*, UV+10*, UV+12 |
| U | GETASGN+43, GETASGN+44, GETASGN+45, GETASGN+46, GETASGN+47, GETASGN+48, STOASGN+21, STOASGN+24, STOALL+33, STOALL+34 , DBRS+7, DBRS+9, DBRS+10, DBRS+11 |
| UPD | STOASGN+32~, STOASGN+70*, STOASGN+72*, STOASGN+77 |
| VARPTR | FLAG~, FLAG+3 |
| X | STOASGN+18~, STOASGN+20*, STOASGN+21, STOASGN+29*, STOASGN+32~, STOASGN+34*, STOASGN+45*, UU+5~, UU+7*, UU+8 , DBRS+2~, DBRS+7*, DBRS+8*, DBRS+9 |
| Y | DBRS+2~, DBRS+8*, DBRS+9, UV+3~, UV+6*, UV+7, UV+8, UV+9, UV+10 |
| Name | Field # of Occurrence |
|---|---|
| $T(AASGN^DGPFUT6 | STOASGN+60 |