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

Package: Lexicon Utility

MAPPINGS(#757.33)-->757.333

Sub-Field: 757.333


Information

Parent File Name Number Package
MAPPINGS(#757.33) STATUS HISTORY 757.333 Lexicon Utility

Details

Field # Name Loc Type Details
.01 EFFECTIVE DATE 0;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JUL 26, 2012
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    This is the date that the status was effective.
  • CROSS-REFERENCE:  757.333^B
    1)= S ^LEX(757.33,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^LEX(757.33,DA(1),2,"B",$E(X,1,30),DA)
    ^LEX(757.33,IEN,2,"B",EFF,HIS) - Where IEN is the Internal Entry Number for the Mapping, EFF is the Effective Date of the Mapping and HIS is the Internal Entry Number where the Effective Date is stored in the Status
    Histroy sub-file 757.333.
  • RECORD INDEXES:  ACT (#1463) (WHOLE FILE #757.33), AMAPS (#1465) (WHOLE FILE #757.33), G (#1470) (WHOLE FILE #757.33)
1 STATUS 0;2 SET
  • '0' FOR INACTIVE;
  • '1' FOR ACTIVE;

  • LAST EDITED:  JUL 26, 2012
  • HELP-PROMPT:  Select Status (Active or Inactive)
  • DESCRIPTION:  
    This is the status (active or inactive) of the mapping.
  • FIELD INDEX:  ACHGD (#1471) MUMPS IR ACTION
    Short Descr: Change Date
    Description: The purpose of this action is to populate the CHANGE DATE field #2 of the STATUS HISTORY sub-file #757.333 with the current date and time whenever a status (active or inactive) is added or edited.
    Set Logic: S $P(^LEX(757.33,+($G(DA(1))),2,+($G(DA)),0),U,3)=$$NOW^XLFDT
    Set Cond: S X=X1(1)'=X2(1)
    Kill Logic: Q
    X(1): STATUS (757.333,1) (Len 8) (forwards)
    Lookup Prompt: Enter Status
  • RECORD INDEXES:  ACT (#1463) (WHOLE FILE #757.33), AMAPS (#1465) (WHOLE FILE #757.33), G (#1470) (WHOLE FILE #757.33)
2 CHANGE DATE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  AUG 18, 2008
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    This field contains the timestamp for when the status is changed. It is populated by the ACHGD Cross-Reference (Action) of the STATUS field #1 of the STATUS HISTORY sub-file 757.333.
    WRITE AUTHORITY: ^
Info |  Details