©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
INHERR1 ;DJL; 28 Feb 95 10:40;Interface - Error Search
Source file <INHERR1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INLSRCH(SRCHTEXT,MSGTEXT,INFOUND,INLOGIC) | ; Test error for text-string
; match(one line) ; MODULE NAME: INLSRCH (Interface Error LINE Search) ; DESCRIPTION: To find a search string in a error which may be a ; continuation line or not. The search line MAY be ; split across multiple lines. ; RETURN= PASS/FAIL (1/0) ; PARAMETERS: ; SRCHTEXT(PBR)= The array of search string containing less than a 70 char. ; count value and subscript nodes containing the strings ; MSGTEXT(PBR)= error text/array ; INFOUND(PBR)= The array used to indicate strings matches found. ; INLOGIC(PBV)= The flag indicating the type(OR/AND) of logic used with ; matching error data and the search strings. ; CODE BEGINS |
|
| INERSRCH(INETEXT,INEIEN,INELOGIC) | ; Test error for text-string match(multi)
; MODULE NAME: INERSRCH (Interface Error MESSAGE Search) ; DESCRIPTION: Search ^INTHER( INEIEN ) error for matching values to ; the search string array: INETEXT. ; RETURN= PASS/FAIL (1/0) ; PARAMETERS: ; INETEXT= search string array with base node("INTEXT") set to ; subscript count value and subscript nodes containing ; the strings ; INEIEN= The IEN of the error in the ^INTHER error file ; INELOGIC= The matching logic switch set to 1 or 0 ; 1= ANDing functionality RE:all strings must be found ; in the error ; 0= ORing functionality RE:only one string need match ; CODE BEGINS |
|
| EXPAND(INTEMPLT,INFILE) | ;Expand-action logic on List Processor field
; MODULE NAME: EXPAND (Expand-action logic for ^DWL ) ; DESCRIPTION: Expand using print template name passed and ; on the file passed. ; RETURN = none ; PARAMETERS ; INTEMPLT = The print template to use ; INFILE = The file to use ; CODE BEGINS |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INTHER - [#4003] | INERSRCH+16, INERSRCH+17 |
| Name | Line Occurrences |
|---|---|
| $$INLSRCH | INERSRCH+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | EXPAND+12* |
| BUF | INLSRCH+15~, INLSRCH+19*, INLSRCH+24 |
| DA | EXPAND+9~ |
| DA( | EXPAND+13* |
| DHD | EXPAND+9~, EXPAND+14* |
| DIC | EXPAND+9~, EXPAND+14* |
| DIE | EXPAND+9~ |
| DR | EXPAND+9~, EXPAND+14* |
| DW | EXPAND+9~ |
| DWCP | EXPAND+9~ |
| >> DWLRF | EXPAND+10, EXPAND+13 |
| I | EXPAND+9~ |
| INEFOUND | INERSRCH+15~, INERSRCH+16*, INERSRCH+21*, INERSRCH+24*, INERSRCH+25 |
| INEFOUND( | INERSRCH+24 |
| INEIEN | INERSRCH~, INERSRCH+16, INERSRCH+17 |
| INELINE | INERSRCH+15~, INERSRCH+17*, INERSRCH+18, INERSRCH+21 |
| INELOGIC | INERSRCH~, INERSRCH+21, INERSRCH+24 |
| INENODE | INERSRCH+15~, INERSRCH+16*, INERSRCH+17 |
| INETEXT | INERSRCH~, INERSRCH+21 |
| INETEXT("INTEXT" | INERSRCH+24 |
| INFILE | EXPAND~, EXPAND+14 |
| INFOUND | INLSRCH~, INLSRCH+19*, INLSRCH+20, INLSRCH+24*, INLSRCH+27, INLSRCH+34 |
| INFOUND( | INLSRCH+24* |
| INIO | EXPAND+9~, EXPAND+12*, EXPAND+15 |
| INLOGIC | INLSRCH~, INLSRCH+24, INLSRCH+27 |
| INNODE | INLSRCH+15~, INLSRCH+24* |
| INQUIT | INLSRCH+15~, INLSRCH+19*, INLSRCH+20, INLSRCH+29* |
| INTEMPLT | EXPAND~, EXPAND+14 |
| IO | EXPAND+12, EXPAND+15 |
| IOM | EXPAND+12 |
| ION | EXPAND+12 |
| >> IOP | EXPAND+12* |
| IOSL | EXPAND+12 |
| IOST | EXPAND+12 |
| MSGTEXT | INLSRCH~, INLSRCH+19 |
| MSGTEXT("" | INLSRCH+29 |
| >> POP | EXPAND+12 |
| SRCHTEXT | INLSRCH~ |
| SRCHTEXT("INTEXT" | INLSRCH+24 |
| U | EXPAND+10, EXPAND+13 |
| X | EXPAND+9~, EXPAND+15*, INERSRCH+15~, INERSRCH+24* |