©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
DGPFUT3 ;ALB/SAE - PRF UTILITIES CONTINUED ; 6/9/04 5:06pm
Source file <DGPFUT3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLDLOCFM(DGPFDA,DGPFHX,DGPFLOUT) | ; build (L)ocal (OUT)put array
|
|
| BLDLOCAL(DGPFDA,DGPFHX,TXN,DGPFLOUT) | ;
; This procedure builds a local array (DPGFLOUT) of all fields |
|
| REVIEW(DGPFDA,DGPFHX,DGPFIEN,DGPFOPT,DGPFACT) | ; Entry point for review display
|
|
| BLDLOCFA(DGPFDA,DGPFHX,DGPFLOUT) | ; build (L)ocal (OUT)put array
|
| Name | Field # of Occurrence |
|---|---|
| $$GETADT^DGPFAAH | BLDLOCFA+35 |
| $$GETHIST^DGPFAAH | BLDLOCFA+42 |
| $$GETLAST^DGPFAAH | BLDLOCFA+41 |
| $$GETFLAG^DGPFUT1 | BLDLOCFA+22 |
| $$GETPAT^DGPFUT2 | BLDLOCFA+21 |
| BLDGLOB^DGPFUT4 | REVIEW+51 |
| DISPLAY^DGPFUT5 | REVIEW+52 |
| $$EXTERNAL^DILFD | BLDLOCFA+30, BLDLOCFA+58 |
| $$GET1^DIQ | BLDLOCFA+52, BLDLOCFA+55, BLDLOCFA+63, BLDLOCFA+67, BLDLOCFM+26 |
| $$FMTE^XLFDT | BLDLOCFA+33, BLDLOCFA+36, BLDLOCFA+44, BLDLOCFA+49, BLDLOCFA+60, BLDLOCFM+24 |
| $$NOW^XLFDT | BLDLOCFA+60, BLDLOCFM+24 |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGPF(26.13 - [#26.13] | EXTERNAL^DILFD |
| ^DGPF(26.14 - [#26.14] | EXTERNAL^DILFD |
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DGPFARY" | REVIEW+47 |
| Name | Line Occurrences |
|---|---|
| BLDLOCAL | REVIEW+50 |
| BLDLOCFA | BLDLOCAL+12 |
| BLDLOCFM | BLDLOCAL+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGPFACT | REVIEW~, REVIEW+45 |
| DGPFAHX | BLDLOCFA+17~, BLDLOCFA+42* |
| DGPFAHX("ASSIGNDT" | BLDLOCFA+43, BLDLOCFA+44 |
| DGPFDA | REVIEW~, REVIEW+50, REVIEW+51, BLDLOCAL~, BLDLOCAL+12, BLDLOCAL+13, BLDLOCFA~, BLDLOCFM~ |
| DGPFDA("DESC" | BLDLOCFM+35 |
| DGPFDA("DFN" | BLDLOCFA+21 |
| DGPFDA("FLAG" | BLDLOCFA+22, BLDLOCFA+27, BLDLOCFM+16 |
| DGPFDA("NARR" | BLDLOCFA+69 |
| DGPFDA("NOTIDAYS" | BLDLOCFM+21 |
| DGPFDA("ORIGSITE" | BLDLOCFA+54 |
| DGPFDA("OWNER" | BLDLOCFA+51 |
| DGPFDA("PRININV" | BLDLOCFM+30, BLDLOCFM+31, BLDLOCFM+32 |
| DGPFDA("REVFREQ" | BLDLOCFM+20 |
| DGPFDA("REVGRP" | BLDLOCFM+22 |
| DGPFDA("REVIEWDT" | BLDLOCFA+48, BLDLOCFA+49 |
| DGPFDA("STAT" | BLDLOCFM+19 |
| DGPFDA("STATUS" | BLDLOCFA+29 |
| DGPFDA("TIUTITLE" | BLDLOCFM+23 |
| DGPFDA("TYPE" | BLDLOCFM+18 |
| DGPFFLG | BLDLOCFA+16~, BLDLOCFA+22 |
| DGPFFLG("FLAG" | BLDLOCFA+25 |
| DGPFFLG("TYPE" | BLDLOCFA+26 |
| DGPFGOUT | REVIEW+41~, REVIEW+47*, REVIEW+51, REVIEW+52, REVIEW+54 |
| DGPFHX | REVIEW~, REVIEW+50, REVIEW+51, BLDLOCAL~, BLDLOCAL+12, BLDLOCAL+13, BLDLOCFA~, BLDLOCFM~ |
| DGPFHX("ACTION" | BLDLOCFA+57 |
| DGPFHX("APPRVBY" | BLDLOCFA+66 |
| DGPFHX("ASSIGNDT" | BLDLOCFA+33 |
| DGPFHX("COMMENT" | BLDLOCFA+70 |
| DGPFHX("REASON" | BLDLOCFM+36 |
| DGPFIA | BLDLOCFA+18~, BLDLOCFA+35*, BLDLOCFA+36, BLDLOCFA+43 |
| DGPFIEN | REVIEW~, REVIEW+48, BLDLOCFA+14~, BLDLOCFA+29*, BLDLOCFA+30, BLDLOCFA+51*, BLDLOCFA+52, BLDLOCFA+54*, BLDLOCFA+55, BLDLOCFA+57* , BLDLOCFA+58, BLDLOCFA+62*, BLDLOCFA+63, BLDLOCFA+66*, BLDLOCFA+67, BLDLOCFM+25*, BLDLOCFM+26 |
| DGPFLAST | BLDLOCFA+19~, BLDLOCFA+41*, BLDLOCFA+42 |
| DGPFLOUT | REVIEW+40~, REVIEW+50, REVIEW+51, BLDLOCAL~, BLDLOCAL+12, BLDLOCAL+13, BLDLOCFA~, BLDLOCFM~ |
| DGPFLOUT("ACTION" | BLDLOCFA+58* |
| DGPFLOUT("ACTIONDT" | BLDLOCFA+60* |
| DGPFLOUT("APPRVBY" | BLDLOCFA+67* |
| DGPFLOUT("ASGMNTIEN" | REVIEW+48*, BLDLOCFA+34, BLDLOCFA+35, BLDLOCFA+40, BLDLOCFA+41 |
| DGPFLOUT("CATEGORY" | BLDLOCFA+27*, BLDLOCFM+17* |
| DGPFLOUT("COMMENT" | BLDLOCFA+70* |
| DGPFLOUT("DESC" | BLDLOCFM+35* |
| DGPFLOUT("ENTERBY" | BLDLOCFA+63*, BLDLOCFM+26* |
| DGPFLOUT("ENTERDT" | BLDLOCFM+24* |
| DGPFLOUT("FLAGNAME" | BLDLOCFA+25*, BLDLOCFM+16* |
| DGPFLOUT("FLAGTYPE" | BLDLOCFA+26*, BLDLOCFM+18* |
| DGPFLOUT("INITASSIGN" | BLDLOCFA+33*, BLDLOCFA+36* |
| DGPFLOUT("LASTREVIEW" | BLDLOCFA+39*, BLDLOCFA+44* |
| DGPFLOUT("NARR" | BLDLOCFA+69* |
| DGPFLOUT("NOTIDAYS" | BLDLOCFM+21* |
| DGPFLOUT("ORIGSITE" | BLDLOCFA+55* |
| DGPFLOUT("OWNER" | BLDLOCFA+52* |
| DGPFLOUT("PATIENT" | BLDLOCFA+24* |
| DGPFLOUT("PRININV" | BLDLOCFM+32* |
| DGPFLOUT("REASON" | BLDLOCFM+36* |
| DGPFLOUT("REVFREQ" | BLDLOCFM+20* |
| DGPFLOUT("REVGRP" | BLDLOCFM+22* |
| DGPFLOUT("REVIEWDT" | BLDLOCFA+47*, BLDLOCFA+49* |
| DGPFLOUT("STATUS" | BLDLOCFA+30*, BLDLOCFM+19* |
| DGPFLOUT("TIUTITLE" | BLDLOCFM+23* |
| DGPFOPT | REVIEW~, REVIEW+43, REVIEW+44 |
| DGPFPAT | BLDLOCFA+15~, BLDLOCFA+21 |
| DGPFPAT("NAME" | BLDLOCFA+24 |
| DGPFSUB | BLDLOCFM+14~, BLDLOCFM+29*, BLDLOCFM+30*, BLDLOCFM+31, BLDLOCFM+32 |
| DUZ | BLDLOCFA+62, BLDLOCFM+25 |
| TXN | REVIEW+33~, REVIEW+43*, REVIEW+44*, REVIEW+45*, REVIEW+50, REVIEW+51, REVIEW+52, BLDLOCAL~, BLDLOCAL+12, BLDLOCAL+13 |
| U | REVIEW+43, REVIEW+44, REVIEW+45, BLDLOCAL+12, BLDLOCAL+13, BLDLOCFA+21, BLDLOCFA+22, BLDLOCFA+25, BLDLOCFA+26, BLDLOCFM+16 , BLDLOCFM+18, BLDLOCFM+19, BLDLOCFM+20, BLDLOCFM+21, BLDLOCFM+22, BLDLOCFM+23, BLDLOCFM+32 |