SCMCMHP2 ;ALB/CMM - Practitioner's Patients ; 12/12/00 3:46pm
Source file <SCMCMHP2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DRIVE | ;
|
|
| LOOPPT(ARY,PRAC) | ;loop through patients for practitioner
|
|
| SETFORM(PIEN,CNAME,PINF) | ;Format for clinic info only for multiples
|
|
| GETPINF(PIEN,CLIEN,PINF) | ||
| FORMAT(CNAME,PINF,PC,TIEN,TNAME,PRAC,PNAME,POSN,TPI,PRCP) | ; format data for display
|
|
| FORMATAC(CNAME,PINF,PC,TIEN,TNAME,PRAC,PNAME,POSN,TPI,PRCP) | ; format data for display
|
|
| STOR(IIEN,SEC,TRD,PINF,PNAME,TNAME,TPI,SCCNT) | ;
|
|
| STORA(IIEN,SEC,TRD,PINF,PNAME,TNAME,TPI,SCCNT) | ;
|
|
| PDATA(DFN,CLNEN,CNAME,FLAG) | ;
; Patch 589 - copied from SCRPEC so that the SSN can be formatted: ; xxxxxNNNN |
|
| SETUP(IIEN,INAME,TIEN,TNAME,PRAC,PNAME,POSN,TPI,PRCP) | ;
|
