Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: XUSEHRM

XUSEHRM.m

Go to the documentation of this file.
  1. XUSEHRM ; BA/OAK - EHRM REVERSED LOCK ; Jan 19, 2022@03:34:43
  1. ;;8.0;KERNEL;**758**;Jul 10, 1995;Build 17
  1. ;;Per VHA Directive 2004-038, this routine should not be modified
  1. Q
  1. 1 ;Assign Replacement Program Key to ALL Users (this option needs the XUPROG Key assigned)
  1. D 1^XUSEHRM1
  1. Q
  1. ;
  1. 2 ;Remove Replacement Program Key from ALLL User (this option needs the XUPROG Key assigned)
  1. D 2^XUSEHRM1
  1. Q
  1. ;
  1. 3 ;Allocation of Security Keys
  1. ;D 3^XUSEHRM1
  1. Q
  1. ;
  1. 4 ;Deallocation of Security Keys
  1. ;D 4^XUSEHRM1
  1. Q
  1. ;
  1. 5 ;Assign Replacement Program Key to EVERSE/NEGATIVE LOCK
  1. D 5^XUSEHRM1
  1. Q
  1. ;
  1. 6 ;Remove Replacement Program Key from EVERSE/NEGATIVE LOCK
  1. D 6^XUSEHRM1
  1. Q
  1. ;
  1. 7 ;List Users Holding a Certain Program Replacement Key (our criteria adds CSV functionality)
  1. D 7^XUSEHRM2
  1. Q
  1. ;
  1. 8 ;List Users who do not have a certain Program Replacement Key
  1. D 8^XUSEHRM2
  1. Q
  1. 9 ;Lst Options with a Replacement Program Key
  1. D 9^XUSEHRM2
  1. Q
  1. ;
  1. 10 ;List Options that do not have a Replacement Program Key
  1. D 10^XUSEHRM2
  1. Q