source: WorldVistAEHR/trunk/r/INTEGRATED_BILLING-IB-PRQ--IBD--IBQ--PRQS/IBCRHBS.m@ 1742

Last change on this file since 1742 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 1.8 KB
Line 
1IBCRHBS ;ALB/ARH - RATES: UPLOAD HOST FILES (RC 2+) DRIVER ; 10-OCT-03
2 ;;2.0;INTEGRATED BILLING;**245**;21-MAR-94
3 ;;Per VHA Directive 10-93-142, this routine should not be modified.
4 ;
5 ;
6 ; called from IBCRHBR to process RC v2.0+ versions
7RC ;
8 I IBLOAD=1 S IBLOAD=$$HOSTLOAD^IBCRHBS1(IBVERS) I 'IBLOAD Q
9 ;
10 S IBSITE=$$SELSITE^IBCRHBS4 I 'IBSITE Q
11 ;
12 D CALCRC^IBCRHBS5(IBSITE)
13 ;
14 Q
15 ;
16 ;
17 ; ==============================================================================================
18 ;
191 ;XTMP version of national files of all charges and area factors
20 ;
21 ; IBCR RC x,0: delete date ^ create date ^ name, date/time, by ^ ?? ^ count
22 ;
23 ; IBCR RC A: Inpatient DRG and SNF Per Diem Charges, same format/fields as Host File
24 ; IBCR RC B: Facility CPT Charges, same format/fields as Host File
25 ; IBCR RC C: Professional CPT Charges, same format/fields as Host File
26 ; IBCR RC D: Service Category Codes, same format/fields as Host File
27 ; IBCR RC E: Area Factor File, same format/fields as Host File
28 ; IBCR RC F: Division/Zip File, same format/fields as Host File
29 ;
30 ;
312 ;site file created from all national area factor files
32 ;
33 ; IBCR RC SITE: site number ^ site name, state ^ 3-digit zip ^ type (if VA division)
34 ; IBCR RC SITE, source file: source ifn
35 ; IBCR RC SITE, VERSION: version number
36 ; IBCR RC SITE, VERSION INACTIVE: version inactive date
37 ;
383 ;all XTMP files read by CM utility
39 ;
40 ; IBCR UPLOAD site, 0: Upload Date + 2 ^ Upload Date ^ Name/Description ^ Item Count
41 ; IBCR UPLOAD site, Charge Group: Item Count ^ Billable Item ^ Charge Set
42 ; IBCR UPLOAD site, Charge Group, x: item ptr ^ effective date ^ inactive date ^ charge ^ modifier (i) ^ base
43 ;
444 ;all updates due to a new version are in routine IBCRHBRV
45 ;
46 ; ==============================================================================================
47 ;
Note: See TracBrowser for help on using the repository browser.