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

Package: Clinical Case Registries

ROR REGISTRY RECORD(#798)-->798.02

Sub-Field: 798.02


Information

Parent File Name Number Package
ROR REGISTRY RECORD(#798) LOCAL FIELD 798.02 Clinical Case Registries

Details

Field # Name Loc Type Details
.01 LOCAL FIELD 0;1 POINTER TO ROR LOCAL FIELD FILE (#799.53) ROR LOCAL FIELD(#799.53)

  • INPUT TRANSFORM:  S Y=$P($G(^RORDATA(798,DA,0)),U,2),DIC("S")=$S(Y>0:"I $P($G(^(0)),U,3)="_Y,1:"Q") D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 18, 2005
  • DESCRIPTION:  
    This field stores a pointer to the local field definition. You can only select from the local fields associated with the registry.
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)="_$P($G(^RORDATA(798,DA,0)),U,2)
  • EXPLANATION:  Only registry-specific records can be selected.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  798^ALF
    1)= S ^RORDATA(798,"ALF",$E(X,1,30),DA(1),DA)=""
    2)= K ^RORDATA(798,"ALF",$E(X,1,30),DA(1),DA)
    3)= Do not delete!
  • FIELD INDEX:  B (#159) REGULAR IR LOOKUP & SORTING
    Unique for: Key B (#8), File #798.02
    Short Descr: Uniqueness Index for Key 'B' of Subfile #798.02
    Set Logic: S ^RORDATA(798,DA(1),20,"B",X,DA)=""
    Kill Logic: K ^RORDATA(798,DA(1),20,"B",X,DA)
    Whole Kill: K ^RORDATA(798,DA(1),20,"B")
    X(1): LOCAL FIELD (798.02,.01) (Subscr 1)
.02 DATE 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 13, 2005
  • DESCRIPTION:  
    This field stores the date associated with the registry-specific local field value.
1 COMMENT 1;E1,250 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
  • LAST EDITED:  AUG 12, 2005
  • HELP-PROMPT:  Answer must be 1-200 characters in length.
  • DESCRIPTION:  
    This field stores the comment associated with the registry-specific local field value.
Info |  Details