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 |
| 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 |