BWPROC ;IHS/ANMC/MWR/CIA - BW ADD/EDIT BW PROCEDURE;23-Jan-2009 10:35;DU
Source file <BWPROC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ERROR1 | ;EP
|
|
DATECHK | ;EP
|
|
ADDCBE1(BWCBEDA,BWPAPDA) | ;EP
|
|
ADDNEW | ;EP
|
|
EDIT | ;EP
|
|
NEW2(DFN,PCDIEN,DATE,DRSTRG,PREVPAP,DA,ERROR) | ;EP
|
|
LKUPPCD(Y) | ;EP
|
|
ADDCBE(DFN,BWPAPDA) | ;EP
|
|
NEWNT | ;EP
|
|
HISTORIC | ;EP
|
|
EXIT | ;EP
|
|
RADMOD(DA,MSG) | ;EP
|
|
CDCUPDT(DA) | ;EP
|
|
NEW | ;EP
|
|
NEW1 | ;EP
|
|
PAPST(DATE) | ;
|
|
LABEDIT | ;EP
|
Name | Field # of Occurrence |
---|---|
DD^%DT | DATECHK+8 |
DIC^BWFMAN | NEW1+11, NEW1+34, LKUPPCD+6 |
DIE^BWFMAN | HISTORIC+10, CDCUPDT+7, ADDCBE+22, ADDCBE1+16, RADMOD+7 |
FILE^BWFMAN | NEW2+26 |
EDIT2^BWPROC1 | ADDNEW+8, EDIT+8, ADDCBE+9 |
FOLLOWUP^BWPROC1 | ADDNEW+10, EDIT+9 |
DIRZ^BWUTL3 | NEW2+10, NEW2+30 |
$$ACCSSN^BWUTL5 | NEW2+7 |
$$CDC^BWUTL5 | ADDCBE+19 |
SETVARS^BWUTL5 | ADDNEW+2, NEW+2, HISTORIC+3, LKUPPCD+3 |
TITLE^BWUTL5 | NEW+3, EDIT+3, HISTORIC+5 |
KILLALL^BWUTL8 | EXIT+1 |
PATLKUP^BWUTL8 | NEWNT+3 |
$$GET1^DIQ | PAPST+2, PAPST+3 |
^DIR | NEW1+22, DATECHK+6, DATECHK+30 |
$$FMADD^XLFDT | PAPST+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^BWSITE - [#9002086.02] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BWDIAG - [#9002086.31] | ADDCBE1+13 |
^BWPCD - [#9002086.1] | HISTORIC+8, ADDCBE+16, ADDCBE+17, ADDCBE1+7, DATECHK+11 |
^BWPCD("C" | DATECHK+10 |
^BWPN - [#9002086.2] | DATECHK+18 |
Name | Line Occurrences |
---|---|
$$PAPST | NEW2+24 |
ADDCBE1 | ADDCBE+20 |
DATECHK | NEW1+40, ADDCBE+7 |
EDIT | LABEDIT+2 |
EXIT | ADDNEW+11, EDIT+10, HISTORIC+11, LABEDIT+2 |
LKUPPCD | EDIT+4 |
NEW | ADDNEW+5 |
NEW2 | NEW1+41, ADDCBE+8 |
NEWNT | HISTORIC+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | NEW1+6~, NEW1+7*, NEW1+11, NEW1+30~, NEW1+33*, NEW1+34, LKUPPCD+2~, LKUPPCD+4*, LKUPPCD+6 |
BTSDT | PAPST+1~, PAPST+3*, PAPST+4, PAPST+5 |
BWCBEDA | ADDCBE1~, ADDCBE1+4, ADDCBE1+7 |
>> BWDFN | NEWNT+5*, NEW1+41, DATECHK+10 |
BWDT | ADDCBE1+5~, ADDCBE1+9*, ADDCBE1+11*, ADDCBE1+15 |
BWDX | ADDCBE1+5~, ADDCBE1+9*, ADDCBE1+11*, ADDCBE1+13*, ADDCBE1+15 |
>> BWERROR | NEW1+41, ADDCBE+8, ADDCBE+9 |
>> BWLFRT | NEW1+17*, NEW1+24*, NEW2+15 |
BWNEW | DATECHK+2~, DATECHK+9*, DATECHK+10, DATECHK+32* |
>> BWNOFOL | EDIT+8, LABEDIT+2* |
BWPAPDA | ADDCBE~, ADDCBE+16, ADDCBE+17, ADDCBE+20, ADDCBE+22, ADDCBE1~, ADDCBE1+4, ADDCBE1+16 |
BWPCDN | NEW1+6~, NEW1+14*, NEW1+18, NEW1+28, NEW1+29, NEW1+41, ADDCBE+4~, ADDCBE+5*, DATECHK+13 |
BWPCDT | NEW1+41, ADDCBE+4~, ADDCBE+8, DATECHK+8*, DATECHK+15 |
BWPN | HISTORIC+8*, DATECHK+18~*, DATECHK+19, DATECHK+23, DATECHK+25, DATECHK+27 |
>> BWPOP | ADDNEW+6, ADDNEW+8, ADDNEW+9, NEWNT+4*, NEW1+11, NEW1+18*, NEW1+28, NEW1+34, NEW1+40, NEW2+30* , EDIT+8, HISTORIC+7, HISTORIC+10, ADDCBE+7, RADMOD+7, LKUPPCD+6, DATECHK+2*, DATECHK+7*, DATECHK+10, DATECHK+31* |
>> BWPOP1 | ADDNEW+2*, ADDNEW+4, NEWNT+4*, HISTORIC+3*, HISTORIC+4 |
>> BWPPAP | NEW1+27*, NEW1+37*, NEW1+41 |
BWTITLE | ADDCBE+4~ |
DA | ADDNEW+3~, ADDNEW+7, ADDNEW+8, ADDNEW+10, NEW1+41, NEW2~, NEW2+31*, EDIT+7*, EDIT+8, EDIT+9 , HISTORIC+3~, HISTORIC+7, HISTORIC+8, HISTORIC+10, CDCUPDT~, CDCUPDT+3, CDCUPDT+7, ADDCBE+4~, ADDCBE+8, ADDCBE+9 , ADDCBE+20, ADDCBE+22, RADMOD~, RADMOD+5, RADMOD+7 |
DATE | NEW2~, NEW2+15, NEW2+24, PAPST~, PAPST+5 |
DEF | PAPST+1~, PAPST+2*, PAPST+5 |
DFN | NEW2~, NEW2+14, ADDCBE~, ADDCBE+8 |
DIC | ADDNEW+3~, NEW+2!, NEW2+7~ |
DIC("?" | NEW1+31*, NEW1+32* |
DIE | ADDNEW+3~, HISTORIC+3~ |
DIR | NEW1+19~, NEW1+22!, DATECHK+2~, DATECHK+6!, DATECHK+30! |
DIR("?" | NEW1+20*, DATECHK+3*, DATECHK+4*, DATECHK+27*, DATECHK+28* |
DIR("A" | NEW1+21*, DATECHK+5*, DATECHK+29* |
DIR("B" | DATECHK+5*, DATECHK+29* |
DIR(0 | NEW1+21*, DATECHK+5*, DATECHK+29* |
DIRUT | NEW1+18, NEW1+23, DATECHK+2~, DATECHK+31 |
DR | HISTORIC+9*, HISTORIC+10, CDCUPDT+6*, CDCUPDT+7, ADDCBE1+5~, ADDCBE1+15*, ADDCBE1+16, RADMOD+6*, RADMOD+7 |
DRSTRG | NEW2~, NEW2+12, NEW2+14*, NEW2+15*, NEW2+20*, NEW2+21*, NEW2+22*, NEW2+24*, NEW2+26 |
DT | CDCUPDT+6, RADMOD+6 |
DUZ | NEW2+21 |
DUZ(2 | NEW2+22, ADDCBE+19, PAPST+2, PAPST+3 |
ERROR | NEW2~, NEW2+10*, NEW2+29* |
MSG | RADMOD~, RADMOD+6 |
N | DATECHK+2~, DATECHK+9*, DATECHK+10*, DATECHK+11 |
PCDIEN | NEW2~, NEW2+7, NEW2+14, NEW2+24 |
PREVPAP | NEW2~, NEW2+21 |
S | NEW1+6~, NEW1+10*, NEW1+11, NEW1+30~, NEW1+33*, NEW1+34 |
SCRN | LKUPPCD+2~, LKUPPCD+5*, LKUPPCD+6 |
U | HISTORIC+8, ADDCBE+17, ADDCBE1+9, ADDCBE1+13, DATECHK+13, DATECHK+15, DATECHK+17, DATECHK+18, DATECHK+20, DATECHK+22 |
>> X | NEW2+7*, NEW2+8, NEW2+26 |
Y | ADDNEW+3~, NEWNT+3, NEWNT+4, NEWNT+5, NEW1+11, NEW1+12, NEW1+14, NEW1+24, NEW1+34, NEW1+35 , NEW1+37, NEW2+26, NEW2+28, NEW2+29, NEW2+31, EDIT+4, EDIT+5, EDIT+7, HISTORIC+3~, ADDCBE1+5~ , ADDCBE1+7*, ADDCBE1+9, LKUPPCD~, LKUPPCD+6, DATECHK+2~, DATECHK+7, DATECHK+8, DATECHK+11*, DATECHK+13, DATECHK+15 , DATECHK+17, DATECHK+18, DATECHK+20, DATECHK+22, DATECHK+31 |