©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
INHUT5 ;JPD,KAC; 6 Feb 96 13:25;utilities
Source file <INHUT5.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | DD^%DT NOW^%DTC MUMPS^DIED ^DIM |
| IHS Generic Interface System | 1 | $$SC^INHUTIL1 |
| Uncategorized | 1 | $$CR^UTSRD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FINDRID(INSRDATA,INDEST) | ; $$function - Determine if there is a match of
; RouteID in 1st subscript of INSRDATA array ; Input: ; INSRDATA - array of RouteID nodes to be checked with Destination Route ID table ; INDEST - INTERFACE DESTINATION IEN containing list of RouteIDs to ck |
|
| RCVSCRN(INSRCTL,INSRDATA,INA,INDA) | ; Default Inbound Receiver screen.
; Provides screening logic based on minimum requirements for ; accepting a message at the Receiver process. |
|
| DATIM() | ;date/time function
; Returns: Y - Date/time |
|
| MUMPS | ; Input transform for Selective Routing M Code free text fields (SRMC).
; Customized input transform adds ability to check for application ; team code that uses argumentless Locks or Kills. |
|
| INITIALS(X) | ;Make initials from name
; Input: X (req) = name from which to extract initials ; format : LAST,FIRST MIDDLE ; Output: returns initials |
|
| RPTFOOT() | ;Report Footer
|
|
| NUM(X) | ;--Converts a string to a number
; Input - X - String ; Returns - Numeric value |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INRHD - [#4005] | FINDRID+13, RCVSCRN+46 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DATIM+2~, DATIM+3, FINDRID+10~, FINDRID+13* |
| %H | DATIM+2~ |
| %I | DATIM+2~ |
| FNDDEST | FINDRID+10~, FINDRID+13*, FINDRID+14 |
| I | NUM+3~, NUM+4* |
| INA | RCVSCRN~ |
| INDA | RCVSCRN~ |
| INDELIM | RCVSCRN+32~, RCVSCRN+37*, RCVSCRN+38 |
| INDEST | FINDRID~, FINDRID+13 |
| INRCVFAC | RCVSCRN+32~, RCVSCRN+38*, RCVSCRN+40 |
| INSRCTL | RCVSCRN~ |
| INSRCTL("INDEST" | RCVSCRN+46 |
| INSRCTL("MSH" | RCVSCRN+34, RCVSCRN+37, RCVSCRN+38 |
| INSRDATA | FINDRID~, RCVSCRN~, RCVSCRN+33!, RCVSCRN+34*, RCVSCRN+46* |
| INSRDATA( | FINDRID+13, RCVSCRN+40* |
| IOM | RPTFOOT+2 |
| IOSL | RPTFOOT+1 |
| IOST | RPTFOOT+3 |
| X | INITIALS~, INITIALS+4, NUM~, NUM+4, DATIM+2~, MUMPS+11, MUMPS+13!, MUMPS+15! |
| Y | NUM+3~, NUM+4*, NUM+5, DATIM+2~, DATIM+3*, DATIM+4 |