©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
INHMGD8 ;CAR; 25 Apr 97 16:56;HL7 MESSAGING - PRINT SENSITIVITY ANALYSIS
Source file <INHMGD8.m>
| Package | Total | Caller Graph |
|---|---|---|
| IHS Generic Interface System | 2 | INHMGD INHMGD9 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PHEADER(INLN,INHDR) | ;print the header
; Inputs: ; INLN = where to start printing the header array ; skips printing date & page# if you start at 2 ; INHDR = header array ; INFLD = used in INHDR(4) - Field Number ; INFLDT = used in INHDR(4) - Field Name ; INFIL = used in INHDR(4) - File Number ; INFILT = used in INHDR(4) - File Name ; INPAGE = page number of last previous page ; Outputs: ; INPAGE = page number used on this page |
|
| INERS(J) | ;check for error, and if in error, log it.
; Input: ; INN = error to check for ; Output: ; Integer: 1=error found, 0=no error found ; Purpose: check for specific errors. e.g. J=2:check that INFLD has ; a numeric value, J=4:see if IN7S is nil. |
|
| INSPRNT(INSENS,INALL) | ;Print the data
|
|
| INW(INTOP) | ;Write the Data
; Inputs: ; INTOP = flag, 1 = check if new page needed ; INDATA = input print data ; Outputs: ; DUOUT = returns an exit request when user "^" out ; INDATA = reset to """ """ |
| Name | Field # of Occurrence |
|---|---|
| $$CR^UTSRD | PHEADER+27 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | INSPRNT+46, INSPRNT+47, INSPRNT+66, INSPRNT+67 |
| ^DIC - [#1] | INSPRNT+45, INSPRNT+65 |
| ^INTHL7F - [#4012] | INSPRNT+51, INSPRNT+70 |
| ^INTHL7M - [#4011] | INSPRNT+53, INSPRNT+72 |
| ^INTHL7S - [#4010] | INSPRNT+52, INSPRNT+71 |
| ^UTILITY("INHMGD" | INERS+10* |
| Name | Line Occurrences |
|---|---|
| $$INERS | INSPRNT+51, INSPRNT+52, INSPRNT+53, INSPRNT+62, INSPRNT+63, INSPRNT+70, INSPRNT+71, INSPRNT+72 |
| INW | INSPRNT+55, INSPRNT+74 |
| PHEADER | INSPRNT+48, INSPRNT+68, INW+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DUOUT | INSPRNT+43, INSPRNT+44, INSPRNT+50, INSPRNT+61, INW+8, PHEADER+27* |
| IN7F | INSPRNT+8~, INSPRNT+51*, INSPRNT+70*, INERS+9, INERS+10 |
| IN7M | INSPRNT+8~, INSPRNT+53*, INSPRNT+72*, INERS+9, INERS+10 |
| IN7S | INSPRNT+8~, INSPRNT+52*, INSPRNT+71*, INERS+9, INERS+10 |
| INALL | INSPRNT~, INSPRNT+42, INSPRNT+58 |
| IND | INSPRNT+8~ |
| IND( | INSPRNT+54, INSPRNT+55, INSPRNT+73, INSPRNT+74 |
| IND(1 | INSPRNT+22*, INSPRNT+27*, INSPRNT+31* |
| IND(2 | INSPRNT+23*, INSPRNT+28* |
| >> INDATA | INSPRNT+12*, INSPRNT+55*, INSPRNT+74*, INW+14* |
| INDATAA | INSPRNT+8~ |
| >> INERN | INERS+9* |
| INFIL | INSPRNT+8~, INSPRNT+43*, INSPRNT+44, INSPRNT+45, INSPRNT+46, INSPRNT+47, INSPRNT+49, INSPRNT+50, INSPRNT+62*, INSPRNT+64 , INSPRNT+65, INSPRNT+66, INSPRNT+67, INSPRNT+69, INERS+9, INERS+10 |
| INFILT | INSPRNT+8~, INSPRNT+45*, INSPRNT+46*, INSPRNT+65*, INSPRNT+66* |
| INFLD | INSPRNT+8~, INSPRNT+44*, INSPRNT+47, INSPRNT+49, INSPRNT+50, INSPRNT+63*, INSPRNT+64, INSPRNT+67, INSPRNT+69, INERS+9 , INERS+10 |
| INFLDT | INSPRNT+8~, INSPRNT+47*, INSPRNT+67* |
| INFSO | INSPRNT+9~, INSPRNT+59*, INSPRNT+64, INSPRNT+69* |
| >> ING | INW+14, PHEADER+31, PHEADER+35 |
| INH | INSPRNT+9~ |
| INH(1 | INSPRNT+15* |
| INH(2 | INSPRNT+16* |
| INH(3 | INSPRNT+17* |
| INHDR | INSPRNT+9~, INSPRNT+48, INSPRNT+68, INW+12, PHEADER~, PHEADER+14 |
| INHDR( | PHEADER+15*, PHEADER+30, PHEADER+31, PHEADER+34, PHEADER+35 |
| INHDR(1 | INSPRNT+34* |
| INHDR(10 | PHEADER+16* |
| INHDR(2 | INSPRNT+35* |
| INHDR(3 | INSPRNT+36* |
| INHDR(4 | INSPRNT+37* |
| INIOM2 | INSPRNT+9~ |
| INIOM3 | INSPRNT+9~ |
| INJ | INSPRNT+9~, INSPRNT+54*, INSPRNT+55, INSPRNT+73*, INSPRNT+74 |
| INK | PHEADER+13~, PHEADER+15*, PHEADER+30~*, PHEADER+31, PHEADER+34~*, PHEADER+35 |
| INLN | PHEADER~, PHEADER+19*, PHEADER+22*, PHEADER+26, PHEADER+30, PHEADER+34 |
| INMAX | INSPRNT+9~ |
| >> INPAGE | PHEADER+19, PHEADER+26* |
| INQ | INSPRNT+8~, INSPRNT+49*, INSPRNT+50*, INSPRNT+51, INSPRNT+52, INSPRNT+53, INSPRNT+60*, INSPRNT+61*, INSPRNT+62, INSPRNT+63 , INSPRNT+70, INSPRNT+71, INSPRNT+72, INERS+8~, INERS+9*, INERS+10, INERS+11 |
| INSENS | INSPRNT~, INSPRNT+75! |
| INSENS( | INSPRNT+43, INSPRNT+44 |
| INSENS(0 | INSPRNT+42 |
| INTOP | INW~, INW+9*, INW+12 |
| INWAIT | INSPRNT+9~ |
| IO | INSPRNT+11, PHEADER+27 |
| IO("Q" | PHEADER+26 |
| IO(0 | PHEADER+27 |
| IOF | PHEADER+30 |
| IOM | INSPRNT+21, INSPRNT+26 |
| IOSL | INW+12, PHEADER+22 |
| IOST | PHEADER+26 |
| J | INERS~, INERS+9 |
| U | INSPRNT+45, INSPRNT+46, INSPRNT+47, INSPRNT+51, INSPRNT+52, INSPRNT+53, INSPRNT+65, INSPRNT+66, INSPRNT+67, INSPRNT+70 , INSPRNT+71, INSPRNT+72, INERS+10 |