Report Window Print Setup - Not printing to correct location

So, when I setup my Report Window Printing, I choose a location for my PDF file to print to. But I've noticed in the last few days, that this doesn't seem to be staying with my programs.

For example, I'll run program A, and the results save to folder A. But when I open program B, the results are still wanting to save to folder A.

However, the 'path' that is specified in program B is correct, but PC-Dmis is still trying to save to the previous location.

This hasn't happened on all of my programs, but it's happed on a lot, say 10 out of the 15 that I ran yesterday.

Any ideas?

Parents

tking over 9 years ago

This puts it right where I want with a date stamp. Turn all the stuff of in the edit window print setup. The code will make it happen. Example :

YOURCHOICE =LABEL/
ASSIGN/DATE = SYSTEMDATE("MM_dd_yyyy")
            ASSIGN/TIME = SYSTEMTIME("HH_mm")
            ASSIGN/FILENAME = "P:\Reports\GKN\Case\Concentricity\_"+DATE+"_"+TIME+".rtf"
            YOURCHOICE =LABEL/
PRINT_IN   =COMMENT/INPUT,YES,'Select a print option:
                             ,
                             ,1 .... Print the report
                             ,2 .... Skip the printed report'
            IF_GOTO/PRINT_IN.INPUT=="1",GOTO = YESPRINT
            IF_GOTO/PRINT_IN.INPUT=="2",GOTO = NOPRINT
            GOTO/YOURCHOICE
YESPRINT   =LABEL/
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,OVERWRITE=FILENAME,$
              TO_PRINTER=ON,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            GOTO/END_PROGRAM
NOPRINT    =LABEL/
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,OVERWRITE=FILENAME,$
              TO_PRINTER=OFF,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            GOTO/END_PROGRAM

HTH,

TK

Reply

tking over 9 years ago

This puts it right where I want with a date stamp. Turn all the stuff of in the edit window print setup. The code will make it happen. Example :

YOURCHOICE =LABEL/
ASSIGN/DATE = SYSTEMDATE("MM_dd_yyyy")
            ASSIGN/TIME = SYSTEMTIME("HH_mm")
            ASSIGN/FILENAME = "P:\Reports\GKN\Case\Concentricity\_"+DATE+"_"+TIME+".rtf"
            YOURCHOICE =LABEL/
PRINT_IN   =COMMENT/INPUT,YES,'Select a print option:
                             ,
                             ,1 .... Print the report
                             ,2 .... Skip the printed report'
            IF_GOTO/PRINT_IN.INPUT=="1",GOTO = YESPRINT
            IF_GOTO/PRINT_IN.INPUT=="2",GOTO = NOPRINT
            GOTO/YOURCHOICE
YESPRINT   =LABEL/
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,OVERWRITE=FILENAME,$
              TO_PRINTER=ON,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            GOTO/END_PROGRAM
NOPRINT    =LABEL/
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,OVERWRITE=FILENAME,$
              TO_PRINTER=OFF,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            GOTO/END_PROGRAM

HTH,

TK

Children

No Data