| GENERAL DESCRIPTION |
Social Work patch SOW*3.0*65 contains post install
routine SOW3P65, which will use the VA FileMan API, EN^DIU2, to completely
remove all SOW files, data, and related data dictionary entries.
The following files will be removed:
-SOCIAL WORK CASE (#650)
-SOCIAL WORK SITE PARAMETERS (#650.1)
-COST DISTRIBUTION CENTER (#651)
-RCH (#652)
-RESOURCES/REFERRALS (#653)
-SOCIAL WORK PATIENT (#655)
-SWS ASSESSMENT DATA BASE (#655.2)
-PSYCHO-SOCIAL PROBLEMS (#655.201)
-DIRECT SERVICE CATEGORIES (#655.202)
-PSYCHO-SOCIAL OUTCOMES (#655.203)
-SWS RESOURCES (#656)
The following code from SOW3P65 will be used to remove the files:
S DIU(0)="DST" ;flags to delete data, subfile and templates
F SOWFILE=650,650.1,651:1:653,655,655.2:.001:655.203,656 D ;loop through
known social work files
.S DIU=$$ROOT^DILFD(SOWFILE),SOWNODE=$$CREF^DILF(DIU) ;set diu=file root and
sownode=closed file root
.I '$$VFILE^DILFD(SOWFILE) Q ;verify file exists
.D EN^DIU2 ;delete file and data in diu
|