Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: XT73P148

XT73P148.m

Go to the documentation of this file.

XT73P148 ;RSD/OAKLAND - Test Routine for XT*7.3*148

 ;;7.3;TOOLKIT;**148**;Apr 25, 1995;Build 3

 ;This routine is only to test XINDEX for patch 148.

 ;This is $Query using 2 parameters

 W $Q(^DD(9.6,0,"DT"),-1)

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXT73P148   228     printed  Dec 13, 2024@02:40:36                                                                                                                                                                                                     Page 2

XT73P148  ;RSD/OAKLAND - Test Routine for XT*7.3*148

 +1       ;;7.3;TOOLKIT;**148**;Apr 25, 1995;Build 3

 +2       ;This routine is only to test XINDEX for patch 148.

 +3       ;

 +4        QUIT

 +5       ;This is $Query using 2 parameters

 +6        WRITE $QUERY(^DD(9.6,0,"DT"),-1)

 +7        QUIT