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

XB1.m

Go to the documentation of this file. 
  1. XB1 ; IHS/ADC/GTH - XB MENUS AND DOCUMENTATION ; [ 12/29/2004  11:11 AM ]
  1.  ;;3.0;IHS/VA UTILITIES;**8,9,10**;FEB 07, 1997
  1.  ; XB*3*9 IHS/SET/GTH XB*3*9 10/29/2002 Cache' mods.
  1.  ;
  1.  ; Each label represents a menu.  The label must begin with
  1.  ; "M" and be followed by 1 or more 1 digit numbers 1-9.
  1.  ; Each digit represents the link # of the parent option.
  1.  ; E.G. 'M1' is the label for submenu options for the main
  1.  ; menu option with a link # of 1.  'M11' would be the label
  1.  ; for subsubmenu options for the option in 'M1' with a link
  1.  ; # of 1.  Within a menu options are listed and selected
  1.  ; positionally.  The only purpose of the link # is to link
  1.  ; options to their parent menu.  Example:
  1.  ;
  1.  ; M1  ;;FILES/DICTIONARIES
  1.  ;     ;;Submenu example one;;1
  1.  ;     ;;Submenu example two;;2
  1.  ; M11 ;;SUBMENU ONE
  1.  ;     ;;Submenu option;;^ROUTINEX
  1.  ; M12 ;;SUBMENU TWO
  1.  ;     ;;Submenu option;;^ROUTINEY
  1.  ;
  1.  ; This label naming technique allows the menu tree to go
  1.  ; to seven levels.  No more than nine options on one menu
  1.  ; may also be menus.
  1.  ;
  1.  ; For menu options the 2nd ";;" piece is the title, the 3rd
  1.  ; ";;" piece must be a number if the option is a submenu, a
  1.  ; valid routine or label^routine or executable code if the
  1.  ; 3rd piece begins with a !.  The code following the ! will
  1.  ; be placed in a variable and the variable will be executed.
  1.  ; A P in the 4th ";;" piece indicates pause after execution.
  1.  ;
  1. M ;;MAIN XB UTILITY MENU
  1.  ;;Files/dictionaries;;1
  1.  ;;Globals;;2
  1.  ;;Routines;;3
  1.  ;;Miscellaneous;;4
  1.  ;;Developers;;5
  1.  ;;Check ^XB options and patch level;;CHECK^XB;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1. M1 ;;FILES/DICTIONARIES
  1.  ;;List fields;;^XBFLD
  1.  ;;List 0th nodes;;^XBLZRO;;P
  1.  ;;Check regular xrefs;;^XBCFXREF;;P
  1.  ;;Selective RE-INDEX;;^XBRXREF
  1.  ;;Compare dictionary in two UCIs/Namespaces;;^XBFCMP;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Search for routines executed from dictionary;;^XBRSRCH
  1.  ;;Fix 0th nodes;;^XBCFIX;;P
  1.  ;;Count entries in file;;^XBCOUNT
  1.  ;;FileMan;;P^DI
  1.  ;;Delete dictionaries;;^XBKD
  1.  ;;Clean dictionaries [caution];;^XBCDIC
  1.  ;;List file attributes in various ways;;1;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Files Marked For Deletion;;!N L,DIC,BY,FLDS S L=0,DIC=1,(BY,FLDS)="[XB - FILES MARKED FOR DELETION]" D EN1^DIP;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Fields Marked For Deletion;;^XBLFMD;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Print File IDs, Specifiers, and Conditionals;;^XBSIC;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1. M11 ;;LIST FILE ATTRIBUTES IN VARIOUS WAYS;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;List Files, inc. Number, Name, Global, opt Desc.;;^XBLFD;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;List Fields for RIM Modeling;;^XBLFAM;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;List Fields for CodeSets (RTM) Modeling;;^XBLFSETS;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1. M2 ;;GLOBALS
  1.  ;;List global;;!D LG^ZIBVSS
  1.  ;;Directory of selected globals;;^ZIBGD;;P
  1.  ;;Count unique values;;^XBCNODE
  1.  ;;List high entry number;;^XBGLDFN;;P
  1.  ;;Copy to another global in same UCI/Namespace;;^XBGC;;;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Copy global to another UCI/Namespace;;!D CG^ZIBVSS;;;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Search global for value;;!D GSE^ZIBVSS
  1.  ;;Global edit;;!D GE^ZIBVSS
  1.  ;;Change global value;;!D GCH^ZIBVSS
  1.  ;;Global size/efficiency;;!D GSZE^ZIBVSS;;P
  1.  ;;Global characteristics;;!D GCHR^ZIBVSS
  1.  ;;Global delete;;!D GDEL^ZIBVSS
  1.  ;;Global restore;;!D GR^ZIBVSS
  1.  ;;Global save;;!D GS^ZIBVSS
  1.  ;;Find control chrs in globals;;^ZIBGCHR
  1.  ;;Compare Two Globals;;^XBGCMP
  1. M3 ;;ROUTINES
  1.  ;;List routines in various ways;;1
  1.  ;;Compare routines in two UCIs/Namespaces;;!D RCMP^ZIBVSS;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Restore routines;;!D RR^ZIBVSS
  1.  ;;Save routines;;!D RS^ZIBVSS
  1.  ;;Routine size;;^XBRSIZ;;P
  1.  ;;Delete routines;;!D RDEL^ZIBVSS;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Search routines for values (OR);;!D RSE^ZIBVSS;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Search routines for values (AND);;!D RSAND^ZIBVSS
  1.  ;;Find routines by edit date;;!D NEWED^ZIBVSS;;P
  1.  ;;Full screen editor;;!D REDIT^ZIBVSS
  1.  ;;Routine change;;!D RCHANGE^ZIBVSS
  1.  ;;Routine copy;;!D RCOPY^ZIBVSS
  1.  ;;Directory of selected routines;;^ZIBRD;;P
  1.  ;;Scan UCIs/Namespaces for routine;;^ZIBFR;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Run routine;;!R "  Enter routine name: ",Y:30 Q:'$T  S:Y'["^" Y="^"_Y S X=$P(Y,"^",2),X=$P(X,"(",1) X ^%ZOSF("TEST") W:'$T "  huh? ",*7 I $T D @Y
  1. M31 ;;LIST ROUTINES
  1.  ;;List first one/two lines;;^%ZTP1;;P
  1.  ;;List to first label;;^XBRPTL;;P
  1.  ;;List routines;;!D RPRT^ZIBVSS;;P
  1.  ;;List routines by edit date;;^XBRPRTBD
  1.  ;;VA routine lister;;^%ZTPP;;P
  1.  ;;List one routine with character counts;;^XBRLL;;P
  1.  ;;%INDEX;;^%INDEX
  1.  ;;Flow chart from entry point;;^XTFCE
  1.  ;;Flow chart entire routine;;^XTFCR
  1.  ;;List routines by patch number;;^XBPATSE;;P
  1. M4 ;;MISCELLANEOUS
  1.  ;;Error report;;!D ER^ZIBVSS;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;List ^UTILITY nodes for current job;;^XBLUTL;;P
  1.  ;;Kill ^UTILITY nodes for current job;;^%ZIBCLU0
  1.  ;;Cleanup utility globals in all UCIs;;EN^ZIBCLU
  1.  ;;Cleanup utility globals in current UCI;;EN^%ZIBCLU0
  1.  ;;Fix 'PT' nodes in all files;;^XBFIXPT
  1.  ;;Convert non-DINUM data global to DINUM;;^XBDINUM
  1.  ;;Check UCI routines against package file;;^ZIBCKPKG;;P
  1.  ;;Display FileMan installation data;;^ZIBFMD;;P
  1.  ;;Renamespace routines;;^ZIBRNSPC;;P
  1.  ;;Number base changer;;^XTBASE
  1.  ;;Print a Help Frame manual;;^XBHFMAN
  1.  ;;List Local Variables, by Namespace;;MESSAGE^XBVL;;P
  1.  ;;Print XB/ZIB Technical Manual;;^XBTM
  1.  ;;Check Patient Globals;;^XBPATC;;P
  1. M5 ;;DEVELOPERS
  1.  ;;Generate ^DIR call;;^XBDR;;P
  1.  ;;Standardize line 1 of routines;;^XBFIXL1
  1.  ;;Set version line;;^XBVLINE
  1.  ;;Set dictionary version numbers;;^XBDICV;;P
  1.  ;;Set no delete;;^XBNODEL;;P
  1.  ;;Set audit;;^XBSAUD;;P
  1.  ;;Set authorities;;^XBSAUTH;;P
  1.  ;;Analyze file for specifiers;;^XBCSPC
  1.  ;;Delete namespaced OPTIONS, KEYS, etc.;;RUN^XBPKDEL;;P
  1.  ;;List namespaced OPTIONS, KEYS, etc.;;LIST^XBPKDEL;;P
  1.  ;;Build pre-init routine;;^XBBPI
  1.  ;;Build integ routine;;^XBSUMBLD
  1.  ;;List callable subroutines;;^XBLCALL;;P
  1.  ;;Reset file data globals *** DANGER ***;;^XBFRESET
  1.  ;;Edit FM print template headers;;^XBDH
  1.  ;;List retired/replaced packages;;LIST^XBPKDEL1;;P;;XB*3*8
  1.  ;;Delete retired/replaced packages;;DECERT^XBPKDEL1;;P;;XB*3*8
  1.  ;;Edit File attribute for selected File(s);;^XBDDEDIT;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Move files into PACKAGE file FILE multiple;;^XBPKG;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Set dd audit;;^XBSDDAUD;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;dd Field Numbering Conventions;;^XBFNC;;P;;IHS/SET/GTH XB*3*9 10/29/2002
  1.  ;;Options and Security Keys;;^XBSECK;;P;;IHS/SET/GTH XB*3*9 10/29/2002