ORWDAL32 ; SLC/REV - Allergy calls to support windows ;10-May-2012 12:54;DU
Source file <ORWDAL32.m>
| Package | Total | Caller Graph |
|---|---|---|
| Adverse Reaction Tracking | 2 | GMRA1007 GMRA1008 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALLGYTYP | ; Get the allergy types
|
|
| CHECKS(SGN) | ;Check to see if SIGN/SYMPTOM is active)
|
|
| TRDNAME(NAME,LIST) | ;
|
|
| SEVERITY | ; Severity
|
|
| NXT() | ; Increment index of LST
|
|
| SYMPTOMS(Y,FROM,DIR) | ; Return a subset of symptoms
; .Return Array, Starting Text, Direction |
|
| CHECK(ORIEN) | ;Check to see if allergy is active)
|
|
| EDITSAVE(ORY,ORALIEN,ORDFN,OREDITED) | ; Save Edit/Add of an allergy/adverse reaction
|
|
| GMRASITE(ORY) | ;Return GMRA Site Params
|
|
| FILENAME | ; Display text of filenames for search treeview
|
|
| TOPTEN | ; Get top ten symptoms from Allergy Site Parameters file
|
|
| SENDBULL(Y,ORDUZ,ORDFN,ORTEXT,ORCMTS) | ; Send bulletin if user attempts free-text entry
|
|
| EDITLOAD(Y,ORALIEN) | ; Load an allergy/adverse reaction for editing
|
|
| OBSHIST | ; Observed or historical
|
|
| CLASRCH(NAME,LIST) | ;
|
|
| ALLSRCH(Y,X) | ; Return list of partial matches ; CHANGED TO PRODUCE TREEVIEW IN GUI
|
|
| INGSRCH(NAME,LIST) | ;
|
|
| DEF(LST) | ; Get dialog data for allergies
|
|
| NATREACT | ; Get the NATURE OF REACTION types
|
| Name | Field # of Occurrence |
|---|---|
| GETREC^GMRAGUI | EDITLOAD+6 |
| EIE^GMRAGUI1 | EDITSAVE+7 |
| NKA^GMRAGUI1 | EDITSAVE+8 |
| UPDATE^GMRAGUI1 | EDITSAVE+9 |
| $$SENDREQ^GMRAPES0 | SENDBULL+2, SENDBULL+4 |
| SITE^GMRAUTL | GMRASITE+2, TOPTEN+2 |
| ALL^PSN5067 | TRDNAME+2 |
| NAME^PSN50P41 | INGSRCH+2 |
| C^PSN50P65 | CLASRCH+2 |
| $$B^PSNAPIS | ALLSRCH+3 |
| $$T^PSNAPIS | ALLSRCH+3 |
| $$TGTOG^PSNAPIS | TRDNAME+5 |
| $$UP^XLFSTR | ALLSRCH+2 |
| $$SCREEN^XTID | TOPTEN+6, ALLSRCH+15, ALLSRCH+27, ALLSRCH+37, ALLSRCH+45, SYMPTOMS+13 |
| SCREEN^XTID | TOPTEN+6, ALLSRCH+15, ALLSRCH+27, ALLSRCH+37, ALLSRCH+45, SYMPTOMS+13 |
| RPC Name | Call Tags |
|---|---|
| ORWDAL32 ALLERGY MATCH | ALLSRCH |
| ORWDAL32 DEF | DEF |
| ORWDAL32 SYMPTOMS | SYMPTOMS |
| ORWDAL32 SEND BULLETIN | SENDBULL |
| ORWDAL32 LOAD FOR EDIT | EDITLOAD |
| ORWDAL32 SAVE ALLERGY | EDITSAVE |
| ORWDAL32 SITE PARAMS | GMRASITE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMRD(120.82 - [#120.82] | ALLSRCH+16, ALLSRCH+18, ALLSRCH+28, ALLSRCH+30, CHECK+3, CHECK+4, CHECK+5 |
| ^GMRD(120.83 - [#120.83] | TOPTEN+4, TOPTEN+7, SYMPTOMS+6, SYMPTOMS+7, SYMPTOMS+8, CHECKS+3, CHECKS+4, CHECKS+5 |
| ^GMRD(120.84 - [#120.84] | GMRASITE+3, TOPTEN+3, TOPTEN+4 |
| ^TMP("GMRA" | EDITLOAD+3, EDITSAVE+4 |
| ^TMP($J | SYMPTOMS+4!, SYMPTOMS+6*, SYMPTOMS+8*, SYMPTOMS+9, SYMPTOMS+11, INGSRCH+1!, INGSRCH+3, INGSRCH+4, INGSRCH+5, INGSRCH+6! , CLASRCH+1!, CLASRCH+3, CLASRCH+4, CLASRCH+5, CLASRCH+6!, TRDNAME+1!, TRDNAME+3, TRDNAME+4, TRDNAME+5, TRDNAME+6! |
| Name | Line Occurrences |
|---|---|
| $$CHECK | ALLSRCH+13, ALLSRCH+25 |
| $$CHECKS | SYMPTOMS+12 |
| $$NXT | DEF+2, DEF+3, DEF+4, DEF+5, DEF+6, DEF+7, TOPTEN+7, NATREACT+3, ALLGYTYP+2, OBSHIST+2 , SEVERITY+2 |
| ALLGYTYP | DEF+2, DEF+3 |
| NATREACT | DEF+4 |
| OBSHIST | DEF+6 |
| SEVERITY | DEF+7 |
| TOPTEN | DEF+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | TOPTEN+1~*, TOPTEN+3*, ALLSRCH+1~*, ALLSRCH+5*, ALLSRCH+16*, ALLSRCH+17*, ALLSRCH+18, ALLSRCH+28*, ALLSRCH+29*, ALLSRCH+30 , ALLSRCH+38*, ALLSRCH+46*, SYMPTOMS+2~, SYMPTOMS+3*, SYMPTOMS+9 |
| CODE | ALLSRCH+32~, ALLSRCH+33*, ALLSRCH+34, ALLSRCH+40~, ALLSRCH+41*, ALLSRCH+42 |
| DIR | SYMPTOMS~, SYMPTOMS+9 |
| FROM | SYMPTOMS~, SYMPTOMS+9*, SYMPTOMS+10, SYMPTOMS+11, SYMPTOMS+15 |
| GMRASITE | GMRASITE+1~, GMRASITE+3, TOPTEN+1~, TOPTEN+3, TOPTEN+4 |
| I | DEF+1~, TOPTEN+1~*, TOPTEN+3*, TOPTEN+4, SYMPTOMS+2~, SYMPTOMS+3*, SYMPTOMS+9, SYMPTOMS+14*, SYMPTOMS+15, EDITLOAD+2~ , EDITLOAD+3*, INGSRCH+4~*, INGSRCH+5, CLASRCH+4~*, CLASRCH+5, TRDNAME+4~*, TRDNAME+5 |
| IEN | SYMPTOMS+2~, SYMPTOMS+11*, SYMPTOMS+12, SYMPTOMS+13, SYMPTOMS+15 |
| ILST | DEF+1~*, NXT+1*, NXT+2 |
| INAC | ALLSRCH+1~, ALLSRCH+13*, ALLSRCH+25* |
| INACS | SYMPTOMS+2~, SYMPTOMS+12* |
| INACT | ALLSRCH+1~, ALLSRCH+4* |
| J | INGSRCH+5~*, CLASRCH+5~*, TRDNAME+5~* |
| K | TRDNAME+5~* |
| LIST | ALLSRCH+32~, ALLSRCH+34, ALLSRCH+40~, ALLSRCH+42, INGSRCH~, CLASRCH~, TRDNAME~ |
| LIST( | ALLSRCH+34, ALLSRCH+35, ALLSRCH+36, ALLSRCH+42, ALLSRCH+43, ALLSRCH+44, ALLSRCH+45, ALLSRCH+46, INGSRCH+5*, CLASRCH+5* , TRDNAME+5* |
| LST | DEF~ |
| LST( | DEF+2*, DEF+3*, DEF+4*, DEF+5*, DEF+6*, DEF+7*, TOPTEN+7*, NATREACT+3*, ALLGYTYP+2*, OBSHIST+2* , SEVERITY+2* |
| NAME | ALLSRCH+32~, ALLSRCH+35*, ALLSRCH+38, ALLSRCH+40~, ALLSRCH+43*, ALLSRCH+46, SYMPTOMS+2~, SYMPTOMS+8*, INGSRCH~, INGSRCH+2 , CLASRCH~, CLASRCH+2, TRDNAME~, TRDNAME+2 |
| ORALIEN | EDITLOAD~, EDITLOAD+1, EDITLOAD+6, EDITSAVE~, EDITSAVE+7, EDITSAVE+9 |
| ORCMTS | SENDBULL~, SENDBULL+1, SENDBULL+4 |
| ORDFN | EDITSAVE~, EDITSAVE+7, EDITSAVE+9, SENDBULL~, SENDBULL+2, SENDBULL+4 |
| ORDUZ | SENDBULL~, SENDBULL+2, SENDBULL+4 |
| OREDITED | EDITSAVE~, EDITSAVE+5 |
| ORFILE | ALLSRCH+1~*, ALLSRCH+4* |
| ORIEN | ALLSRCH+1~*, ALLSRCH+12*, ALLSRCH+13, ALLSRCH+15, ALLSRCH+16, ALLSRCH+17, ALLSRCH+21*, ALLSRCH+25, ALLSRCH+27, ALLSRCH+28 , ALLSRCH+29, ALLSRCH+34*, ALLSRCH+35, ALLSRCH+36, ALLSRCH+37, ALLSRCH+38, ALLSRCH+42*, ALLSRCH+43, ALLSRCH+44, ALLSRCH+45 , ALLSRCH+46, CHECK~, CHECK+3, CHECK+4, CHECK+5 |
| ORNODE | EDITLOAD+2~, EDITLOAD+3*, EDITLOAD+6, EDITLOAD+7, EDITSAVE+3~, EDITSAVE+4*, EDITSAVE+5, EDITSAVE+7, EDITSAVE+8, EDITSAVE+9 |
| ORREAX | ALLSRCH+1~* |
| ORSRC | ALLSRCH+1~*, ALLSRCH+4*, ALLSRCH+5, ALLSRCH+6, ALLSRCH+8, ALLSRCH+10, ALLSRCH+13, ALLSRCH+16, ALLSRCH+17, ALLSRCH+18 , ALLSRCH+20, ALLSRCH+22, ALLSRCH+24, ALLSRCH+25, ALLSRCH+28, ALLSRCH+29, ALLSRCH+30, ALLSRCH+31, ALLSRCH+33, ALLSRCH+37 , ALLSRCH+38, ALLSRCH+39, ALLSRCH+46 |
| ORSRC( | ALLSRCH+4*, ALLSRCH+5 |
| ORTEXT | SENDBULL~, SENDBULL+2, SENDBULL+4 |
| ORX | ALLSRCH+1~, ALLSRCH+2* |
| ORY | GMRASITE~, GMRASITE+3*, EDITSAVE~, EDITSAVE+6* |
| ROOT | ALLSRCH+1~, ALLSRCH+3*, ALLSRCH+4, ALLSRCH+7, ALLSRCH+12, ALLSRCH+16, ALLSRCH+17, ALLSRCH+19, ALLSRCH+21, ALLSRCH+28 , ALLSRCH+29, ALLSRCH+38, ALLSRCH+46 |
| SGN | CHECKS~, CHECKS+3, CHECKS+4, CHECKS+5 |
| SIGNDT | CHECKS+1~, CHECKS+2*, CHECKS+3*, CHECKS+4 |
| STAT | CHECK+1~, CHECK+4*, CHECK+5, CHECKS+1~, CHECKS+4*, CHECKS+5 |
| STATUS | CHECK+1~, CHECK+5*, CHECK+6, CHECKS+1~, CHECKS+5*, CHECKS+6 |
| SUB | SYMPTOMS+2~, SYMPTOMS+7*, SYMPTOMS+8 |
| SYN | SYMPTOMS+2~, SYMPTOMS+7*, SYMPTOMS+8 |
| TERMDT | CHECK+1~, CHECK+3*, CHECK+4 |
| U | TOPTEN+7, ALLSRCH+5, ALLSRCH+16, ALLSRCH+17, ALLSRCH+18, ALLSRCH+28, ALLSRCH+29, ALLSRCH+30, ALLSRCH+35, ALLSRCH+36 , ALLSRCH+38, ALLSRCH+43, ALLSRCH+44, ALLSRCH+46, SYMPTOMS+8, SYMPTOMS+15, CHECK+5, CHECKS+5, INGSRCH+5, CLASRCH+5 , TRDNAME+5 |
| VAL | ALLSRCH+32~, ALLSRCH+40~ |
| VALUE | CHECK+1~, CHECK+2*, CHECK+6*, CHECK+7, CHECKS+1~, CHECKS+2*, CHECKS+6*, CHECKS+7 |
| X | DEF+1~, ALLSRCH~, ALLSRCH+2*, ALLSRCH+7, ALLSRCH+8, ALLSRCH+12, ALLSRCH+16, ALLSRCH+17, ALLSRCH+19, ALLSRCH+36 , ALLSRCH+44, NATREACT+2*, NATREACT+3, ALLGYTYP+1*, ALLGYTYP+2, OBSHIST+1*, OBSHIST+2, SEVERITY+1*, SEVERITY+2, SYMPTOMS+2~ |
| X0 | TOPTEN+1~*, TOPTEN+4*, TOPTEN+6, TOPTEN+7 |
| XP | ALLSRCH+1~, ALLSRCH+19*, ALLSRCH+20, ALLSRCH+21, ALLSRCH+22, ALLSRCH+28, ALLSRCH+29 |
| Y | ALLSRCH~, SYMPTOMS~, EDITLOAD~, EDITLOAD+7*, SENDBULL~, SENDBULL+2*, SENDBULL+4* |
| Y( | ALLSRCH+5*, ALLSRCH+16*, ALLSRCH+17*, ALLSRCH+18*, ALLSRCH+28*, ALLSRCH+29*, ALLSRCH+30*, ALLSRCH+38*, ALLSRCH+46*, SYMPTOMS+15* |
| Name | Field # of Occurrence |
|---|---|
| $T(FILENAME+ORSRC | ALLSRCH+4 |
| $T(SCREEN^XTID | TOPTEN+6, ALLSRCH+15, ALLSRCH+27, ALLSRCH+37, ALLSRCH+45, SYMPTOMS+13 |