©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
INHMS2 ;JSH,DJL; 25 Sep 97 13:01;Interface - Message Search
Source file <INHMS2.m>
| Package | Total | Call Graph |
|---|---|---|
| Uncategorized | 4 | CLEAR^DW (MESS,MS)^DWD PRTLIST^DWPR $$CR^UTSRD |
| Kernel | 2 | ^%ZIS $$CDATASC^%ZTFDT |
| IHS Generic Interface System | 1 | ($$INMSPAT,$$INMSRCH)^INHMS1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LIST(INQUIT,IND,INSRCH,DWLRF,INRVSRCH,INL,INSRCHCT) | ; Build the msg. array
; MODULE NAME: LIST ( Build the list of matching messages ) ; DESCRIPTION: ; loop through the messages from date-start to date-end and ; give the user a progress indicator ; PARAMETERS: ; INQUIT = 0 = The program completed properly ; 1 = No matching messages were found ; IND = The starting time/date of the search set from information ; in INSRCH and determined by INRVSRCH flag ; INSRCH = Array for holding search criteria information ; DWLRF = Settings for the Display Processor ; INRVSRCH = Flag set user indicating direction of the search ; -1 = (default)a reverse listing order. Newest to Oldest ; 0 = a forward search listing order. Oldest to Newest ; INL = Array used to load with message items matching the criteria ; INSRCHCT = The combined count of message items searched ; CODE BEGINS |
|
| POST(INNAME) | ; Disply/Print messages
; MODULE NAME: POST ( Post-action logic on List Processor field ) ; DESCRIPTION: Display/print messages using INH MESSAGE DISPLAY ; template ; RETURN = none ; PARAMETERS: ; INNAME= A NAME of an Array of IEN's into ^INTHU of messages ; selected for displaying/printing ; CODE BEGINS |
|
| MSGTEST(INMIEN,INLIST,INSRCH,INSRCHCT,INFNDCT) | ; Add matching msg. to array
; MODULE NAME: MSGTEST ( Interface Message Match Criteria Test ) ; DESCRIPTION: Tests the message for matches to values passed in third ; parameter array nodes and addes the IEN to the second ; parameter array. Updates counters accordingly. ; RETURN = none ; PARAMETERS: ; INMIEN= IEN into ^INTHU ; INLIST = The NAME of the array to add items found ; INSRCH = The array of items to find ; INSRCHCT = The count of messages searched ; INFNDCT = The count of messages found ; CODE BEGINS |
|
| ERR(INMSG,INFSCRN,INCONT) | ; Error/Information handler
; MODULE NAME: ERR ( Interface Message Error/Information Processor ) ; DESCRIPTION: ERR is a multi-functional message display utility for ; handling user notification of errors and other messages ; RETURN = none ; PARAMETERS: ; INMSG = a string to be displayed ; INFSCRN = flag to disable/enable the poping of a window ; 0=disable(default) ; 1=enable ; INCONT = flag to disable/enable continuation prompting ; 0=disable(default) ; 1=enable ; CODE BEGINS |
|
| INMSGSTR(INMSGIEN,INLABEL,INEXPAND) | ; Build a string from msg. elements
; MODULE NAME: INMSGSTR ( Interface Message Listing String Builder ) ; DESCRIPTION: Construct a string containing selected fields from ; the message. Used to construct the string which is ; displayed in the List Processor indicating messages ; found to match the search criteria. Or consruct a ; label used to identify the field to be listed. ; RETURN = The composite message string or ; a string indicating error status ; PARAMETERS: ; INMSGIEN= IEN into ^INTHU ; INLABEL= Flag to return a string to be used as the title ; containing the field labels used below. ; 0/null= no label requested ; 1= return the only the label ; INEXPAND= Flag (1/0) to build expanded listing ; CODE BEGINS |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INRHD - [#4005] | INMSGSTR+26 |
| ^INRHT - [#4000] | INMSGSTR+30 |
| ^INTHU - [#4001] | MSGTEST+14, INMSGSTR+22 |
| ^INTHU("B" | LIST+21, LIST+22, LIST+23 |
| Name | Line Occurrences |
|---|---|
| $$INMSGSTR | MSGTEST+26, MSGTEST+27 |
| MSGTEST | LIST+24 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | POST+12* |
| DA | POST+9~ |
| DA( | POST+13* |
| DHD | POST+9~, POST+14* |
| DIC | POST+9~, POST+14* |
| DIE | POST+9~ |
| DR | POST+9~, POST+14* |
| DUZ | MSGTEST+25 |
| DW | POST+9~ |
| DWCP | POST+9~ |
| DWLR | LIST+18~ |
| DWLRF | LIST~, LIST+20, LIST+24, LIST+26, LIST+28*, LIST+29* |
| I | POST+9~, POST+13* |
| INBLKCT | LIST+18~, LIST+20*, LIST+22 |
| INCONT | ERR~, ERR+19 |
| IND | LIST~, LIST+21*, LIST+22*, LIST+23, LIST+28 |
| INDEST | INMSGSTR+17~, INMSGSTR+26*, INMSGSTR+27 |
| INDSPSZ | LIST+18~, LIST+19* |
| INDSTNUM | INMSGSTR+17~, INMSGSTR+26* |
| INEXPAND | INMSGSTR~, INMSGSTR+18*, INMSGSTR+20, INMSGSTR+21, INMSGSTR+27, INMSGSTR+28 |
| INFNDCT | LIST+18~, LIST+20*, LIST+22, LIST+24, LIST+25, LIST+29, MSGTEST~, MSGTEST+25, MSGTEST+26* |
| INFSCRN | ERR~, ERR+16 |
| INIO | POST+9~, POST+12*, POST+15 |
| INL | LIST~ |
| INLABEL | INMSGSTR~, INMSGSTR+18*, INMSGSTR+20, INMSGSTR+21 |
| INLIST | MSGTEST~, MSGTEST+25*, MSGTEST+26, MSGTEST+27 |
| INM | LIST+18~, LIST+23*, LIST+24 |
| INMAXSZ | MSGTEST+13~, MSGTEST+14*, MSGTEST+25 |
| INMIEN | MSGTEST~, MSGTEST+14, MSGTEST+21, MSGTEST+22, MSGTEST+26, MSGTEST+27 |
| INMSG | ERR~, ERR+15*, ERR+18 |
| INMSGID | INMSGSTR+17~, INMSGSTR+25*, INMSGSTR+27 |
| INMSGIEN | INMSGSTR~, INMSGSTR+22, INMSGSTR+29 |
| INMSGSTR | INMSGSTR+17~, INMSGSTR+20*, INMSGSTR+21*, INMSGSTR+27*, INMSGSTR+28, INMSGSTR+31* |
| INMSGTXT | INMSGSTR+17~, INMSGSTR+22*, INMSGSTR+23, INMSGSTR+24, INMSGSTR+25, INMSGSTR+26, INMSGSTR+30 |
| INNAME | POST~, POST+10, POST+13 |
| INNOMORE | LIST+18~, LIST+28*, LIST+29 |
| >> INORGTT | INMSGSTR+30* |
| >> INOTT | INMSGSTR+30*, INMSGSTR+31 |
| INPATNAM | INMSGSTR+17~, INMSGSTR+29, INMSGSTR+31 |
| INQUIT | LIST~, LIST+26*, LIST+30* |
| INRVSRCH | LIST~, LIST+21, LIST+22, LIST+23, LIST+28 |
| INSRCH | LIST~, LIST+24, MSGTEST~, MSGTEST+22 |
| INSRCH("INDEST" | MSGTEST+15 |
| INSRCH("INDIR" | MSGTEST+19 |
| INSRCH("INEND" | LIST+22, LIST+28 |
| INSRCH("INEXPAND" | MSGTEST+27 |
| INSRCH("INID" | MSGTEST+17 |
| INSRCH("INORIG" | MSGTEST+20 |
| INSRCH("INPAT" | MSGTEST+21 |
| INSRCH("INSOURCE" | MSGTEST+18 |
| INSRCH("INSTART" | LIST+22, LIST+28 |
| INSRCH("INSTAT" | MSGTEST+16 |
| INSRCH("INTEXT" | MSGTEST+22 |
| INSRCH("INTYPE" | MSGTEST+22 |
| INSRCHCT | LIST~, LIST+24, LIST+25, MSGTEST~, MSGTEST+14*, MSGTEST+26, MSGTEST+27 |
| INTDATE | INMSGSTR+17~, INMSGSTR+24*, INMSGSTR+27 |
| INTEMP | INMSGSTR+17~, INMSGSTR+29*, ERR+14~, ERR+19* |
| INTEMPX | MSGTEST+13~, MSGTEST+14*, MSGTEST+15, MSGTEST+16, MSGTEST+17, MSGTEST+18, MSGTEST+19, MSGTEST+20 |
| INTEMPY | MSGTEST+25~*! |
| IO | POST+12, POST+15 |
| IOM | POST+12 |
| ION | POST+12 |
| >> IOP | POST+12* |
| IOSL | POST+12 |
| IOST | POST+12 |
| >> POP | POST+12 |
| U | LIST+20, LIST+28, LIST+29, MSGTEST+15, MSGTEST+16, MSGTEST+17, MSGTEST+18, MSGTEST+19, MSGTEST+20, MSGTEST+25 , INMSGSTR+24, INMSGSTR+25, INMSGSTR+26, INMSGSTR+30 |
| >> X | POST+15* |