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

Package: Outpatient Pharmacy

EPHARMACY SITE PARAMETERS(#52.86)-->52.8651

Sub-Field: 52.8651


Information

Parent File Name Number Package
EPHARMACY SITE PARAMETERS(#52.86) TRANSFER REJECT CODE 52.8651 Outpatient Pharmacy

Details

Field # Name Loc Type Details
.01 TRANSFER REJECT CODE 0;1 POINTER TO BPS NCPDP REJECT CODES FILE (#9002313.93) BPS NCPDP REJECT CODES(#9002313.93)

  • LAST EDITED:  MAY 28, 2013
  • HELP-PROMPT:  Enter a third party claim reject code.
  • DESCRIPTION:  
    This field identifies a Transfer Reject code defined for the selected ePharmacy Division.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  ^^TRIGGER^52.8651^2
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S:$G(DUZ) X=DUZ X ^DD(52.8651,.01,1,1,1.4)
    1.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=52.8651,DIG=2 D ^DICR
    2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S:$G(DUZ) X=DUZ X ^DD(52.8651,.01,1,1,2.4)
    2.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=52.8651,DIG=2 D ^DICR
    CREATE VALUE)= S:$G(DUZ) X=DUZ
    DELETE VALUE)= S:$G(DUZ) X=DUZ
    FIELD)= USER
    This trigger is used to set the User ID of the person who lasted edited the third party reject code.
  • CROSS-REFERENCE:  ^^TRIGGER^52.8651^3
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S %=$P($H,",",2),X=DT_(%\60#60/100+(%\3600)+(%#60/10000)/100) X ^DD(52.8651,.01,1,
    2,1.4)
    1.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=52.8651,DIG=3 D ^DICR
    2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S %=$P($H,",",2),X=DT_(%\60#60/100+(%\3600)+(%#60/10000)/100) X ^DD(52.8651,.01,1,
    2,2.4)
    2.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=52.8651,DIG=3 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= DATE
    Trigger to set the DATE OF LAST UPDATE field when a third party reject code is entered.
  • CROSS-REFERENCE:  52.8651^B
    1)= S ^PS(52.86,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^PS(52.86,DA(1),1,"B",$E(X,1,30),DA)
1 AUTO SEND 0;2 SET
************************REQUIRED FIELD************************
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 19, 2013
  • HELP-PROMPT:  Enter Yes for auto update or No for requires OPECC intervention.
  • DESCRIPTION:  Enter YES to allow the Third Party claim reject code to be automatically placed on the Pharmacy Reject Worklist or NO to require Outpatient Pharmacy Electronic Claims Coordinator (OPECC) intervention to do so. A null
    value will be treated the same as entering NO in this field.
  • CROSS-REFERENCE:  ^^TRIGGER^52.8651^2
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S:$G(DUZ) X=DUZ X ^DD(52.8651,1,1,1,1.4)
    1.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=52.8651,DIG=2 D ^DICR
    2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S:$G(DUZ) X=DUZ X ^DD(52.8651,1,1,1,2.4)
    2.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=52.8651,DIG=2 D ^DICR
    CREATE VALUE)= S:$G(DUZ) X=DUZ
    DELETE VALUE)= S:$G(DUZ) X=DUZ
    FIELD)= USER
    This trigger is used to set the User ID of the person who lasted edited the AUTO SEND field.
  • CROSS-REFERENCE:  ^^TRIGGER^52.8651^3
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S %=$P($H,",",2),X=DT_(%\60#60/100+(%\3600)+(%#60/10000)/100) X ^DD(52.8651,1,1,2,
    1.4)
    1.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=52.8651,DIG=3 D ^DICR
    2)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^PS(52.86,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S %=$P($H,",",2),X=DT_(%\60#60/100+(%\3600)+(%#60/10000)/100) X ^DD(52.8651,1,1,2,
    2.4)
    2.4)= S DIH=$G(^PS(52.86,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=52.8651,DIG=3 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= DATE
    This trigger is used to set the date that the AUTO SEND field was lasted updated.
2 USER 0;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 28, 2013
  • HELP-PROMPT:  Enter the User who entered or edited the Third Party reject code information.
  • DESCRIPTION:  
    This is the user who last updated the TRANSFER REJECT CODE (#.01) field or the AUTO SEND (#1) field.
    WRITE AUTHORITY:^
  • NOTES:  TRIGGERED by the TRANSFER REJECT CODE field of the TRANSFER REJECT CODE sub-field of the EPHARMACY SITE PARAMETERS File
    TRIGGERED by the AUTO SEND field of the TRANSFER REJECT CODE sub-field of the EPHARMACY SITE PARAMETERS File
3 DATE OF LAST UPDATE 0;4 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 19, 2013
  • HELP-PROMPT:  Enter date and time Third Party reject code information was last updated.
  • DESCRIPTION:  
    This is the date/time that the TRANSFER REJECT CODE (#.01) field or the AUTO SEND (#1) field was added or updated.
  • TECHNICAL DESCR:  
    This field provides an audit of the date/time the TRANSFER REJECT CODE (#.01) field or the AUTO SEND (#1) field was last updated.
    WRITE AUTHORITY:^
  • NOTES:  TRIGGERED by the TRANSFER REJECT CODE field of the TRANSFER REJECT CODE sub-field of the EPHARMACY SITE PARAMETERS File
    TRIGGERED by the AUTO SEND field of the TRANSFER REJECT CODE sub-field of the EPHARMACY SITE PARAMETERS File
Info |  Details |  All