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

Package: Order Entry Results Reporting

ORDER CHECK PATIENT RULE EVENT(#860.7)-->860.71

Sub-Field: 860.71


Information

Parent File Name Number Package
ORDER CHECK PATIENT RULE EVENT(#860.7) RULE EVENT 860.71 Order Entry Results Reporting

Details

Field # Name Loc Type Details
.01 RULE 0;1 POINTER TO ORDER CHECK RULE FILE (#860.2) ORDER CHECK RULE(#860.2)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  DEC 04, 1995
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  860.71^B
    1)= S ^OCXD(860.7,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^OCXD(860.7,DA(1),1,"B",$E(X,1,30),DA)
.02 TIMESTAMP 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 11, 1997
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
  • CROSS-REFERENCE:  860.7^AT
    1)= D SET^OCXOSCR3($E(X,1,30),DA(1),DA)
    2)= K ^OCXD(860.7,"AT",$E(X,1,30),DA(1),DA)
.03 ORDER NUMBER 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUL 11, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
.04 RESULT MESSAGE TEXT M;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<1) X
  • LAST EDITED:  OCT 08, 1997
  • HELP-PROMPT:  Answer must be 1-100 characters in length.
2 RELATION 1;0 Multiple #860.712 860.712
Info |  Details |  All