©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
IBECEA ;ALB/RLW - Cancel/Edit/Add Patient Charges ; 12-JUN-92
Source file <IBECEA.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 4 | ARRAY^IBECEA0 $$CHECK^IBECEAU $$PT^IBEFUNC $$DAT2^IBOUTL |
| Registration | 2 | EN^VALM ($$FDATE,$$SETSTR)^VALM1 |
| VA Fileman | 2 | ^DIC ^DIR |
| Kernel | 1 | $$FMADD^XLFDT |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 1 | IB CANCEL/EDIT/ADD CHARGES |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PATQ | ||
| EN | ; Cancel/Edit/Add Patient Charges -- invoke the List Manager.
|
|
| PAT | ; 'Change Patient' protocol entry action.
|
|
| HDR | ; Build screen header.
|
|
| SLPT() | ; Select a patient.
|
|
| MSG | ; Quick message display.
|
|
| SLRX() | ; Include Rx copay charges?
|
|
| ENQ | ||
| INIT | ; List Manager (IB CHARGES) main entry point.
|
|
| EXIT | ||
| INITQ | ||
| DATE | ; 'Change Date' protocol entry action.
|
|
| FNL | ; List Manager (IB CHARGES) exit action.
|
|
| SLDT() | ; Select Charge dates.
|
|
| SLDTQ |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("IBCMLIDX" | FNL+2! |
| ^TMP("IBECEA" | FNL+2! |
| Name | Line Occurrences |
|---|---|
| $$SLDT | INIT+4, DATE+2 |
| $$SLPT | INIT+3, PAT+2 |
| $$SLRX | INIT+5, DATE+3 |
| ENQ | EN+1 |
| FNL | INIT+3, INIT+4, INIT+5 |
| HDR | DATE+4 |
| INITQ | INIT+3, INIT+4, INIT+5 |
| MSG | PAT+2, DATE+2, DATE+3 |
| PATQ | PAT+2, DATE+2, DATE+3 |
| SLDTQ | SLDT+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | PAT+1, PAT+2*, DATE+2*, DATE+3*, HDR+1, SLPT+2*, FNL+2! |
| DIC | SLPT+1~, SLPT+2* |
| DIC(0 | SLPT+2* |
| DIR | MSG+1~, SLDT+1~, SLRX+1~ |
| DIR("A" | SLDT+2*, SLDT+3*, SLRX+2* |
| DIR("B" | SLDT+2*, SLDT+3*, SLRX+2* |
| DIR(0 | MSG+3*, SLDT+2*, SLDT+3*, SLRX+2* |
| DIRUT | MSG+1~, SLDT+1~, SLDTQ, SLRX+1~, SLRX+3 |
| DT | SLDT+2, SLDT+3 |
| DTOUT | MSG+1~, SLDT+1~, SLRX+1~ |
| DUOUT | MSG+1~, SLDT+1~, SLDTQ, SLRX+1~, SLRX+3 |
| DUZ | INIT+1 |
| IBABEG | DATE+1, DATE+2*, DATE+3*, HDR+2, SLDT+2*, FNL+2! |
| IBACMAR | INIT+2*, FNL+1! |
| IBACMIDX | INIT+2*, FNL+1! |
| IBAEND | DATE+1, DATE+2*, DATE+3*, HDR+2, SLDT+3*, FNL+2! |
| IBARTYP | FNL+2! |
| IBAT | FNL+2! |
| IBAX | FNL+2! |
| IBDFN | PAT+1~*, PAT+2, DATE+2, DATE+3 |
| IBDT1 | DATE+1~*, DATE+2, DATE+3 |
| IBDT2 | DATE+1~*, DATE+2, DATE+3 |
| IBDUZ | INIT+1*, FNL+2! |
| IBFAC | ENQ! |
| IBIL | FNL+2! |
| IBJOB | INIT+1*, FNL+2! |
| IBL | FNL+2! |
| IBLDT | FNL+2! |
| IBNAM | HDR+1*, HDR+3, FNL+2! |
| IBNOW | FNL+2! |
| IBPRNT | FNL+2! |
| IBRX | DATE+1, DATE+3*, SLRX+2*, FNL+2! |
| IBRXXX | DATE+1~*, DATE+3 |
| IBSAVY | FNL+2! |
| IBSERV | ENQ! |
| IBSITE | ENQ! |
| IBWHER | INIT+1*, FNL+2! |
| IBXA | FNL+2! |
| IBY | FNL+2! |
| VA | FNL+2! |
| >> VALMBCK | DATE+4*, MSG+3* |
| VALMEVL | EN+2! |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(2 | HDR+3* |
| VALMIDX | INIT+2*, FNL+1! |
| >> VALMQUIT | INIT+3*, INIT+4*, INIT+5* |
| X | MSG+1~, SLPT+1~, SLDT+1~, SLRX+1~, FNL+2! |
| XQORS | EN+2! |
| Y | MSG+1~, SLPT+1~, SLPT+2, SLPT+3, SLDT+1~, SLDT+2, SLDT+3, SLRX+1~, SLRX+2 |