LRLOG ;VA/SLC/STAFF - Edit Log ;10/15/03 09:08
Source file <LRLOG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TESTP | ; test for patient integrity
|
|
PATS(DATE1,DATE2,CNT) | ; get patients that were edited during a time range
; returns ^TMP("LRLOG PATS",$J) - must kill after use |
|
NPTSDT(DFN,TSDT) | ; $$(dfn,timestamp date/time) -> patient's next timestamp date/time
|
|
PATINTEG(DFN,CNT) | ; check integrity of a patient
; returns ^TMP("LRLOG",$J) - must kill after use |
|
PTSDT(DFN,TSDT,TS) | ; API - returns patient's array of timestamps for a timestamp date/time
|
|
LTS() | ; $$() -> last timestamp ien
|
|
INIT | ; initialize setup of edit log
; sets last edit as timestamp on old data ; does not set user |
|
TSDT(TSDT,TS) | ; API - returns array of timestamps for a timestamp date/time
|
|
DATEINTG(DATE1,DATE2,CNT) | ; check integrity on patient's that were edited during a time range
; returns ^TMP("LRLOG",$J),^TMP("LRLOG PATS",$J) - must kill after use |
|
TESTD | ; test for integrity of patients that were edited during a date range
|
|
NTSDT(TSDT) | ; $$(timestamp date/time) -> next timestamp ien from a timestamp date/time
|
|
LOG(TS) | ; $$(timestamp ien) -> timestamp entry: timestamp^dfn^sub^cdt^user
|
|
TIMESTMP(PAT,SUB,CDT,USER,TIMESTMP) | ; set a timestamp entry in edit log
; from LRPX,LRPXRM |
|
LPTS(DFN) | ; $$(dfn) -> patient's last timestamp ien
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CDT | TIMESTMP~ |
CNT | DATEINTG~, PATS~, PATINTEG~ |
DATE1 | DATEINTG~, PATS~ |
DATE2 | DATEINTG~, PATS~ |
DFN | PATINTEG~, LPTS~, PTSDT~, NPTSDT~ |
PAT | TIMESTMP~ |
SUB | TIMESTMP~ |
TIMESTMP | TIMESTMP~ |
TS | TSDT~, PTSDT~, LOG~ |
TSDT | TSDT~, PTSDT~, NTSDT~, NPTSDT~ |
USER | TIMESTMP~ |