IBCD2 ;ALB/ARH - AUTOMATED BILLER (CREATE - SETUP/GATHER DATA FIELDS) ; 8/6/93
Source file <IBCD2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FIND | ;
|
|
EXIT | ||
CREATE(IBQUERY) | ;set up a bill, required: IBCT(IBTRN),IBDFN,IBSTDT
; IBQUERY, if defined, will be used to activate the outpt visit QUERY |
|
CONT | ||
QUIT | ||
OUTPT | ||
RXRF | ||
ARSET() | ; set up entry for new bill in AR returns IFN, bill number
|
|
ARSETQ | ||
CHK() | ;other checks
|
|
TEABD(TRN,IBDT) | ;
|
|
TERR(TRN,IFN,ER) | ;
|
|
TBILL(TRN,IFN) | ;
|
FileNo | Call Tags |
---|---|
^AUPNVSIT - [#9000010] | GET1^DIQ |