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 |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^VBEC(6000

Package: Lab Service

Global: ^VBEC(6000


Information

FileMan FileNo FileMan Filename Package
6000 VBECS SITE PARAMETERS Lab Service

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
Lab Service 3 LRCAPBV    RELATED NAME    ^VBEC(6000    
VBECS 3 VBECDCU    VBECDCU1    VBECDCU2    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
VBECS 2 VBECDCSP    VBECDCU2    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 INSTITUTION(#4)[.01]    
MailMan 1 MAIL GROUP(#3.8)[.07]    

Fields, Total: 9

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>1)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 08, 2002
  • HELP-PROMPT:  System generated, only the whole number one (1) is accepted.
  • DESCRIPTION:  
    Used to have VA FileMan only have one entry in the file.
  • TECHNICAL DESCR:  
    System generated, only the whole number one (1) is accepted. Input transform on the .01 field sets DINUM equal to one.
.01 FACILITY NAME 0;1 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • INPUT TRANSFORM:  S DINUM=1
  • LAST EDITED:  SEP 18, 2003
  • HELP-PROMPT:  Enter the name of the facility here.
  • DESCRIPTION:  
    This is the name of the facility running this application.
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  6000^B
    1)= S ^VBEC(6000,"B",$E(X,1,30),DA)=""
    2)= K ^VBEC(6000,"B",$E(X,1,30),DA)
.02 TOTAL LAB DATA RECORDS 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 18, 2002
  • HELP-PROMPT:  This is the total number of Blood Bank records in the Lab Data file.
  • DESCRIPTION:  
    This field indicates the total number of records in the Lab Data (#63) file when the data conversion begins.
.03 NUM LAB DATA RECORDS CONVERTED 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 2002
  • HELP-PROMPT:  This is the number of Lab Data records converted to VBECS.
  • DESCRIPTION:  
    The number of records in the Lab Data (#63) file converted to VBECS is automatically entered here when the data conversion application finishes processing.
.04 TOTAL BLOOD INVENTORY RECORDS 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 18, 2002
  • HELP-PROMPT:  This is the total number of records in the Blood Inventory file.
  • DESCRIPTION:  
    This is the total number of records in the Blood Inventory (#65.4) file.
.05 NUM BLOOD INVENTORY RECS CNVT 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 2002
  • HELP-PROMPT:  Number of Blood Inventory records converted to VBECS.
  • DESCRIPTION:  
    The number of Blood Inventory (#65.4) file records converted to VBECS is automatically entered here when the data conversion application finishes processing.
.06 DEFAULT DIRECTORY 0;6 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X["*"!$L(X)>80!($L(X)<3) X X:$D(X) ^DD(6000,.06,9.2) K:'$D(VBECDIR)#2 X K VBECDIR
    9.2 = N IO,POP D OPEN^%ZISH("VBEC",X,"VBECZZ.TMP","W") S:'POP VBECDIR=POP D:'POP CLOSE^%ZISH("VBEC")
  • LAST EDITED:  JUL 30, 2002
  • HELP-PROMPT:  Input the default directory where the Blood Bank legacy data finally resides.
  • DESCRIPTION:  This field identifies the default directory where the legacy data files reside. On an Open VMS machine, the format will look something like: 'SYS$USER:[USER]'. The directory specification ([USER]) optionally can be
    preceded by a device name, in this case, 'SYS$USER' (and colon [:]). Wildcard characters are not allowed. When identifying a subdirectory, separate the names of the directory levels with periods (.).
    Both file systems use the backslash (\) character to separate directory names and the file name when forming a path. General rules for applications creating names for directories and files or processing names supplied by
    the user include the following:
    * Use any character in the current code page for a name, but do not use a path separator, a character in the range 0 through 31, or any character explicitly disallowed by the file system. A name can contain characters in
    the extended character set (128-255). Use the backslash (\), the forward slash (/), or both to separate components in a path. No other
    * Character is acceptable as a path separator. Note that UNC names must adhere to the following format: \\server\share.
    * Use a period (.) as a directory component in a path to
    represent the current directory.
    * Use two consecutive periods (..) as a directory component in a path to represent the parent of the current directory.
    * Use a period (.) to separate the base file name from the extension in a directory name or file name.
    * Do not use the following characters in directory names or file names, because they are reserved: < > : " / \
    * Do not use device names, such as aux, con, lpt1, and prn, as file names or directory names.
    * Do not assume case sensitivity. Consider names such as OSCAR, Oscar, and oscar to be the same.
    By following the rules listed in this section, an application can create valid names for files and directories regardless of the file system in use.
    Backslashes (\) are used as element dividers in paths (dividing the file name from the path to it, or directories from one another in a path). You cannot use them in file or directory names. They may be required as part of
    volume names (for example, "C:\").
    These are only examples of default directory names and should not be taken literally.
    These names will most likely differ from site to site.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 VBECS MAIL GROUP 0;7 POINTER TO MAIL GROUP FILE (#3.8)
************************REQUIRED FIELD************************
MAIL GROUP(#3.8)

  • INPUT TRANSFORM:  S DIC("S")="I $E($P($G(^XMB(3.8,+Y,0)),""^""),1,5)=""VBECS""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 30, 2002
  • HELP-PROMPT:  The name of the mail group where data conversion information should be sent is automatically entered here at the time of the post-installation.
  • DESCRIPTION:  
    This is the mail group the person responsible for data validation and data conversion should expect to see mail regarding results of the aforementioned processes.
  • SCREEN:  S DIC("S")="I $E($P($G(^XMB(3.8,+Y,0)),""^""),1,5)=""VBECS"""
  • EXPLANATION:  point to VBEC name spaced mail groups only.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1 WORKLOAD RUN DATE WKLD;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  MAY 26, 2010
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  This field hold the last run date for the workload extraction from VBECS. The data in this field is the $H date and will be compared to the current $H date when deciding whether or not to allow the extraction to run. Only
    one run is allowed per day.

External References

Name Field # of Occurrence
CLOSE^%ZISH .06OF9.2+1
OPEN^%ZISH .06OF9.2+1
^DIC .07+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(6000 .06+1
^VBEC(6000 - [#6000] .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K)
DIC .07+1!*
DIC("S" .07+1*, .07SCR+1*
>> DIE .07+1
>> DINUM .01+1*
IO .06OF9.2+1~
POP .06OF9.2+1~
VBECDIR .06+1!, .06OF9.2+1*
X .001+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .03+1!, .04+1!, .05+1!, .06+1!, .06OF9.2+1, .07+1*!
, 1+1!
>> Y .07+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All