SDAPIER ;ALB/MJK - Outpatient API/Error Processing ;22 FEB 1994 11:30 am
Source file <SDAPIER.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ERRFILE(SDERROR,SDATA) | ; -- file error
|
|
ERRCHK() | ; -- check to see if error ; >1000 are warnings
|
|
DATA(SDERROR) | ; -- get error parameters
|
|
TEST | ; -- test message
|
|
; -- print list of errors
|
||
PRINTQ | ||
START | ; -- print error table
|
|
STARTQ | ||
HDR | ; -- print header
|
|
QUE() | ; -- que job
; return: did job que [ 1|yes 0|no ] |
|
ERRORS | ; -- errors and warning messages
|
|
1 | ;;E;BASIC;"No event data array."
|
|
2 | ;;E;BASIC;"Patient DFN [#"_+SDATA_"] is not valid."
|
|
3 | ;;E;BASIC;"USER number [#"_+SDATA_"] is not valid."
|
|
4 | ;;E;BASIC;"CLINIC number [#"_+SDATA_"] is not valid."
|
|
5 | ;;E;BASIC;"Encounter date is null."
|
|
100 | ;;E;APPT;"Not a vaild appointment date/time ["_+SDATA_"] for patient [#"_+$P(SDATA,U,2)_"]."
|
|
101 | ;;E;APPT;"Patient appointment for clinic #"_+SDATA_", not clinic #"_+$P(SDATA,U,2)_", as requested."
|
|
102 | ;;E;APPT;"Not a vaild appointment slot ["_+SDATA_"] for clinic. [#"_+$P(SDATA,U,2)_"]"
|
|
103 | ;;E;APPT;"Current appointment status '"_$P(SDATA,U)_"' does not allow check out."
|
|
104 | ;;E;APPT;"Encounter date/time ["_+SDATA_"] is greater than today. ["_DT_"]."
|
|
110 | ;;E;APPT;"Encounter ien not available."
|
|
130 | ;;E;CO;"Hospital Location for appointment is not a clinic. [#"_+SDATA_"]"
|
|
1100 | ;;W;CO;"Appointment already checked-out."
|
|
1030 | ;;W;CO;"Appointment does not need to be checked-out. (Before check-out requirement)"
|
|
1031 | ;;W;CO;"Patient was an inpatient at the time of appointment. ["_+SDATA_"]"
|
|
1040 | ;;W;CLASS;"Classification data passed but not required. No classification data was filed."
|
|
1041 | ;;W;CLASS;"Invalid classification code passed: '"_$P(SDATA,U)_"'."
|
|
1042 | ;;W;CLASS;"Classification '"_$P(SDATA,U)_"' is no longer required for this encounter."
|
|
1043 | ;;W;CLASS;"Classification '"_$P(SDATA,U)_"' data is uneditable. Not updated."
|
|
1044 | ;;W;CLASS;"Data for classification '"_$P(SDATA,U)_"' is invalid. [Value:'"_$P(SDATA,U,2)_"']"
|
|
1045 | ;;W;CLASS;"Deleting classification data may cause encounter status not to be 'checked-out'."
|
|
1046 | ;;W;CLASS;"Changing 'SC' classification data may cause encounter status not to be 'checked-out'."
|
|
1047 | ;;W;CLASS;"'"_$P(SDATA,U)_"' classification data not required for this encounter. Data not filed."
|
|
1050 | ;;W;PROV;"Provider #"_+SDATA_" is not a valid IEN. Data not added."
|
|
1051 | ;;W;PROV;"Provider #"_+SDATA_" is not a valid IEN. Data not processed."
|
|
1052 | ;;W;PROV;"Deleting provider #"_+SDATA_" was not attempted. At least one provider is required for 'checked-out'."
|
|
1060 | ;;W;DX;"Diagnosis code '"_+SDATA_"' is not a valid ICD code. Data not added."
|
|
1061 | ;;W;DX;"Diagnosis code '"_+SDATA_"' is not a valid ICD code. Data not processed."
|
|
1062 | ;;W;DX;"Deleting diagnosis code '"_+SDATA_"' was not attempted. At least one dx code is required for 'checked-out'."
|
|
1070 | ;;W;STOPS;"Invalid stop code #"_+SDATA_". Code not added."
|
|
1071 | ;;W;STOPS;"No slots remain to file stop codes and CPT procedure codes."
|
|
1072 | ;;W;CPT;"CPT code '"_$P(SDATA,U)_"' is not a valid code. Procedure data not added."
|
|
1073 | ;;W;CPT;"The desired number of CPT code '"_$P(SDATA,U)_"' have already been filed."
|
|
1074 | ;;W;STOPS;"Error occurred during add/edit backdoor filing."
|
|
1075 | ;;W;STOPS;"Invalid stop code #"_+SDATA_". Code not processed."
|
|
1076 | ;;W;CPT;"CPT code '"_$P(SDATA,U)_"' is not a valid code. Code not processed."
|
|
1077 | ;;W;STOPS;"Stop code '"_$P(SDATA,U)_"' did not exist for encounter. Nothing to delete."
|
|
1078 | ;;W;CPT;"The number of CPT code '"_$P(SDATA,U)_"' to delete was larger than what was entered for encounter."
|
|
9999 | ;;
|
Name | Line Occurrences |
---|---|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|