VAFCOTFU ;ALB/JLU-UTILITIES FOR THE TREATING FACILITY FILE 391.91 ; 2/1/10 12:47pm
Source file <VAFCOTFU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FILETF(PAT,INST) | ;programmer entry point.
|
|
FILETFQ | ||
FILE(PDFN,FSTRG,TICN,VAFCSLT,ERROR,IPP) | ;this module files the individual entry
|
|
FILEQ | ||
FILENEW(PDFN,FAC,PDLT,EVNTR,VAFCSLT,ERROR,IPP) | ;
|
|
SETSND(PDFN) | ;sets the pivot file entry to send MFU
|
|
SETSNDQ | ||
FILEDIT(TFIEN,PDLT,PDFN,FAC,EVNTR,VAFCSLT,ERROR,IPP) | ;
|
|
DELETETF(PAT,INST) | ;deletion entry point
|
|
DELTFQ | ||
DELETE(TFIEN) | ;the actual deletion code
|
|
DELALLTF(PAT) | ;Entry point to delete all Treating Facilities for a single
|
FileNo | Call Tags |
---|---|
^DGCN(391.91 - [#391.91] | Classic Fileman Calls, CHK^DIE |
^DIC(4 - [#4] | FIND1^DIC |