Return to DILFD.m CVS log

Up to [Coherent Logic Development] / freem_fileman / USER

Restructure repository

DILFD	;SFISC/STAFF-LIBRARY OF FUNCTIONS ;11/18/94  11:05
	;;21.0;VA FileMan;;Dec 28, 1994
	;Per VHA Directive 10-93-142, this routine should not be modified.
	Q
ROOT(DIC,DA,CP,ERR)	;
	G ENROOT^DIQGU
	;
FLDNUM(DIEFF,DIEFFDNM)	;
	G FLDNUMX^DIEF1
	;
VFILE(F,FLAG)	;
	G VFILEX^DIEFU
	;
VFIELD(F,FLD,FLAG)	;
	G VFIELDX^DIEFU
	;
RECALL(DIFILE,DIEN,DIUSER)	;SEA/TOAD
	G RECALLX^DICU
	;
EXTERNAL(DIFILE,DIFIELD,DIFLAGS,DINTERNL,DIMSGA)	;SEA/TOAD
	G XTRNLX^DIDU
	;
PRD(DIFRFILE,DIFRPRD)	;DCL
	G EN^DIFROMSV
	;