Routine: ECXNUTDP

Information

ECXNUTDP ;ALB/JRC - Nut Division Worksheet Print ; 2/18/09 1:47pm

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+4
Function Call: WRITE	Prompt: ?1,"RUN DATE: ",$$FMTE^XLFDT(DT,"5H"),?70,"PAGE ",PAGENUM Line Location: HEADER+5
Function Call: WRITE	Prompt: !,?23,"NUTRITION DIVISION WORKSHEET" Line Location: HEADER+6
Function Call: WRITE	Prompt: !!,?27,TYPE_" LOCATIONS" Line Location: HEADER+7
Function Call: WRITE	Prompt: ?26,TYPE,?50,"ASSIGNED" Line Location: HEADER+10
Function Call: WRITE	Prompt: !,?1,"LOCATION #",?26,"LOCATIONS",?50,"DIVISION" Line Location: HEADER+11
Function Call: WRITE	Prompt: !,?1,LN_"===",?26,LN,LN,?47,LN,LN Line Location: HEADER+12
Function Call: WRITE	Prompt: !!,"The following "_TYPE_" are missing in the DSS Worksheets" Line Location: DETAIL+15
Function Call: WRITE	Prompt: !!?3,TYPE,?26,"INACTIVE FLAG",!?3,"----",?26,"-------------",! Line Location: DETAIL+16
Function Call: WRITE	Prompt: !?3,X1,?26,X2 Line Location: DETAIL+21
Function Call: WRITE	Prompt: !!?3,"NOTHING TO REPORT... YOUR FILES ARE CLEAN!" Line Location: DETAIL+22
Function Call: WRITE	Prompt: ! Line Location: WAIT+8
Function Call: WRITE	Prompt: !!!,?1,"INSTITUTION",!,"FILE/DIVISIONS",!,LN,LN Line Location: FOOTER+3
Function Call: WRITE	Prompt: !!!,?1,"INSTITUTION",!,"FILE/DIVISIONS",!,LN,LN Line Location: FHEADER+1

FileNo	Call Tags
^ECX(728.46 - [#728.46]	GET1^DIQ