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

Print Page as PDF

Sub-Field: 554.03

Package: CMOP

CMOP OPERATIONS(#554)-->554.03

Sub-Field: 554.03

Information

Parent File	Name	Number	Package
CMOP OPERATIONS(#554)	RELEASE DATA	554.03	CMOP

Details

Field #	Name	Loc	Type	Details
.01	RELEASE DATA	0;1	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 19, 1995` DESCRIPTION: `This is the date/time the Vendor Release Data mail message was created.` CROSS-REFERENCE: `554.03^B` `1)= S ^PSX(554,DA(1),3,"B",$E(X,1,30),DA)=""` `2)= K ^PSX(554,DA(1),3,"B",$E(X,1,30),DA)`
1	MESSAGE NUMBER	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUL 19, 1995` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `This is the mail message number of the message containing the Vendor Release Data message that returned data to the medical center.` CROSS-REFERENCE: `554^AC^MUMPS` `1)= S:X'="" ^PSX(554,"AC",X,DA)=""` `2)= K ^PSX(554,"AC",X,DA)` `This cross reference lists the outstanding Vendor Release Data messages.`
2	FACILITY	0;3	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>9!($L(X)<1) X` LAST EDITED: `JUL 19, 1995` HELP-PROMPT: `Answer must be 1-9 characters in length.` DESCRIPTION: `This is the facility number of the medical center.` CROSS-REFERENCE: `554^AF^MUMPS` `1)= S:X'="" ^PSX(554,"AF",X,DA)=""` `2)= K ^PSX(554,"AF",X,DA)` `This cross reference lists the facilities that have outstanding Vendor Release Data mail messages.`
3	ACKNOWLEDGEMENT MESSAGE NUMBER	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUL 19, 1995` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `This is the message number of the mail message containing the release data acknowledgement for the Vendor Release Data message.`
4	ACK MESSAGE DATE/TIME	0;5	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 19, 1995` DESCRIPTION: `This is the date/time the Release Data Acknowledgement message was received. This date/time is the time that the message began filing.`
5	TOTAL RX'S	0;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 19, 1995` HELP-PROMPT: `Type a Number between 1 and 99999999, 0 Decimal Digits` DESCRIPTION: `This is the number of Rx's in the Vendor Release Data mail message.`
6	COMPLETED DATE/TIME	0;7	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 03, 1995` DESCRIPTION: `This is the date/time the Release Data Acknowledgement completed filing.`