Script for Response HIPAA-997

[EDIbos]

Hello everyone,

Sorry to bother you with a simple question as i am totally new to this programming.

As of now i developed aspect script for response(HIPAA-997).My script is doing fine when the download files are available in the BBS but...when the files are not available my script is not try to exit immedeatley instead its trying to download, like requesting the ZMODEM to download files and after sometime it is exiting out of the BBS.

Can you please suggest me what to modify in my script if there are no file available.

;AUTOMATE AFMC DOWNLOADS

Proc main
string PhoneNum = "9-1-6024172343" ;Phone Number to dial.
;string Password1 "M0C9S9" ;Login Password.
integer iStatus
set Dnldpath "L:/ECEDIGS/PF_POSTOFFICE/afmc/IN" ;File to download.


dialnumber DATA PhoneNum ;Dial the specified phone number.
while $dialing ;While dialing the number yield.
yield
endwhile
waitfor "Password? (CR if new user): "
transmit "M0C9S9^M"
waitfor "-Press Any Key-"
transmit "^M"
waitfor "Command: "
transmit "d"
waitfor &quot;Selection or <CR> to exit:&quot;
if success
transmit &quot;D^M&quot;
waitfor &quot;Choose one (Q to Quit)?&quot;
if success
transmit &quot;Z&quot;
endif
getfile ZMODEM
iStatus = $XFERSTATUS
while iStatus == 1
iStatus = $XFERSTATUS
endwhile
if iStatus == 2 ;Transfer successful, continue with script execution
elseif iStatus == 3 ;Transfer failed, perform error handling
endif
waitfor &quot;Selection or <CR> to exit:&quot;
transmit &quot;^M&quot;
else
transmit &quot;^M&quot;
endif
waitfor &quot;Command:&quot;
transmit &quot;G^M&quot; ;Select goodbye.
waitfor &quot;Please hang up now&quot;
waitfor &quot;Thankyou&quot;
pwexit ;Close Procomm Plus.
endproc



Thanks,

 

[EDIbos]

Hello everyone,

I got my solution for my problem.

Thanks,
sri.