[613] | 1 | ENCTMES1 ;(WASH ISC)/RGY-Help Text Processor ;7-25-90
|
---|
| 2 | ;;7.0;ENGINEERING;;Aug 17, 1993
|
---|
| 3 | ;Copy of PRCTMES1 ;DH-WASH ISC
|
---|
| 4 | S ;
|
---|
| 5 | W ! F ENCTHLP=1:1 S ENCTHLP1=$P($T(@MES+ENCTHLP),";",3) Q:ENCTHLP1="" W !,ENCTHLP1
|
---|
| 6 | W ! K MES,ENCTHLP1,ENCTHLP Q
|
---|
| 7 | ;
|
---|
| 8 | REC S MES="REC" G S
|
---|
| 9 | ;;*** Error, number of records read from barcode reader does not
|
---|
| 10 | ;; equal the number transmitted. Please re-transmit the data.
|
---|
| 11 | ;;
|
---|
| 12 | COM S MES="COM" G S
|
---|
| 13 | ;;If you want to line up all comment lines (::) in you IRL program
|
---|
| 14 | ;;at a certain column, enter the column you wish all comments to begin.
|
---|
| 15 | ;;For example: If your comments begin at column 37 in some lines
|
---|
| 16 | ;;and comments begin at column 40 in other lines, you may want to
|
---|
| 17 | ;;have all comments begin at column 35 for readability.
|
---|
| 18 | ;;Valid choices are 30, 35, 40 and 45.
|
---|
| 19 | ;;
|
---|
| 20 | WARN S MES="WARN" G S
|
---|
| 21 | ;;### WARNING: When a program is sent to the barcode reader, ALL DATA
|
---|
| 22 | ;;stored on the barcode reader will be LOST! Make sure that previous
|
---|
| 23 | ;;users of this barcode reader have no need for data, if any, that
|
---|
| 24 | ;;might exist on the reader.
|
---|
| 25 | ;;
|
---|
| 26 | ;;Please follow the following steps:
|
---|
| 27 | ;;
|
---|
| 28 | ;;1) If you have not already done so, you may now connect up the
|
---|
| 29 | ;; barcode reader to the output device.
|
---|
| 30 | ;;
|
---|
| 31 | ;;2) After you have connected the barcode reader to the device, clear
|
---|
| 32 | ;; the barcode reader by turning the reader off and back on.
|
---|
| 33 | ;;
|
---|
| 34 | ;;3) After you have completed the above steps, press the return
|
---|
| 35 | ;; key to start sending the program to the barcode reader. If you
|
---|
| 36 | ;; want to abort this option, enter a ^ and return.
|
---|
| 37 | ;;
|
---|
| 38 | ;;OK, you must now enter either a return ...
|
---|
| 39 | ;; ... or an '^' return:
|
---|
| 40 | ;;
|
---|
| 41 | ;;
|
---|
| 42 | NORTN S MES="NORTN" G S
|
---|
| 43 | ;;*** WARNING, The data has been saved in the BARCODE PROGRAM file, but
|
---|
| 44 | ;;will NOT be processed because the ROUTINE field in the BARCODE PROGRAM
|
---|
| 45 | ;;file is missing. --- Contact COMPUTER SYSTEMS MANAGER ---
|
---|
| 46 | ;;
|
---|
| 47 | NODEV S MES="NODEV" G S
|
---|
| 48 | ;;If you do NOT select a device for this data to be processed on, it will
|
---|
| 49 | ;;not be processed automatically.
|
---|
| 50 | ;;
|
---|
| 51 | YN S MES="YN" G S
|
---|
| 52 | ;;Anwer with a 1 for YES or 2 for NO.
|
---|
| 53 | ;;
|
---|
| 54 | NONID S MES="NONID" G S
|
---|
| 55 | ;;*** Data processor has NOT been tasked. Identifier is non-existent.
|
---|
| 56 | ;;Please contact COMPUTER SYSTEMS MANAGER.
|
---|
| 57 | ;;
|
---|
| 58 | NOTI S MES="NOTI" G S
|
---|
| 59 | ;;*** Data processor has NOT been tasked. DATE/TIME OF DATA UPLOAD is
|
---|
| 60 | ;;non-existent. Please contact COMPUTER SYSTEMS MANAGER.
|
---|
| 61 | ;;
|
---|
| 62 | COM1 S MES="COM1" G S
|
---|
| 63 | ;;*** Please key in the first line number from which you want to align
|
---|
| 64 | ;;the comments.
|
---|
| 65 | COM2 S MES="COM2" G S
|
---|
| 66 | ;;*** Please key in the last line number to which you want to align
|
---|
| 67 | ;;the comments.
|
---|
| 68 | ;;
|
---|