- Timestamp:
- Dec 4, 2009, 8:26:01 PM (14 years ago)
- Location:
- FOIAVistA/tag/r
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
FOIAVistA/tag/r/TEXT_INTEGRATION_UTILITIES-GMRP-TIU/TIURL.m
r628 r636 1 1 TIURL ; SLC/JER - List Management Library ;2/21/01 2 ;;1.0;TEXT INTEGRATION UTILITIES;**88,100 ,224**;Jun 20, 1997;Build72 ;;1.0;TEXT INTEGRATION UTILITIES;**88,100**;Jun 20, 1997 3 3 ; 11/14/00 Moved UPDATEID, etc to TIURL1 4 4 ; … … 22 22 ; rebuilt, not updated: 23 23 I RTN="TIUROR",$G(TIUCHNG("UPDATE")) S TIUCHNG("RBLD")=1 24 ;VMP/ELR ADDED THE FOLLOWING 2 LINES IN PATCH 22425 I RTN="TIUR",$G(TIUCHNG("UPDATE")) S TIUCHNG("RBLD")=126 I RTN="TIURM",$G(TIUCHNG("UPDATE")) S TIUCHNG("RBLD")=127 24 ; -- Rebuild, Update, or Refresh list: 28 25 ; (In cases (e.g.browse) where more than one action … … 44 41 . F S TIUI=$O(ITEMS(TIUI)) Q:'TIUI D 45 42 . . D SETREC(TIUI,.TIUREC) 46 . . ;VMP/ELR ADDED THE FOLLOWING LINE IN PATCH 22447 . . I $G(TIUREC)="" Q48 43 . . S ^TMP("TIUR",$J,TIUI,0)=TIUREC 49 44 I $G(TIUCHNG("REFRESH")) D Q
Note:
See TracChangeset
for help on using the changeset viewer.