IBDFBKS4 ;ALB/AAS - ENCOUNTER FORM - create form spec for scanning (Broker Version) ; 6-JUN-95
Source file <IBDFBKS4.m>
Package | Total | Call Graph |
---|---|---|
Automated Information Collection System | 1 | BLDARY^IBDFBKS |
Package | Total | Caller Graph |
---|---|---|
Automated Information Collection System | 1 | IBDFBKS3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
FIELDS | ;
|
|
FIELDSQ | ||
LOOP(LBEGIN,LEND) | ; -- Loop through fields instead of one by one
|
|
DATA1 | ;; Data = STRCAT(\"FORMTYPE=153\", RS);
|
|
ONEBUB | ; -- for a single bubble field
|
Name | Field # of Occurrence |
---|---|
BLDARY^IBDFBKS | FIELDS+16, FIELDS+18, FIELDS+20, FIELDS+22, FIELDS+24, FIELDS+26, FIELDS+30, FIELDS+33, FIELDS+34, FIELDS+35 , FIELDS+36, FIELDS+37, FIELDS+38, FIELDS+41, FIELDS+42, FIELDS+43, FIELDS+44, FIELDS+45, FIELDS+46, FIELDS+47 , ONEBUB+1, ONEBUB+2, ONEBUB+3, ONEBUB+4, ONEBUB+5, ONEBUB+6, LOOP+1, LOOP+2, LOOP+3, LOOP+4 , LOOP+5, LOOP+6, LOOP+7, LOOP+8, LOOP+11, LOOP+12, LOOP+13 |
Name | Line Occurrences |
---|---|
LOOP | FIELDS+7, FIELDS+8 |
ONEBUB | FIELDS+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATATP | FIELDS+2~*, FIELDS+3, FIELDS+12, FIELDS+18, FIELDS+20, FIELDS+22, FIELDS+24, FIELDS+26 |
>> FIELDS | FIELDS+1, FIELDS+2, FIELDS+5, FIELDS+6, FIELDS+8, FIELDS+14, FIELDS+30, FIELDS+32, FIELDS+35, FIELDS+40 , FIELDS+43, ONEBUB+3 |
>> FLD | FIELDS+1*, FIELDS+2, FIELDS+5*, FIELDS+6*, FIELDS+7*, FIELDS+8*, FIELDS+9, FIELDS+14, FIELDS+18, FIELDS+20 , FIELDS+22, FIELDS+24, FIELDS+26, FIELDS+30, FIELDS+32, FIELDS+35, FIELDS+40, FIELDS+43, ONEBUB+1, ONEBUB+3 |
LBEGIN | FIELDS+4*, FIELDS+5*, FIELDS+6, FIELDS+7, FIELDS+8, LOOP~, LOOP+2 |
LEND | FIELDS+4*, FIELDS+6, FIELDS+7, FIELDS+8, FIELDS+9*, LOOP~, LOOP+3, LOOP+12 |
>> PAGE | FIELDS+1, FIELDS+2, FIELDS+5, FIELDS+6, FIELDS+8, FIELDS+14, FIELDS+30, FIELDS+32, FIELDS+35, FIELDS+40 , FIELDS+43, ONEBUB+3 |
>> QUIT | FIELDS+4*, FIELDS+5, FIELDS+6*, FIELDS+7*, FIELDS+8* |
TOSTRING | FIELDS+13~, FIELDS+14*, FIELDS+16, FIELDS+18, FIELDS+20, FIELDS+22, FIELDS+24, FIELDS+26 |