ACKQAG05 ;DALC/PJU - UTILITY FOR TRANSMISSION ;02/09/07
Source file <ACKQAG05.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACKEXIST() | ||
| ENDA | ||
| DFNIN(DFN) | ||
| ENDD | ||
| NEWMSG() | ||
| DFNCT(RESULT,DFN) | ;Return number of entries in 509850.9 file
|
|
| ENDC | ||
| STARTD(RESULT,DFN,IEN,ACKQSTNU,ACKQUSNM,ACKQUSSR) | ;
|
|
| ENDS | ||
| ERRTEXT(ACKQERR) | ;error msg's, input error #
|
|
| 1 | ;;THE AUDIOMETRIC DATA FILE CANNOT BE ACCESSED
|
|
| 2 | ;;THERE IS NOT A VALID ENTRY FOR THIS PATIENT
|
|
| 3 | ;;THE MESSAGE COULD NOT BE SET UP
|
|
| 4 | ;;THE ADDRESS COULD NOT BE SET UP
|
|
| 5 | ;;THERE HAS BEEN AN ERROR IN COLLECTING THE AUDIOMETRIC DATA
|
|
| 6 | ;;ONE OF THE MESSAGE LINES WAS TOO LONG
|
|
| 7 | ||
| 8 | ;;THE ENTRY FOUND IS NOT THE SAME ENTRY THAT IS BEING EDITED
|
|
| 9 | ;;THERE IS A CONFLICT BETWEEN THE PATIENT AND THE FILE ENTRY
|
|
| 10 | ;;THE RECORD SELECTED HAS NOT BEEN LOCALLY DELETED
|
|
| ENDE | ||
| WRITEER | ;W !!,"*****",ACKQER,"*****" ;for testing
|
