DVBCLMHD ;ALB/CMM HEADER FILE ;16FEB93
;;2.7;AMIE;;Apr 10, 1995
EN ;
; perform initializations for pkg wide vars
;
;
S VWLINE=1,VALMBG=1
;
; where to place the results array
S RSLTAR="^TMP(""DVBC"","_$J_")"
;
; set initial query number 0, so 1st domain build becomes 1
S @RSLTAR@(0)=0
;
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HDVBCLMHD 321 printed Dec 13, 2024@01:44:40 Page 2
DVBCLMHD ;ALB/CMM HEADER FILE ;16FEB93
+1 ;;2.7;AMIE;;Apr 10, 1995
EN ;
+1 ; perform initializations for pkg wide vars
+2 ;
+3 ;
+4 SET VWLINE=1
SET VALMBG=1
+5 ;
+6 ; where to place the results array
+7 SET RSLTAR="^TMP(""DVBC"","_$JOB_")"
+8 ;
+9 ; set initial query number 0, so 1st domain build becomes 1
+10 SET @RSLTAR@(0)=0
+11 ;
+12 QUIT