IBDFBKR ;ALB/AAS - EF utilite, receive and format data for PCE ; OCT 1,1994
Source file <IBDFBKR.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 |
---|---|---|
Automated Information Collection System | 2 | IBDFBK2 IBDFFRFT |
Name | Comments | DBIA/ICR reference |
---|---|---|
PCE(IB,PXCA) | ;
; -- Entry point from Broker receiver to parse data and ; either send to PCE or store until all pages received |
|
PCEQ | ||
FILAD(REC) | ;
; -- adds the data to the FORM TRACKING file ; -- awaiting all of the pages to be sent ; REC is the line of raw data, as received ; -- may change to FM call??? |
|
ARYAD(DATA) | ;
; -- Input DATA ; -- DATA format B=bubble or ; H=handprint>:<ien of form element in the form ; definition table>:<value entered ; D=dynamic bubble>:<field identifier>:<number of choice> ; -- Output Bubbles,Dynamic, or Handprint Array. |
|
BRKARY(IB,IBDATA) | ;
; -- break array of data into known parts ; -- Input IB(array) contains raw data from receiver ; IBDATA(array) called by reference ; -- Output IBDATA(array) of new formated data ; result message indicator |
|
BRKQ | ||
VALIDD(IBDATA) | ;
; -- Determine if data contains Formtype, FormID, and Page ; -- Does form ID and form type match entry in Form Tracking ; -- is the form supposed to have this page? ; -- Input IBDATA(array) ; -- Output result message indicator (3=valid, 4=invalid, 5=already recvd) |
|
VQ | ||
NEEDMOR(IBDATA) | ;
; -- check to see if all the pages have been received |
|
NMQ | ||
RESULT | ;;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(357.96 | FILAD+15 |
^IBD(357.96 - [#357.96] | PCE+14, PCE+17, PCE+37, FILAD+14, FILAD+17, VALIDD+12, VALIDD+13, VALIDD+15, VALIDD+18, NEEDMOR+4 , NEEDMOR+5 |
Name | Line Occurrences |
---|---|
$$BRKARY | PCE+8 |
$$NEEDMOR | PCE+23 |
$$VALIDD | PCE+11 |
ARYAD | PCE+33, PCE+37 |
FILAD | PCE+27 |
PCEQ | PCE+11 |
Name | Field # of Occurrence |
---|---|
^(0 | NEEDMOR+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PCE+4~ |
%H | PCE+4~ |
%I | PCE+4~ |
BUBBLES | PCE+4~, PCE+43 |
BUBBLES( | ARYAD+9* |
CNT | BRKARY+7~, BRKARY+8*, BRKARY+9, BRKARY+10*, BRKARY+11*, BRKARY+12*, BRKARY+13* |
DA | PCE+20!, FILAD+16! |
DA(1 | FILAD+15* |
DATA | ARYAD~, ARYAD+8*, ARYAD+9, ARYAD+10, ARYAD+11 |
DD | FILAD+16! |
DIC | PCE+20!, FILAD+15*, FILAD+16! |
DIC("P" | FILAD+15* |
DIC(0 | FILAD+15* |
DIE | PCE+20! |
DLAYGO | FILAD+15*, FILAD+16! |
DO | FILAD+16! |
DR | PCE+20! |
DYNAMIC | PCE+4~, PCE+43 |
DYNAMIC( | ARYAD+10* |
>> FDA( | PCE+15*, PCE+18* |
HANDPRNT | PCE+4~, PCE+43 |
HANDPRNT( | ARYAD+11* |
I | PCE+4~, PCE+27*, PCE+33*, PCE+36*, PCE+37*, BRKARY+7~, BRKARY+8*, BRKARY+9*, BRKARY+10, BRKARY+11 , BRKARY+12, BRKARY+13, NEEDMOR+2~, NEEDMOR+3*, NEEDMOR+4*, NEEDMOR+5 |
IB | PCE~, PCE+8, BRKARY~ |
IB( | BRKARY+10, BRKARY+11, BRKARY+12, BRKARY+13 |
IBDA | PCE+4~, PCE+14*, PCE+15 |
IBDATA | PCE+4~, PCE+8, PCE+11, PCE+23, PCEQ, BRKARY~, VALIDD~, NEEDMOR~ |
IBDATA("FORMID" | PCE+14, PCE+17, PCE+18, PCE+28, PCE+31, PCE+37, PCE+43, FILAD+14, FILAD+15, FILAD+17 , BRKARY+11*, VALIDD+9, VALIDD+12, VALIDD+13, VALIDD+15, VALIDD+18, NEEDMOR+4, NEEDMOR+5 |
IBDATA("FORMTYPE" | BRKARY+10*, VALIDD+8, VALIDD+13 |
IBDATA("PAGE" | PCE+14, PCE+17, BRKARY+12*, VALIDD+10, VALIDD+15, VALIDD+18 |
>> IBDF( | PCE+27, PCE+33, BRKARY+9, BRKARY+10!, BRKARY+11!, BRKARY+12!, BRKARY+13! |
J | PCE+4~ |
NEEDMORE | PCE+4~, PCE+23*, PCE+25, PCE+30 |
PXCA | PCE~, PCE+43 |
REC | FILAD~, FILAD+6, FILAD+15 |
RESULT | PCE+4~, PCE+5*, PCE+8*, PCE+11*, PCE+26*, PCE+27, PCE+32*, PCE+44*, PCEQ, PCEQ+1 , FILAD+14* |
SUCCESS | PCE+28~*, PCE+31~* |
X | PCE+4~, PCE+17*, PCE+18, FILAD+15*, BRKARY+7~, VALIDD+7~*, VALIDD+8*, VALIDD+9*, VALIDD+10*, VALIDD+12* , VALIDD+13*, VALIDD+15*, VALIDD+18*, VALIDD+19*, VQ, NEEDMOR+2~, NEEDMOR+3*, NEEDMOR+5*, NMQ |
Y | PCE+4~ |
Name | Field # of Occurrence |
---|---|
$T(RESULT+RESULT | PCEQ+1 |