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

XUMF4H.m

Go to the documentation of this file. 
  1. XUMF4H ;CIOFO-SF/RAM - Institution File Clean Up; 06/28/99
  1.  ;;8.0;KERNEL;**206**;Jul 10, 1995
  1.  ;
  1.  ;
  1.  ;
  1. DSTA ; -- duplicate station #s
  1. RDSN ; -- deleted duplicate station number
  1.  ;
  1.  W !!,"This list displays duplicate STATION NUMBER (#99)."
  1.  W !,"The action associated with this list will automatically"
  1.  W !,"remove the value from field #99 for local and duplicate"
  1.  W !,"entries.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1.  ;
  1. LLCL ; -- local data
  1.  ;
  1.  W !!,"This list displays entries that are in the INSTITUTION (#4)"
  1.  W !,"file but not in the national file."
  1.  W !!,"This list is informational only and has no actions associated"
  1.  W !,"with it.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1. NATL ; -- national
  1.  ;
  1.  W !!,"This list displays the Master Institutution File data.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1. MSTA ; -- missing station numbers
  1.  ;
  1.  W !!,"This list displays station numbers that are in the national"
  1.  W !,"file but not in the INSTITUTION (#4) file."
  1.  W !!,"This list is informational only and has no actions associated"
  1.  W !,"with it.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1. AUTO ; -- auto update with national data
  1.  ;
  1.  W !!,"This action will automatically update the INSTITUTION (#4) file"
  1.  W !,"with national data.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1. CHCK ; -- check if update is complete
  1.  ;
  1.  W !!,"Use this action to check if the all the required steps have"
  1.  W !,"been performed and the clean up has completed.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1.  ;
  1. NAME ; -- institution vs. national names
  1.  ;
  1.  W !!,"This main screen displays a side-by-side view of the INSTITUTION"
  1.  W !,"(#4) file and the national file names by station number.",!
  1.  W !,"LLCL - lists local station numbers to be deleted.",!
  1.  W !,"DSTA - automatically deletes local/duplicate station numbers.",!
  1.  W !,"NATL - lists Institution Master File entries to merge.",!
  1.  W !,"AUTO - merges national data with local INSTITUTION (#4) file.",!
  1.  W !,"CHCK - run this action to see pending clean up actions to perform.",!!
  1.  D EOP
  1.  ;
  1.  Q
  1.  ;
  1. EOP ; -- End-of-Page
  1.  ;
  1.  N DIR
  1.  S DIR(0)="E"
  1.  D ^DIR,CLEAR^VALM1
  1.  S VALMBCK="R"
  1.  Q