Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: .312

Package: VA FileMan

KEY(#.31)-->.312

Sub-Field: .312


Information

Parent File Name Number Package
KEY(#.31) FIELD .312 VA FileMan

Details

Field # Name Loc Type Details
.01 FIELD 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  D ITFLD^DIKKDD I $D(X) K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  JUN 11, 1998
  • HELP-PROMPT:  Answer must be 1-20 characters in length. Answer '??' for more help.
  • DESCRIPTION:  
    Answer must be the number of one of this key's fields.
  • EXECUTABLE HELP:  D EHFLD^DIKKDD
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  .312^B
    1)= S ^DD("KEY",DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^DD("KEY",DA(1),2,"B",$E(X,1,30),DA)
    3)= LETS DEVELOPER PICK KEY FIELDS BY NUMBER
    The B index, on the .01 (Field) of the Fields multiple, lets the developer pick key fields by field number.
  • CROSS-REFERENCE:  ^^TRIGGER^.312^.02
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^DD("KEY",D0,2,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y X ^DD(.312,.01,1,2,1.1) X ^DD(.312,.01,1,2,1.4)
    1.1)= S X=DIV S X=$P(^DD("KEY",DA(1),0),U)
    1.4)= S DIH=$S($D(^DD("KEY",DIV(0),2,DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,2)=DIV,DIH=.312,DIG=.02 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= S X=$P(^DD("KEY",DA(1),0),U)
    DELETE VALUE)= NO EFFECT
    FIELD)= FILE
  • RECORD INDEXES:  BB (#.31201), F (#.31202) (WHOLE FILE #.31), S (#.31203)
.02 FILE 0;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."8N.N) X
  • LAST EDITED:  SEP 08, 1998
  • HELP-PROMPT:  Type a Number between 0 and 999999999999, 7 Decimal Digits. Answer '??' for more help.
  • DESCRIPTION:  
    Answer must be the number of the file that holds this key field. It must equal the number of the file whose records are uniquiely identified by this key.
    UNEDITABLE
  • NOTES:  TRIGGERED by the FIELD field of the FIELD sub-field of the KEY File
  • RECORD INDEXES:  BB (#.31201), F (#.31202) (WHOLE FILE #.31), S (#.31203)
1 SEQUENCE NUMBER 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>125)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 11, 1998
  • HELP-PROMPT:  Answer must be between 1 and 125, with no decimal digits. Answer '??' for more help.
  • DESCRIPTION:  Answer will determine the order in which this field appears within the key. This affects the order of prompts, subscripts, and returned values throughout FileMan. The first field of every key should receive sequence
    number 1, the second 2, and so on.
  • RECORD INDEXES:  S (#.31203)
Info |  Details