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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SROACMP1

Package: Surgery

Routine: SROACMP1


Information

SROACMP1 ;BIR/ADM - M&M VERIFICATION REPORT (CONT'D) ;11/26/07

Source Information

Source file <SROACMP1.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Surgery 6 ^SROACMP  ^SROSTOP  DATE^SROUTL  ($$DIV,$$INST,$$MANDIV)^SROUTL0  $$SITE^SROVAR  ^SRSKILL  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 C^%DTC  ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Surgery 2 SRO M&M VERIFICATION REPORT  SROACMP  

Entry Points

Name Comments DBIA/ICR reference
CASE ; examine case
EN ; entry point
END
HDR ; print heading
SP
BEG
DEV
FOOT ; print footer
HDR2 ; more heading
SEL ; select report version
SPEC
MORE ; ask for more surgical specialties

External References

Name Field # of Occurrence
C^%DTC CASE+7
^%ZIS DEV
^%ZISC END+1
^%ZTLOAD DEV+1
^DIC SP, MORE+1
^DIR SPEC+3, SEL+2, FOOT+3
^SROACMP BEG+5
^SROSTOP HDR+1
DATE^SROUTL EN+10
$$DIV^SROUTL0 CASE+3
$$INST^SROUTL0 SPEC
$$MANDIV^SROUTL0 CASE+2
$$SITE^SROVAR EN+1
^SRSKILL END+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?28,"M&M Verification Report"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!,"The M&M Verification Report is a tool to assist in the review of occurrences"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"and their assignment to operations and in the review of death unrelated or",!,"related assignments to operations."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"The full report includes all patients who had operations within the selected"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"date range who experienced intraoperative occurrences, postoperative"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"occurrences or death within 90 days of surgery. The pre-transmission report"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"is similar but includes only operations with completed risk assessments that"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,"have not yet transmitted to the national database.",!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: SPEC+1
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format.",!
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: SP+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,?124,"Page ",PAGE,!,?54,"M&M Verification Report"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?100,"REVIEWED BY:",!,?(132-$L(SRPRINT)\2),SRPRINT,?100,"DATE REVIEWED:",!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"OP DATE",?11,"CASE #",?25,"SURGICAL SPECIALTY",?80,"ASSESSMENT TYPE STATUS",?116,"DEATH RELATED",!,?11,"PRINCIPAL PROCEDURE",!
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,SRNAME_" * * Continued from previous page * *"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR2+1
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+1
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+2
Routine Call
  • DIC
  • Line Location:
    • SP
    • MORE+1
Routine Call
  • DIR
  • Line Location:
    • SPEC+3
    • SEL+2
    • FOOT+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" BEG, BEG+2
^DPT - [#2] CASE+7
^SRF - [#130] CASE+1, CASE+4, CASE+5, CASE+6, CASE+7
^SRF("AC" BEG+3
^SRF("ARS" BEG+4
^TMP("SR" BEG!, CASE+6*, CASE+7*, END!, HDR+9
^TMP("SRPAT" BEG!, END!
^TMP("SRSP" END!
^XUSEC("SROCHIEF" SPEC, CASE+2, CASE+3

Label References

Name Line Occurrences
CASE BEG+3, BEG+4
END EN+9, EN+10, SPEC, SPEC+3, SPEC+4, DEV, DEV+1, BEG+5
HDR2 HDR+2
MORE MORE+1
SEL EN+9
SP SPEC+4
SPEC EN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV!*
%ZIS("A" DEV*
>> DFN BEG+4*, CASE+6*, CASE+7
DIC SP!*, MORE+1!*
DIC("A" SP*, MORE+1*
DIC("S" SP*, MORE+1*
DIC(0 SP*, MORE+1*
DIR SPEC+1!, SPEC+3!, SEL+1!, SEL+2!, FOOT+3!
DIR("?" SPEC+2*, SEL+2*
DIR("A" SPEC+1*, SEL+1*, SEL+2*
DIR("B" SPEC+1*, SEL+2*
DIR(0 SPEC+1*, SEL+2*, FOOT+3*
DT BEG
>> DTOUT SPEC+3, SEL+2
>> DUOUT SPEC+3, SEL+2
DUZ SPEC, CASE+2, CASE+3
IO BEG
IO("Q" DEV!, DEV+1!
IOF EN+1, END, END+1, HDR+3
IOP DEV!
IOST FOOT+3
>> LINE HDR+7*
>> PAGE BEG*, HDR+3, HDR+9*
POP DEV!
>> SRASS BEG+4*
>> SRCT SP+1*, MORE+1*
>> SRDAY CASE+7*
>> SRDEATH CASE+7*
>> SRED EN+10, BEG+2, BEG+3
>> SREDT BEG+3*
>> SRFORM EN+9, DEV+1, BEG+1, BEG+4, CASE+4, SEL+3*, HDR+4, HDR+5
SRFRTO BEG+1~, BEG+2*, HDR+4
>> SRHALT HDR+1
>> SRHDR BEG*, HDR+2*, HDR+9*, FOOT+3*
>> SRINST EN+1*, SPEC*, HDR+3
SRINSTP SPEC~*, CASE+2
>> SRNAME HDR+8
>> SRNM BEG*, HDR+8
>> SRPRINT BEG*, HDR+6
>> SRSD EN+10, BEG+2, BEG+3
>> SRSDT BEG+3*
>> SRSOUT EN+1*, EN+9, EN+10, SPEC+3*, SPEC+4, DEV*, BEG*, BEG+3, BEG+4, BEG+5
, END, SEL+2*, SP*, HDR+1*, HDR+2, FOOT+3*
>> SRSP EN+1*, CASE+4, SP*
>> SRSP( CASE+4, SP+1*, MORE+1*
>> SRSS BEG*
SRTN BEG+3*, BEG+4*, CASE+1, CASE+2, CASE+3, CASE+4, CASE+5, CASE+6, CASE+7, END+1!
U SPEC
>> X CASE+7
>> X1 CASE+7*
>> X2 CASE+7*
>> Y SPEC+4, BEG*, BEG+2*, CASE+4*, SEL+3, SP, SP+1, MORE+1, FOOT+3
>> ZTDESC DEV+1*
>> ZTQUEUED END, HDR+1
>> ZTREQ END*
>> ZTRTN DEV+1*
>> ZTSAVE("SRED" DEV+1*
>> ZTSAVE("SRFORM" DEV+1*
>> ZTSAVE("SRINST" DEV+1*
>> ZTSAVE("SRINSTP" DEV+1*
>> ZTSAVE("SRSD" DEV+1*
>> ZTSAVE("SRSP*" DEV+1*
>> ZTSTOP END
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All