> PROCEDURE GetCursor > > PARAMETERS MessageType, CursorType > > DODEFAULT() > > DO CASE > CASE m.MessageType = 'HL7' AND CursorType = "Demographics" > * Do Something > CASE m.MessageType = 'HL7' AND CursorType = "Scheduler" > * Do Something > CASE m.MessageType = 'EDI' AND CursorType = "Demographics" > * Do Something > CASE m.MessageType = 'EDI' AND CursorType = "Scheduler" > * Do Something > ENDCASE > > ENDPROC >Really depends on what "* Do Something" is.
PROCEDURE GetCursor PARAMETERS MessageType, CursorType DODEFAULT() DO CASE CASE m.MessageType = 'HL7' DO CASE CASE CursorType = "Demographics" * Do Something CASE CursorType = "Scheduler" * Do Something ENDCASE CASE m.MessageType = 'EDI' DO CASE CASE CursorType = "Demographics" * Do Something CASE CursorType = "Scheduler" * Do Something ENDCASE ENDCASE ENDPROCbut not by much. The main thing that's going to simplify it is figuring out whats the same and what's different in each "* Do Something" and programing around that.