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: 404.9875

Package: Scheduling

SCHEDULING CONVERSION SPECIFICATION TEMPLATE(#404.98)-->404.9875

Sub-Field: 404.9875

Information

Parent File	Name	Number	Package
SCHEDULING CONVERSION SPECIFICATION TEMPLATE(#404.98)	EVENT LOG	404.9875	Scheduling

Details

Field #	Name	Loc	Type	Details
.01	EVENT DATE/TIME	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 20, 1998` DESCRIPTION: `This field contains the date/time the event was logged.` `UNEDITABLE` CROSS-REFERENCE: `404.9875^B` `1)= S ^SD(404.98,DA(1),"E","B",$E(X,1,30),DA)=""` `2)= K ^SD(404.98,DA(1),"E","B",$E(X,1,30),DA)` `This cross-reference allows look-up by event date/time.` CROSS-REFERENCE: `404.9875^AID^MUMPS` `1)= S ^SD(404.98,DA(1),"E","AID",-X,DA)=""` `2)= K ^SD(404.98,DA(1),"E","AID",-X,DA)` `This cross-reference is sorted by the following:` `^SD(404.98,<1>,"E","AID",<2>,<3>) where the subscripts are the following:` `Subscript Description` `--------- -----------` `<1> CST number then by` `<2> Inverse Event date/time` `<3> Internal entry number in the EVENT sub-file` CROSS-REFERENCE: `404.9875^AEV^MUMPS` `1)= S:$P(^SD(404.98,DA(1),"E",DA,0),U,2)&($P(^(0),U,3)'="") ^SD(404.98,DA(1),"E","AEV",X,$P(^(0),U,3),+$P(^(0),U,2),DA)=""` `2)= K ^SD(404.98,DA(1),"E","AEV",X,$P(^SD(404.98,DA(1),"E",DA,0),U,3),+$P(^(0),U,2),DA)` `This multiple field cross-reference is subcripted as follows:` `^SD(404.98,<1>,"E","AEV",<2>,<3>,<4>,<5>)` `Subscript Description` `--------- -----------` `<1> CST number` `<2> Event date/time` `<3> Event` `<4> Status` `<5> Internal entry number of EVENT sub-file entry`
.02	STATUS	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR PENDING; '2' FOR STARTED; '3' FOR STOPPED; '4' FOR RE-STARTED; '5' FOR COMPLETED; '6' FOR QUEUED; '7' FOR CANCELED; LAST EDITED: `MAR 02, 1998` DESCRIPTION: `This field contains the event status.` `UNEDITABLE` CROSS-REFERENCE: `404.9875^AEV1^MUMPS` `1)= S:$P(^SD(404.98,DA(1),"E",DA,0),U,3)'="" ^SD(404.98,DA(1),"E","AEV",$P(^(0),U),$P(^(0),U,3),X,DA)=""` `2)= K ^SD(404.98,DA(1),"E","AEV",$P(^SD(404.98,DA(1),"E",DA,0),U),$P(^(0),U,3),X,DA)` `This multiple field cross-reference is subcripted as follows:` `^SD(404.98,<1>,"E","AEV",<2>,<3>,<4>,<5>)` `Subscript Description` `--------- -----------` `<1> CST number` `<2> Event date/time` `<3> Event` `<4> Status` `<5> Internal entry number of EVENT sub-file entry` CROSS-REFERENCE: `^^TRIGGER^404.98^.07` `1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SD(404.98,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV S X=X X ^DD(404.9875,.02,1,2,1.4)` `1.4)= S DIH=$S($D(^SD(404.98,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=404.98,DIG=.07 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SD(404.98,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X="" X ^DD(404.9875,.02,1,2,2.4)` `2.4)= S DIH=$S($D(^SD(404.98,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=404.98,DIG=.07 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `CREATE VALUE)= S X=X` `DELETE VALUE)= @` `FIELD)= LAST LOG EVENT ACTION`
.03	EVENT	0;3	SET	'0' FOR ESTIMATE; '1' FOR CONVERT; '2' FOR RE-CONVERT; '3' FOR CANCEL; LAST EDITED: `OCT 08, 1998` DESCRIPTION: `This field contains the requested event which is determined by the system.` `UNEDITABLE` CROSS-REFERENCE: `404.9875^AEV2^MUMPS` `1)= S:$P(^SD(404.98,DA(1),"E",DA,0),U,2) ^SD(404.98,DA(1),"E","AEV",$P(^(0),U),X,+$P(^(0),U,2),DA)=""` `2)= K ^SD(404.98,DA(1),"E","AEV",$P(^SD(404.98,DA(1),"E",DA,0),U),X,+$P(^(0),U,2),DA)` `This multiple field cross-reference is subcripted as follows:` `^SD(404.98,<1>,"E","AEV",<2>,<3>,<4>,<5>)` `Subscript Description` `--------- -----------` `<1> CST number` `<2> Event date/time` `<3> Event` `<4> Status` `<5> Internal entry number of EVENT sub-file entry`
50	COMMENT	C;0	WORD-PROCESSING #404.98755	DESCRIPTION: `This field contains any comments related to the event.` LAST EDITED: `MAY 19, 1995`