pre cutover push
This commit is contained in:
@ -765,27 +765,6 @@ Main:
|
||||
END
|
||||
NEXT I
|
||||
|
||||
/*IF @USERNAME EQ 'MESOUELLETTE' OR @USER4 EQ 'DAN_CR' THEN
|
||||
// This block of code to copy the report to the clipboard. This is necessary for debugging in
|
||||
// development environments that do not have Excel installed.
|
||||
PasteBlob = ''
|
||||
|
||||
FOR I = 1 TO ROW$EPIPRO_SCRAP_RATE
|
||||
FOR J = 1 TO COL$PERIOD_END
|
||||
PasteBlob<I,J> = DataArray<J,I>
|
||||
NEXT J
|
||||
NEXT I
|
||||
|
||||
SWAP @VM WITH CHAR(9) IN PasteBlob
|
||||
SWAP @FM WITH CRLF$ IN PasteBlob
|
||||
CALL Set_Property('CLIPBOARD', 'TEXT', PasteBlob)
|
||||
|
||||
Msg(@WINDOW,MsgUp) ;* Take message down
|
||||
|
||||
RETURN
|
||||
|
||||
END*/
|
||||
debug
|
||||
Msg(@WINDOW,MsgUp)
|
||||
|
||||
xlApp = OleCreateInstance("excel.Application") ;* Create instance of Excel
|
||||
|
Reference in New Issue
Block a user