©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BGOREP ; IHS/BAO/TMD - Manage REPRODUCTIVE FACTORS ;21-Mar-2016 11:12;DU
Source file <BGOREP.m>
| Package | Total | Call Graph |
|---|---|---|
| GUI Objects | 2 | (CONT,EDD,LAC,MEN)^BGOREP1 ($$DELETE,$$ERR,$$FMTDATE,$$TMPGBL,$$UPDATE)^BGOUTL |
| Kernel | 2 | $$DT^XLFDT $$UP^XLFSTR |
| VA Fileman | 2 | FILE^DIE $$EXTERNAL^DILFD |
| MSC RPC Broker | 1 | BRDCAST^CIANBEVT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LMP(TXT) | ;Store LMP data
|
|
| LAC(TXT) | ;Store lactation data
|
|
| DEL(RET,DFN) | ;EP
|
|
| FNUM() | ||
| EVT(IEN,OPR) | ;EP
|
|
| EDD(TXT) | ;Get EDD data string and save
|
|
| GET(RET,INP) | ;EP
|
|
| CHECK(REP) | ;Get the different reproductive elements
|
|
| STORE(TXT) | ;Store EDD data string
|
|
| EXPHX(DFN) | ;
|
|
| MEN(TXT) | ;Store menstrual history data
|
|
| TIUSTR() | ;EP
|
|
| GETDATA | ;Get the data needed for the repro history
|
|
| UPPER(X) | ;Turn value to upper case
|
|
| SET(RET,INP,DATA) | ;EP
|
|
| REP(INP) | ;Store reproductive history data
|
| Name | Field # of Occurrence |
|---|---|
| CONT^BGOREP1 | GET+22 |
| EDD^BGOREP1 | GET+24 |
| LAC^BGOREP1 | GET+21 |
| MEN^BGOREP1 | GET+23 |
| $$DELETE^BGOUTL | DEL+1 |
| $$ERR^BGOUTL | SET+8, SET+9 |
| $$FMTDATE^BGOUTL | GETDATA+3, GETDATA+5, CHECK+2, CHECK+3, CHECK+5, CHECK+6, CHECK+7, CHECK+8, CHECK+9, CHECK+10 , CHECK+11 |
| $$TMPGBL^BGOUTL | GET+3 |
| $$UPDATE^BGOUTL | SET+25 |
| BRDCAST^CIANBEVT | EVT+3 |
| FILE^DIE | SET+28, STORE+24, STORE+37, STORE+50, STORE+63, STORE+76 |
| $$EXTERNAL^DILFD | LMP+4, LAC+4, REP+5, REP+10, REP+15, REP+20, REP+25, REP+30, REP+35, REP+40 , MEN+6, MEN+11, MEN+16, MEN+21, STORE+14, STORE+22, STORE+35, STORE+48, STORE+61, STORE+74 |
| $$DT^XLFDT | SET+6 |
| $$UP^XLFSTR | LAC+2 |
| RPC Name | Call Tags |
|---|---|
| BGOREP GET | GET |
| BGOREP SET | SET |
| BGOREP DEL | DEL |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNREP - [#9000017] | GET+8, GET+11, GETDATA+6, SET+10, EXPHX+5, EXPHX+7 |
| ^DPT - [#2] | SET+8, SET+9 |
| ^VA(200 - [#200] | SET+4 |
| Name | Line Occurrences |
|---|---|
| $$FNUM | GET+4, SET+5, STORE+4, EXPHX+6 |
| $$UPPER | STORE+8 |
| CHECK | GETDATA+7 |
| EDD | SET+23 |
| EVT | SET+30, DEL+2 |
| GET | TIUSTR+3 |
| GETDATA | GET+12, EXPHX+8 |
| LAC | SET+19 |
| LMP | SET+20 |
| MEN | SET+22 |
| REP | SET+21 |
| STORE | SET+33 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | GET+2~, SET+1~ |
| BEG | GET+1~, EXPHX+1~ |
| CAGE | MEN+1~, MEN+7*, MEN+8*, MEN+9 |
| CDT | MEN+1~, MEN+7*, MEN+10 |
| >> CIA("UID" | EVT+2 |
| CNT | GET+1~, GET+5*, GET+13*, GET+14, GET+15*, GET+19, GET+20, GET+21, GET+22, GET+23 , GET+24, EXPHX+1~ |
| CONT | GET+1~, EXPHX+1~ |
| DAT | GET+1~, GET+9*, GETDATA+2 |
| DATA | SET~, EVT+1~, EVT+2*, EVT+3 |
| DATA( | SET+16, SET+17, SET+18 |
| DEDD | SET+3~, STORE+65*, STORE+68*, STORE+70, STORE+71, STORE+72 |
| DEDDP | SET+3~, STORE+65*, STORE+68*, STORE+69*, STORE+72 |
| DEDDT | SET+3~, STORE+65*, STORE+68*, STORE+73 |
| DELDT | GET+1~, EXPHX+1~ |
| DELIVDT | SET+1~ |
| DELMETH | SET+1~ |
| DES | MEN+1~, MEN+17*, MEN+18, MEN+19 |
| DESDT | MEN+1~, MEN+17*, MEN+20 |
| DFN | TIUSTR+2, TIUSTR+3, GET+1~, GET+6*, GET+7, GET+8, GET+11, GET+21, GET+22, GET+23 , GET+24, GETDATA+6, SET+1~, SET+7*, SET+8, SET+9, SET+10, SET+11, SET+13, SET+30 , SET+34, STORE+5, DEL~, DEL+1, DEL+2, EXPHX~, EXPHX+4, EXPHX+5, EXPHX+7 |
| DUZ | SET+4 |
| E | GET+2~, GET+18, GET+20, EXPHX+2~, EXPHX+10, CHECK+8* |
| EC | SET+2~, REP+21*, REP+22, REP+23 |
| ECDT | SET+2~, REP+21*, REP+24 |
| ED | GET+2~, GET+18, GET+20, EXPHX+2~, CHECK+8* |
| EDC | SET+2~ |
| EDCBY | SET+2~ |
| EDD | STORE+1~, STORE+15*, STORE+17*, STORE+18, STORE+19, STORE+28*, STORE+29*, STORE+31, STORE+32, STORE+33 , STORE+41*, STORE+42*, STORE+44, STORE+45, STORE+46, STORE+54*, STORE+55*, STORE+57, STORE+58, STORE+59 |
| EDDCO | STORE+1~, STORE+15*, STORE+17*, STORE+23, STORE+28*, STORE+29*, STORE+36, STORE+41*, STORE+42*, STORE+49 , STORE+54*, STORE+55*, STORE+62, STORE+65*, STORE+68*, STORE+75 |
| EDDP | STORE+1~, STORE+15*, STORE+16*, STORE+17*, STORE+20, STORE+28*, STORE+29*, STORE+30*, STORE+33, STORE+41* , STORE+42*, STORE+43*, STORE+46, STORE+54*, STORE+55*, STORE+56*, STORE+59 |
| EDDT | STORE+1~, STORE+15*, STORE+17*, STORE+21, STORE+28*, STORE+29*, STORE+34, STORE+41*, STORE+42*, STORE+47 , STORE+54*, STORE+55*, STORE+60 |
| EDDTX | SET+1~, SET+15*, SET+33, EDD+1* |
| ERR | SET+27~, SET+32!, STORE+26!, STORE+39!, STORE+52!, STORE+66! |
| ERR("DIERR" | SET+29, STORE+25, STORE+38, STORE+51, STORE+64, STORE+77 |
| EXP | GET+1~, GET+10*, GET+16, EXPHX+1~ |
| F | GET+2~, GET+17, GET+20, EXPHX+2~, EXPHX+9, CHECK+6* |
| FD | GET+2~, GET+17, GET+20, EXPHX+2~, CHECK+6* |
| FDA | SET+1~, SET+12*, SET+13, SET+14, SET+25, LMP+6, LMP+7, LAC+8, LAC+9, LAC+10 , REP+3, REP+4, REP+5, REP+8, REP+9, REP+10, REP+13, REP+14, REP+15, REP+18 , REP+19, REP+20, REP+23, REP+24, REP+25, REP+28, REP+29, REP+30, REP+33, REP+34 , REP+35, REP+38, REP+39, REP+40, MEN+4, MEN+5, MEN+6, MEN+9, MEN+10, MEN+11 , MEN+14, MEN+15, MEN+16, MEN+19, MEN+20, MEN+21, STORE+1~, STORE+2!, STORE+6*, STORE+11 , STORE+12, STORE+13, STORE+14, STORE+19, STORE+20, STORE+21, STORE+22, STORE+23, STORE+26!, STORE+27* , STORE+32, STORE+33, STORE+34, STORE+35, STORE+36, STORE+39!, STORE+40*, STORE+45, STORE+46, STORE+47 , STORE+48, STORE+49, STORE+52!, STORE+53*, STORE+58, STORE+59, STORE+60, STORE+61, STORE+62, STORE+66! , STORE+67*, STORE+71, STORE+72, STORE+73, STORE+74, STORE+75 |
| FDA( | SET+12, STORE+6, STORE+27, STORE+40, STORE+53, STORE+67 |
| FNUM | GET+1~, GET+4*, SET+1~, SET+5*, SET+12, STORE+1~, STORE+4*, STORE+6, STORE+27, STORE+40 , STORE+53, STORE+67, EXPHX+1~, EXPHX+6* |
| FP | SET+1~ |
| FPDATE | SET+1~ |
| FT | SET+2~, REP+11*, REP+12, REP+13 |
| FTDT | SET+2~, REP+11*, REP+14 |
| G | GET+2~, GET+17, GET+20, EXPHX+2~, EXPHX+9, CHECK+3*, CHECK+4* |
| GD | GET+2~, GET+17, GET+20, EXPHX+2~, CHECK+3* |
| GRAV | SET+2~, REP+1*, REP+2, REP+3 |
| GRAVDT | SET+2~, REP+1*, REP+4 |
| HX | GET+1~, EXPHX+1~ |
| IDX | SET+1~, SET+15*, SET+16*, SET+17, SET+18 |
| IEN | EVT~, EVT+2, EVT+3 |
| IENS | SET+1~, SET+11*, SET+12, STORE+1~, STORE+5*, STORE+6, STORE+27, STORE+40, STORE+53, STORE+67 |
| INP | GET~, GET+6, GET+9, GET+10, SET~, SET+7, REP~, REP+1, REP+6, REP+11 , REP+16, REP+21, REP+26, REP+31, REP+36 |
| L | GET+2~, GET+18, GET+20, EXPHX+2~, EXPHX+10, CHECK+9* |
| LAC | LAC+1~, LAC+2*, LAC+7, LAC+8 |
| LACPR | LAC+1~, LAC+5*, LAC+6*, LAC+9 |
| LACUP | LAC+1~, LAC+3*, LAC+4*, LAC+10 |
| LC | SET+2~, REP+26*, REP+27, REP+28 |
| LCDT | SET+2~, REP+26*, REP+29 |
| LD | GET+2~, GET+18, GET+20, EXPHX+2~, CHECK+9* |
| LMP | GET+1~, GET+14, GETDATA+1*, GETDATA+2*, GETDATA+3*, SET+1~, LMP+1~, LMP+2*, LMP+5, LMP+6 , EXPHX+1~ |
| LMPDT | GET+1~, GET+14, GETDATA+4*, GETDATA+5* |
| LMPUP | LMP+1~, LMP+3*, LMP+4*, LMP+7 |
| M | GET+2~, GET+17, GET+20, EXPHX+2~, EXPHX+9, CHECK+5* |
| MAGE | MEN+1~, MEN+2*, MEN+3*, MEN+4 |
| MB | SET+2~, REP+6*, REP+7, REP+8 |
| MBDT | SET+2~, REP+6*, REP+9 |
| MD | GET+2~, GET+17, GET+20, EXPHX+2~, CHECK+5* |
| MDT | MEN+1~, MEN+2*, MEN+5 |
| MENO | MEN+1~, MEN+12*, MEN+13*, MEN+14 |
| MENODT | MEN+1~, MEN+12*, MEN+15 |
| METHOD | GET+1~, EXPHX+1~ |
| NEW | SET+1~, SET+10*, SET+11, SET+13, SET+24, SET+30 |
| OPR | EVT~, EVT+2 |
| P | GET+2~, GET+17, GET+20, EXPHX+2~, EXPHX+9, CHECK+7* |
| PD | GET+2~, GET+17, GET+20, EXPHX+2~, CHECK+7* |
| PRE | SET+2~, REP+16*, REP+17, REP+18 |
| PREDT | SET+2~, REP+16*, REP+19 |
| PREG | GET+1~, SET+1~, STORE+1~, STORE+7*, STORE+8*, STORE+10, STORE+11, STORE+17, STORE+29, STORE+42 , STORE+55, STORE+68, EXPHX+1~ |
| PREGDT | STORE+1~, STORE+7*, STORE+13 |
| PREGPR | STORE+1~, STORE+7*, STORE+9*, STORE+12 |
| PRV | SET+3~, SET+4*, LAC+6, STORE+9, STORE+16, STORE+30, STORE+43, STORE+56, STORE+69 |
| REC | GET+1~, GET+11*, GETDATA+1, GETDATA+2, GETDATA+4, GETDATA+6*, GETDATA+7, EXPHX+1~, EXPHX+7* |
| REP | GET+1~, EXPHX+1~, CHECK~, CHECK+1, CHECK+3, CHECK+5, CHECK+6, CHECK+7, CHECK+8, CHECK+9 , CHECK+10, CHECK+11 |
| REPC | GET+1~, EXPHX+1~ |
| REPDT | GET+2~, EXPHX+2~, CHECK+1*, CHECK+2* |
| REPHX | SET+1~ |
| RET | GET~, GET+3*, GET+14, GET+19, GET+20, GET+21, GET+22, GET+23, GET+24, SET~ , SET+5*, SET+8*, SET+9*, SET+25*, SET+29*, SET+30, SET+34*, STORE+25*, STORE+38*, STORE+51* , STORE+64*, STORE+77*, DEL~, DEL+1*, DEL+2 |
| S | GET+2~, GET+18, GET+20, EXPHX+2~, EXPHX+10, CHECK+11* |
| SA | SET+2~, REP+31*, REP+32, REP+33 |
| SADT | SET+2~, REP+31*, REP+34 |
| SD | GET+2~, GET+18, GET+20, EXPHX+2~, CHECK+11* |
| STR | GET+1~, GET+17*, GET+18*, GET+19, EXPHX+1~, EXPHX+9*, EXPHX+10*, EXPHX+11 |
| T | GET+2~, GET+18, GET+20, EXPHX+2~, EXPHX+10, CHECK+10* |
| TA | SET+2~, REP+36*, REP+37, REP+38 |
| TADT | SET+2~, REP+36*, REP+39 |
| TD | GET+2~, GET+18, GET+20, EXPHX+2~, CHECK+10* |
| TODAY | SET+3~, SET+6*, SET+14, LMP+4, LAC+4, REP+5, REP+10, REP+15, REP+20, REP+25 , REP+30, REP+35, REP+40, MEN+6, MEN+11, MEN+16, MEN+21, STORE+14, STORE+22, STORE+35 , STORE+48, STORE+61, STORE+74 |
| TRGSTR | EXPHX+2~, EXPHX+3*, EXPHX+11*, EXPHX+12 |
| TXT | SET+1~, SET+18*, SET+19, SET+20, SET+21, SET+22, SET+23, LMP~, LMP+2, LMP+3 , LAC~, LAC+2, LAC+3, LAC+5, MEN~, MEN+2, MEN+7, MEN+12, MEN+17, EDD~ , EDD+1, STORE~, STORE+3, STORE+7, STORE+15, STORE+28, STORE+41, STORE+54, STORE+65 |
| TYPE | SET+3~, SET+17*, SET+19, SET+20, SET+21, SET+22, SET+23 |
| U | GET+9, GET+10, GET+14, GET+17, GET+18, GET+19, GET+20, GETDATA+1, GETDATA+2, GETDATA+4 , SET+4, SET+9, SET+17, LMP+2, LMP+3, LAC+2, LAC+3, LAC+5, REP+1, REP+6 , REP+11, REP+16, REP+21, REP+26, REP+31, REP+36, MEN+2, MEN+7, MEN+12, MEN+17 , STORE+7, STORE+15, STORE+28, STORE+41, STORE+54, STORE+65, EVT+2, CHECK+1, CHECK+3, CHECK+5 , CHECK+6, CHECK+7, CHECK+8, CHECK+9, CHECK+10, CHECK+11 |
| X | TIUSTR+1~, TIUSTR+3, TIUSTR+4, GET+2~, EXPHX+2~, UPPER~, UPPER+1 |
| X2 | EXPHX+2~ |
| Y | GET+2~, EXPHX+2~ |
| Z | GET+2~, EXPHX+2~ |