{"id":2072,"date":"2014-11-19T21:04:44","date_gmt":"2014-11-19T21:04:44","guid":{"rendered":"https:\/\/alt2.minisoft.com\/support\/?p=2072"},"modified":"2016-12-01T06:23:06","modified_gmt":"2016-12-01T06:23:06","slug":"checks-if-file-exists-on-hp3000","status":"publish","type":"post","link":"https:\/\/c002.minisoft.com\/support\/checks-if-file-exists-on-hp3000\/","title":{"rendered":"Checks if file exists on HP3000"},"content":{"rendered":"

;
\n; Checks if file exists on HP e3000.
\n;
\nLET sVar1 = “UNKNOWN”
\nGOSUB FileTest
\nIF ( sRETURN = 1 )
\nDISPLAY “File Found^M^J”
\nELSE
\nDISPLAY “File NOT Found^M^J”
\nENDIF
\n;
\nLET sVar1 = “NMCONFIG.PUB.SYS”
\nGOSUB FileTest
\nIF ( sRETURN = 1 )
\nDISPLAY “File Found^M^J”
\nELSE
\nDISPLAY “File NOT Found^M^J”
\nENDIF
\nDISPLAY “^M^J”
\n;
\nSTOP
\n;
\n; – – – – – – – – – – – – – – – – – – – – – – – – –
\n;
\nLABEL FileTest
\nLET sTmp1=””
\nLET sTmp2=””
\nLET sRETURN=0
\nSEND “LISTF ” & sVar1
\nREADHOST 00:00:03 sTmp1 UNTIL “^Q” TERMINATOR sTmp2
\nIF ( LENGTH(sTmp2) = 0 )
\nRETURN
\nENDIF
\nIF ( FIND ( “CIERR”, sTmp1 ) = 0 )
\nLET sRETURN=1
\nENDIF
\nRETURN
\nEND<\/p>\n","protected":false},"excerpt":{"rendered":"

; ; Checks if file exists on HP e3000. ; LET sVar1 = “UNKNOWN” GOSUB FileTest IF ( sRETURN = 1 ) DISPLAY “File Found^M^J” ELSE DISPLAY “File NOT Found^M^J” ENDIF ; LET sVar1 = “NMCONFIG.PUB.SYS” GOSUB FileTest IF ( sRETURN = 1 ) DISPLAY “File Found^M^J” ELSE DISPLAY “File NOT Found^M^J” ENDIF DISPLAY “^M^J” […]<\/p>\n","protected":false},"author":75,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[55,62],"tags":[],"_links":{"self":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2072"}],"collection":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/users\/75"}],"replies":[{"embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/comments?post=2072"}],"version-history":[{"count":1,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2072\/revisions"}],"predecessor-version":[{"id":2073,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/posts\/2072\/revisions\/2073"}],"wp:attachment":[{"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/media?parent=2072"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/categories?post=2072"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/c002.minisoft.com\/support\/wp-json\/wp\/v2\/tags?post=2072"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}