TIUPRF2 ;SLC/JMH - RPCs for Patient Record Flags ;May 6, 2024@12:20
Source file <TIUPRF2.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETTITLE(TIUY,PTDFN,FLAGID) | ; RPC TIU GET PRF TITLE
; RPC Gets Note Title associated with FLAGID for PTDFN ; INPUT PARAMETERS ; PTDFN - required - pointer to file 2 ; FLAGID - required - identifier for particular flag assignment ; Set as subscript in GETACT^DGPFAPI ; See GETFLG^ORPRF ; RETURN PARAMETER ; .TIUY = passed by ref, TitleIEN^Title ; 0 if no title is associated or flag assignment is not active |
|
| GETNOTES(TIUY,PTDFN,TIUTTL,REVERSE) | ; RPC TIU GET LINKED PRF NOTES
; RPC gets SIGNED, LINKED PRF ; INPUT PARAMETERS ; PTDFN - required - pointer to file 2 ; TIUTTL - required - IEN of TIU DOCUMENT DEFINITION (#8925.1) file ; REVERSE - optional - Boolean, 0/1 ; 0 - default - sort return chronologically ; 1 - sort return inverse chronological ; RETURN PARAMETER ; .TIUY - passed by reference, TIUY=total # of notes ; TIUY(TIUIDATE)=TIUIEN_U_TIUACT_U_TIUEDATE_U_TIUAUTH ; TIUIDATE - FM date of note, or inverse FM date ; TIUIEN - pointer to file 8925 ; TIUACT - name of action ; TIUEDATE - external date of note ; TIUAUTH - name of author of note |
|
| GETACTS(TIUY,TIUTTL,DFN) | ; RPC TIU GET PRF ACTIONS
; RPC Gets PRF Action info ; Action in PRF is the reason a History (#26.14) record was created ; Input: ; DFN - [Required] IEN of PATIENT (#2) file ; TIUTTL - [Required] IEN of TIU DOCUMENT DEFINITION (#8925.1) file ; RETURN ARRAY ; .TIUY - passed by reference ; see description of return array from GETHTIU^DGPFAPI1 ; reformat data for TIU RPC return ; dg*951 brought in p8 ; TIUY(ACTID) = p1^p2^p3^p4^p5^p6^p7^p8 where ; p1 = flag name p5 = action date, FM internal ; p2 = assignment ien [.001/#26.13] p6 = action date, external ; p3 = action name [.03/#26.14] p7 = file 8925 ien ; p4 = action ien p8 = originate facility name |
|
| LINK(TIUY,TIUIEN,ASSGNDA,ACTIEN,DFN) | ;RPC Link TIU Doc TIUIEN to
; the PRF action |
|
| GETSTAT(TIUY,TIUIEN) | ;RPC Gets the status of TIU Doc TIUIEN
|
|
| ISPRFTTL(TIUY,TIUDA) | ;RPC Takes as input 8925.1 IEN
; and checks if it is a PRF title ; Cf ISPFTTL^TIUPRFL. which is a FUNCTION |
|
| GETP(NODE,P) | ||
| GETPA(NODE,P) | ||
| HERE() | ; get facility
; RETURN file_4_ien ^name ^full_site# ^3-digit_site# |
|
| ISERR(TDAT,ACTID,HASERR) | ; is history record prior to EIE status?
|
|
| KILL | ||
| STN(INST,APPRVBY) | ; get station information
; INPUT PARAMETERS: ; INST - optional - ien to file 4 |
| Name | Field # of Occurrence |
|---|---|
| $$GETACT^DGPFAPI | GETTITLE+13 |
| $$GETHTIU^DGPFAPI1 | GETNOTES+27, GETACTS+30 |
| $$STOTIU^DGPFAPI2 | LINK+7 |
| GETS^DIQ | GETNOTES+46 |
| $$DDEFIEN^TIUFLF7 | ISPRFTTL+5, ISPRFTTL+6 |
| UNLINK^TIUPRF1 | LINK+6 |
| $$AVAILACT^TIUPRFL | GETACTS+34 |
| $$HASERR^TIUPRFL | GETNOTES+33 |
| $$ISERR^TIUPRFL | ISERR+1 |
| $$SITE^VASITE | HERE+2 |
| $$PATCH^XPDUTL | GETACTS+41 |
| $$NS^XUAF4 | STN+18 |
| RPC Name | Call Tags |
|---|---|
| TIU ISPRF | ISPRFTTL |
| TIU GET PRF ACTIONS | GETACTS |
| TIU LINK TO FLAG | LINK |
| TIU GET DOCUMENT STATUS | GETSTAT |
| TIU GET LINKED PRF NOTES | GETNOTES |
| TIU GET PRF TITLE | GETTITLE |
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | GETNOTES+45, LINK+3, GETSTAT+3, GETSTAT+5 |
| ^TIU(8925.1 - [#8925.1] | ISPRFTTL+7 |
| ^TIU(8925.6 - [#8925.6] | GETSTAT+6 |
| ^TMP("TIUPRFH" | GETNOTES+24, GETACTS+28 |
| ^TMP($J | GETACTS+64*, GETACTS+67, KILL! |
| Name | Line Occurrences |
|---|---|
| $$GETP | GETACTS+40 |
| $$GETPA | GETACTS+45, GETACTS+46, GETACTS+47, GETACTS+48, GETACTS+49, GETACTS+57, GETACTS+58 |
| $$HERE | GETACTS+55, STN+13 |
| $$ISERR | GETNOTES+40 |
| $$STN | GETACTS+59 |
| KILL | GETNOTES+24, GETNOTES+28, GETNOTES+65, GETACTS+28, GETACTS+31, GETACTS+71 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTID | GETNOTES+21~, GETNOTES+23*, GETNOTES+35*, GETNOTES+38, GETNOTES+39, GETNOTES+40, GETACTS+26~, GETACTS+41*, GETACTS+42*, GETACTS+43 , GETACTS+44, GETACTS+45, GETACTS+46, GETACTS+47, GETACTS+48, GETACTS+49, GETACTS+56*, GETACTS+63, GETACTS+64, GETPA , ISERR~, ISERR+1 |
| ACTIEN | LINK~, LINK+7 |
| APPRVBY | GETACTS+54~, GETACTS+57*, GETACTS+59, STN~, STN+14*, STN+23 |
| ARRAYNM | GETNOTES+21~, GETNOTES+24*, GETNOTES+27, GETNOTES+33, GETNOTES+35, GETNOTES+38, GETNOTES+40, GETACTS+26~, GETACTS+28*, GETACTS+30 , GETACTS+34, GETACTS+42, GETP, GETPA, KILL |
| ARRTMP | GETNOTES+36~, GETNOTES+38*, GETNOTES+44, GETNOTES+53 |
| ASSGNDA | LINK~, LINK+7 |
| DFN | GETACTS~, GETACTS+30, LINK~, LINK+7 |
| DG951 | GETACTS+26~, GETACTS+41*, GETACTS+53 |
| DIERR | GETNOTES+36~ |
| DTARRAY | GETNOTES+21~ |
| DTARRAY( | GETNOTES+56, GETNOTES+57* |
| FILE4 | STN+12~, STN+15*, STN+18*, STN+24*, STN+27*, STN+31 |
| FLAG | GETACTS+26~ |
| FLAGID | GETTITLE~, GETTITLE+12, GETTITLE+15 |
| FLDS | GETNOTES+36~, GETNOTES+47* |
| FLDS( | GETNOTES+51 |
| FLDS(1202 | GETNOTES+50 |
| FLDS(1301 | GETNOTES+48, GETNOTES+49 |
| HASERR | GETNOTES+21~, GETNOTES+33*, GETNOTES+39, GETNOTES+40, ISERR~, ISERR+1 |
| HERE | GETACTS+54~, GETACTS+55*, STN+13~*, STN+24, STN+25, STN+30 |
| I | GETACTS+54~, GETACTS+67*, GETACTS+68* |
| IENS | GETNOTES+36~ |
| INST | STN~, STN+14*, STN+17, STN+18, STN+22 |
| LOC | GETACTS+54~, GETACTS+60*, GETACTS+64 |
| NAME | GETACTS+54~, GETACTS+62*, GETACTS+63, GETACTS+64 |
| NODE | GETP~, GETPA~ |
| P | GETP~*, GETPA~* |
| PRFARR | GETTITLE+11~ |
| PRFARR( | GETTITLE+15 |
| PTDFN | GETTITLE~, GETTITLE+12, GETTITLE+13, GETNOTES~, GETNOTES+27 |
| REVERSE | GETNOTES~, GETNOTES+59 |
| ST3 | GETACTS+54~, GETACTS+61*, GETACTS+64 |
| STATUS | GETNOTES+36~, GETNOTES+51*, GETNOTES+52 |
| STNAME | STN+12~, STN+15*, STN+19*, STN+24*, STN+27*, STN+31, STN+32 |
| STNUM | STN+12~, STN+15*, STN+19*, STN+25*, STN+27*, STN+32 |
| STNUM3 | STN+12~, STN+15*, STN+19*, STN+25*, STN+27*, STN+30, STN+31, STN+32 |
| TDAT | ISERR~, ISERR+1 |
| TIUACT | GETNOTES+37~, GETNOTES+53*, GETNOTES+63 |
| TIUAUTH | GETNOTES+37~, GETNOTES+50*, GETNOTES+61*, GETNOTES+63 |
| TIUCAT1 | ISPRFTTL+3~, ISPRFTTL+5*, ISPRFTTL+8 |
| TIUCAT2 | ISPRFTTL+3~, ISPRFTTL+6*, ISPRFTTL+8 |
| TIUD1 | ISPRFTTL+3~, ISPRFTTL+4*, ISPRFTTL+7*, ISPRFTTL+8 |
| TIUDA | ISPRFTTL~, ISPRFTTL+7 |
| TIUEDATE | GETNOTES+37~, GETNOTES+49*, GETNOTES+60*, GETNOTES+63 |
| TIUERR | GETNOTES+37~ |
| TIUFLDS | GETNOTES+37~ |
| TIUFLDS(8925 | GETNOTES+47 |
| TIUFLG | GETACTS+26~, GETACTS+40*, GETACTS+44 |
| TIUIDATE | GETNOTES+37~, GETNOTES+48*, GETNOTES+56*, GETNOTES+57, GETNOTES+59*, GETNOTES+63 |
| TIUIEN | GETNOTES+37~, GETNOTES+44*, GETNOTES+45, GETNOTES+46, GETNOTES+47, GETNOTES+63, LINK~, LINK+3, LINK+6, LINK+7 , GETSTAT~, GETSTAT+3, GETSTAT+5 |
| TIUTTL | GETNOTES~, GETNOTES+27, GETACTS~, GETACTS+30, LINK+2~, LINK+3*, LINK+4, GETSTAT+2~, GETSTAT+3*, GETSTAT+4 |
| TIUY | GETTITLE~, GETTITLE+11!*, GETTITLE+13*, GETTITLE+14, GETTITLE+15*, GETTITLE+16*, GETNOTES~, GETNOTES+22!, GETNOTES+23*, GETNOTES+62* , GETACTS~, GETACTS+29*, GETACTS+31*, GETACTS+35*, GETACTS+66!*, LINK~, LINK+4*, LINK+7*, GETSTAT~, GETSTAT+4* , GETSTAT+5*, GETSTAT+6*, ISPRFTTL~, ISPRFTTL+4*, ISPRFTTL+8* |
| TIUY( | GETNOTES+63*, GETACTS+44*, GETACTS+45*, GETACTS+46*, GETACTS+47*, GETACTS+48*, GETACTS+49*, GETACTS+56, GETACTS+63*, GETACTS+64 , GETACTS+68* |
| U | GETNOTES+40, GETNOTES+53, GETNOTES+63, GETACTS+31, GETACTS+40, GETACTS+45, GETACTS+46, GETACTS+47, GETACTS+48, GETACTS+49 , GETACTS+60, GETACTS+61, GETACTS+62, GETACTS+63, GETSTAT+5, GETSTAT+6, GETP, GETPA, HERE+3, STN+19 , STN+24, STN+25, STN+30, STN+31, STN+32 |
| UNLINKBL | GETACTS+26~, GETACTS+34 |
| UNLINKBL( | GETACTS+43 |
| X | GETNOTES+21~, GETNOTES+27*, GETNOTES+28, GETNOTES+36~, GETNOTES+55*, GETNOTES+57*, GETACTS+26~, GETACTS+30*, GETACTS+31, GETACTS+54~ , GETACTS+59*, GETACTS+60, GETACTS+61, GETACTS+62, GETACTS+67*, GETACTS+68*, HERE+2~*, HERE+3, STN+12~, STN+18* , STN+19, STN+30*, STN+31*, STN+32*, STN+33 |
| Y | GETACTS+54~, GETACTS+58*, GETACTS+59, GETACTS+66* |
