RORP007 ;BP/KM - PATCH ROR*1.5*7 PRE-TRANS/POST-INSTALL ROUTINE ; 4/17/08 9:42am
 ;;1.5;CLINICAL CASE REGISTRIES;**7**;Feb 17, 2006;Build 5
 ;
 Q
PRET ;Pre-Transportation tag for patch ROR*1.5*7
 D LD79951^RORPUT02()
 Q
POST ;Post-install tag for patch ROR*1.5*7
 S RC=$$RS79951^RORPUT02()
 Q
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HRORP007   303     printed  Sep 23, 2025@19:18:19                                                                                                                                                                                                      Page 2
RORP007   ;BP/KM - PATCH ROR*1.5*7 PRE-TRANS/POST-INSTALL ROUTINE ; 4/17/08 9:42am
 +1       ;;1.5;CLINICAL CASE REGISTRIES;**7**;Feb 17, 2006;Build 5
 +2       ;
 +3        QUIT 
PRET      ;Pre-Transportation tag for patch ROR*1.5*7
 +1        DO LD79951^RORPUT02()
 +2        QUIT 
POST      ;Post-install tag for patch ROR*1.5*7
 +1        SET RC=$$RS79951^RORPUT02()
 +2        QUIT