Function

EditSave

Module

rProbs

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Declaration

function EditSave(ProblemIFN: string; ProviderID: int64; ptVAMC, PrimUser: string;
           ProbFile: TStringList; SearchString: String): TStrings ;

Called-By Hierarchy


                                  EditSave
           TfrmProblems.lstProbActsClick┤ 
       TfrmProblems.wgProbDataDblClick┤ │ 
             TfrmProblems.lstViewClick┘ │ 
     TfrmProblems.HighlightDuplicate┘   │ 
           TfrmProblems.AddProblem┤     │ 
TfrmProblems.lstProbActsClick...┤ │     │ 
   TfrmProblems.lstProbPickClick┤ │     │ 
TfrmProblems.lstProbPickDblClick┤ │     │ 
TfrmProblems.edProbEntKeyPress┘ │ │     │ 
        TfrmProblems.UMPLLexicon┘ │     │ 
     TfrmdlgProb.bbChangeProbClick┘     │ 
                 TfrmdlgProb.bbFileClick┤ 
             TfrmDiagnoses.UpdateProblem┘ 
    TfrmDiagnoses.lbxSectionClickCheck┘   

Called-By

Name Declaration Comments
TfrmdlgProb.bbFileClick procedure bbFileClick(Sender: TObject); -
TfrmProblems.lstProbActsClick procedure lstProbActsClick(Sender: TObject); -
TfrmDiagnoses.UpdateProblem procedure UpdateProblem(AplIEN: String; AICDCode: String; ASCTCode: String = ''); -


Source

76    function EditSave(ProblemIFN: string; ProviderID: int64; ptVAMC, PrimUser: string;
77               ProbFile: TStringList; SearchString: String): TStrings ;
78    begin
79       CallV('ORQQPL EDIT SAVE',[ProblemIFN, ProviderID, ptVAMC, PrimUser, ProbFile, SearchString]);
80       Result := RPCBrokerV.Results ;
81    end ;