HMPWB1 ; Agilex/EJK/JD - WRITE BACK ACTIVITY;Nov 5, 2015@16:15:08
Source file <HMPWB1.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Enterprise Health Management Platform | 3 | HMP WRITEBACK ALLERGY HMP WRITEBACK ALLERGY EIE HMPWB |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALLERGY(RSLT,IEN,DFN,DATA) | ;file allergy data
; RSLT - result, passed by reference ; IEN - zero for new allergy, or IEN for edit ; DFN - patient identifier ; DATA - array of allergy data. Subscript names are required. ; ("GMRACHT",0)=1 - Chart Marked indicator ; ("GMRACHT",1)=3150603.0905 - Date/Time Chart Marked ; ("GMRAGNT")="DIGITOXIN^9;PSNDF(50.6," - Allergy and Pointer to Allergen File ; ("GMRAOBHX")="o^OBSERVED" - (O)bserved or (H)istorical ; ("GMRAORIG")=10000000224 - Pointer to VA DRUG CLASS File (50.605) ; ("GMRAORDT")=3150603.0805 - Allergy assessmant date and time. ; ("GMRASEVR")=2 - Severity of Allergy. 1=Mild, 2=Moderate, 3=Severe ; ("GMRATYPE")="D^Drug" - Type of Allergen (F)ood or (D)rug ; ("GMRANATR")="A^Allergy" - Mechanism of Allergy (A)llergy, (P)harmacologic, (U)nknown. ; ("GMRASYMP",0)=2 - Number of Symptoms ; ("GMRASYMP",1)="2^ITCHING,WATERING EYES" - IEN and Description of Symptom 1 ; ("GMRASYMP",2)="133^RASH" - IEN and Description of Symptom 2 |
|
| ALLEIE(RSLT,DATA) | ;file allergy entered in error
|
|
| CHECKREQ | ; check for required fields
|
|
| CHKDATE | ;CHECK DATES FOR PROPER FORMAT OF DATE.
|
|
| PARSE | ;Parse data string into data elements for EDITSAVE^ORWDAL32
|
|
| ERROR | ;handle errors generated by MSG^HMPTOOLS
|
|
| EXTRACT(GLOB) | ; Move ^TMP("HMPF",$J) into string format
|
| Name | Field # of Occurrence |
|---|---|
| GET^HMPDJ | ALLERGY+50, ALLEIE+25 |
| MSG^HMPTOOLS | ALLERGY+18, ALLERGY+19, ALLERGY+35, ALLEIE+18, CHECKREQ+3, CHECKREQ+4, CHECKREQ+7, CHECKREQ+8, CHECKREQ+9, CHECKREQ+10 , CHKDATE+4, CHKDATE+6, CHKDATE+8 |
| ADHOC^HMPUTIL2 | ALLERGY+58, ALLEIE+33 |
| $$SETUID^HMPUTILS | ALLERGY+55, ALLEIE+30 |
| EDITSAVE^ORWDAL32 | ALLERGY+32, ALLEIE+19 |
| $$NOW^XLFDT | ALLERGY+28 |
| RPC Name | Call Tags |
|---|---|
| HMP WRITEBACK ALLERGY | ALLERGY |
| HMP WRITEBACK ALLERGY EIE | ALLEIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(120.8 - [#120.8] | ALLERGY+31, ALLERGY+34, ALLERGY+38, ALLERGY+39, ALLEIE+18, CHECKREQ+4, CHECKREQ+5, CHECKREQ+10 |
| ^TMP("ALLERGY" | ALLERGY+51!, ALLERGY+52*, ALLERGY+53, ALLERGY+56, ALLEIE+26!, ALLEIE+27*, ALLEIE+28, ALLEIE+31 |
| ^TMP("HMP" | ALLERGY+45, ALLEIE+20, ERROR+2*, ERROR+3 |
| ^TMP("HMPALL" | ALLERGY+61*, ALLERGY+63, ALLEIE+36*, ALLEIE+38 |
| ^TMP("HMPF" | EXTRACT+4, EXTRACT+5, EXTRACT+6, EXTRACT+7, EXTRACT+8, EXTRACT+11, EXTRACT+12, EXTRACT+13, EXTRACT+14, EXTRACT+16 , EXTRACT+17, EXTRACT+18, EXTRACT+20, EXTRACT+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CMMT | ALLERGY+20~ |
| D0 | ALLERGY+24~, ALLERGY+36, ALLERGY+40*, ALLERGY+43*, ALLERGY+46, ALLERGY+55 |
| DATA | ALLERGY~, ALLERGY+19, ALLERGY+32, ALLEIE~, ALLEIE+14, ALLEIE+19, CHECKREQ+5*, CHECKREQ+7, CHECKREQ+8, CHECKREQ+9 , PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6 |
| DATA("GMRACHT" | CHKDATE+3 |
| DATA("GMRAERR" | PARSE+2* |
| DATA("GMRAERRBY" | PARSE+3* |
| DATA("GMRAERRCMTS" | PARSE+5*, PARSE+6* |
| DATA("GMRAERRDT" | PARSE+4* |
| DATA("GMRAGNT" | ALLERGY+30*, ALLERGY+40 |
| DATA("GMRAORDT" | CHKDATE+5 |
| DFN | ALLERGY~, ALLERGY+18, ALLERGY+25, ALLERGY+26, ALLERGY+32, ALLERGY+38, ALLERGY+40*, ALLERGY+43*, ALLERGY+47, ALLERGY+55 , ALLERGY+58 |
| ERRMSG | ALLERGY+24~, ALLERGY+27* |
| ERRPAT | ALLERGY+24~, ALLERGY+26* |
| FILTER | ALLERGY+20~, ALLERGY+50, ALLEIE+25 |
| FILTER("domain" | ALLERGY+48*, ALLEIE+23* |
| FILTER("id" | ALLERGY+46*, ALLEIE+21* |
| FILTER("noHead" | ALLERGY+49*, ALLEIE+24* |
| FILTER("patientId" | ALLERGY+47*, ALLEIE+22* |
| GLOB | EXTRACT~ |
| GMR0 | ALLERGY+20~, ALLERGY+39*, ALLERGY+40 |
| GMR1 | ALLERGY+30~* |
| GMRA | ALLERGY+20~ |
| >> GMRAERRDT | CHKDATE+7 |
| GMRIEN | ALLERGY+20~ |
| >> HMP | ALLERGY+45*, ALLERGY+60, ALLERGY+65, ALLEIE+20*, ALLEIE+35, ALLEIE+40 |
| HMPALRGY | ALLERGY+20~ |
| HMPDATA | ALLERGY+20~ |
| HMPDFN | ALLERGY+20~, ALLERGY+21~, ALLERGY+25*, ALLERGY+40, ALLERGY+43, ALLEIE+13~, ALLEIE+19, ALLEIE+22, ALLEIE+30, ALLEIE+33 , PARSE+1* |
| HMPDT | CHKDATE+1~, CHKDATE+3*, CHKDATE+4, CHKDATE+5*, CHKDATE+6, CHKDATE+7*, CHKDATE+8 |
| >> HMPE | ALLERGY+56*, ALLERGY+57, ALLEIE+31*, ALLEIE+32 |
| >> HMPFCNT | ALLERGY+54*, ALLERGY+58, ALLEIE+29*, ALLEIE+33 |
| HMPFND | EXTRACT+1~, EXTRACT+2*, EXTRACT+21* |
| HMPIDX | ALLERGY+21~, ALLERGY+37*, ALLERGY+38*, ALLERGY+39, ALLERGY+40, ALLERGY+43 |
| HMPIEN | ALLEIE+13~, ALLEIE+14*, ALLEIE+18, ALLEIE+19, ALLEIE+21, ALLEIE+30, CHECKREQ+3, CHECKREQ+4, CHECKREQ+5, CHECKREQ+10 |
| HMPSITE | ALLERGY+20~ |
| HMPSTOP | ALLERGY+21~, ALLERGY+22*, ALLERGY+37*, ALLERGY+38, ALLERGY+40*, ALLERGY+43, ALLEIE+13~, ALLEIE+16, CHECKREQ+6*, CHKDATE+2* , ERROR+1*, EXTRACT+1~, EXTRACT+2*, EXTRACT+4, EXTRACT+9* |
| >> HMPUID | ALLERGY+55*, ALLERGY+58, ALLEIE+30*, ALLEIE+33 |
| I | ALLERGY+20~, EXTRACT+3*, EXTRACT+4*, EXTRACT+5, EXTRACT+6, EXTRACT+7, EXTRACT+8, EXTRACT+11, EXTRACT+12, EXTRACT+13 , EXTRACT+14, EXTRACT+16, EXTRACT+17, EXTRACT+18, EXTRACT+20, EXTRACT+23* |
| IEN | ALLERGY~, ALLERGY+32 |
| >> J | EXTRACT+3*, EXTRACT+5*, EXTRACT+6, EXTRACT+7, EXTRACT+8, EXTRACT+11, EXTRACT+12, EXTRACT+13, EXTRACT+14, EXTRACT+16 , EXTRACT+17*, EXTRACT+18, EXTRACT+20 |
| ORY | ALLERGY+20~, ALLERGY+32, ALLERGY+35, ALLERGY+36 |
| REAC | ALLERGY+20~ |
| RSLT | ALLERGY~, ALLERGY+50, ALLERGY+52, ALLERGY+53*, ALLERGY+59!, ALLERGY+60*, ALLERGY+61, ALLERGY+62!, ALLERGY+63*, ALLEIE~ , ALLEIE+19, ALLEIE+25, ALLEIE+27, ALLEIE+28*, ALLEIE+34!, ALLEIE+35*, ALLEIE+36, ALLEIE+37!, ALLEIE+38*, ERROR+3* , EXTRACT+2*, EXTRACT+26 |
| RSLT( | EXTRACT+8*, EXTRACT+16*, EXTRACT+20* |
| RSLT(1 | ERROR+2, ERROR+4! |
| STMPTM | ALLERGY+20~, ALLERGY+57*, ALLERGY+58, ALLEIE+32*, ALLEIE+33 |
| U | ALLERGY+36, ALLERGY+40, ALLEIE+14, CHECKREQ+5, CHECKREQ+7, CHECKREQ+8, CHECKREQ+9, PARSE+1, PARSE+2, PARSE+3 , PARSE+4, PARSE+5, PARSE+6 |
| USER | ALLERGY+20~ |
| VPRI | ALLERGY+20~ |
| X | ALLERGY+20~, EXTRACT+2*, EXTRACT+8, EXTRACT+15*, EXTRACT+16, EXTRACT+19*, EXTRACT+20 |
| XWBOS | ALLERGY+20~, ALLERGY+28* |
| Y | ALLERGY+20~ |
| Name | Field # of Occurrence |
|---|---|
| $T( | ALLERGY+27 |
