IBCOMC1 ;ALB/CMS - IDENTIFY PT BY AGE WITH OR WITHOUT INSURANCE (CON'T);10-09-98
Source file <IBCOMC1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 1 | IBCOMC |
Name | Comments | DBIA/ICR reference |
---|---|---|
BEG | ; Entry to run Identify Patients with/without Insurance Report
; Input variables must exist: ; IBAIB - Required. How to sort ; 1= Patient Name Range 2= Terminal Digit Range ; IBRF - Required. Name or Terminal Digit Range Start value ; IBRL - Required. Name or Terminal Digit Range Go to value ; IBAGEF - Optional. Age start value or null ; IBAGEL - Optional. Age end value or null ; IBBDT - Required. Last Treated Start Date ; IBEDT - Required. Last Treated End Date |
|
QUEQ | ; Exit clean-UP
|
|
EOR | ; end of report IB*752/DTG
|
|
SET | ; set data line for global
|
|
SETQ | ||
DLT | ; Get DFN's for Date Last Treated Range
|
|
DLTQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | DLT+12 |
^DGPM("ATT3" | DLT+10, DLT+11 |
^DIC(36 - [#36] | BEG+64 |
^IBA(354 - [#354] | BEG+55 |
^TMP("IBCOMC" | BEG+25!, BEG+30, BEG+79, QUEQ+1!, SET+6, SET+7, SET+15*, SET+17*, DLT+1!, DLT+12* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | BEG+19~, BEG+30*, BEG+34, BEG+55, BEG+58, SET+6, SET+7, SET+9, SET+15, SET+17 |
IBAGEF | BEG+52, QUEQ+1! |
IBAGEL | BEG+52, QUEQ+1! |
IBAIB | BEG+34, BEG+37, BEG+48, BEG+49, QUEQ+1!, SET+15, SET+17 |
IBBDT | QUEQ+1!, DLT+2, DLT+4, DLT+10 |
IBC | BEG+19~, BEG+63*, BEG+64, BEG+75, SET+16*, SET+17 |
IBC0 | BEG+19~, BEG+64*, BEG+66, SET+12 |
IBCAT | SET+5~, SET+9*, SET+10 |
IBCBK | DLT+1~, DLT+3*, DLT+7 |
IBDA | DLT+1~, DLT+11*, DLT+12 |
IBDLT | BEG+19~ |
IBEDT | QUEQ+1!, DLT+2, DLT+4, DLT+10 |
IBFIL | DLT+1~, DLT+3*, DLT+7 |
IBGP | BEG+19~ |
IBI | BEG+19~ |
IBINS | BEG+19~, BEG+32!* |
IBINS( | BEG+62, BEG+63, SET+12 |
IBINS(0 | BEG+59, BEG+60 |
IBINSNAM | BEG+22~*, BEG+66*, BEG+69, BEG+70, BEG+71, QUEQ+2! |
IBINSV | BEG+19~, BEG+25*, BEG+32*, BEG+55*, BEG+56, SET+11 |
IBOK | BEG+22~*, BEG+68*, BEG+69*, BEG+70*, BEG+71*, QUEQ+2! |
IBOUT | BEG+24*, QUEQ+1! |
IBPAGE | BEG+19~, BEG+25* |
IBQUERY | DLT+1~ |
IBQUIT | BEG+19~, BEG+25*, BEG+84 |
IBRF | BEG+34, QUEQ+1! |
>> IBRFU | BEG+49 |
IBRL | BEG+34, QUEQ+1! |
>> IBRLU | BEG+48 |
IBSIN | BEG+55, BEG+56, BEG+59, BEG+60, BEG+68, BEG+75, QUEQ+1!, SET+11, SET+12, SET+16 |
IBSIN( | BEG+75 |
IBSINF | QUEQ+1! |
>> IBSINFU | BEG+69, BEG+71 |
IBSINL | QUEQ+1! |
>> IBSINLU | BEG+69, BEG+70, BEG+71 |
IBTD | BEG+20~, BEG+32*, BEG+34*, BEG+37*, SET+5~, SET+8*, SET+10, SET+15, SET+17 |
IBTD( | SET+6*, SET+7*, SET+8 |
IBTD("" | SET+8 |
IBTMP | BEG+20~, QUEQ+1! |
IBTMP(1 | SET+10*, SET+15 |
IBTMP(2 | SET+11*, SET+12*, SET+17 |
IBVAL | DLT+1~, DLT+7 |
IBVAL("BDT" | DLT+4* |
IBVAL("EDT" | DLT+4* |
IBVANM | BEG+22~*, BEG+45*, BEG+48, BEG+49, QUEQ+2! |
IBX | BEG+20~, BEG+62*, BEG+63, SET+12, DLT+1~, DLT+10*, DLT+11, DLT+12 |
IBXX | BEG+20~, BEG+75* |
SDCNT | BEG+20~ |
U | BEG+24, BEG+43, BEG+66, SET+8, SET+9, SET+10, SET+11, SET+12, DLT+12 |
VA | BEG+20~, BEG+39!, QUEQ+1! |
VADM | BEG+20~, BEG+39!, QUEQ+1! |
VADM(1 | BEG+43*, BEG+45, SET+10, SET+15, SET+17 |
VADM(2 | SET+10 |
VADM(3 | SET+10 |
VADM(4 | BEG+52, SET+10 |
VADM(6 | SET+10 |
VAERR | BEG+20~, BEG+39!, QUEQ+1! |
VAPA | BEG+20~, BEG+39!, QUEQ+1! |
VAPA(8 | SET+11 |
X | BEG+20~, DLT+1~ |
Y | BEG+20~, DLT+1~ |