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

Package: Kernel

OPTION(#19)-->19.392

Sub-Field: 19.392


Information

Parent File Name Number Package
OPTION(#19) QUEUING REQUIRED 19.392 Kernel

Details

Field # Name Loc Type Details
.01 TIME PERIOD 0;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9)!'(X?4N1"-"4N) X
  • LAST EDITED:  DEC 03, 1990
  • HELP-PROMPT:  Enter time period as NNNN-NNNN (e.g., 0800-1630)
  • DESCRIPTION:  
    This field is used to specify a time period for the days of the week specified in field .02 during which the option may be run, but output must be queued to a time outside the dates and times specified.
  • CROSS-REFERENCE:  19.392^B
    1)= S ^DIC(19,DA(1),3.92,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(19,DA(1),3.92,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^19^3.93
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^DIC(19,D0,0)):^(0),1:"") S X=$P(Y(1),U,18),X=X S DIU=X K Y S X=DIV S X="1" X ^DD(19.392,.01,1,2,1.4)
    1.4)= S DIH=$S($D(^DIC(19,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,18)=DIV,DIH=19,DIG=3.93 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(0)=X I $O(^DIC(19,DA(1),3.92,0))=DA,$O(^(DA))'>0 I X S X=DIV S Y(1)=$S($D(^DIC(19,D0,0)):^(0),1:"") S X=$P(Y(1),U,18),X=X S DIU=X K Y S X="" X ^DD(19.392,.01,1,2,2.4)
    2.4)= S DIH=$S($D(^DIC(19,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,18)=DIV,DIH=19,DIG=3.93 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    3)= Output restrictions won't work if deleted.
    CREATE VALUE)= "1"
    DELETE CONDITION)= I $O(^DIC(19,DA(1),3.92,0))=DA,$O(^(DA))'>0
    DELETE VALUE)= ""
    DIC)=
    FIELD)= OUTPUT
    This cross-reference sets a flag in the 0th node of the option when output restrictions are in effect.  $P(XQY0,U,18) will be 1 if there are restrictions, and null if there are not.  This flag is used by TaskMan to see
    if queueing is required in ^%ZTLOAD.
.02 DAY(S) FOR TIME PERIOD 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<2) X
  • LAST EDITED:  JAN 25, 1990
  • HELP-PROMPT:  No Entry indicates all days, or enter 2 letter day, MO, or days separated by commas MO,WE,FR or range of days MO-FR for inclusive range (Monday through Friday)
  • DESCRIPTION:  
    This field is used to specify one or more specific days of the week when the option must be queued to a time outside those specified in the .01 field.
Info |  Details |  All