IBCEFG0 ;ALB/TMP - FORMS GENERATOR EXTRACT (CONT) ;17-JAN-96
Source file <IBCEFG0.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | DATA^IBCEFG $$EDIBILL^IBCEFG1 |
VA FileMan | 1 | $$GET1^DIQ |
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 | 9 | IBCE837 IBCEF IBCEFG IBCFP1 IBCSCH IBCSCH2 IBJTBA ^IBA(364.5 ^IBA(364.6 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ELE(IBXDA,IBXPARM,IBXFORM) | ; Find element to extract for form fld
|
|
ELEQ | ||
DATA(IBXELE,IBX00,IBXFILE,IBXIEN,IBXARRAY,IBXERR) | ; Find data assoc with form fld def
|
|
DATAQ | ||
DUP(DA,X,CK) | ; Duplicate check on form field definitions
|
|
DUPQ | ||
BILLPARM(IBXIEN,IBXPARM) | ; Sets up parameters for extracting bill data
|
|
PARTEXT(FORMAT,PG,LN,IBXIEN,IBXFORM,IBXPARM,IBXERR) | ; Extract part of a printed form
|
|
PTQ | ||
BILLN(FORMAT,PG,LN,IBXIEN,IBXFORM) | ; Call to extract the contents of lines on a bill
; See PARTEXT for parameters ; RETURNS null if extract OK, OR error text if not |
|
EXTONE(IBXIEN,IBXELE,IBX,IBXERR) | ;
; Extract unformatted data element(s) for record in file whose entry ; is IBXIEN ; IBXELE(1-n) = array passed by reference and containing the data ; element ien's from file 364.5 to return ; IBX = name of array to be returned containing the data requested. ; For individual-valued elements, IBX(1-n) will ; contain the data element values. ; For group elements, IBX(1-n,1-z) will contain the ; values of the data element's 1-z occurrences. ; ; IBXERR = if an error, the error message will be returned here |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | BILLPARM+5, BILLPARM+6, PARTEXT+24 |
^IBA(364.5 - [#364.5] | DATA+3, EXTONE+16 |
^IBA(364.6 - [#364.6] | ELE+5, DUP+5, DUP+9, DUP+10, PARTEXT+27, PARTEXT+28, PARTEXT+29, PARTEXT+30, PARTEXT+31 |
^IBA(364.7 - [#364.7] | ELE+4, ELE+5 |
^IBE(353 - [#353] | PARTEXT+22 |
^TMP("DIERR" | DATA+7, PARTEXT+21!, PTQ! |
^TMP("IBXDATA" | PARTEXT+21!, PARTEXT+34, PARTEXT+35, PARTEXT+36, PTQ! |
^TMP("IBXDISP" | PARTEXT+21!, PARTEXT+34*, PARTEXT+37*, PARTEXT+38* |
^TMP("IBXEDIT" | PARTEXT+21! |
^TMP("IBXSAVE" | BILLN+4!, BILLN+7! |
Name | Field # of Occurrence |
---|---|
^( | PARTEXT+36 |
^("" | ELE+5 |
^(1 | DATA+3, DATA+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CK | DUP~, DUP+6 |
COL | DUP+2~, DUP+6*, DUP+8, DUP+9, DUP+10 |
DA | DUP~, DUP+4, DUP+5, DUP+10 |
DUP | DUP+2~, DUP+3*, DUP+11*, DUPQ |
FORM | DUP+2~, DUP+6*, DUP+8, DUP+9, DUP+10 |
FORMAT | PARTEXT~, PARTEXT+34, PARTEXT+37, PARTEXT+38, BILLN~, BILLN+6 |
IB0 | BILLPARM+4~, BILLPARM+5*, BILLPARM+6 |
IBCBH | BILLPARM+4~, BILLPARM+5*, BILLPARM+6 |
IBX | ELE+1~, ELE+2, ELE+3*, ELE+4*, ELE+5*, ELEQ, EXTONE~, EXTONE+14, EXTONE+20*, EXTONE+21 |
IBX00 | DATA~, DATA+2, DATA+3, DATA+4, DATA+5, DATA+6, DATA+7, EXTONE+13~, EXTONE+16*, EXTONE+19 |
IBX2 | PARTEXT+20~, PARTEXT+22*, PARTEXT+23, PARTEXT+26 |
IBXARRAY | DATA~, DATA+6, EXTONE+16*, EXTONE+19, EXTONE+20, EXTONE+21 |
IBXCOL | DATA+1~, PARTEXT+20~, PARTEXT+30*, PARTEXT+31, PARTEXT+33, PARTEXT+36*, PARTEXT+37, PARTEXT+38 |
IBXDA | ELE~, ELE+3, ELE+4, ELE+5, DATA+1~, PARTEXT+20~, PARTEXT+31*, PARTEXT+32, PARTEXT+33 |
IBXDATA | DATA+2*, DATA+5*, DATA+6*, DATAQ, BILLN+3~, EXTONE+13~ |
IBXELE | DATA~, DATA+3, EXTONE~ |
IBXELE( | EXTONE+15, EXTONE+16, EXTONE+19 |
IBXERR | DATA~, DATA+7*, PARTEXT~, PARTEXT+23*, PARTEXT+24*, PARTEXT+29, PARTEXT+30, PARTEXT+33, BILLN+3~, BILLN+6 , BILLN+8, EXTONE~, EXTONE+19 |
IBXF | PARTEXT+20~, PARTEXT+26*, PARTEXT+27, PARTEXT+28, PARTEXT+29, PARTEXT+30, PARTEXT+31 |
IBXFF | DATA+1~ |
IBXFILE | DATA~, DATA+5, DATA+6, PARTEXT+20~, EXTONE+13~, EXTONE+16*, EXTONE+17, EXTONE+19 |
IBXFORM | ELE~, ELE+3, ELE+5, PARTEXT~, PARTEXT+22, PARTEXT+26, PARTEXT+33, BILLN~, BILLN+6 |
IBXIEN | DATA~, DATA+5, DATA+6, BILLPARM~, BILLPARM+5, BILLPARM+6, PARTEXT~, PARTEXT+24, PARTEXT+33, BILLN~ , BILLN+5, BILLN+6, EXTONE~, EXTONE+19 |
IBXLN | DATA+1~, PARTEXT+20~, PARTEXT+29*, PARTEXT+30, PARTEXT+31, PARTEXT+33, PARTEXT+34*, PARTEXT+35, PARTEXT+36, PARTEXT+37 , PARTEXT+38 |
IBXPARM | ELE~, BILLPARM~, PARTEXT~, PARTEXT+33, BILLN+3~, BILLN+5, BILLN+6 |
IBXPARM(1 | ELE+2, BILLPARM+6* |
IBXPARM(2 | ELE+3, BILLPARM+6* |
IBXPARM(3 | ELE+3, BILLPARM+6* |
IBXPG | DATA+1~, PARTEXT+20~, PARTEXT+27*, PARTEXT+28*, PARTEXT+29, PARTEXT+30, PARTEXT+31, PARTEXT+33, PARTEXT+34*, PARTEXT+35 , PARTEXT+36, PARTEXT+37, PARTEXT+38 |
IBXQ | EXTONE+13~, EXTONE+15*, EXTONE+16, EXTONE+19, EXTONE+20*, EXTONE+21 |
IBXREC | PARTEXT+20~ |
IBXSIZE | BILLN+3~ |
IBXXD | EXTONE+13~, EXTONE+18!, EXTONE+19* |
LN | DUP+2~, DUP+6*, DUP+8, DUP+9, DUP+10, PARTEXT~, PARTEXT+25*, PARTEXT+29, PARTEXT+34, BILLN~ , BILLN+6 |
ND | DUP+2~, DUP+5*, DUP+6 |
PG | DUP+2~, DUP+6*, DUP+8, DUP+9, DUP+10, PARTEXT~, PARTEXT+25*, PARTEXT+27, PARTEXT+28, PARTEXT+34 , BILLN~, BILLN+6 |
U | DATA+2, DATA+3, DATA+4, DATA+5, DATA+6, DATA+7, DUP+6, BILLPARM+5, BILLPARM+6, PARTEXT+23 , PARTEXT+25, PARTEXT+26, PARTEXT+27, PARTEXT+28, PARTEXT+29, PARTEXT+34, EXTONE+16 |
X | DUP~, DUP+6 |
Z | DUP+2~, DUP+9*, DUP+10, PARTEXT+20~, PARTEXT+36*, PARTEXT+37, PARTEXT+38 |
Z0 | EXTONE+13~, EXTONE+21* |
Z1 | EXTONE+13~, EXTONE+21* |