Auto save serialized pdf report

I have a Basic Script at the beginning of my program that prompts the operator to enter the serial number of a part. Then at the end of the program I have an excel form report being created and auto-saved as the serial number.
I would like to accomplish the same thing but with a PDF report. I can get the PDF to auto-save, but not as the serial number. Below is the end of my program. The green text is where i would assume some type of variable could be placed. Until i get it right i am manually saving. Thanks in Advance guys!

CS2 =SCRIPT/FILENAME= C:\USERS\PUBLIC\DOCUMENTS\HEXAGON\PC-DMIS\2019 R2\REPORT_REFRESH.BAS
FUNCTION/Main,SHOW=YES,,
STARTSCRIPT/
ENDSCRIPT/
ASSIGN/SERI=STR(GETTEXT(193,1,{FILEHEDR}))
ASSIGN/FILENAME=SERI
EXCEL_FORM1=EXCELFORMREPORT/TEMPLATE=H.I.2, TYPE=XLSX
RESULT FOLDER/O:\1Customers\XXXXXX\130XXXXX\Purchase Orders\2611-1
PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=O:\1Customers\XXXXX\130XXXX 1\Purchase Orders\2611-1\ PN00 SN00.PDF,AUTO OPEN=ON,$
TO_PRINTER=OFF,COPIES=1,$
TO_DMIS_REPORT=ON,FILE_OPTION=APPEND,FILENAME=O:\1 Customers\XXXXXX\13XXXXXX\Purchase Orders\2611-1,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
TO_EXCEL=OFF,$
PREVIOUS_RUNS=DELETE_INSTANCES

Parents

acgarcia over 4 years ago

I do something very simple. I just need to put the part's serial number in the report and save the pdf as the parts serial number. So operator scans barcode ABC1234, I have a report comment that displays "Part SN is ABC1234" and the filename in my network folder is ABC1234.pdf

SERIAL_NUMBER =COMMENT/INPUT,YES,FULL SCREEN=NO,[COLOR=#e74c3c]<--------INPUT COMMENT, ENTER IN THE SERIAL NUMBER, YES TO DISPLAY ON REPORT[/COLOR]
SCAN PART SERIAL NUMBER
ASSIGN/SN=SERIAL_NUMBER.INPUT

**PROGRAM STUFF GOES HERE**


ASSIGN/REPORT_LOC="\\\\CMM\\"[COLOR=#e74c3c]<-------------NETWORK LOCATION[/COLOR]
ASSIGN/REPORT_NAME=REPORT_LOC+SN[COLOR=#e74c3c]<---------------ASSIGNMENT FOR PRINT COMMAND, COMBINES NETWORK LOCATION AND SERIAL NUMBER[/COLOR]

PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=[COLOR=#3498db]REPORT_NAME[/COLOR],AUTO OPEN=ON,$
TO_PRINTER=OFF,COPIES=1,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
TO_EXCEL=OFF,$
PREVIOUS_RUNS=KEEP_INSTANCES

Reply

acgarcia over 4 years ago

SERIAL_NUMBER =COMMENT/INPUT,YES,FULL SCREEN=NO,[COLOR=#e74c3c]<--------INPUT COMMENT, ENTER IN THE SERIAL NUMBER, YES TO DISPLAY ON REPORT[/COLOR]
SCAN PART SERIAL NUMBER
ASSIGN/SN=SERIAL_NUMBER.INPUT

**PROGRAM STUFF GOES HERE**


ASSIGN/REPORT_LOC="\\\\CMM\\"[COLOR=#e74c3c]<-------------NETWORK LOCATION[/COLOR]
ASSIGN/REPORT_NAME=REPORT_LOC+SN[COLOR=#e74c3c]<---------------ASSIGNMENT FOR PRINT COMMAND, COMBINES NETWORK LOCATION AND SERIAL NUMBER[/COLOR]

PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=[COLOR=#3498db]REPORT_NAME[/COLOR],AUTO OPEN=ON,$
TO_PRINTER=OFF,COPIES=1,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
TO_EXCEL=OFF,$
PREVIOUS_RUNS=KEEP_INSTANCES

Children

No Data