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

Package: Accounts Receivable

AR MEDICARE DEDUCTIBLE ALERTS PART A(#436.1)-->436.12

Sub-Field: 436.12


Information

Parent File Name Number Package
AR MEDICARE DEDUCTIBLE ALERTS PART A(#436.1) COMMENT DATE TIME 436.12 Accounts Receivable

Details

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

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  AUG 22, 2011
  • HELP-PROMPT:  Enter the date/time that the comment is being added.
  • DESCRIPTION:  
    This is the date and time that the comment was added by the user.  It is defaulted to NOW by the system when adding a comment from the MDA worklist.
  • CROSS-REFERENCE:  436.12^B
    1)= S ^PRCA(436.1,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^PRCA(436.1,DA(1),2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^436.12^.02
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PRCA(436.1,D0,2,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(436.12,.01,1,2,1.4)
    1.4)= S DIH=$G(^PRCA(436.1,DIV(0),2,DIV(1),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=436.12,DIG=.02 D ^DICR
    2)= Q
    CREATE VALUE)= S X=DUZ
    DELETE VALUE)= NO EFFECT
    FIELD)= #.02
    This trigger will insert the current user into ENTERED BY field of the COMMENT DATE TIME multiple.
.02 ENTERED BY 0;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 10, 2011
  • HELP-PROMPT:  Enter the user adding the comments.
  • DESCRIPTION:  
    This is the user who added the comments.  The field is not asked but is automatically stored when comments are entered.
    WRITE AUTHORITY:  ^
  • NOTES:  TRIGGERED by the COMMENT DATE TIME field of the COMMENT DATE TIME sub-field of the AR MEDICARE DEDUCTIBLE ALERTS PART A File
.03 FOLLOW-UP DATE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  AUG 10, 2011
  • HELP-PROMPT:  Enter the date to follow-up on this alert.
  • DESCRIPTION:  
    This is the follow-up date as determined by the user entering the comment.
2 COMMENT 1;0 WORD-PROCESSING #436.122

  • DESCRIPTION:  
    This field is for any comments that the user chooses to enter for this alert.
Info |  Details |  All