©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
INTSUT3 ; cmi/flag/maw - JD 13 Apr 96 21:09 INTERACTIVE TESTING II ; [ 05/22/2002 2:54 PM ]
Source file <INTSUT3.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Generic Interface System | 3 | $$LOOKUP^INHUTC1 DISPLAY^INTSUT1 UPSINGMS^INTSUT3 |
| Kernel | 1 | $$READ^%ZTF |
| Uncategorized | 1 | $$CR^UTSRD |
| VA Fileman | 1 | ^DICN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UPSINGMS(INDA,IN0,INENT) | ;Update a single entry in test message multiple
; Input: ; INDA - ien of Test Criteria ; IN0 - DIC(0) ; INENT - value to stuff |
|
| ERR | ||
| MERGE(INREQLST) | ;Merge tests into ^UTILITY GLOBAL
; Input: ; INREQLST - Array of selected messages |
|
| UPDAT2FL(INREQLST,INDA) | ;Merge to 4001.1 multiple
; Input: ; INREQLST - Array of selected messages ; INDA - ien of 4001.1 |
|
| UPDATE(INDA) | ;Update INREQLST with test messages
; Input/Output - INREQLST - Name of Utility with tests |
|
| MERGE2(INARY) | ;Merge tests into ^UTILITY GLOBAL
; Input: ; INARY - Array of selected messages |
|
| UPDTSND(INDA) | ;Update ^UTILITY("INTHU" with test messages
; Input - INDA - ien of Criteria ; Output - ^UTILITY - Name of Utility with tests |
|
| FLATNAM(INAME,INTYP) | ;Get VMS flat file name
|
|
| EXISTS(INODE0,INAME) | ;Check to see if user defined record exists
|
|
| UPDTFRUT(INDA) | ;Update ^UTILITY to 4001.1 multiple
; Input: ; ^UTILITY("DIS",$J - selected messages ; INDA - ien of 4001.1 ; Output: ; ^DIZ(4001.1,INDA,19, multiple |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(4001.1 | UPSINGMS+6 |
| ^DIZ(4001.1 - [#4001.1] | UPDAT2FL+6!, UPDAT2FL+11*, UPDAT2FL+13*, UPDTFRUT+8!, UPDATE+4, UPDATE+5, UPDTSND+5, UPDTSND+6 |
| ^INTHU - [#4001] | MERGE+8, MERGE+9, UPDAT2FL+10, UPDAT2FL+11, UPDTFRUT+12, UPDATE+8, UPDTSND+9, UPDTSND+10, UPDTSND+13! |
| ^UTILITY("DIS" | UPDATE+3!, UPDATE+8*, UPDATE+9* |
| ^UTILITY("INTHU" | MERGE+5!, MERGE+8*, MERGE+9*, MERGE+10*, MERGE2+9, MERGE2+10!, MERGE2+11*, MERGE2+12*, MERGE2+13*, UPDTFRUT+10 , UPDTFRUT+11, UPDTSND+4!, UPDTSND+9*, UPDTSND+10*, UPDTSND+11* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | UPSINGMS+5~ |
| DA(1 | UPSINGMS+7* |
| DIC | UPSINGMS+5~, UPSINGMS+6!, UPSINGMS+7* |
| DIC("P" | UPSINGMS+6* |
| DIC(0 | UPSINGMS+7* |
| DIE | UPSINGMS+5~, UPSINGMS+7* |
| DLAYGO | UPSINGMS+5~, UPSINGMS+6* |
| DONE | FLATNAM+5~*, FLATNAM+8, FLATNAM+12*, FLATNAM+20* |
| DUZ | MERGE+5, MERGE+8, MERGE+9, MERGE+10, MERGE2+9, MERGE2+10, MERGE2+11, MERGE2+12, MERGE2+13, UPDTFRUT+10 , UPDTFRUT+11, UPDTSND+4, UPDTSND+9, UPDTSND+10, EXISTS+13 |
| IN0 | UPSINGMS~, UPSINGMS+7 |
| INAME | FLATNAM~, FLATNAM+10*, FLATNAM+11*, FLATNAM+12, FLATNAM+13, FLATNAM+16*, FLATNAM+21, EXISTS~, EXISTS+10*, EXISTS+11 , EXISTS+14 |
| INARY | MERGE2~, MERGE2+6*, MERGE2+11, MERGE2+12 |
| INARY("A" | MERGE2+7, MERGE2+8 |
| INCTRL | EXISTS+7~, EXISTS+8*, EXISTS+13 |
| IND | UPDATE+2~, UPDATE+5*, UPDATE+6, UPDATE+8, UPDTSND+3~, UPDTSND+6*, UPDTSND+7, UPDTSND+9, UPDTSND+10, UPDTSND+13 |
| INDA | UPDAT2FL~, UPDAT2FL+6, UPDAT2FL+11, UPDAT2FL+13, UPDTFRUT~, UPDTFRUT+8, UPDTFRUT+13, UPDATE~, UPDATE+4, UPDATE+5 , UPSINGMS~, UPSINGMS+7, UPDTSND~, UPDTSND+5, UPDTSND+6 |
| INENT | UPSINGMS~, UPSINGMS+8, UPSINGMS+10 |
| INEXIST | MERGE2+4~, MERGE2+5*, MERGE2+9*, MERGE2+13 |
| INL | MERGE+4~, MERGE+6*, MERGE+7, MERGE+8, MERGE+9, MERGE2+4~, MERGE2+7*, MERGE2+8, MERGE2+9, MERGE2+10 , MERGE2+11, MERGE2+12, UPDAT2FL+5~, UPDAT2FL+8*, UPDAT2FL+9, UPDTFRUT+7~, UPDTFRUT+10*, UPDTFRUT+11, UPDATE+2~, UPDATE+4* , UPDATE+7*, UPDATE+8, UPDATE+9, UPDTSND+3~, UPDTSND+5*, UPDTSND+8*, UPDTSND+9, UPDTSND+10, UPDTSND+11 |
| INODE0 | EXISTS~, EXISTS+10, EXISTS+13 |
| INOPT2 | EXISTS+7~, EXISTS+14 |
| INOPT2("APP" | EXISTS+13* |
| INOPT2("CONTROL" | EXISTS+13* |
| INOPT2("DUZ" | EXISTS+13* |
| INOPT2("FUNC" | EXISTS+13* |
| INOPT2("TYPE" | EXISTS+13* |
| INREQLST | MERGE~, UPDAT2FL~ |
| INREQLST( | MERGE+6, MERGE+7, UPDAT2FL+8, UPDAT2FL+9 |
| INT | MERGE+4~, MERGE+7*, MERGE+8, MERGE+9, MERGE2+4~, MERGE2+8*, MERGE2+11, MERGE2+12, UPDAT2FL+5~, UPDAT2FL+9* , UPDAT2FL+10, UPDAT2FL+11, UPDTFRUT+7~, UPDTFRUT+11*, UPDTFRUT+12, UPDTFRUT+13, UPDATE+2~, UPDATE+4*, UPDATE+5, UPDTSND+3~ , UPDTSND+5*, UPDTSND+6 |
| INTYP | FLATNAM~, FLATNAM+6*, FLATNAM+7*, FLATNAM+10 |
| IOF | FLATNAM+9 |
| TESTNUM | MERGE+4~, MERGE+10*, MERGE2+4~, MERGE2+13*, UPDAT2FL+5~, UPDAT2FL+7*, UPDAT2FL+12*, UPDAT2FL+13, UPDTFRUT+7~, UPDTFRUT+9* |
| U | UPDAT2FL+11, UPDAT2FL+13, UPSINGMS+6, EXISTS+10, EXISTS+13 |
| X | UPSINGMS+5~, UPSINGMS+8* |
| Y | UPSINGMS+5~, UPSINGMS+10 |