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

APC5INI5.m

Go to the documentation of this file.
  1. APC5INI5 ; ; 09-JUL-2002
  1.  ;;2.0;IHS RPMS/PCC Data Entry;**5**;MAR 09, 1999
  1.  K ^UTILITY("DIF",$J) S DIFRDIFI=1 F I=1:1:0 S ^UTILITY("DIF",$J,DIFRDIFI)=$T(IXF+I),DIFRDIFI=DIFRDIFI+1
  1.  Q
  1. IXF ;;APC5 - PCC DATA ENTRY V2.0 P5^APC5