Function

EditLoad

Module

rProbs

Last Modified

7/15/2014 3:26:44 PM

Comments

Function ProblemDetail

Scope

Interfaced

Declaration

function EditLoad(ProblemIFN: string; ProviderID: int64; ptVAMC: string): TStrings ;

Called-By Hierarchy


                                  EditLoad
           TfrmProblems.lstProbActsClick┤ 
       TfrmProblems.wgProbDataDblClick┤ │ 
             TfrmProblems.lstViewClick┘ │ 
     TfrmProblems.HighlightDuplicate┘   │ 
           TfrmProblems.AddProblem┤     │ 
TfrmProblems.lstProbActsClick...┤ │     │ 
   TfrmProblems.lstProbPickClick┤ │     │ 
TfrmProblems.lstProbPickDblClick┤ │     │ 
TfrmProblems.edProbEntKeyPress┘ │ │     │ 
        TfrmProblems.UMPLLexicon┘ │     │ 
     TfrmdlgProb.bbChangeProbClick┘     │ 
              TfrmProblems.UpdateProblem┤ 
      TfrmProblems.lstProbActsClick...┘ │ 
             TfrmProblems.RestoreProblem┤ 
      TfrmProblems.lstProbActsClick...┘ │ 
                    TfrmdlgProb.FormShow┤ 
             TfrmDiagnoses.UpdateProblem┘ 
    TfrmDiagnoses.lbxSectionClickCheck┘   

Called-By

Name Declaration Comments
TfrmdlgProb.FormShow procedure FormShow(Sender: TObject); -
TfrmProblems.lstProbActsClick procedure lstProbActsClick(Sender: TObject); -
TfrmProblems.RestoreProblem procedure RestoreProblem; -
TfrmProblems.UpdateProblem procedure UpdateProblem(const why:char;Line: string;AllProblemsIndex:integer); -
TfrmDiagnoses.UpdateProblem procedure UpdateProblem(AplIEN: String; AICDCode: String; ASCTCode: String = ''); -


Source

70    function EditLoad(ProblemIFN: string; ProviderID: int64; ptVAMC: string): TStrings ;
71    begin
72       CallV('ORQQPL EDIT LOAD',[ProblemIFN, ProviderID, ptVAMC]);
73       Result := RPCBrokerV.Results ;
74    end ;