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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: NURARCRW

Package: Nursing Service

Routine: NURARCRW


Information

NURARCRW ;HIRMFO/RM/FT/MD-VIEW PRINT PATIENT CLASSIFICATIONS BY WARD ;12/8/98

Source Information

Source file <NURARCRW.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Nursing Service 8 ^NURAKILL  (EN8,EN9)^NURSAGSP  EN6^NURSAUTL  (EN2,EN6)^NURSCUTL  (EN6,EN7)^NURSUT0  (CLOSE,ENDPG)^NURSUT1  $$CNTR^NURSUT2  $$EN12^NURSUT3  
VA Fileman 2 ^DIC  D^DIQ  
Kernel 1 $$REPEAT^XLFSTR  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Nursing Service 2 NURAPP-WRDCLAS  NURAPR-RES-WRDCLAS  

Entry Points

Name Comments DBIA/ICR reference
SORT ;
QUIT
HEADER ;HEAD ROUTINE
NN
NO
PRINTIT
DEV
NP
START ;
BRK
PRINT ;
NQ
CAT ; CATEGORY TOTAL DISPLAY
REENT ;

External References

Name Field # of Occurrence
^DIC REENT+7
D^DIQ PRINTIT+8, HEADER+3
^NURAKILL QUIT
EN8^NURSAGSP DEV
EN9^NURSAGSP NURARCRW+4
EN6^NURSAUTL SORT+15
EN2^NURSCUTL SORT+5
EN6^NURSCUTL SORT+5
EN6^NURSUT0 REENT+9
EN7^NURSUT0 DEV+1
CLOSE^NURSUT1 QUIT
ENDPG^NURSUT1 HEADER+1
$$CNTR^NURSUT2 HEADER+5
$$EN12^NURSUT3 SORT+2
DEM^VADPT PRINTIT+1, SORT+5
$$REPEAT^XLFSTR HEADER+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?30,$S($G(NURCURSW):"Current",1:"Unit")_" Classification"
  • Line Location: REENT+1
Function Call: WRITE
  • Prompt: !!,?17,"Press return if total hospital report is desired"
  • Line Location: REENT+2
Function Call: WRITE
  • Prompt: !!,?17,"Enter unit number if this is a unit report: "
  • Line Location: REENT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: REENT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: NO+0
Function Call: WRITE
  • Prompt: !,?8,"NURSING BED SECTION: ",NBEDS
  • Line Location: BRK+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINTIT+3
Function Call: WRITE
  • Prompt: ?24,"CLASSIFICATION NOT APPLICABLE"
  • Line Location: PRINTIT+5
Function Call: WRITE
  • Prompt: ?24,$P(DATA,"^",3)
  • Line Location: PRINTIT+6
Function Call: WRITE
  • Prompt: ?(31+((X-1)*2)),$E($P(DATA,"^",4),X)
  • Line Location: PRINTIT+7
Function Call: WRITE
  • Prompt: ?42,$P(Y,":",1,2),?62,$E($P(DATA,"^",7),1,18)
  • Line Location: PRINTIT+8
Function Call: WRITE
  • Prompt: ?62,$E($P(DATA,"^",7),19,36)
  • Line Location: PRINTIT+9
Function Call: WRITE
  • Prompt: !,?62,$E($P(DATA,"^",7),37,50)
  • Line Location: PRINTIT+9
Function Call: WRITE
  • Prompt: !,@IOF,?2,"UNIT PATIENT CLASSIFICATION REPORT",?51,"DATE:"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?57,Y,?71,"PAGE: ",NURPAGE
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !!,?2,"PATIENT NAME/SSN",?24,"CLASS.",?32,"FACTORS",?43,"DATE",?62,"COMMENTS",!,$$REPEAT^XLFSTR("-",80)
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,?$$CNTR^NURSUT2(NURFAC(3)),$S($G(NURFAC(3))=" BLANK":"NO FACILITY",1:$G(NURFAC(3)))
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: "."
  • Line Location: SORT+10
Function Call: WRITE
  • Prompt: !!,?70,"PATIENTS",!,?29,"I II III IV V CLASSIFIED",!,?27,"---",?35,"---",?44,"---",?52,"---",?60,"---",?70,"----------"
  • Line Location: CAT+1
Function Call: WRITE
  • Prompt: !,"CATEGORY TOTALS:",?27,$J(NTC(1),3),?35,$J(NTC(2),3),?44,$J(NTC(3),3),?52,$J(NTC(4),3),?60,$J(NTC(5),3),?70,$J(NTC,10),!
  • Line Location: CAT+2
Routine Call
  • DIC
  • Line Location:
    • REENT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSF(211.4 - [#211.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(213.9 - [#213.9] NURARCRW+2
^NURSA(214.6 - [#214.6] PRINTIT+2, SORT+6, SORT+7, SORT+12, SORT+13
^NURSF(213.3 - [#213.3] SORT+14
^NURSF(214 - [#214] START+4, SORT+4, SORT+13
^TMP($J START+1!, PRINT+1, PRINT+2, NN, NO, NP, NQ, HEADER+6, SORT+16*

Label References

Name Line Occurrences
BRK NO, PRINTIT
CAT HEADER+6
DEV REENT+5
HEADER PRINT+1, NN, PRINTIT
NN PRINT+2
NO NN
NP NO
NQ NP
PRINT START+6, START+7
PRINTIT NQ
QUIT REENT+4, REENT+9, DEV, DEV+1, START+2
REENT REENT+8
SORT START+2, START+4

Naked Globals

Name Field # of Occurrence
^(0 SORT+13, SORT+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA PRINTIT+1*, PRINTIT+2
>> DATA PRINTIT+2*, PRINTIT+6, PRINTIT+7, PRINTIT+8, PRINTIT+9
>> DFN PRINTIT+1*, SORT+4*, SORT+13, SORT+16
DIC REENT+7*!
DIC("S" REENT+6*
DIC(0 REENT+7*, DEV*
DT HEADER+3, SORT+7
DTIME REENT+3
IO START+2
IOF START+6, HEADER+3
IOSL PRINTIT
IOST START+6, START+7, HEADER+1, SORT+10
>> N1 NP*, NQ, PRINTIT+4, SORT+11*, SORT+16
>> NBD BRK*, PRINTIT+5, PRINTIT+6, PRINTIT+7, PRINTIT+8, PRINTIT+9
>> NBEDS NO*, NP, NQ, BRK, SORT+14*, SORT+16
>> NBRK NURARCRW+3*
>> NCAT SORT+12*, SORT+17
>> NCOPY REENT+5*, START+6
>> NDATA NURARCRW+3*, PRINT+1*, HEADER+1
>> NPWARD SORT+15*
>> NS1 SORT+13*, SORT+14
>> NS1(0 SORT+13*
>> NSUB NQ*, PRINTIT+1
>> NSW1 NURARCRW+3*, START+6*, NN, NO, PRINTIT, HEADER+1, HEADER+6, HEADER+8*
>> NTC START+1*, HEADER+6, SORT+17*, CAT+2
>> NTC( START+1*, SORT+17*
>> NTC(1 CAT+2
>> NTC(2 CAT+2
>> NTC(3 CAT+2
>> NTC(4 CAT+2
>> NTC(5 CAT+2
>> NURCURSW REENT+1, HEADER+6, SORT+7
>> NURFAC PRINT+1, SORT+3
>> NURFAC(1 PRINT+1, SORT+3
>> NURFAC(2 SORT+1*, SORT+2*, SORT+3, SORT+16
>> NURFAC(3 PRINT+1*, PRINT+2*, NN, NO, NP, NQ, HEADER+5
>> NURHOSP NURARCRW+3*, REENT+5*, DEV, START+2, START+3, HEADER+5, SORT+1, SORT+3
>> NURI START+6*
>> NURMDSW NURARCRW+3*, DEV, HEADER+5, SORT+1, SORT+2, SORT+3
>> NUROUT NURARCRW+3*, REENT+4*, DEV, START+2, START+4, QUIT, PRINT+2, NN, NO, NP
, NQ, PRINTIT, HEADER+1
>> NURPAGE NURARCRW+3*, START+6*, HEADER+2*, HEADER+3
>> NURQUEUE NURARCRW+3*, HEADER+1
>> NURQUIT NURARCRW+3*, REENT+9
>> NURSCLAS SORT+6*, SORT+7, SORT+12, SORT+13*, SORT+16
>> NURSCLAS("CL" SORT+5*
>> NURSW1 NURARCRW+3*, REENT+10*, START+4*, PRINTIT, SORT+2, SORT+4, SORT+6, SORT+15
>> NURSW1("F" REENT+10*, PRINT+1
>> NURSWARD PRINT+1*, NN*, NO, NP, NQ, HEADER+7, SORT+15*, SORT+16
>> POP DEV+1
>> SSN PRINTIT+2*, PRINTIT+9
U SORT+12
>> VA("PID" PRINTIT+2
>> VADM(1 SORT+11
>> X REENT+3*, REENT+4, REENT+5, START+1*, PRINT+1*, PRINTIT+7*
>> Y REENT+8, REENT+10, PRINTIT+8*, HEADER+3*
>> Y(0 REENT+10
>> ZTRTN DEV+1*
>> ZTSK DEV+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All