Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
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.







    



Info | 
Details | 
All