>>>CarName Seq Rec >>>>>>
>>>SELECT InsCarr.CarName FROM InsCarr JOIN Covr ON InsCarr.InsCarr=Covr.cvCarr ; >>>WHERE Covr.Pat_No=Patient.PtPn AND CvPS=InsuranceLevel AND ! DELETED() ; >>>ORDER BY 1 INTO CURSOR CarrierList >>> >>>SELECT PADL( Seq_Num, 4, '0' ) AS Seq, RECNO() AS Rec FROM covr WITH (BUFFERING=.T.) ; >>>WHERE Pat_No=Patient.PtPn AND CvPS=InsuranceLevel AND ! DELETED() ; >>>ORDER BY 1 INTO CURSOR SequenceList >>>>>
>>SELECT InsCarr.CarName, Seq, Rec FROM InsCarr JOIN (SELECT PADL( Seq_Num, 4, '0' ) AS Seq, RECNO() AS Rec FROM covr WITH (BUFFERING=.T.) ; >>WHERE Pat_No=Patient.PtPn AND CvPS=InsuranceLevel AND ! DELETED() ) ; >>Covr ON InsCarr.InsCarr=Covr.cvCarr ; >>ORDER BY 1 INTO CURSOR CarrierList>