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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: SROPCE0

Package: Surgery

Routine: SROPCE0


Information

SROPCE0 ;BIR/ADM - PCE FILING STATUS REPORT ;03/17/05

Source Information

Source file <SROPCE0.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Surgery 4 ^SROPCE0A  ^SROPCE0B  ($$CLINIC,DATE)^SROUTL  ^SRSKILL  
VA Fileman 4 NOW^%DTC  ^DIC  EN^DIQ1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Surgery 3 SRO PCE STATUS  SROPCE0A  SROPCE0B  

Entry Points

Name Comments DBIA/ICR reference
PJBA ;;.021^ASSOCIATED CLINIC
AAI ;;119^NON-OR LOCATION
MSP
PJAEE ;;.0155^CLASSIFICATION INFORMATION
ABC ;;123^PROVIDER
DATE
ABD ;;124^ATTEND PROVIDER
TR
ASK
PAFD ;;.164^ATTEND SURG
ABA ;;121^TIME PROCEDURE BEGAN
ABB ;;122^TIME PROCEDURE ENDED
EN
END
ABE ;;125^MEDICAL SPECIALTY
FORM
PJAA ;;.011^IN/OUT-PATIENT STATUS
CHK ; set up array of fields missing data
CLINIC
PBJE ;;.205^TIME PAT IN OR
OTH
PJD ;;.04^SURGERY SPECIALTY
PBCB ;;.232^TIME PAT OUT OR
SPEC

External References

Name Field # of Occurrence
NOW^%DTC EN+2
^%ZIS FORM+2
^%ZISC END+2
^%ZTLOAD FORM+3
^DIC SPEC+2, MSP+2
EN^DIQ1 CHK+1
^DIR ASK+2, FORM, SPEC+1, MSP+1
^SROPCE0A EN+3
^SROPCE0B EN+4
$$CLINIC^SROUTL CLINIC+3
DATE^SROUTL DATE
^SRSKILL END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?26,"Report of PCE Filing Status",!!,"This report displays the filing status of completed cases performed during the",!,"selected date range.",!
  • Line Location: SROPCE0+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FORM+0
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format."
  • Line Location: FORM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: FORM+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: SPEC+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: MSP+0
Function Call: WRITE
  • Prompt: !
  • Line Location: MSP+2
Routine Call
  • DIC
  • Line Location:
    • SPEC+2
    • MSP+2
Routine Call
  • DIR
  • Line Location:
    • ASK+2
    • FORM
    • SPEC+1
    • MSP+1
Routine Call
  • %ZIS
  • Line Location:
    • FORM+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRF - [#130] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN, EN+2
^SRF - [#130] CLINIC, CLINIC+1, CLINIC+2
^SRO(133 - [#133] CHK+4
^SRO(136 - [#136] CHK+8, CHK+9, OTH, OTH+1, OTH+2, OTH+3
^SRO(137.45 - [#137.45] CLINIC+2
^SRS - [#131.7] CLINIC+2

Label References

Name Line Occurrences
CLINIC CHK+6
END ASK+2, ASK+3, ASK+4, DATE, FORM, FORM+2, FORM+3, EN+3
MSP ASK+4
SPEC ASK+3
TR CHK+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+2
%ZIS FORM+2!*
%ZIS("A" FORM+2*
>> CNT( EN*
DA CHK+1!*
DIC SPEC+2!*, MSP+2!*, CHK+1!*
DIC("A" SPEC+2*, MSP+2*
DIC("S" SPEC+2*
DIC(0 SPEC+2*, MSP+2*
DIQ CHK+1!*
DIQ(0 CHK+1*
DIR ASK!, ASK+2!, FORM!, SPEC+1!, MSP+1!
DIR("?" SPEC*, MSP*
DIR("A" ASK*, ASK+1*, FORM*, SPEC+1*, MSP+1*
DIR("B" ASK+1*, FORM*, SPEC+1*, MSP+1*
DIR(0 ASK+2*, FORM*, SPEC+1*, MSP+1*
DR CHK+1!, CHK+2*, CHK+3*, CHK+4*, CHK+5*
DTIME END+1
>> DTOUT ASK+2, FORM, SPEC+1, MSP+1
>> DUOUT ASK+2, FORM, SPEC+1, MSP+1
>> EDATE DATE, EN
>> ENDATE EN*, EN+1
>> I EN*
IO EN
IO("Q" FORM+2!, FORM+3!
IOF SROPCE0+2, END, END+2, SPEC, MSP
IOP FORM+2!
IOST END, END+1
POP FORM+2!
>> SDATE DATE, EN
SRCLINIC CLINIC~*, CLINIC+1*, CLINIC+2*, CLINIC+3*, CLINIC+4
SRDIV END+2!
SRDX END+2!
SRFCPT END+2!
SRFICD END+2!
>> SRFLD CHK+7*
>> SRFLG SROPCE0+3*, ASK+3*, ASK+4, EN+1
>> SRFORM FORM+1*, EN+3
SRFRTO EN+1*, END+2!
>> SRHDR EN*
SRINOUT END+2!
>> SRINST EN+2*
>> SRNON CHK+2, CHK+3, CLINIC+1
>> SROTH OTH*, OTH+1*, OTH+2, OTH+3
>> SRP TR*
>> SRPAGE EN*
SRPARAM END+2!
SRPODX END+2!
>> SRPRINT EN+2*
SRQCPT END+2!
SRQICD END+2!
SRRPT EN+1*, END+2!
SRSCHED END+2!
>> SRSDT EN*
>> SRSEDT EN*
>> SRSITE CHK+4
>> SRSITE("SITE" EN+2
>> SRSOUT SROPCE0+3*, ASK+2*, ASK+3, ASK+4, DATE, FORM*, FORM+2*, FORM+3*, EN*, END+1
, SPEC+1*, SPEC+2*, MSP+1*, MSP+2*
>> SRSPEC SROPCE0+3*, SPEC+2*, MSP+2*
>> SRSPECN SPEC+2*, MSP+2*
SRSPS END+2!
SRSR END+2!, CHK+2, CHK+3
>> SRSTATUS CHK+5
>> SRTITLE EN+1*
SRTN END+2!, CHK+1, CHK+7, CHK+8, CHK+9, OTH, OTH+1, OTH+2, OTH+3, CLINIC
, CLINIC+1, CLINIC+2, CLINIC+3, CLINIC+4
SRUCPT END+2!
SRUICD END+2!
SRX CHK+1!
SRX( CHK+7*, CHK+8*, CHK+9*
SRX(99998 OTH*
SRX(99999 OTH+2*, OTH+3*
SRY CHK+1!
SRY(130 CHK+7, CLINIC+4*
>> SRZ CHK+7*, OTH+3*, TR
>> STARTDT EN*, EN+1
>> X END+1*, CHK+7*
>> Y ASK+3, FORM+1, EN*, EN+2*, SPEC+2, MSP+2
>> Y(0 SPEC+2, MSP+2
>> ZTDESC FORM+3*
>> ZTQUEUED END
>> ZTREQ END*
>> ZTRTN FORM+3*
>> ZTSAVE("EDATE" FORM+3*
>> ZTSAVE("SDATE" FORM+3*
>> ZTSAVE("SRFLG" FORM+3*
>> ZTSAVE("SRFORM" FORM+3*
>> ZTSAVE("SRSITE*" FORM+3*
>> ZTSAVE("SRSPEC*" FORM+3*
>> ZTSTOP END

Marked Items

Name Field # of Occurrence
$T(@SRP CHK+7
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 |  Local Variables |  Marked Items |  All