WVRPCOR2 ;ISP/RFR - CPRS RPCS CONTINUED ;Oct 19, 2020@14:42
Source file <WVRPCOR2.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 |
---|---|---|
Womens Health | 1 | WVRPCOR SAVEDATA |
Name | Comments | DBIA/ICR reference |
---|---|---|
SAVEDATA(WVRETURN,WVDATA) | ;SAVE DATA FROM COVER SHEET
|
|
SUBS | ;NAMES OF SUBSCRIPTS THAT SHOULD BE IN THE DATA ARRAY
|
|
ERROR(WVRETURN,WVERRNUM) | ;POPULATE THE RETURN ARRAY WITH AN ERROR MESSAGE
|
|
VMAC | ;VALIDATE/CONVERT MEDICALLY ABLE TO CONCEIVE
|
|
VPREG | ;VALIDATE/CONVERT PREGNANCY STATUS
|
|
VLMP | ;VALIDATE LAST MENSTRUAL PERIOD DATE
|
|
VEDD | ;VALIDATE EXPECTED DUE DATE
|
|
VLAC | ;VALIDATE LACTATION STATUS
|
|
CLEAN(WVARRAY) | ;UNMANGLE NAME=VALUE PAIRS ARRAY
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | SAVEDATA+9 |
UPDATE^DIE | SAVEDATA+26 |
$$APPL^WVRPCOR | VMAC+1 |
SETUP^WVRPCOR | SAVEDATA+13 |
VERDATA^WVRPCPT2 | VLMP+6, VEDD+5 |
NOTIFY^WVRPCVPR | SAVEDATA+29 |
$$FMERROR^WVUTL11 | SAVEDATA+10, SAVEDATA+27 |
$$GETLREC^WVUTL11 | SAVEDATA+12 |
$$ISREG^WVUTL11 | SAVEDATA+7 |
$$NOW^XLFDT | SAVEDATA+24 |
$$LOW^XLFSTR | ERROR+13 |
$$UP^XLFSTR | VMAC+4, VPREG+4, VLMP+2, VLMP+3, VEDD+1, VEDD+2, VLAC+3 |
RPC Name | Call Tags |
---|---|
WVRPCOR SAVEDATA | SAVEDATA |
FileNo | Call Tags |
---|---|
^DIC(9.4 - [#9.4] | FIND1^DIC |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
U | SAVEDATA+8, SAVEDATA+10, SAVEDATA+11, SAVEDATA+14, SAVEDATA+17, SAVEDATA+19, SAVEDATA+20, SAVEDATA+21, SAVEDATA+22, SAVEDATA+24 , SAVEDATA+27, ERROR+3, ERROR+5, ERROR+7, ERROR+9, ERROR+11, ERROR+13, ERROR+15, ERROR+17, ERROR+19 , ERROR+21, VLMP+5, VLMP+7, VEDD+4, VEDD+6 |
WVAPPL | SAVEDATA+16~, VMAC+1* |
WVARRAY | CLEAN~ |
WVARRAY( | CLEAN+2*! |
WVDATA | SAVEDATA~, SAVEDATA+5 |
WVDATA( | SAVEDATA+21, ERROR+13 |
WVDATA("ABLE | TO CONCEIVE" , ERROR+9, VMAC+2, VMAC+4, VMAC+7*, VPREG+2, VPREG+6, VPREG+7 |
WVDATA("EXPEC | TED DUE DATE" , VEDD+1, VEDD+4 |
WVDATA("LACTA | TION STATUS" , VLAC+1, VLAC+3, VLAC+6* |
WVDATA("LAST | MENSTRUAL PERIOD DATE" , VLMP+1, VLMP+2, VLMP+5 |
WVDATA("MEDIC | AL REASON" , VMAC+6 |
WVDATA("PATIENT" | SAVEDATA+6, SAVEDATA+7, SAVEDATA+12, SAVEDATA+17, SAVEDATA+28, VMAC+1, VLMP+5, VEDD+4 |
WVDATA("PREGN | ANCY STATUS" , VPREG+1, VPREG+4, VPREG+9!, VPREG+13*, VLMP+2, VLMP+3, VEDD+1, VEDD+2 |
WVDEF | SAVEDATA+2~, SAVEDATA+18*, SAVEDATA+19, SAVEDATA+20, SAVEDATA+21, VLMP+5, VEDD+4 |
WVERRNUM | ERROR~, ERROR+4, ERROR+6, ERROR+8, ERROR+10, ERROR+12, ERROR+14, ERROR+16, ERROR+18, ERROR+20 |
WVERROR | SAVEDATA+2~, SAVEDATA+10, SAVEDATA+27, SAVEDATA+28 |
WVEXIT | VPREG+3~, VPREG+5, VPREG+8* |
WVEXTERNAL | SAVEDATA+2~ |
WVFDA | SAVEDATA+16~, SAVEDATA+23, VLMP+4~, VLMP+6, VEDD+3~, VEDD+5 |
WVFDA( | SAVEDATA+21*, SAVEDATA+24*, VPREG+12* |
WVFDA("DATA" | VLMP+5*, VEDD+4* |
WVFILE | SAVEDATA+2~, SAVEDATA+17*, SAVEDATA+21, SAVEDATA+24, VPREG+12 |
WVIEN | SAVEDATA+2~, SAVEDATA+17*, SAVEDATA+21, SAVEDATA+24, SAVEDATA+25!, VPREG+12 |
WVIEN(1 | SAVEDATA+28 |
WVLNCNT | SAVEDATA+2~, SAVEDATA+18* |
WVNODE | SAVEDATA+2~, SAVEDATA+15*, SAVEDATA+17, SAVEDATA+19, SAVEDATA+24, SAVEDATA+28, ERROR+3, VMAC+1 |
WVNOSAVE | SAVEDATA+16~, SAVEDATA+17*, SAVEDATA+18, SAVEDATA+20, SAVEDATA+22 |
WVNPFLAG | SAVEDATA+2~, SAVEDATA+7*, SAVEDATA+8 |
WVPKG | SAVEDATA+2~, SAVEDATA+9*, SAVEDATA+11, SAVEDATA+24 |
WVRETURN | SAVEDATA~, SAVEDATA+6, SAVEDATA+8*, SAVEDATA+10*, SAVEDATA+11*, SAVEDATA+14*, SAVEDATA+15, SAVEDATA+18, SAVEDATA+20, SAVEDATA+22* , SAVEDATA+23, SAVEDATA+27*, ERROR~, ERROR+2*, ERROR+5*, ERROR+7*, ERROR+9*, ERROR+11*, ERROR+13*, ERROR+15* , ERROR+17*, ERROR+19*, ERROR+21*, VMAC+5, VMAC+6, VPREG+2, VPREG+5, VPREG+6, VPREG+11, VLMP+2 , VLMP+7*, VEDD+1, VEDD+6*, VLAC+5 |
WVSTAT | VLMP+4~, VLMP+6, VEDD+3~, VEDD+5 |
WVSTAT(0 | VLMP+7, VEDD+6 |
WVSTAT(1 | VLMP+7, VEDD+6 |
WVSTATUS | VMAC+3~, VMAC+4*, VMAC+5, VMAC+6, VMAC+7, VPREG+3~, VPREG+4*, VPREG+5, VPREG+10*, VPREG+11 , VPREG+12, VPREG+13, VLAC+2~, VLAC+3*, VLAC+4*, VLAC+5, VLAC+6 |
WVTYPE | ERROR+1~, ERROR+3*, ERROR+13 |
WVTYPES | SAVEDATA+2~ |
WVTYPES( | SAVEDATA+15, SAVEDATA+17, SAVEDATA+24, ERROR+3 |
WVVPR | SAVEDATA+3~, SAVEDATA+29 |
WVVPR("AFTER" | SAVEDATA+28* |
WVVPR("BEFORE" | SAVEDATA+12* |
X | CLEAN+1~, CLEAN+2* |
Name | Field # of Occurrence |
---|---|
$T(SUBS+WVLNCNT | SAVEDATA+18 |