DGRRPSAD ; ALB/SGG - rtnDGRR PatientServices ADT Information ;09/30/03 ; Compiled December 9, 2003 15:22:22
Source file <DGRRPSAD.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LASTADM() | ; | |
| SERVICE() | ; | |
| LODWLOC() | ; | |
| LODGER | ||
| LAST | ||
| DISDATE() | ; | |
| DOC | ;<DataSet Name='ADT' | |
| WARDLOC() | ; | |
| PROVIDE() | ; | |
| CURRENT | ||
| GETPSARY(PSARRAY,REQDT) | ; | |
| ATTPHY() | ; | |
| CURMOVE() | ; | |
| ADTC(ADTDT,CNT) | ;ADT Collection of all movements associated with a specifed date | |
| MVTTYP() | ; | |
| CURADM() | ; | |
| BLD | ;Build array of data elements for each movement.  Similar to elements | |
| TRANSTYP() | ; | |
| TRETSPC() | ; | |
| LODROOM() | ; | |
| ROOMBED() | ; | 
| Name | Field # of Occurrence | 
|---|---|
| IN5^VADPT | CURRENT+2, LODGER+3, LAST+3, ADTC+8, ADTC+28 | 
| 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* |