©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
INHERR3 ;DJL; 3 Mar 95 15:42;Interface - Error Search
Source file <INHERR3.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Generic Interface System | 1 | $$INMSGSTR^INHERR3 |
| Kernel | 1 | $$CDATASC^%ZTFDT |
| Uncategorized | 1 | ^DWL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SRCHHELP(INHLPLST) | ; Display List Processor style HELP
; MODULE NAME: SRCHHELP ( Display an array of text used for HELP ) ; DESCRIPTION: Call the list processor to display the array passed ; if it contains a least one sub-node otherwise construct ; a node stating no help is available. ; RETURN = none ; PARAMETERS: ; INHLPLST(PBR) = The array of the text into. ; CODE BEGINS |
|
| INHTITLE(INMSGSZ,INSRCH) | ; Write the Search Status line 21 from WITHIN the list proc.
; RETURNS: none ; PARAMETERS: ; INMSGSZ(PBV) = Approximate number of items to be searched ; INSRCH(PBR) = Array for holding search criteria information ; CODE BEGINS |
|
| INMSGSTR(INIEN,INLABEL,INEXPAND,INLEVEL) | ; Build a string from msg. elements
; MODULE NAME: INMSGSTR ( Interface Error Listing String Builder ) ; DESCRIPTION: Construct a string containing selected fields from ; the error. Used to construct the string which is ; displayed in the List Processor indicating errors ; found to match the search criteria. Or consruct a ; label used to identify the field to be listed. ; RETURN = The composite error string or ; a string indicating error status ; PARAMETERS: ; INIEN(PBV) = IEN into ^INTHER ; INLABEL(PBV) = 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(PBV) = Flag (1/0) to build expanded listing ; INLEVEL(PBV) = Flag indicating which level of the listing is to be ; returned. ; "" = level 0 with error time/date, error status, error location ; 1 = level 1 with error text ; 2 = level 2 with transaction type, destination ; 3 = level 3 with message time/date, message ID, message status ; CODE BEGINS |
|
| BLDHELP(INHLP) | ; Construct the array containing the HELP text
; MODULE NAME: BLDHELP ( Construct the array of text used for HELP ) ; DESCRIPTION: Constructs an array on assending numeric nodes containing ; up to 78 characters per line. No realistic limit exists ; on the number of nodes. ; RETURN = none ; PARAMETERS: ; INHLP(PBR) = The array variable to load the text into. ; CODE BEGINS ; the following line can be used to limit strings to 78 characters. ; HHHHHHHHHHxxxxxxxxxXxxxxxxxxxXxxxxxxxxxxXxxxxxxxxxxXxxxxxxxxxxXxxxxxxxxxxXxxxxxxxxxxXxxxxxxxx |
|
| CODETBL(INNAME,INFILE,INFIELD) | ; build an array of Set-of-codes from a DD entry
; MODULE NAME: CODETBL ( build an array of codes from the ^DD global ) ; DESCRIPTION: Construct a array containing selected fields from ; the DD given the array name, file, and field. ; RETURN = none ; PARAMETERS: ; INNAME(PBV) = The name of the array to populate ; INFILE(PBV) = The file number to reference ; INFIELD(PBV) = The field within the file ; CODE BEGINS |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | CODETBL+12 |
| ^INRHD - [#4005] | INMSGSTR+46 |
| ^INRHT - [#4000] | INMSGSTR+45 |
| ^INTHER - [#4003] | INMSGSTR+29, INMSGSTR+39, INMSGSTR+40, INMSGSTR+43 |
| ^INTHERL - [#4003.1] | INMSGSTR+36 |
| ^INTHU - [#4001] | INMSGSTR+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | INMSGSTR+23~ |
| DWL | SRCHHELP+9~, SRCHHELP+10* |
| DWLB | SRCHHELP+9~, SRCHHELP+10* |
| DWLMK | SRCHHELP+9~ |
| DWLMK1 | SRCHHELP+9~ |
| DWLR | SRCHHELP+9~ |
| DWLRF | SRCHHELP+9~, SRCHHELP+10* |
| INCNT | CODETBL+10~, CODETBL+14* |
| INCODE | CODETBL+10~, CODETBL+14* |
| INDEST | INMSGSTR+23~ |
| INDSTNUM | INMSGSTR+23~ |
| INEDATE | INMSGSTR+24~, INMSGSTR+33*, INMSGSTR+37 |
| INEDEST | INMSGSTR+24~, INMSGSTR+46*, INMSGSTR+47 |
| INELOC | INMSGSTR+24~, INMSGSTR+36*, INMSGSTR+37 |
| INERRID | INMSGSTR+23~ |
| INERRSTR | INMSGSTR+23~, INMSGSTR+27*, INMSGSTR+32, INMSGSTR+37*, INMSGSTR+38, INMSGSTR+39*, INMSGSTR+40*, INMSGSTR+43*, INMSGSTR+44, INMSGSTR+47* , INMSGSTR+48, INMSGSTR+53* |
| INERRTXT | INMSGSTR+23~, INMSGSTR+29*, INMSGSTR+30, INMSGSTR+33, INMSGSTR+35, INMSGSTR+36, INMSGSTR+45, INMSGSTR+46 |
| INESTAT | INMSGSTR+23~, INMSGSTR+35*, INMSGSTR+37 |
| >> INETBL( | INMSGSTR+35 |
| INETTYPE | INMSGSTR+24~, INMSGSTR+45*, INMSGSTR+47 |
| INEXPAND | INMSGSTR~, INMSGSTR+25*, INMSGSTR+27 |
| INFIELD | CODETBL~, CODETBL+12 |
| INFILE | CODETBL~, CODETBL+12 |
| INHLP | BLDHELP~ |
| INHLP(1 | BLDHELP+11*, BLDHELP+12* |
| INHLP(2 | BLDHELP+13*, BLDHELP+14* |
| INHLP(3 | BLDHELP+15*, BLDHELP+16* |
| INHLP(4 | BLDHELP+17*, BLDHELP+18* |
| INHLP(5 | BLDHELP+19*, BLDHELP+20* |
| INHLP(6 | BLDHELP+21*, BLDHELP+22* |
| INHLP(7 | BLDHELP+23*, BLDHELP+24* |
| INHLP(8 | BLDHELP+25*, BLDHELP+26* |
| INHLPLST | SRCHHELP~, SRCHHELP+11 |
| INHLPLST(1 | SRCHHELP+11* |
| INIEN | INMSGSTR~, INMSGSTR+25*, INMSGSTR+29, INMSGSTR+39, INMSGSTR+40, INMSGSTR+43 |
| INLABEL | INMSGSTR~, INMSGSTR+25*, INMSGSTR+27 |
| INLEN | CODETBL+10~, CODETBL+13*, CODETBL+14 |
| INLEVEL | INMSGSTR~, INMSGSTR+25*, INMSGSTR+32, INMSGSTR+38, INMSGSTR+44, INMSGSTR+48 |
| INMSGID | INMSGSTR+24~, INMSGSTR+50*, INMSGSTR+53 |
| INMSGSZ | INHTITLE~, INHTITLE+8 |
| INMSGTXT | INMSGSTR+24~, INMSGSTR+29*, INMSGSTR+45, INMSGSTR+46, INMSGSTR+48, INMSGSTR+49, INMSGSTR+50, INMSGSTR+52 |
| INMSTAT | INMSGSTR+24~, INMSGSTR+52*, INMSGSTR+53 |
| >> INMTBL( | INMSGSTR+52 |
| INNAME | CODETBL~, CODETBL+11, CODETBL+14 |
| INNODE | INMSGSTR+23~, INMSGSTR+39*, INMSGSTR+40*, INMSGSTR+43 |
| INPATNAM | INMSGSTR+23~ |
| INPIECE | CODETBL+10~, CODETBL+14* |
| INSRCH | INHTITLE~ |
| INSRCH("INEXPAND" | INHTITLE+10 |
| INTDATE | INMSGSTR+23~, INMSGSTR+49*, INMSGSTR+53 |
| INTEMPX | INHTITLE+6~, INHTITLE+7*, INHTITLE+9 |
| INTEMPY | INHTITLE+6~, INHTITLE+7*, INHTITLE+9 |
| INTXT | CODETBL+10~, CODETBL+14* |
| >> IOX | INHTITLE+7*, INHTITLE+9* |
| >> IOXY | INHTITLE+7, INHTITLE+9 |
| >> IOY | INHTITLE+7*, INHTITLE+9* |
| U | INMSGSTR+29, INMSGSTR+33, INMSGSTR+35, INMSGSTR+36, INMSGSTR+45, INMSGSTR+46, INMSGSTR+49, INMSGSTR+50, INMSGSTR+52, CODETBL+12 |
| X | INMSGSTR+23~, CODETBL+10~, CODETBL+12*, CODETBL+13, CODETBL+14 |
| Y | INMSGSTR+23~ |