>> 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 >>>
>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 >ENDPROC >>