Routine: APSPFNC4

Package	Total	Call Graph
Kernel	2	(CLOSE,OPEN,READNXT)^%ZISH $$UP^XLFSTR
VA Fileman	2	UPDATE^DIE ^DIK

Entry Points

Name	Comments	DBIA/ICR reference
DT(X)
SCHAR(X)	; Remove characters that interfere with fileman
PHONE(X)
CTL	;;NCPDPID;.02;1;7
PHLGBL(GBL)	; EP - Import updates from a local or global array
PHLFIL(DIR,FIL,MAX)	; EP - Import updates from a file
DELSPEC(IEN)	;Delete exisiting specialties
PHLREC(REC,DEBUG)	; EP - Import updates from a single record
SPEC(X)	; Put specialty into upper case
CTL44	;;NCPDPID;.02;1;7;D SCHAR(.X)

Name	Line Occurrences
Function Call: WRITE	Prompt: "File not found",! Line Location: PHLFIL+3
Function Call: WRITE	Prompt: $P(CTL,";"),"=",X,! Line Location: PHLREC+15
Routine Call	DIE Line Location: PHLREC+27

FileNo	Call Tags
^APSPOPHM - [#9009033.9]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^APSPOPHM - [#9009033.9]	PHLREC+26!, DELSPEC+2
^APSPOPHM("C"	PHLREC+6

Name	Field # of Occurrence
^(4	PHLREC+26!

Name	Field # of Occurrence
CNT	PHLFIL+1~, PHLFIL+6*, PHLFIL+15
CTL	PHLREC+1~, PHLREC+9*, PHLREC+11, PHLREC+12, PHLREC+14, PHLREC+15
DA	DELSPEC+1!, DELSPEC+3*
DA(1	DELSPEC+3*
DEBUG	PHLREC~, PHLREC+2*, PHLREC+15
DIK	DELSPEC+1!, DELSPEC+4*
DIR	PHLFIL~, PHLFIL+2
ERR	PHLFIL+1~, PHLFIL+4, PHLFIL+14, PHLFIL+15, PHLGBL+1~, PHLGBL+2, PHLGBL+3, PHLGBL+4, PHLREC+1~, PHLREC+9 , PHLREC+16, PHLREC+25, PHLREC+28, PHLREC+29, PHLREC+30*
ERR("DIERR"	PHLREC+28, PHLREC+30
FDA	PHLREC+1~, PHLREC+8*, PHLREC+18
FDA(	PHLREC+8, PHLREC+24*
FIL	PHLFIL~, PHLFIL+2
FNAM	PHLREC+10~, PHLREC+11*, PHLREC+16
FNUM	PHLREC+10~, PHLREC+11, PHLREC+18, PHLREC+20, PHLREC+22, PHLREC+24
GBL	PHLGBL~, PHLGBL+3
IEN	PHLREC+1~, PHLREC+6*, PHLREC+7, PHLREC+8, PHLREC+22, PHLREC+26, DELSPEC~, DELSPEC+2, DELSPEC+3
IENS	PHLREC+1~, PHLREC+22*, PHLREC+23, PHLREC+24
IO	PHLFIL+8
IO(0	PHLFIL+13, PHLREC+15
LP	PHLFIL+7~, PHLFIL+11, PHLFIL+12, PHLGBL+1~, PHLGBL+2, PHLGBL+3, PHLREC+1~, PHLREC+9, PHLREC+29, PHLREC+30*
MAX	PHLFIL~, PHLFIL+4*, PHLFIL+6
NCPDPID	PHLREC+1~, PHLREC+2*, PHLREC+3, PHLREC+6
NUM	DELSPEC+1!, DELSPEC+2*, DELSPEC+3
POP	PHLFIL+1~, PHLFIL+3, PHLFIL+6, PHLFIL+10*
REC	PHLFIL+7~, PHLFIL+9, PHLFIL+10, PHLFIL+12*, PHLFIL+14, PHLREC~, PHLREC+2, PHLREC+4, PHLREC+12
REC(	PHLFIL+12
SFN	PHLREC+1~, PHLREC+20*, PHLREC+24
SFNC	PHLREC+1~, PHLREC+2, PHLREC+22
STNAME	PHLREC+1~, PHLREC+4*, PHLREC+5
X	PHLREC+10~, PHLREC+12, PHLREC+13, PHLREC+15, PHLREC+17, PHLREC+18, PHLREC+24, DT~, PHONE~, PHONE+1* , SPEC~, SPEC+1, SPEC+2, SCHAR~, SCHAR+1
XUMF	PHLFIL+1~, PHLFIL+5*

Name	Field # of Occurrence
$T(CTL44+LP	PHLREC+9