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

PRCB0A.m

Go to the documentation of this file.
  1. PRCB0A ;WISC/PLT-Help Execution Utility ;7/24/00 23:24
  1. V ;;5.1;IFCAP;;Oct 20, 2000
  1. ;Per VHA Directive 10-93-142, this routine should not be modified.
  1. QUIT ;invalid entry
  1. ;
  1. HE(X) ;Help Execution
  1. N A,B
  1. F A=0:1 S @("B=$P($T("_X_"+A),"";"",3,999)") Q:B="" D EN^DDIOL(B)
  1. D EN^DDIOL(" ")
  1. QUIT
  1. ;
  1. BBFY ;;This is the beginning year of a Fund. For example, If the Fund is a
  1. ;;multi-year fund, good from 1992-1994, the beginning year would be
  1. ;;1992. If the Fund is a single year Fund, good for 1992 only, the
  1. ;;beginning year would be 1992.
  1. ;