DGRRPSAD ; ALB/SGG - rtnDGRR PatientServices ADT Information ;09/30/03 ; Compiled December 9, 2003 15:22:22
Source file <DGRRPSAD.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 |
|---|---|---|
| DOC | ;<DataSet Name='ADT'
|
|
| GETPSARY(PSARRAY,REQDT) | ;
|
|
| CURRENT | ||
| LODGER | ||
| LAST | ||
| ADTC(ADTDT,CNT) | ;ADT Collection of all movements associated with a specifed date
|
|
| BLD | ;Build array of data elements for each movement. Similar to elements
|
|
| CURMOVE() | ;
|
|
| WARDLOC() | ;
|
|
| SERVICE() | ;
|
|
| ROOMBED() | ;
|
|
| TRETSPC() | ;
|
|
| PROVIDE() | ;
|
|
| ATTPHY() | ;
|
|
| CURADM() | ;
|
|
| TRANSTYP() | ;
|
|
| MVTTYP() | ;
|
|
| LASTADM() | ;
|
|
| LODWLOC() | ;
|
|
| LODROOM() | ;
|
|
| DISDATE() | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | ADTC+16 |
| ^DGPM("CA" | ADTC+14 |
| ^DIC(42 - [#42] | SERVICE+4, SERVICE+6 |
| ^TMP($J | ADTC+12!, ADTC+17*, ADTC+21, ADTC+23, ADTC+31! |
| Name | Line Occurrences |
|---|---|
| $$ATTPHY | LAST+14, BLD+12 |
| $$CURADM | LAST+15, BLD+13 |
| $$CURMOVE | LAST+8, BLD+6 |
| $$DISDATE | LAST+21, BLD+18 |
| $$LASTADM | LAST+18 |
| $$LODROOM | LAST+20, BLD+17 |
| $$LODWLOC | LAST+19, BLD+16 |
| $$MVTTYP | LAST+17, BLD+15 |
| $$PROVIDE | LAST+13, BLD+11 |
| $$ROOMBED | LAST+11, BLD+9 |
| $$SERVICE | LAST+10, BLD+8 |
| $$TRANSTYP | LAST+16, BLD+14 |
| $$TRETSPC | LAST+12, BLD+10 |
| $$WARDLOC | LAST+9, BLD+7 |
| ADTC | LAST+22 |
| BLD | ADTC+30, ADTC+34 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADTDT | ADTC~, ADTC+3*, ADTC+5, BLD+5 |
| ADTTYPE | GETPSARY+3~, CURRENT+2*, LODGER+3*, LAST+3*, ADTC+29*, CURMOVE+3, WARDLOC+3, SERVICE+3, SERVICE+4, SERVICE+5 , SERVICE+6, ROOMBED+3, TRETSPC+3, PROVIDE+3, ATTPHY+3, CURADM+3, TRANSTYP+3, TRANSTYP+4, MVTTYP+3, MVTTYP+4 , LASTADM+3, LODWLOC+3, LODROOM+3, DISDATE+3 |
| CNT | LAST+5~, LAST+6*, LAST+7*, LAST+8*, LAST+9*, LAST+10*, LAST+11*, LAST+12*, LAST+13*, LAST+14* , LAST+15*, LAST+16*, LAST+17*, LAST+18*, LAST+19*, LAST+20*, LAST+21*, LAST+22, LAST+23*, ADTC~ , BLD+4*, BLD+5*, BLD+6*, BLD+7*, BLD+8*, BLD+9*, BLD+10*, BLD+11*, BLD+12*, BLD+13* , BLD+14*, BLD+15*, BLD+16*, BLD+17*, BLD+18*, BLD+19* |
| DATA | CURMOVE+1~, CURMOVE+2*, CURMOVE+3*, CURMOVE+4, WARDLOC+1~, WARDLOC+2*, WARDLOC+3*, WARDLOC+4, SERVICE+1~, SERVICE+2* , SERVICE+3*, SERVICE+4*, SERVICE+5*, SERVICE+6*, SERVICE+7, ROOMBED+1~, ROOMBED+2*, ROOMBED+3*, ROOMBED+4, TRETSPC+1~ , TRETSPC+2*, TRETSPC+3*, TRETSPC+4, PROVIDE+1~, PROVIDE+2*, PROVIDE+3*, PROVIDE+4, ATTPHY+1~, ATTPHY+2*, ATTPHY+3* , ATTPHY+4, CURADM+1~, CURADM+2*, CURADM+3*, CURADM+4, TRANSTYP+1~, TRANSTYP+2*, TRANSTYP+3*, TRANSTYP+4*, TRANSTYP+5 , MVTTYP+1~, MVTTYP+2*, MVTTYP+3*, MVTTYP+4*, MVTTYP+5, LASTADM+1~, LASTADM+2*, LASTADM+3*, LASTADM+4, LODWLOC+1~ , LODWLOC+2*, LODWLOC+3*, LODWLOC+4, LODROOM+1~, LODROOM+2*, LODROOM+3*, LODROOM+4, DISDATE+1~, DISDATE+2*, DISDATE+3* , DISDATE+4 |
| DFN | GETPSARY+3~, GETPSARY+4* |
| DGRRCA | ADTC+10~, ADTC+11*, ADTC+14 |
| DGRRIEN | ADTC+19~, ADTC+22*, ADTC+23*, ADTC+26 |
| DGRRMDT | ADTC+19~, ADTC+20*, ADTC+21*, ADTC+23 |
| DGRRMIEN | ADTC+10~, ADTC+13*, ADTC+14*, ADTC+16, ADTC+17 |
| DGRRMVDT | ADTC+10~, ADTC+16*, ADTC+17 |
| DT | LAST+7, ADTC+3 |
| INDATA | GETPSARY+3~, CURRENT!, LODGER+1!, LAST+1!, ADTC+2!, ADTC+24! |
| INDATA(1 | LODGER, LAST |
| INDATA(13 | CURADM+3, LASTADM+3 |
| INDATA(17 | SERVICE+5, TRANSTYP+4, MVTTYP+4, DISDATE+3 |
| INDATA(18 | ATTPHY+3 |
| INDATA(2 | ADTC+29, TRANSTYP+3 |
| INDATA(3 | CURMOVE+3 |
| INDATA(4 | MVTTYP+3 |
| INDATA(5 | WARDLOC+3, SERVICE+3, LODWLOC+3 |
| INDATA(6 | ROOMBED+3, LODROOM+3 |
| INDATA(7 | PROVIDE+3 |
| INDATA(8 | TRETSPC+3 |
| PSARRAY | GETPSARY~ |
| PSARRAY( | LAST+6*, LAST+7*, LAST+8*, LAST+9*, LAST+10*, LAST+11*, LAST+12*, LAST+13*, LAST+14*, LAST+15* , LAST+16*, LAST+17*, LAST+18*, LAST+19*, LAST+20*, LAST+21*, LAST+23*, BLD+4*, BLD+5*, BLD+6* , BLD+7*, BLD+8*, BLD+9*, BLD+10*, BLD+11*, BLD+12*, BLD+13*, BLD+14*, BLD+15*, BLD+16* , BLD+17*, BLD+18*, BLD+19* |
| >> PTID | GETPSARY+4 |
| REQDT | GETPSARY~, LAST+22 |
| ROWCNT | ADTC+1~, ADTC+4*, ADTC+25*, ADTC+32, ADTC+33*, BLD+4 |
| VAHOW | GETPSARY+3~, CURRENT+1*, LODGER+2*, LAST+2*, ADTC+2! |
| VAINDT | GETPSARY+3~, CURRENT!, LODGER+1!, LAST+1! |
| VAIP | GETPSARY+3~, CURRENT!, LODGER+1!, LAST+1!, ADTC+2!, ADTC+24! |
| VAIP("D" | LAST+2*, ADTC+5* |
| VAIP("E" | ADTC+26* |
| VAIP("L" | LODGER+2*, ADTC+7* |
| VAIP("M" | ADTC+6* |
| VAIP(1 | ADTC+9, ADTC+11 |
| VAROOT | GETPSARY+3~, CURRENT+1*, LODGER+2*, LAST+2*, ADTC+2!, ADTC+24!, ADTC+27* |
