PXKIMM ;BP/LMT - Main Routine for filing immunization multiples ;10/11/2017
Source file <PXKIMM.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 |
|---|---|---|
| CLEAN(PXKNODE) | ; Clean for IMM multiples. Check to see if PXKAV=PXKBV
|
|
| DIE | ; File data for multiples
|
|
| PURGE(PXKNODE) | ; Before filing edits for an entry, purge multiples
|
|
| CMPRWP(PXKLIST1,PXKLIST2) | ; Compares two word-processing arrays for equivalence.
|
|
| CMPR(PXKDIFF,PXKLIST1,PXKLIST2) | ;
|
|
| CONCAT(PXKLIST) | ; Concatenates array into a caret ('^') delimited string
|
|
| ER | ; Check if data was filed ok
|
| FileNo | Call Tags |
|---|---|
| ^AUPNVIMM - [#9000010.11] | WP^DIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVIMM - [#9000010.11] | PURGE+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | PURGE+10~, PURGE+13*, ER+7, ER+11, ER+12, ER+13, ER+16, ER+20, ER+21, ER+22 |
| DA(1 | PURGE+11*, PURGE+12, PURGE+13 |
| DIK | PURGE+10~, PURGE+12* |
| >> PXKAV( | CLEAN+4, CLEAN+11!, DIE+4, DIE+13, DIE+14, DIE+15, DIE+16, DIE+17, DIE+29, DIE+30 |
| >> PXKCAT | ER+11, ER+12, ER+13, ER+20, ER+21, ER+22 |
| PXKCOUNT1 | CMPRWP+2~, CMPRWP+7*, CMPRWP+11*, CMPRWP+15 |
| PXKCOUNT2 | CMPRWP+2~, CMPRWP+8*, CMPRWP+14*, CMPRWP+15 |
| PXKDIFF | CMPR~, ER+2~, ER+6!, ER+7, ER+8 |
| PXKDIFF( | CMPR+36*, ER+9, ER+10, ER+12 |
| PXKERR | DIE+2~ |
| >> PXKERROR( | ER+11, ER+12, ER+13*, ER+20, ER+21, ER+22* |
| PXKFDA | DIE+2~ |
| PXKFDA(1 | DIE+15*, DIE+17*, DIE+19 |
| >> PXKFGED | DIE+22, DIE+34 |
| PXKFLD | ER+2~, ER+18*, ER+20, ER+21, ER+22 |
| PXKI | CONCAT+2~, CONCAT+6*, CONCAT+7*, CONCAT+8 |
| PXKIENS | DIE+2~, DIE+6*, DIE+15, DIE+17, DIE+36 |
| PXKLIST | CONCAT~, CONCAT+7, CONCAT+8 |
| PXKLIST1 | CMPRWP~, CMPRWP+10, CMPRWP+11, CMPRWP+20, CMPRWP+22, CMPR~, CMPR+14, CMPR+15 |
| PXKLIST2 | CMPRWP~, CMPRWP+13, CMPRWP+14, CMPRWP+21, CMPRWP+23, CMPR~, CMPR+20, CMPR+21 |
| PXKMATCH | CMPR+8~, CMPR+25*, CMPR+26, CMPR+28*, CMPR+30 |
| >> PXKNOD | DIE+4, DIE+8, DIE+10, DIE+13, DIE+14, DIE+15, DIE+16, DIE+17, DIE+22, DIE+26 , DIE+29, DIE+30, DIE+34 |
| PXKNODE | CLEAN~, CLEAN+4, CLEAN+8, CLEAN+9, CLEAN+11, PURGE~, PURGE+5, PURGE+9, PURGE+12, PURGE+13 , ER+2~, ER+5*, ER+7, ER+11, ER+12, ER+13 |
| >> PXKPIEN | DIE+6, PURGE+2, PURGE+6, PURGE+11 |
| PXKRESULT | CONCAT+2~, CONCAT+4*, CONCAT+8*, CONCAT+10 |
| PXKSAME | CLEAN+2~, CLEAN+6*, CLEAN+8*, CLEAN+9*, CLEAN+11, CMPRWP+2~, CMPRWP+4*, CMPRWP+15*, CMPRWP+24*, CMPRWP+26 , CMPR+8~, CMPR+10*, CMPR+30*, CMPR+33*, CMPR+38, ER+2~, ER+7*, ER+8, ER+16*, ER+17 |
| >> PXKSEQ | ER+11, ER+12, ER+13, ER+20, ER+21, ER+22 |
| PXKSTR | ER+2~, ER+10*, ER+12*, ER+13, ER+19*, ER+21*, ER+22 |
| PXKSUB | DIE+2~, DIE+12*, DIE+13*, DIE+14, DIE+15, DIE+16, DIE+17, DIE+28*, DIE+29*, DIE+30 , ER+2~, ER+9*, ER+10, ER+11, ER+12, ER+13 |
| PXKSUBFILE | DIE+2~, DIE+10*, DIE+15, DIE+17 |
| PXKSUBIEN | CMPR+8~, CMPR+13*, CMPR+14*, CMPR+15, CMPR+18, CMPR+19*, CMPR+20*, CMPR+21, CMPR+35*, CMPR+36 |
| PXKSUBIEN1 | CMPRWP+2~, CMPRWP+9*, CMPRWP+10*, CMPRWP+11, CMPRWP+18*, CMPRWP+20*, CMPRWP+22 |
| PXKSUBIEN2 | CMPRWP+2~, CMPRWP+12*, CMPRWP+13*, CMPRWP+14, CMPRWP+19*, CMPRWP+21*, CMPRWP+23 |
| PXKSUBIENB | CMPR+8~, CMPR+24*, CMPR+26*, CMPR+27, CMPR+29 |
| PXKTMPBV | CMPR+8~, CMPR+32 |
| PXKTMPBV( | CMPR+18*, CMPR+26, CMPR+27, CMPR+29!, CMPR+34, CMPR+35, CMPR+36 |
| PXKVAL | CMPR+8~, CMPR+15*, CMPR+16, CMPR+18, CMPR+21*, CMPR+22, CMPR+27 |
| PXKVAL1 | CMPR+8~, CMPR+16*, CMPR+17*, CMPR+18, CMPR+22*, CMPR+23*, CMPR+26, CMPR+27, CMPR+29, CMPR+34* , CMPR+35, CMPR+36 |
| PXKWP | DIE+2~, DIE+32 |
| PXKWP( | DIE+30* |
| PXKX1 | CMPRWP+2~, CMPRWP+22*, CMPRWP+24 |
| PXKX2 | CMPRWP+2~, CMPRWP+23*, CMPRWP+24 |
| U | CMPR+16, CMPR+22, CONCAT+8 |
