Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^VBEC(6002.01

Package: VBECS

Global: ^VBEC(6002.01


Information

FileMan FileNo FileMan Filename Package
6002.01 VBECS WORKLOAD CAPTURE VBECS

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Lab Service 1 LRCAPBV    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
VBECS 3 VBECA7A    VBECA7A1    VBECA7B    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Lab Service 4 LABORATORY TEST(#60)[12]    WKLD SUFFIX CODES(#64.2)[7]    WKLD CODE(#64)[6]    ACCESSION(#68)[14]    
Kernel 2 INSTITUTION(#4)[2]    NEW PERSON(#200)[10]    
Registration 1 PATIENT(#2)[9]    

Fields, Total: 18

Field # Name Loc Type Details
.01 TRANSACTION ID 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<3) X
  • LAST EDITED:  AUG 18, 2004
  • HELP-PROMPT:  Answer must be 3-50 characters in length
  • DESCRIPTION:  
    This field is used to uniquely identify the workload transaction.
  • CROSS-REFERENCE:  6002.01^B
    1)= S ^VBEC(6002.01,"B",$E(X,1,30),DA)=""
    2)= K ^VBEC(6002.01,"B",$E(X,1,30),DA)
1 TRANSACTION TYPE 0;2 SET
************************REQUIRED FIELD************************
  • 'P' FOR PATIENT;
  • 'U' FOR UNITS;
  • 'D' FOR DONOR;
  • 'M' FOR MISCELLANEOUS;

  • LAST EDITED:  APR 08, 2004
  • DESCRIPTION:  
    This field indicates the type of workload transaction being recorded.  1) Patient 2) Units 3) Donor 4) Misc
2 DIVISION 0;3 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  AUG 22, 2005
  • DESCRIPTION:  
    The Division/Institution where the workload event occurred.
3 DATE/TIME 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  AUG 22, 2005
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    The Date/Time the workload event occured.
4 PROCESSED DATE 0;5 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAR 09, 2004
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    This field is populated by the Lab software to indicate completion of the transaction.
5 STATUS 0;6 SET
************************REQUIRED FIELD************************
  • 'P' FOR Pending Processing;
  • 'I' FOR In Process;
  • 'S' FOR Successfully Processed;
  • 'E' FOR Error;

  • LAST EDITED:  JUL 25, 2004
  • CROSS-REFERENCE:  6002.01^AC
    1)= S ^VBEC(6002.01,"AC",$E(X,1,30),DA)=""
    2)= K ^VBEC(6002.01,"AC",$E(X,1,30),DA)
    3)= This indicates the status of entry
    This X-Ref indicates the status of the record in the file. Only those with the status of Pending are process for VistA workload.
6 WORKLOAD CODE WKLD;1 POINTER TO WKLD CODE FILE (#64)
************************REQUIRED FIELD************************
WKLD CODE(#64)

  • LAST EDITED:  MAR 09, 2004
7 WORKLOAD METHOD WKLD;2 POINTER TO WKLD SUFFIX CODES FILE (#64.2) WKLD SUFFIX CODES(#64.2)

  • LAST EDITED:  SEP 27, 2004
8 MULTIPLY FACTOR WKLD;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>100)!(X<-100)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 09, 2004
  • HELP-PROMPT:  Type a Number between -100 and 100, 0 Decimal Digits
9 DFN WKLD;4 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  MAR 09, 2004
10 USER ID WKLD;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 09, 2004
11 ACCESSION NUMBER WKLD;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  MAR 09, 2004
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
12 TEST PERFORMED WKLD;7 POINTER TO LABORATORY TEST FILE (#60) LABORATORY TEST(#60)

  • LAST EDITED:  MAR 09, 2004
13 PRODUCT CODE WKLD;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  OCT 12, 2007
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
14 ACCESSION AREA WKLD;9 POINTER TO ACCESSION FILE (#68) ACCESSION(#68)

  • LAST EDITED:  AUG 25, 2004
  • DESCRIPTION:  
    This field is used to over-ride the system default accession area of 'BLOOD BANK' which is usually ^LRO(68,29,0). This field is important to be populated in multi-divisional systems.
20 ERROR TEXT ERR;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<3) X
  • LAST EDITED:  MAR 09, 2004
  • HELP-PROMPT:  Answer must be 3-80 characters in length.
21 UPDATE ERROR TEXT UET;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>250!($L(X)<3) X
  • LAST EDITED:  APR 09, 2004
  • HELP-PROMPT:  Answer must be 3-250 characters in length
99 PCE ENCOUNTER PCE;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  MAR 09, 2004
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All