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

IBTUB.m

Go to the documentation of this file.
  1. IBTUB ;ALB/AAS - UNBILLED AMOUNTS MENU ;29-SEP-94
  1. ;;2.0;INTEGRATED BILLING;**19,123**;21-MAR-94
  1. ;
  1. % D DT^DICRW S DIK="^DOPT(""IBTUB""," G:$D(^DOPT("IBTUB",6)) A
  1. S ^DOPT("IBTUB",0)="Unbilled Amounts Menu Options^1N^"
  1. F I=1:1 S X=$T(@I) Q:X="" S ^DOPT("IBTUB",I,0)=$P(X,";;",2,99)
  1. D IXALL^DIK
  1. ;
  1. A W ! S DIC="^DOPT(""IBTUB"",",DIC(0)="QEAM" D ^DIC G:Y'>0 END D @+Y G A
  1. G END
  1. ;
  1. 1 ;;Send Test Unbilled Amounts Bulletin
  1. D TEST^IBTUBUL
  1. Q
  1. ;
  1. 2 ;;Build Average Bill Amounts
  1. D ^IBTUBAV
  1. Q
  1. ;
  1. 3 ;;Generate Unbilled Amounts Report
  1. D ^IBTUBO
  1. Q
  1. ;
  1. 4 ;;View Unbilled Amounts
  1. D ^IBTUBV
  1. Q
  1. ;
  1. 5 ;;Auto-Generate Unbilled Amounts Report
  1. D AUTO^IBTUBO
  1. Q
  1. ;
  1. 6 ;;Auto-Build Average Bill Amounts
  1. D AUTO^IBTUBAV
  1. Q
  1. ;
  1. END Q