XU*8.0*43 (1596)    BUILD (9.6)

Name Value
NAME XU*8.0*43
DATE DISTRIBUTED 1998-07-01 00:00:00
PACKAGE FILE LINK KERNEL
TYPE SINGLE PACKAGE
DESCRIPTION OF ENHANCEMENTS
This patch is in support of CIRN.  It will add fields to the Institution
Includes a routine with several APIs for the CIRN developers to use.
      option:
        Install Package(s)  'XU*8.0*43'
                             =========
        

 =========================================================================


Supported References

PARENT^XUAF4(array, station, association) - for a specified institution which 
is the parent for this association type.

INPUT Variables
Array - As input, it is the $NAME reference for the Array name you want 
    results back in. (This needs to be in your namespace)
file, an entry to the Facility Type file, and add new Institution file
Station - The lookup value - either ien, station number, station name.
   If IEN it will need to have the ` in front of it.
Association - The type of assocation from the Institution Association Types 
    file.  (in CIRN's case it is = VISN) 

Output Variable - array("p",ien)=station name ^ station number

Note: We have a business rule that institution can only have one parent per
association.

associations.
SIBLING^XUAF4(array, child ,association) - all sibling institutions of a
 given institution of a given association.

INPUT Variables
Array - As input it is the $NAME reference for the Array name you want 
    results back in. (This needs to be in your namespace)
Child - The lookup value - either ien, station number, station name. 
    If IEN it will need to have the ` in front of it.
Association - The type of assocation from the Institution Association Types 
    file.  (in CIRN's case it is = VISN)
**NOTE: It will add all 22 VISN's in the format 'VISN xx' and

Output Variable - array("p",pien,"c",cien)=station name ^ station number

Note: We have a business rule that institution can only have one parent per
association.

CHILDREN^XUAF4(array, parent, association) - for a specified parent return a 
   list of all child institutions for a given association.
 
Input Variables 
build the associations for each station in that VISN.
Array - As input it is the $NAME reference for the Array name you want
   results back in. (This needs to be in your namespace)
Parent - The lookup value either ien, station number, station name. 
   If IEN it will need to have the ` in front of it.
Association - The type of assocation from the Institution Association Types 
   file.  (in CIRN's case it is = VISN)
    
Output Variable - array ("c" , ien)=station name ^ station number

NNT^XUAF4(ien) - 

   This will return the station name ^ station number ^ station type
   IEN - The pointer value into file 4.

CIRN^XUAF4(inst [,value]) - This function returns the value of the CIRN 
   enabled field from the institution file.

inst - The pointer value (IEN) into file 4.

value - (optional) Restricted to use by CIRN. This allows the setting of the
   field to a new value (Yes, No or @ to delete)
There is a new form OPTION; EVE:OPERATIONS:KERNEL:INSTITUTION to edit the

Output - "Yes", "No" or the empty string

                 Checksum
Routine         Old       New      2nd Line
XU8P43P                 1825656    **43**
XUAF4                   1190987    **43**

========================================================================= 
Installation:
Institution file.

  1.  DSM sites - New routine.
     
  2.  Use the 'INSTALL/CHECK MESSAGE' option on the PackMan menu. This
      option will load the KIDS package onto your system.
     
  3.  The patch has now been loaded into a Transport global on your
      system. You now need to use KIDS to install the Transport global.
      On the KIDS menu, under the 'Installation' menu, use the following
      options:

      
         Verify Checksum's in Transport Global
         Print Transport Global
         Compare Transport Global to Current System
         Backup a Transport Global
     
 4.  Users can remain on the system. This patch can be loaded any
     non-peek time.
     
  5.  On the KIDS menu, under the 'Installation' menu, use the following
TRACK PACKAGE NATIONALLY YES
FILE
  • DD NUMBER:
    • INSTITUTION (File-top level)
      FIELD NUMBER:
      • OFFICAL VA NAME
    • ASSOCIATIONS (sub-file)
    UPDATE THE DATA DICTIONARY:   YES
    SEND SECURITY CODE:   YES
    SEND FULL OR PARTIAL DD:   PARTIAL
    DATA COMES WITH FILE:   NO
  • UPDATE THE DATA DICTIONARY:   YES
    SEND SECURITY CODE:   YES
    SEND FULL OR PARTIAL DD:   FULL
    RESOLVE POINTERS:   NO
    DATA COMES WITH FILE:   YES
    SITE'S DATA:   MERGE
    MAY USER OVERRIDE DATA UPDATE:   NO
BUILD COMPONENTS
  • ENTRIES:
    • XU-INST-EDIT FILE #4
      FILE:   File: 1, IEN: 4
      ACTION:   SEND TO SITE
  • ENTRIES:
    • XU-INSTITUTION-E
      ACTION:   SEND TO SITE
    • XUKERNEL
      ACTION:   USE AS LINK FOR MENU/ITEM/SUBSCRIBERS
  • ENTRIES:
    • XUAF4
      ACTION:   SEND TO SITE
      CHECKSUM:   B2669365
POST-INSTALL ROUTINE POST^XU8P43P
PRE-INSTALL ROUTINE PRE^XU8P43P