BARBAD3 ; IHS/SD/LSL - PAYMENT COMMAND PROCESSOR ; 12/29/2008
Source file <BARBAD3.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ASKCOM | ;EP - select command | |
| GOSR | ; | |
| ASKAMT | ; | |
| FINISH | ; | |
| S1 | ; | |
| P1 | ; | |
| LNHLP | ; | |
| CKNEG(LIN) | ;EP; CHECK FOR NEGATIVE BALANCE  ;BAR*1.8*4 DD 4.1.7.2 | |
| ASKCOM1 | ; | |
| FIN | ; | |
| GOQ | ||
| GETFLGRP() | ; | |
| EN1 | ; | |
| EN2 | ; | |
| POST() | ; | |
| EN | ;EP - command processor | |
| GOB | ; | |
| LU(X) | ; | |
| CANCEL | ; | |
| COMHLP | ; | |
| REDO | ||
| HISTORY | ;P.OTT | |
| PDIR | ; | |
| ASKLIN | ; | 
| Name | Field # of Occurrence | 
|---|---|
| HIT1^BARBAD2 | EN1+4, ASKCOM+3, P1+1 | 
| SETTMP^BARBAD3A | S1+1 | 
| ^BARBAD4 | GOSR+2 | 
| $$DSPLY^BARBAD4 | ASKCOM1+60 | 
| EN^BARBAD6 | ASKCOM1+66 | 
| COMHLP^BARBADU | ASKCOM1+9, COMHLP+1 | 
| POSTTX^BARBADU | FIN+4 | 
| SETHLP^BARBADU | EN2+3 | 
| ASKLIN^BARFPST3 | ASKLIN+4 | 
| EN^BARPST5 | HISTORY+3 | 
| $$AMT^BARPSTU | ASKAMT+12 | 
| $$IHS^BARUFUT | CKNEG+1 | 
| $$NOTOPEN^BARUFUT | ASKCOM1+1, FIN+6 | 
| $$FIND3PB^BARUTL | ASKCOM1+17 | 
| EOP^BARUTL | ASKCOM1+13, ASKCOM1+53, ASKCOM1+57, ASKCOM1+61, GOB+5, ASKAMT+18, ASKAMT+22, ASKAMT+26, P1+2 | 
| ^DIC | ASKAMT+42 | 
| $$GET1^DIQ | ASKCOM1+47, ASKCOM1+65 | 
| ^DIR | ASKCOM1+27, ASKAMT+10, PDIR+5, GETFLGRP+17 | 
| DIQ^XBLM | GOB+3 | 
| 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 | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^BARBL(2906 - [#90050.01] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABMDBILL( | ASKCOM1+21 | 
| ^BAR(90052.01 - [#90052.01] | ASKAMT+28 | 
| ^BARBL( | ASKCOM1+23, ASKCOM1+48, ASKCOM1+49 | 
| ^BARTBL("D" | ASKAMT+33 | 
| ^BARTMP($J | ASKCOM1+16, ASKCOM1+64, GOB+2, REDO, REDO+1, FIN+8!, CANCEL+1!, HISTORY+2 | 
| ^TEMP($J | EN+2! | 
| Name | Line Occurrences | 
|---|---|
| $$GETFLGRP | HISTORY+1 | 
| $$LU | ASKCOM1+8 | 
| $$POST | FIN+1 | 
| ASKAMT | GOSR+1, ASKAMT+14, ASKAMT+16, ASKAMT+20, ASKAMT+24, ASKAMT+44 | 
| ASKCOM | ASKCOM1+15, ASKCOM1+35, ASKCOM1+59, ASKCOM1+62, ASKCOM1+68, GOB+1, GOB+6, ASKAMT+13, S1+2 | 
| ASKCOM1 | ASKLIN+3, ASKLIN+7, ASKCOM1+9, ASKCOM1+10, COMHLP+2 | 
| ASKLIN | ASKCOM1+51, ASKCOM1+55 | 
| CANCEL | FINISH+1, FIN+3 | 
| CKNEG | GOQ+2 | 
| COMHLP | ASKCOM1+44 | 
| EN1 | ASKCOM1+7, GOQ+1, FIN+2 | 
| FIN | FIN+7 | 
| FINISH | ASKLIN+5, ASKLIN+6, GOQ+1 | 
| GOSR | ASKCOM1+71 | 
| HISTORY | ASKCOM1+68 | 
| PDIR | PDIR+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BARACC | ASKCOM1+63~, ASKCOM1+65*, ASKCOM1+66 | 
| BARADJ | EN+3*, FINISH+1, CANCEL+2! | 
| BARAMT | EN1+2!, EN2+2!, ASKCOM+1!, ASKAMT+15*, ASKAMT+16, ASKAMT+20, ASKAMT+24, ASKAMT+44!, S1+1 | 
| >> BARASK | ASKAMT+4*, ASKAMT+8 | 
| BARATYP | EN1+2!, ASKCOM+1!, ASKAMT+1*, ASKAMT+32!, ASKAMT+36*, ASKAMT+45*, S1+1 | 
| BARB | CKNEG+3~, REDO+1* | 
| BARBLDA | ASKCOM1+16*, ASKCOM1+17, ASKCOM1+23, ASKCOM1+47, ASKCOM1+48, ASKCOM1+49, ASKCOM1+63~, ASKCOM1+64*, ASKCOM1+65, ASKCOM1+66 , GOB+2*, GOB+3, HISTORY+2*, HISTORY+3 | 
| BARCAM | EN+1~, ASKCOM1+46*, ASKCOM1+47*, ASKCOM1+51, ASKAMT+20 | 
| BARCAT | EN1+2!, ASKCOM+1!, ASKAMT+1*, ASKAMT+28*, ASKAMT+33, S1+1 | 
| >> BARCNT | ASKLIN+3, ASKLIN+7, GOQ+1 | 
| BARCOAM | EN+1~, ASKCOM1+46*, ASKCOM1+48*, ASKCOM1+49*, ASKCOM1+50*, ASKCOM1+55, ASKAMT+24 | 
| BARCOM | EN1+2!, EN2+2!, ASKCOM+1!, ASKCOM1+6*, ASKCOM1+7, ASKCOM1+8*, ASKCOM1+9, ASKCOM1+10, ASKCOM1+15, ASKCOM1+30 | 
| BARCOM( | ASKCOM1+30*, ASKCOM1+31, ASKCOM1+32!, GOQ+1, GOSR+1, GOSR+2 | 
| BARCOM(1 | ASKLIN+1, ASKLIN+2, ASKCOM1+35, ASKCOM1+36*, ASKCOM1+37*, ASKCOM1+38*, ASKCOM1+39*, ASKCOM1+40*, ASKCOM1+41*, ASKCOM1+42* , ASKCOM1+43*, ASKCOM1+44, ASKCOM1+45, ASKCOM1+51, ASKCOM1+55, ASKCOM1+59, ASKCOM1+62, ASKCOM1+68, ASKCOM1+71, GOB+1 , GOB+4, ASKAMT+2, ASKAMT+3, ASKAMT+4, ASKAMT+20, ASKAMT+24, S1+1 | 
| BARDA | CKNEG+3~, REDO*, REDO+1 | 
| >> BARDFLT | EN+4*, ASKLIN+3* | 
| >> BARDSP | EN1+3*, ASKCOM+2* | 
| >> BARFLGRP | HISTORY+1*, GETFLGRP+19*, GETFLGRP+20 | 
| >> BARHLP | EN2+3 | 
| >> BARHLP( | GOB+4 | 
| >> BARJ | ASKAMT+31*, ASKAMT+33, ASKAMT+34*, ASKAMT+35 | 
| BARLIN | EN1+2!, ASKLIN+3*, ASKLIN+5, ASKLIN+6, ASKLIN+7, ASKCOM1+4, ASKCOM1+10, ASKCOM1+16, ASKCOM1+60, ASKCOM1+64 , GOQ+2, GOB+2, S1+1, HISTORY+2 | 
| >> BARPASS | EN1+4, ASKCOM+3, P1+1 | 
| >> BARPAT | ASKCOM1+66 | 
| BARPMT | EN+3*, FINISH+1, CANCEL+2! | 
| >> BARQ | FIN+1*, FIN+2, FIN+3, FIN+4 | 
| BARROLL | FINISH+1, CANCEL+2! | 
| >> BARSTAT | ASKCOM1+21*, ASKCOM1+22 | 
| >> BARSTOP | FIN+7 | 
| >> BARTPB | ASKCOM1+17*, ASKCOM1+20, ASKCOM1+21 | 
| BARTR | EN+2!, FINISH+1, CANCEL+2! | 
| BARTR( | ASKCOM1+10 | 
| BARTYP | EN1+2!, ASKCOM+1!, GOSR+1*, S1+1 | 
| >> BARX | ASKAMT+31*, ASKAMT+33*, ASKAMT+36 | 
| DA | ASKCOM1+19!, ASKCOM1+63~, GETFLGRP+10! | 
| DD | ASKAMT+41! | 
| DIC | ASKCOM1+19!, ASKCOM1+63~, ASKAMT+37*, ASKAMT+43! | 
| DIC("A" | ASKAMT+39* | 
| DIC("S" | ASKAMT+40* | 
| DIC(0 | ASKAMT+38* | 
| DIE | ASKCOM1+19! | 
| DIR | EN+2!, ASKCOM1+19!, ASKCOM1+27!, ASKAMT+6!, ASKAMT+11!, PDIR+2!, PDIR+6!, GETFLGRP+10! | 
| DIR("A" | ASKCOM1+25*, ASKAMT+8*, PDIR+4*, GETFLGRP+16* | 
| DIR("B" | ASKCOM1+26* | 
| DIR("T" | ASKAMT+9* | 
| DIR(0 | ASKCOM1+24*, ASKAMT+7*, PDIR+3*, GETFLGRP+11*, GETFLGRP+12*, GETFLGRP+13*, GETFLGRP+14*, GETFLGRP+15* | 
| DIROUT | ASKCOM1+15, ASKCOM1+18!, GETFLGRP+18 | 
| DIRUT | ASKCOM1+15, ASKCOM1+18!, GETFLGRP+18 | 
| DO | ASKAMT+41! | 
| DR | ASKCOM1+19! | 
| DTIME | ASKCOM1+6, ASKAMT+9 | 
| DTOUT | ASKCOM1+15, ASKCOM1+18!, GETFLGRP+18 | 
| DUOUT | ASKCOM1+15, ASKCOM1+18!, PDIR+7, GETFLGRP+18 | 
| DUZ | ASKCOM1+1, FIN+6 | 
| DUZ(2 | ASKCOM1+17, ASKCOM1+23, ASKCOM1+48, ASKCOM1+49, CKNEG+1 | 
| >> J | ASKCOM1+29*, ASKCOM1+30, ASKCOM1+31, ASKCOM1+32, ASKCOM1+33*, ASKCOM1+35, ASKCOM1+59, ASKCOM1+62, ASKCOM1+68, GOQ+1 , GOSR+1, GOSR+2, GOB+1 | 
| LIN | CKNEG~, REDO, REDO+1 | 
| >> Q | ASKCOM1+28*, ASKCOM1+29, ASKCOM1+34* | 
| REVERSAL | EN1+2!, ASKCOM1+3! | 
| REVSCHED | EN1+2!, ASKCOM1+3! | 
| U | ASKCOM1+21, ASKCOM1+23, ASKCOM1+49, REDO+1, HISTORY+1, GETFLGRP+18 | 
| >> UFMSESID | ASKCOM1+1, FIN+6 | 
| X | ASKCOM1+19!, ASKAMT+12*, ASKAMT+13, ASKAMT+14, ASKAMT+15, LU~, LU+1 | 
| Y | ASKCOM1+15, ASKCOM1+19!, ASKCOM1+60*, ASKAMT+44, ASKAMT+45, PDIR+7, PDIR+8, GETFLGRP+18, GETFLGRP+19 |