ONCACD1 ;HINES OIFO/GWB - Extract NAACCR/STATE/VACCR data ;09/06/11
Source file <ONCACD1.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ;Entry point
|
|
SETUP | ;Loop through appropriate cross-reference
|
|
LOOP | ;Apply extract selection rules
|
|
OUTPUT(IEN,EXTRACT,JUMP,OUT) | ;Output
|
|
HEAD(IEN,OUT) | ;Preview End-of-Page
|
|
HEADER | ;Preview Header
|
|
XML21 | ;P14
|
|
DISPLAY(DEVICE,WRITE,OUT) | ; Display preview
|
|
DATA(IEN,ACD160,STRING,DEFAULT,FILL,LEN,JUMP,NODE,POS) | ;Compute extract value
|
|
XFILL | ;Truncate or pad xml fields
|
|
STRIP | ;replace special characters
|
|
RCRS | ;RCRS exeption rules
|
|
CLEANUP | ;Cleanup
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ONCO(160 - [#160] | GET1^DIQ |
^ONCO(165.5 - [#165.5] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("RM" | SETUP+1 |
^ONCO(160.16 - [#160.16] | LOOP+7, LOOP+8, OUTPUT+13, OUTPUT+15, OUTPUT+17, OUTPUT+18, OUTPUT+20, OUTPUT+21, OUTPUT+22, OUTPUT+23 , OUTPUT+28, OUTPUT+29, HEADER+4, XML21+4, XML21+9, XML21+11, XML21+12, XML21+20, XML21+21, XML21+22 , XML21+23 |
^ONCO(160.17 - [#160.17] | OUTPUT+57, OUTPUT+59, OUTPUT+61, OUTPUT+62, OUTPUT+64, OUTPUT+65, OUTPUT+66, OUTPUT+67 |
^ONCO(165.5 - [#165.5] | SETUP+33, SETUP+34, SETUP+35, SETUP+40, SETUP+41, SETUP+44, SETUP+45, SETUP+48, SETUP+49, SETUP+54 , SETUP+55, SETUP+60, SETUP+61, SETUP+62, SETUP+72, SETUP+73, SETUP+74, SETUP+75, SETUP+84, SETUP+85 , SETUP+86, SETUP+87, OUTPUT+1 |
^TMP($J | EN1+1!, LOOP+11* |
Name | Line Occurrences |
---|---|
DATA | OUTPUT+24, OUTPUT+68, XML21+24 |
DISPLAY | OUTPUT+18, OUTPUT+62 |
HEAD | OUTPUT+2, DISPLAY+3 |
HEADER | HEAD+10 |
LOOP | SETUP+36, SETUP+42, SETUP+46, SETUP+50, SETUP+56, SETUP+67, SETUP+68, SETUP+80, SETUP+81, SETUP+92 , SETUP+93 |
OUTPUT | LOOP+12 |
SETUP | EN1+8 |
STRIP | DATA+12 |
XFILL | DATA+13 |
XML21 | OUTPUT+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AA | STRIP+1~, STRIP+4*, STRIP+5*, STRIP+6*, STRIP+7*, STRIP+8*, STRIP+9 |
>> ACCN | SETUP+35* |
ACD160 | OUTPUT+1*, OUTPUT+24, OUTPUT+68, HEADER+5, HEADER+6, XML21+24, DATA~ |
ACDANS | DATA+1~, DATA+6, DATA+9*, DATA+10*, DATA+12, DATA+14, DATA+18, DATA+31, DATA+40, DATA+41 , DATA+45, DATA+46, DATA+48, XFILL+1, XFILL+2*, XFILL+10, XFILL+11*, XFILL+12*, STRIP+3, STRIP+4 , STRIP+10* |
>> ACO | LOOP+4 |
BB | STRIP+1~, STRIP+2*, STRIP+9*, STRIP+10 |
BLANK | SETUP+2~, SETUP+3*, DATA+26 |
CAL | DATA+43~, XFILL+4~ |
COL | DISPLAY+2~, DISPLAY+4*, DISPLAY+5*, DISPLAY+8 |
DATE | SETUP+32, CLEANUP+1! |
>> DATE1 | EN1+5*, SETUP+33 |
>> DATEDX | RCRS+4, RCRS+5, RCRS+6, RCRS+7 |
DCLC | SETUP+2~, SETUP+34* |
DEFAULT | OUTPUT+16~, OUTPUT+22*, OUTPUT+24, OUTPUT+60~, OUTPUT+65*, OUTPUT+68, XML21+10~, XML21+22*, XML21+24, DATA~ , DATA+6, DATA+8, DATA+9, DATA+10, DATA+33, DATA+34, DATA+35, DATA+36 |
DEVICE | EN1+9, SETUP+1, SETUP+10, SETUP+94, OUTPUT+2, OUTPUT+18, OUTPUT+62, DISPLAY~, DISPLAY+1, DISPLAY+3 , DATA+14 |
DIR | HEAD+7~ |
DIR(0 | HEAD+8* |
DOTS | DISPLAY+2~, DISPLAY+7*, DISPLAY+9 |
DUZ(2 | SETUP+33, SETUP+40, SETUP+44, SETUP+48, SETUP+54, SETUP+60, SETUP+72, SETUP+84 |
EDT | EN1+4*, SETUP+34, SETUP+35, SETUP+40, SETUP+44, SETUP+48, SETUP+54, SETUP+60, SETUP+72, SETUP+84 , CLEANUP+1! |
EXIT | DATA+1~*, DATA+25*, DATA+27 |
EXPORT | EN1+2~, EN1+7* |
EXTRACT | SETUP+10, SETUP+21, SETUP+94, LOOP+4, LOOP+7, LOOP+8, LOOP+12, OUTPUT~, OUTPUT+13, OUTPUT+15 , OUTPUT+17, OUTPUT+18, OUTPUT+20, OUTPUT+21, OUTPUT+22, OUTPUT+23, OUTPUT+28, OUTPUT+29, OUTPUT+30~, OUTPUT+31* , OUTPUT+57, OUTPUT+59, OUTPUT+61, OUTPUT+62, OUTPUT+64, OUTPUT+65, OUTPUT+66, OUTPUT+67, HEADER+4, XML21+4 , XML21+9, XML21+11, XML21+12, XML21+20, XML21+21, XML21+22, XML21+23, DATA+14 |
FDNUM | SETUP+2~, SETUP+64*, SETUP+77*, SETUP+89* |
FILL | OUTPUT+16~, OUTPUT+23*, OUTPUT+24, OUTPUT+60~, OUTPUT+66*, OUTPUT+68, XML21+10~, XML21+23*, XML21+24, DATA~ , DATA+44, XFILL+6 |
FLG | HEAD+1~, HEAD+2*, HEAD+3*, HEAD+4 |
I | HEADER+8*, DISPLAY+9*, DATA+7~, DATA+9*, DATA+24~, DATA+26*, DATA+32~, DATA+34*, DATA+36*, DATA+43~ , DATA+47*, XFILL+4~, XFILL+11*, STRIP+3*, STRIP+4 |
IEN | SETUP+2~, SETUP+4*, SETUP+33*, SETUP+34, SETUP+35, SETUP+40*, SETUP+41, SETUP+44*, SETUP+45, SETUP+48* , SETUP+49, SETUP+54*, SETUP+55, SETUP+60*, SETUP+61, SETUP+62, SETUP+64, SETUP+66, SETUP+72*, SETUP+73 , SETUP+74, SETUP+75, SETUP+77, SETUP+79, SETUP+84*, SETUP+85, SETUP+86, SETUP+87, SETUP+89, SETUP+91 , LOOP+4, LOOP+11, LOOP+12, OUTPUT~, OUTPUT+1, OUTPUT+2, OUTPUT+6, OUTPUT+24, OUTPUT+68, HEAD~ , HEAD+2, HEAD+3, XML21+3, XML21+24, DATA~ |
IOF | HEADER+1, HEADER+2 |
IOSL | HEAD+4, DISPLAY+3 |
IOST | HEAD+6, HEADER+2 |
ITEM | DISPLAY+2~, DISPLAY+6*, DISPLAY+7, DISPLAY+8 |
JUMP | LOOP+5~, LOOP+12, OUTPUT~, OUTPUT+24, OUTPUT+31*, OUTPUT+68, XML21+24, DATA~, DATA+21, DATA+22 , DATA+23 |
JUST | DATA+43~, DATA+44*, DATA+46, DATA+48, XFILL+4~, XFILL+6*, XFILL+11, XFILL+12 |
LACDANS | XFILL+4~, XFILL+5*, XFILL+11*, XFILL+12 |
LEN | OUTPUT+16~, OUTPUT+20*, OUTPUT+24, OUTPUT+60~, OUTPUT+67*, OUTPUT+68, XML21+10~, XML21+20*, XML21+24, DATA~ , DATA+9, DATA+26, DATA+34, DATA+36, DATA+40, DATA+41, DATA+45, XFILL+1, XFILL+2, XFILL+10 |
LINE | LOOP+5~, LOOP+8*, LOOP+9 |
>> MPGH | RCRS+1, RCRS+2, RCRS+3, RCRS+4, RCRS+5, RCRS+6, RCRS+7 |
>> MPGHD | RCRS+4, RCRS+5, RCRS+6, RCRS+7 |
NC | SETUP+2~, SETUP+63*, SETUP+64*, SETUP+65, SETUP+76*, SETUP+77*, SETUP+78, SETUP+88*, SETUP+89*, SETUP+90 |
NCDB | SETUP+34, SETUP+35, CLEANUP+1! |
NINE | SETUP+2~, SETUP+5* |
NODE | OUTPUT+14~*, OUTPUT+15*, OUTPUT+17, OUTPUT+18, OUTPUT+20, OUTPUT+21, OUTPUT+22, OUTPUT+23, OUTPUT+24, OUTPUT+30~ , OUTPUT+58~*, OUTPUT+59*, OUTPUT+61, OUTPUT+62, OUTPUT+64, OUTPUT+65, OUTPUT+66, OUTPUT+67, OUTPUT+68, XML21+5~* , XML21+9*, XML21+11, XML21+12, XML21+20, XML21+21, XML21+22, XML21+23, XML21+24, DATA~ |
OIEN | EN1+2~, EN1+6*, HEAD+2, HEAD+3* |
ONC11 | SETUP+11~, SETUP+23*, SETUP+26 |
ONC22 | SETUP+11~, SETUP+24*, SETUP+27 |
ONC33 | SETUP+11~, SETUP+24*, SETUP+27 |
ONC44 | SETUP+11~, SETUP+24*, SETUP+27 |
ONC55 | SETUP+11~ |
>> ONCCLCA | SETUP+66*, SETUP+67, SETUP+79*, SETUP+80, SETUP+91*, SETUP+92 |
ONCDIC | SETUP+11~, SETUP+22*, SETUP+26 |
ONCDT | SETUP+8~, SETUP+32*, SETUP+33* |
ONCDTIME | SETUP+11~ |
ONCDTNW | SETUP+8~, SETUP+18*, SETUP+27 |
ONCIE160 | SETUP+8~ |
ONCIE160( | OUTPUT+6, XML21+3* |
>> ONCLDT | SETUP+40, SETUP+44, SETUP+48, SETUP+60, SETUP+72, SETUP+84 |
ONCNN | SETUP+11~ |
ONCOLD | XML21+1~, XML21+2*, XML21+14, XML21+17* |
ONCPOS | XML21+1~, XML21+2*, XML21+14, XML21+17* |
ONCPP | SETUP+11~ |
ONCPRNT | SETUP+8~, SETUP+9*, SETUP+94, OUTPUT+7, OUTPUT+8, DATA+3, DATA+19* |
>> ONCR12 | SETUP+67, SETUP+68, SETUP+80, SETUP+81, SETUP+92, SETUP+93 |
ONCRTYP | XML21+1~, XML21+2*, XML21+7*, XML21+8*, XML21+14, XML21+15, XML21+16, XML21+17 |
>> ONCT | SETUP+12*, SETUP+14, SETUP+18 |
ONCTHR | SETUP+11~, SETUP+14*, SETUP+18 |
ONCTMN | SETUP+11~, SETUP+14*, SETUP+18 |
ONCTSN | SETUP+11~, SETUP+14*, SETUP+15*, SETUP+16*, SETUP+17*, SETUP+18 |
ONCTT | SETUP+11~ |
ONCTYPE | SETUP+11~, SETUP+20*, SETUP+21*, SETUP+27 |
ONCTZONE | SETUP+8~, SETUP+13*, SETUP+17 |
ONCX21 | SETUP+8~, SETUP+19*, OUTPUT+5, DATA+2 |
ONCXDATA | XML21+5~, XML21+10~, XML21+12*, XML21+13, DATA+18 |
ONCXPRT | SETUP+11~, SETUP+28*, OUTPUT+11*, XML21+25* |
OUT | SETUP+6*, SETUP+33, SETUP+40, SETUP+44, SETUP+48, SETUP+54, SETUP+60, SETUP+72, SETUP+84, LOOP+3 , LOOP+12, OUTPUT~, OUTPUT+2, OUTPUT+13, OUTPUT+15, OUTPUT+18, OUTPUT+19, OUTPUT+57, OUTPUT+59, OUTPUT+62 , OUTPUT+63, HEAD~, HEAD+5, HEAD+9*, XML21+4, XML21+9, DISPLAY~, DISPLAY+3 |
PAGE | EN1+2~, EN1+6*, HEAD+5, HEADER+1, HEADER+2, HEADER+3*, HEADER+4* |
POS | OUTPUT+3~*, OUTPUT+13*, OUTPUT+15, OUTPUT+24, OUTPUT+29, OUTPUT+30~, OUTPUT+56*, OUTPUT+57*, OUTPUT+59, OUTPUT+68 , XML21+2*, XML21+4*, XML21+7, XML21+8, XML21+9, XML21+14, XML21+15, XML21+16, XML21+17, XML21+24 , DATA~, DATA+3, DATA+15, DATA+16, DATA+17, DATA+22, DATA+23 |
REM | DATA+43~, DATA+45*, DATA+47, XFILL+4~, XFILL+10*, XFILL+11 |
RULES | LOOP+5~, LOOP+6*, LOOP+7*, LOOP+8 |
SDT | SETUP+34, SETUP+35, SETUP+40*, SETUP+44*, SETUP+48*, SETUP+54*, SETUP+60*, SETUP+72*, SETUP+84*, CLEANUP+1! |
STEXT | SETUP+33, SETUP+40, SETUP+44, SETUP+48, SETUP+54, SETUP+60, SETUP+72, SETUP+84, HEADER+3, CLEANUP+1! |
STOPDT | EN1+2~ |
STRING | OUTPUT+16~, OUTPUT+21*, OUTPUT+24, OUTPUT+60~, OUTPUT+64*, OUTPUT+68, XML21+10~, XML21+21*, XML21+24, DATA~ , DATA+4, DATA+28 |
STUFF | DATA+43~, DATA+44*, DATA+47, XFILL+4~, XFILL+6*, XFILL+7, XFILL+8*, XFILL+9*, XFILL+11 |
TPG | SETUP+2~, SETUP+62*, SETUP+68, SETUP+75*, SETUP+81, SETUP+87*, SETUP+93, RCRS+1, RCRS+2, RCRS+3 , RCRS+4, RCRS+5, RCRS+6, RCRS+7 |
U | SETUP+34, SETUP+35, SETUP+62, SETUP+74, SETUP+75, SETUP+86, SETUP+87, OUTPUT+1, OUTPUT+18, OUTPUT+20 , OUTPUT+22, OUTPUT+23, OUTPUT+62, OUTPUT+67, HEADER+4, XML21+12, XML21+20, XML21+22, XML21+23, DISPLAY+4 , DISPLAY+6, DATA+22, DATA+23 |
VALID | LOOP+5~, LOOP+10, RCRS+1*, RCRS+2*, RCRS+3*, RCRS+4*, RCRS+5*, RCRS+6*, RCRS+7* |
WRITE | DISPLAY~, DISPLAY+4, DISPLAY+6 |
X | SETUP+1*, SETUP+2~, DATA+7~*, DATA+32~* |
X1 | STRIP+1~, STRIP+4*, STRIP+5, STRIP+6, STRIP+7, STRIP+8 |
Y | HEAD+7~, HEAD+9 |
ZERO | SETUP+2~, SETUP+4* |
ZNINE | SETUP+2~, SETUP+5* |
ZTREQ | EN1+2~ |