GENERAL DESCRIPTION |
The pre-init routines for ROES V2.0 change several file
names, clean up leftover DD nodes, and an obsolete cross-reference. These
changes were suggested by the verifier to maintain consistency throughout the
system.
|NOWRAP| 1. The screen on the 'BATTERY TYPE FURNISHED' field is deleted with
a Kill command.
GLOBAL REFERENCE:
^DD(791810.0101,.02,12)
^DD(791810.0101,.02,12.1)
2. The old name of field 791810.0101 is cleaned up in ORDER^RMPFPOST.
FileMan creates a duplicate NM node when a subfile name changes.
GLOBAL REFERENCE:
^DD(791810.0101,0,"NM","TRANSACTION")
3. The 'AD' cross-reference on the .01 field of file number 791810 is killed
with a direct kill in EXIT^RMPFPRE routines. The following is a capture of
the code:
EXIT F X=0:0 S X=$O(^DD(791810,.01,1,X)) Q:'X D
.K:$G(^DD(791810,.01,1,X,0))="791810^AD^MUMPS" ^DD(791810,.01,1,X)
K ^DD(791810,0,"IX","AD",791810,.01)
GLOBAL REFERENCE:
^DD(791810,.01,X,0)
^DD(791810,0,"IX","AD",791810,.01)
4. The file names of files 791810, 791810.1, 791810.2, 791812 are changed
using DIE like the following:
S DIE=1,DA=701810,DR=".01////STATION ORDER" D ^DIE
|