Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: NURSDFFS

Package: Nursing Service

Routine: NURSDFFS


Information

NURSDFFS ;HIRMFO/RM-FILE FIELD STRUCTURES FOR NURSING FILES ;AUGUST 1986

Source Information

Source file <NURSDFFS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Nursing Service 3 ^NURSKILL  EN7^NURSUT0  CLOSE^NURSUT1  
Kernel 2 ^%ZIS  $$REPEAT^XLFSTR  
VA FileMan 2 DT^DICRW  FIELD^DID  

Entry Points

Name Comments DBIA/ICR reference
QUIT
HEADER ; PRINT HEADING FOR EACH FILE
EN1 ; ENTRY TO BEGIN PRINTING
PRNTFLDS ; PRINTS LINES FOR FIELDS
PRINTLN ; PRINT A LINE
CKSUB ; CHECKS FOR THE EXISTENCE OF SUB-FIELDS AND PRINTS THEM OUT (RECURSIVE)
POPSTACK ; ADD ONE MORE ITEM TO STACK

External References

Name Field # of Occurrence
^%ZIS EN1+1
DT^DICRW NURSDFFS+3
FIELD^DID PRINTLN+1
^NURSKILL QUIT
EN7^NURSUT0 NURSDFFS+4
CLOSE^NURSUT1 QUIT
$$REPEAT^XLFSTR HEADER+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NURSDFFS+4
Function Call: WRITE
  • Prompt: !,NURSPACE_NURSFLD_$E(" ",1,7-$L(NURSFLD))_NURSFLNM("LABEL")
  • Line Location: PRINTLN+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !!,$E(DT,4,5)_"/"_$E(DT,6,7)_"/"_$E(DT,2,3),?22,"FILE FIELD STRUCTURE FOR FILE #"_NURSFIL1,?70,"PAGE: ",NURSPAGE,!,$$REPEAT^XLFSTR("-",80),!
  • Line Location: HEADER+4
Routine Call
  • %ZIS
  • Line Location:
    • EN1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( PRNTFLDS+2, CKSUB+2
^DIC - [#1] EN1+2
^DIC(213.9 - [#213.9] NURSDFFS+2

Label References

Name Line Occurrences
CKSUB PRNTFLDS+2
HEADER PRNTFLDS+1
POPSTACK PRNTFLDS+2
PRINTLN PRNTFLDS+2
PRNTFLDS EN1+2, CKSUB+2
QUIT NURSDFFS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT HEADER+4
IO EN1+1
IOF HEADER+3
ION EN1+1
IOP EN1+1*!
>> NURQUEUE NURSDFFS+3*
>> NURSFIL1 HEADER+1*, HEADER+2*, HEADER+4
>> NURSFILE EN1+2*, PRNTFLDS+2, CKSUB+2*, CKSUB+3*, PRINTLN+1, POPSTACK+1, HEADER+1
>> NURSFILE( CKSUB+2, CKSUB+3, CKSUB+4!, POPSTACK+1*
>> NURSFILE(1 HEADER+1, HEADER+2
>> NURSFLD PRNTFLDS+2*, CKSUB+2*, CKSUB+3*, PRINTLN+1, PRINTLN+2, POPSTACK+1
>> NURSFLD( CKSUB+2, CKSUB+3, CKSUB+4!, POPSTACK+1*
>> NURSFLNM("LABEL" PRINTLN+2
>> NURSLINE EN1+2*, PRNTFLDS+1, PRINTLN+1*, HEADER+5*
>> NURSPACE EN1+2*, CKSUB+1*, CKSUB+3*, PRINTLN+2
>> NURSPAGE EN1+2*, HEADER+4, HEADER+5*
>> POP NURSDFFS+4
>> STACK EN1+2*, PRNTFLDS+1, CKSUB+1*, CKSUB+2, CKSUB+3*, CKSUB+4, POPSTACK+1
>> ZTRTN NURSDFFS+4*
>> ZTSK NURSDFFS+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All