Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^IVM(301.6

Package: Income Verification Match

Global: ^IVM(301.6

Information

FileMan FileNo	FileMan Filename	Package
301.6	IVM TRANSMISSION LOG	Income Verification Match

Description

This file contains a log of all IVM transmissions that have occurred at the medical center. The data in this file is maintained by the IVM software module and should not be altered. Per VHA Directive 10-93-142, this file definition should not be modified.

Directly Accessed By Routines, Total: 16

Package	Total	Routines
Income Verification Match	13	IVM2034Z IVMLERR1 IVMPINS IVMPREC1 IVMPTRN3 IVMPTRN4 IVMRNQ IVMRTSR IVMTLOG IVMUPUR IVMYZ1 IVMYZ3 ^IVM(301.6
Automated Medical Information Exchange	1	DVBA23P

Accessed By FileMan Db Calls, Total: 6

Package	Total	Routines
Income Verification Match	5	IVMPTRN3 IVMTLOG IVMUPUR IVMYZ1 IVMYZ3
Automated Medical Information Exchange	1	DVBA23P

Pointer To FileMan Files, Total: 2

Package	Total	FileMan Files
Enrollment Application System	1	MEANS TEST STATUS(#408.32)[1.01]
Income Verification Match	1	IVM PATIENT(#301.5)[.01]

Fields, Total: 12

Field #	Name	Loc	Type	Details
.01	IVM PATIENT	0;1	POINTER TO IVM PATIENT FILE (#301.5)	**********************REQUIRED FIELD********************** IVM PATIENT(#301.5) LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Enter the pointer to the IVM PATIENT file corresponding to the patient and income year being transmitted to the IVM Center.` DESCRIPTION: `Enter the name of the IVM patient for which this transmission occurred. This is a pointer to the IVM PATIENT file.` CROSS-REFERENCE: `301.6^B` `1)= S ^IVM(301.6,"B",$E(X,1,30),DA)=""` `2)= K ^IVM(301.6,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `301.6^AEPS2^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),U,6)&($P(^(0),U,7)) ^IVM(301.6,"AEPS",+$P(^(0),U,6),+$P(^(0),U,7),X,DA)=""` `2)= K ^IVM(301.6,"AEPS",+$P(^IVM(301.6,DA,0),U,6),+$P(^(0),U,7),X,DA)` `This cross-reference can be used to sort by date received by error processing status by patient by internal entry number.`
.02	TRANSMISSION DATE/TIME	0;2	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUN 10, 1994` HELP-PROMPT: `Enter the date/time on which this transmission occurred.` DESCRIPTION: `This field contains the date/time that data for the IVM PATIENT was transmitted to the IVM Center.` CROSS-REFERENCE: `301.6^ADT` `1)= S ^IVM(301.6,"ADT",$E(X,1,30),DA)=""` `2)= K ^IVM(301.6,"ADT",$E(X,1,30),DA)` `This cross-reference will store the date/time of each transmission to the IVM Center.` CROSS-REFERENCE: `301.6^AB^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),"^",3)=0 ^IVM(301.6,"AB",X,DA)=""` `2)= K ^IVM(301.6,"AB",X,DA)` `This cross-reference is used in conjunction with the AB cross-reference on the STATUS (.03) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and no` `acknowledgement has been received) by transmitted date/time.` CROSS-REFERENCE: `301.6^AC^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),"^",3)>1 ^IVM(301.6,"AC",$P(^(0),"^",3),X,DA)=""` `2)= K ^IVM(301.6,"AC",+$P(^IVM(301.6,DA,0),"^",3),X,DA)` `This cross-reference is used in conjunction with the AC cross-reference of the STATUS (.03) field to cross-reference transmitted messages with a status of 2 (re-transmitted) or 3 (error in transmitted record) by status` `and transmitted date/time.`
.03	STATUS	0;3	SET	'1' FOR RECEIVED; '0' FOR TRANSMITTED; '2' FOR RE-TRANSMITTED; '3' FOR ERROR IN TRANSMITTED RECORD; LAST EDITED: `SEP 09, 1994` HELP-PROMPT: `Enter 0 if transmitted to IVM Center. Enter 1 if transmission received by IVM Center. Enter 2 if re-transmitted to IVM Center. Enter 3 if error in transmission to IVM Center.` DESCRIPTION: `This field will contain a 0 if the record has transmitted to the IVM Center. It will contain a 1 if acknowledgement of the transmission has has been received from the IVM Center. It will contain a 2 if record` `re-transmitted to the IVM Center. It will contain a 3 if error in record received by the IVM Center.` CROSS-REFERENCE: `301.6^AB1^MUMPS` `1)= I X=0,$P(^IVM(301.6,DA,0),"^",2) S ^IVM(301.6,"AB",$P(^(0),"^",2),DA)=""` `2)= K ^IVM(301.6,"AB",+$P(^IVM(301.6,DA,0),"^",2),DA)` `This cross-reference is used in conjunction with the AB cross-reference on the TRANSMISSION DATE/TIME (.02) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and` `no acknowledgement has been received) by transmitted date/time.` CROSS-REFERENCE: `301.6^AC1^MUMPS` `1)= I X>1,$P(^IVM(301.6,DA,0),"^",2) S ^IVM(301.6,"AC",X,$P(^(0),"^",2),DA)=""` `2)= K ^IVM(301.6,"AC",X,+$P(^IVM(301.6,DA,0),"^",2),DA)` `This cross-reference is used in conjunction with the AC cross-reference of the TRANSMISSION DATE/TIME (.02) field to cross-reference transmitted messages with a status of 2 (re-transmitted) or 3 (error in transmitted` `record) by status and transmission date/time..` CROSS-REFERENCE: `301.6^ADS1^MUMPS` `1)= I X=0,$P(^IVM(301.6,DA,0),"^",5) S ^IVM(301.6,"ADS",$P(^(0),"^",5),DA)=""` `2)= I $G(DATA(.03))'=2 I $P(^IVM(301.6,DA,0),"^",5)]"" K ^IVM(301.6,"ADS",$P(^(0),"^",5),DA)` `This cross-reference is used in conjunction with the ADS cross-reference on the MESSAGE CONTROL ID (.05) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and no` `acknowledgement has been received) by message control id.` CROSS-REFERENCE: `301.6^AE1^MUMPS` `1)= I X=0,$P($P(^IVM(301.6,DA,0),"^",5),"-")]"" S ^IVM(301.6,"AE",$P($P(^(0),"^",5),"-"),DA)=""` `2)= I $P($P(^IVM(301.6,DA,0),"^",5),"-")]"" K ^IVM(301.6,"AE",$P($P(^(0),"^",5),"-"),DA)` `This cross-reference is used in conjunction with the AE cross-reference on the MESSAGE CONTROL ID (.05) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and` `acknowledgement has been received) by the first "-" piece of the message control id. This is actually the original message control id, before the batch counter was appended to it.`
.04	ERROR MESSAGE	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<3) X` LAST EDITED: `DEC 30, 1993` HELP-PROMPT: `Error message for erroneous record received by the IVM Center.` DESCRIPTION: `When STATUS field is 3 (error in transmitted record) this field will contain the error message received from the IVM Center.`
.05	MESSAGE CONTROL ID	0;5	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>18!($L(X)<1) X` LAST EDITED: `SEP 22, 1997` HELP-PROMPT: `Answer must be 1-18 characters in length.` DESCRIPTION: `This field contains the Message Control ID of the HL7 message used to transmit the Means Test data to the IVM Center. Most transmissions are submitted in batch, and the batch record counter is concatenated to the Message` `Control ID in those cases. This extended string would then be filed in this field. An example of a Message Control ID with a concatenated batch record counter is '2940501.010213-25'.` CROSS-REFERENCE: `301.6^ADS^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),"^",3)=0 ^IVM(301.6,"ADS",X,DA)=""` `2)= K ^IVM(301.6,"ADS",X,DA)` `This cross-reference is used in conjunction with the ADS cross-reference on the STATUS (.03) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and no` `acknowledgement has been received) by message control id.` CROSS-REFERENCE: `301.6^AE^MUMPS` `1)= I $P(^IVM(301.6,DA,0),"^",3)=0,$P(X,"-")]"" S ^IVM(301.6,"AE",$P(X,"-"),DA)=""` `2)= I $P(X,"-")]"" K ^IVM(301.6,"AE",$P(X,"-"),DA)` `This cross-reference is used in conjunction with the AE1 cross-reference on the STATUS (.03) field to cross-reference transmitted messages with a status of 0 (indicating transmission to the IVM Center and no` `acknowledgement has been received) by the first "-" piece of the message control id. This is actually the original message control id, before the batch counter was appended to it.`
.06	DATE/TIME ACK RECEIVED	0;6	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Enter the date and time the acknowledgment was received.` DESCRIPTION: `Used to record the date and time that an acknowledgment was received.` CROSS-REFERENCE: `301.6^AEPS1^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),U,7) ^IVM(301.6,"AEPS",X,+$P(^(0),U,7),+$P(^(0),U),DA)=""` `2)= K ^IVM(301.6,"AEPS",X,+$P(^IVM(301.6,DA,0),U,7),+$P(^(0),U),DA)` `This cross-reference can be used to sort by date received by error processing status by patient by internal entry number.`
.07	ERROR PROCESSING STATUS	0;7	SET	'1' FOR NEW; '2' FOR CHECKED; LAST EDITED: `SEP 30, 1997` HELP-PROMPT: `If the acknowledgment indicated an error, this field is used to track the processing of the error.` DESCRIPTION: `Used to track the processing of the error by the local site. Only applies if the acknowledgment was returned with an error message.` CROSS-REFERENCE: `301.6^AEPS^MUMPS` `1)= S:$P(^IVM(301.6,DA,0),U,6) ^IVM(301.6,"AEPS",+$P(^(0),U,6),X,+$P(^(0),U),DA)=""` `2)= K ^IVM(301.6,"AEPS",+$P(^IVM(301.6,DA,0),U,6),X,+$P(^(0),U),DA)` `This cross-reference can be used to sort by date received by error processing status by patient by internal entry number.`
1.01	MEANS TEST STATUS	1;1	POINTER TO MEANS TEST STATUS FILE (#408.32)	**********************REQUIRED FIELD********************** MEANS TEST STATUS(#408.32) LAST EDITED: `MAY 10, 1993` HELP-PROMPT: `Enter the patient's means test status at the time of transmission.` DESCRIPTION: `This field will contain the means test status of the patient's means test for the given year at the time of the transmission. This data is entered automatically by the IVM transmission software and should not be edited.`
1.02	INSURANCE STATUS	1;2	SET	**********************REQUIRED FIELD********************** '1' FOR HAS ACTIVE INSURANCE; '0' FOR DOES NOT HAVE ACTIVE INSURANCE; LAST EDITED: `MAY 10, 1993` HELP-PROMPT: `Enter the patient's insurance status at the time of this transmission.` DESCRIPTION: `This field will contain a 1 if the patient had active insurance at the time this data was transmitted to the IVM Center. If the patient did not have active insurance at the time, a 0 will be transmitted.` `This data is updated automatically by the IVM transmission software and should not be edited.`
30.01	IVM EVENT	E;1	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `SEP 09, 1997` HELP-PROMPT: `Was the transmission made due to an IVM event?` DESCRIPTION: `This indicates whether or not the transmission was made due to an IVM event.`
30.02	DCD EVENT	E;2	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `SEP 09, 1997` HELP-PROMPT: `Was transmission made due to a DCD event?` DESCRIPTION: `This indicates whether or not transmissin was made due to a DCD event.`
30.03	ENROLLMENT EVENT	E;3	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `SEP 09, 1997` HELP-PROMPT: `Was transmission made due to an enrollment event?` DESCRIPTION: `Used to indicate whether or not transmission was made due to an enrollment event.`

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #2604	Automated Medical Information Exchange		^IVM(301.6,"B" is used to determine which IVMTRANSMISSION LOG file entries, if any, should be deleted.When applying conditions are met the entry will bedeleted using a DIK call.

External References

Name	Field # of Occurrence
^%DT	.02+1, .06+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IVM(301.6 - [#301.6]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K) , .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .03(XREF 3S), .03(XREF 3K), .03(XREF 4S), .03(XREF 4K), .05(XREF 1S), .05(XREF 1K) , .05(XREF 2S), .05(XREF 2K), .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^(0	ID.02+1, .01(XREF 2S), .01(XREF 2K), .02(XREF 3S), .03(XREF 1S), .03(XREF 2S), .03(XREF 3S), .03(XREF 3K), .03(XREF 4S), .03(XREF 4K) , .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.02+1, .06+1
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K) , .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .03(XREF 3S), .03(XREF 3K), .03(XREF 4S), .03(XREF 4K), .05(XREF 1S), .05(XREF 1K) , .05(XREF 2S), .05(XREF 2K), .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K)
>> DATA(	.03(XREF 3K)
U	ID.02+1, .01(XREF 2S), .01(XREF 2K), .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K)
X	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1!, .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S) , .02(XREF 3K), .03(XREF 1S), .03(XREF 2S), .03(XREF 2K), .03(XREF 3S), .03(XREF 4S), .04+1!, .05+1!, .05(XREF 1S), .05(XREF 1K) , .05(XREF 2S), .05(XREF 2K), .06+1!, .06(XREF 1S), .06(XREF 1K), .07(XREF 1S), .07(XREF 1K)
>> Y	.02+1, .06+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All