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

Package: Order Entry Results Reporting

ORDER(#100)-->100.011

Sub-Field: 100.011


Information

Parent File Name Number Package
ORDER(#100) ORDER TRANSFERS 100.011 Order Entry Results Reporting

Details

Field # Name Loc Type Details
.01 TRANSFER EFF DATE 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  FEB 06, 2020
  • HELP-PROMPT:  Enter the date the transfer becomes effective.
  • DESCRIPTION:  
    This is the effective date for the transfer.
  • CROSS-REFERENCE:  100.011^B
    1)= S ^OR(100,DA(1),11,"B",$E(X,1,30),DA)=""
    2)= K ^OR(100,DA(1),11,"B",$E(X,1,30),DA)
.02 TRANSFERRED FROM 0;2 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JAN 16, 2018
  • HELP-PROMPT:  Enter the Provider that this Order is being Transferred From.
  • DESCRIPTION:  
    This is the Provider that this Order is being Transferred From.
.03 TRANSFERRED TO 0;3 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  FEB 06, 2020
  • HELP-PROMPT:  Enter in the Provider that this Order is being Transferred To.
  • DESCRIPTION:  
    This is the Provider to which this Order is being Transferred.
  • FIELD INDEX:  EPRTRDT (#1601) REGULAR IR LOOKUP & SORTING WHOLE FILE (#100)
    Short Descr: Index on TRANSFERRED TO Provider and WHEN ENTERED
    Description: This index will be used as part of the new ORQ3 EN Remote Procedure Call to speedily pick up all Orders which have already been transferred from the original Ordering Provider to one or more New Providers in the case
    where a New Provider also happens to need his or her Orders transferred to a third New Provider, then this index can then be conducive to this type of scenario. It works similar to EPRACDT Index but will utilize
    TRANSFERRED TO Provider & WHEN ENTERED to quickly bring up Orders for additional Re-Assignment (Transfer).
    Set Logic: S ^OR(100,"EPRTRDT",X(1),X(2),DA(1),DA)=""
    Kill Logic: K ^OR(100,"EPRTRDT",X(1),X(2),DA(1),DA)
    Whole Kill: K ^OR(100,"EPRTRDT")
    X(1): TRANSFERRED TO (100.011,.03) (Subscr 1) (forwards)
    X(2): Computed Code: S X=$P($G(^OR(100,DA(1),0)),"^",7)
    (Subscr 2) (forwards)
.04 TRANSFER USER 0;4 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JAN 16, 2018
  • HELP-PROMPT:  Enter in the User that performed this Order Transfer.
  • DESCRIPTION:  
    This is the User who performed the Order Transfer.
.05 ENTRY DATE/TIME 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAR 04, 2020
  • HELP-PROMPT:  (No range limit on date)
  • FIELD INDEX:  EPRTAU (#1600) REGULAR IR LOOKUP & SORTING WHOLE FILE (#100)
    Short Descr: Index for finding entries by audit date.
    Description: The purpose of this cross-reference is to allow sorting by the audit date/time associated with each transfer entry for an order.
    Set Logic: S ^OR(100,"EPRTAU",X,DA(1),DA)=""
    Kill Logic: K ^OR(100,"EPRTAU",X,DA(1),DA)
    Whole Kill: K ^OR(100,"EPRTAU")
    X(1): ENTRY DATE/TIME (100.011,.05) (Subscr 1) (forwards)
Info |  Details