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

PRYKPST.m

Go to the documentation of this file.
  1. PRYKPST ;ALB/CMR - POST INIT TO POPULATE PKG FILE ;7/10/97
  1. ;;4.5;Accounts Receivable;**84**;Mar 20, 1995
  1. UPDAT ; -- update package file for install of AR patch PRCA*4.5*84
  1. N PKG,VER,PATCH
  1. ; -- find ien of AR in PACKAGE file
  1. S PKG=$O(^DIC(9.4,"B","ACCOUNTS RECEIVABLE",0)) Q:'PKG
  1. S VER="4.5" ;version
  1. S PATCH="84^"_DT_"^"_DUZ ;patch #^today^installed by
  1. ;
  1. D BMES^XPDUTL(" >>Updating Patch Application History for AR with PRCA*4.5*84")
  1. S PATCH=$$PKGPAT^XPDIP(PKG,VER,.PATCH)
  1. Q