©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBCONS2 ;ALB/CPM - NSC W/INSURANCE OUTPUT (CON'T) ; 31-JAN-92
Source file <IBCONS2.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | $$INSURED^IBCNS1 TRACK^IBCONS3 $$RPT^IBEFUNC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLIN1 | ||
| PTCHK | ||
| SET | ||
| PTF | ; if all movements are for sc condition then not billable
|
|
| BILL | ; Add to billed list if is insurance bill, not canceled
|
|
| STOPS | ; -finds stops
|
|
| INS | ;S IBINDT=I D ^IBCNS S IBFLAG=$S('$D(IBINS):0,1:IBINS)
|
|
| ADD | ||
| CLIN | ||
| LOOP2 | ; Compilation for the Outpatient report.
|
|
| LOOP1 | ; Compilation for both Inpatient Admisssion and Discharge reports.
|
|
| PROC | ; -process each episode of care
|
|
| DIV | ;adds the requested divisions to the report
|
|
| DIS |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | DIV+5 |
| ^DGCR(399 - [#399] | BILL+4, BILL+5 |
| ^DGPM - [#405] | LOOP1+3, LOOP1+4, LOOP1+5, LOOP1+6, LOOP1+8 |
| ^DGPT - [#45] | PTF+2, PTF+3 |
| ^DIC(37 - [#37] | DIS+3 |
| ^DIC(40.7 - [#40.7] | ADD+7 |
| ^DIC(42 - [#42] | LOOP1+8 |
| ^DPT - [#2] | DIS+2, DIS+3, ADD+2, CLIN1, STOPS+2, PTCHK, SET |
| ^DPT("ADIS" | DIS, DIS+1 |
| ^SC - [#44] | CLIN, CLIN1, STOPS+2 |
| ^SC("AC" | CLIN |
| ^SDV - [#409.5] | ADD, ADD+3, ADD+4, ADD+7 |
| ^TMP($J | SET+2*, SET+3*, DIV+3*, DIV+5* |
| Name | Line Occurrences |
|---|---|
| BILL | PROC+7 |
| CLIN1 | CLIN |
| DIV | LOOP1+2, LOOP2+1 |
| INS | PROC+4 |
| PROC | LOOP1+4, DIS+3, ADD+3, CLIN1 |
| PTCHK | PROC+3 |
| PTF | LOOP1+4 |
| SET | PROC+7 |
| STOPS | CLIN1 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LOOP1+4, DIS+1, ADD, ADD+3, SET+2, PTF+3 |
| ^("VET" | PTCHK |
| ^(0 | DIS+3, CLIN, CLIN1, BILL+4, BILL+5 |
| ^(1 | SET+2* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> B | SET+2, SET+3, BILL+3*, BILL+4*, BILL+5* |
| DA | LOOP1+1~, LOOP1+4*, LOOP1+5*, LOOP1+6, LOOP1+7, LOOP1+8 |
| >> DFN | LOOP1+4*, DIS+1*, DIS+2, DIS+3, ADD+2*, CLIN1*, STOPS+2, INS+1, PTCHK, SET , SET+2, SET+3, BILL+4, BILL+5 |
| DPT0 | SET~*, SET+2, SET+3 |
| >> I | LOOP1+3*, LOOP1+4, DIS*, DIS+1, ADD*, ADD+3, ADD+4, ADD+7, CLIN*, CLIN1 , STOPS+2, INS+1, SET+2, SET+3, BILL+3 |
| >> I1 | BILL+3*, BILL+4, BILL+5 |
| IBADM | LOOP1+1~, LOOP1+5*, BILL+3 |
| IBADMVT | LOOP1+4!, LOOP1+7* |
| >> IBAPPT | CLIN1* |
| >> IBBEG | LOOP1+3, DIS, ADD, CLIN |
| >> IBDC | CLIN*, CLIN1, STOPS+2 |
| >> IBDFN | CLIN*, CLIN1 |
| IBDIV | DIV+1~, DIV+3*, DIV+5* |
| >> IBDV | LOOP1+4, LOOP1+8*, DIS+3*, ADD+2*, CLIN1*, PROC+1, PROC+2, SET+2, SET+3 |
| >> IBEND | LOOP1+3, DIS, ADD, CLIN |
| >> IBFLAG | PROC+3, PROC+4, INS+1*, PTCHK* |
| >> IBINPT | LOOP1+5, BILL+3, BILL+4, BILL+5 |
| >> IBMOV | PTF+3* |
| IBOE | DIS+2*, ADD+1!, ADD+4*, CLIN1* |
| IBRMARK | PROC+5!, SET+3, SET+4! |
| >> IBSC | LOOP1+4, PTF+2*, PTF+3*, PTF+4* |
| IBSTOP | DIS+3*, ADD+6*, ADD+7*, STOPS+2*, STOPS+3*, SET+2, SET+4! |
| >> IBSUB | LOOP1+3, LOOP1+4 |
| >> IBTERM | SET+1, SET+2, SET+3 |
| >> J | DIS+1*, DIS+2, DIS+3 |
| >> M | BILL+4*, BILL+5* |
| >> N | ADD+3*, ADD+4 |
| >> PTF | LOOP1+4, LOOP1+6*, PTF+2, PTF+3 |
| SSN | SET~*, SET+1 |
| TERMD | SET~, SET+1*, SET+2, SET+3 |
| U | DIS+3 |
| >> VAUTD | PROC+1, PROC+2, DIV+2, DIV+4 |
| >> VAUTD( | PROC+1, DIV+3 |
| X | ADD*, ADD+2, ADD+5~*, ADD+7*, STOPS+1~, STOPS+2*, STOPS+3 |