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

ACRFSPL.m

Go to the documentation of this file. 
  1. ACRFSPL ;IHS/OIRM/DSD/AEF - DHR-SPLITOUT [ 11/01/2001   9:44 AM ]
  1.  ;;2.1;ADMIN RESOURCE MGT SYSTEM;;NOV 05, 2001
  1.  ;
  1. EN(ACRCTR,ACRDTM,ACRPKG)     ;EP
  1.  ;----- MAIN ENTRY POINT
  1.  ;
  1.  ;      ACRCTR  = TYPE OF TRANSACTIONS
  1.  ;                ARM = ARMS
  1.  ;                BCS = CHS
  1.  ;                PCC = MANUALLY ENTERED
  1.  ;      ACRDTNM = DATA TYPE NAME
  1.  ;                DHRP
  1.  ;                dhc
  1.  ;      ACRPKG  = PACKAGE
  1.  ;                AFSH = ARMS
  1.  ;                ACHS = CHS
  1.  ;
  1.  N ACRD0,ACROUT
  1.  ;
  1.  ;Get which color batch to export
  1.  D EN^ACRFSPL1(ACRCTR,ACRDTM,ACRPKG)
  1.  Q:'$G(ACRD0)
  1.  ;
  1.  ;Do the export
  1.  D EN^ACRFSPL2(ACRD0)
  1.  ;
  1.  ;Print report
  1.  D EN^ACRFSPL3(ACRD0)
  1.  Q