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: SDSCEDT

Package: Scheduling

Routine: SDSCEDT


Information

SDSCEDT ;ALB/JAM/RBS - ASCD Review and Edit SC value for encounters. ;4/24/07 4:29pm

Source Information

Source file <SDSCEDT.m>

Call Graph

Call Graph

Call Graph Total: 22

Package Total Call Graph
Scheduling 6 $$GETOE^SDOE  GETPDX^SDOERPC  $$SC^SDSCAPI  CLM^SDSCCLM  GETDATE^SDSCOMP  ($$ANCPKG,$$LOCK,$$SCSEL,$$SENS,CONT,DIV,STEDT,TYPE,UNLOCK)^SDSCUTL  
VA FileMan 5 EN^DDIOL  ^DIC  ^DIK  $$GET1^DIQ  ^DIR  
Kernel 4 HOME^%ZIS  $$FMTE^XLFDT  $$UP^XLFSTR  $$NAME^XUSER  
Registration 3 $$BIL^DGMTUB  RDIS^DGRPDB  (DEM,KVA)^VADPT  
Integrated Billing 2 $$INSUR^IBBAPI  $$RNBU^IBRSUTL  
DRG Grouper 1 ($$ICDDX,$$SYS)^ICDEX  
PCE Patient Care Encounter 1 $$INTV^PXAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Scheduling 4 SDSC EDIT BY DATE  SDSC SINGLE EDIT  SDSCLST  SDSCMSR  

Entry Points

Name Comments DBIA/ICR reference
START ; Called by option "SDSC EDIT BY DATE - Edit encounters by date range"
OPT ; Loop through requested encounter status for specified date range, display each encounter, and allow edit.
START1 ; Called by option "SDSC SINGLE EDIT - Edit single encounter"
CHECK ; Final editing checks for specified encounter.
; Check division, if doesn't match, quit.
DISPLAY ; Compile display for the specified encounter into a TMP global.
; Clear scratch global and reset line counter.
DISPLAY1 ; Display the specified encounter.
INS ; Compile patient means test and insurance information.
POV2S ; Compile all POV entries for the specified visit.
DIS2S ; Compile all rated disabilities for this patient.
VBAICD ;ASCD (VBA/ICD9) SC evaluation
LINE(LINE) ; Save a line of text into the scratch global.
EDIT ; Allow user to edit the specified encounter or send for review. (Roll and scroll)
LEDT ; ListMan Entry Point for Editing
; If user selected 'SKIP', postpone action on this entry.
CTUP ; Update claims tracking file in IB.
END ; Clear all variables before exiting.

External References

Name Field # of Occurrence
HOME^%ZIS START+2, START1+2
EN^DDIOL START+22, START1+19, START1+26
$$BIL^DGMTUB INS+1
RDIS^DGRPDB DIS2S+5
^DIC START1+12
^DIK LEDT+16
$$GET1^DIQ OPT+5, CHECK+12, CHECK+14, CHECK+15, LEDT+14
^DIR START+10, EDIT+10
$$INSUR^IBBAPI INS+4, INS+8
$$RNBU^IBRSUTL CTUP+2
$$ICDDX^ICDEX POV2S+6
$$SYS^ICDEX POV2S+6
$$INTV^PXAPI LEDT+11
$$GETOE^SDOE OPT+4, CHECK+4
GETPDX^SDOERPC DISPLAY+31
$$SC^SDSCAPI VBAICD+3
CLM^SDSCCLM CTUP+3
GETDATE^SDSCOMP START+8
$$ANCPKG^SDSCUTL OPT+18, START1+26
$$LOCK^SDSCUTL LEDT+6
$$SCSEL^SDSCUTL START+4
$$SENS^SDSCUTL OPT+12, START1+21
CONT^SDSCUTL DISPLAY1+4
DIV^SDSCUTL START+9
STEDT^SDSCUTL LEDT+19
TYPE^SDSCUTL START+6, START1+3
UNLOCK^SDSCUTL CTUP+4
DEM^VADPT DISPLAY+21
KVA^VADPT END+7
$$FMTE^XLFDT DISPLAY+9
$$UP^XLFSTR DISPLAY+16
$$NAME^XUSER DISPLAY+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7
  • Line Location: START+22
Function Call: WRITE
  • Prompt: !
  • Line Location: START1+11
Function Call: WRITE
  • Prompt: *7
  • Line Location: START1+19
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPLAY1+1
Function Call: WRITE
  • Prompt: !,^TMP("SDSCLST",$J,SDLN,0)
  • Line Location: DISPLAY1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY1+8
Function Call: WRITE
  • Prompt: !!,"*** Encounter ",SDOE," locked by another user. Try later. ***"
  • Line Location: LEDT+7
Function Call: WRITE
  • Prompt: !!,"*** Encounter ",SDOE," Removed from ASCD File - True Match Found ***"
  • Line Location: LEDT+13
Function Call: WRITE
  • Prompt: !!,"*** Encounter ",SDOE," Removed from ASCD File - No SC value found in Visit File ***"
  • Line Location: LEDT+17
Routine Call
  • %ZIS
  • Line Location:
    • START+2
    • START1+2
Routine Call
  • DIC
  • Line Location:
    • START1+12
Routine Call
  • DIR
  • Line Location:
    • START+10
    • EDIT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SDSC(409.48 - [#409.48] Classic Fileman Calls
^AUPNVSIT - [#9000010] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPOV - [#9000010.07] POV2S+3, POV2S+5
^AUPNVPOV("AD" POV2S+2
^AUPNVSIT - [#9000010] CHECK+10
^DGSL(38.1 - [#38.1] DISPLAY+24
^DIC(31 - [#31] DIS2S+8
^SC - [#44] DISPLAY+12
^SDSC(409.48 - [#409.48] OPT+1, OPT+2, START1+14, CHECK+2, DISPLAY+15, LEDT+12, LEDT+15, CTUP+2
^TMP("SDSCLST" DISPLAY+2!, DISPLAY1+3, DISPLAY1+5, LINE+1*

Label References

Name Line Occurrences
CHECK OPT+8, START1+17
CTUP LEDT+12, LEDT+15
DIS2S DISPLAY+33
DISPLAY OPT+14, START1+23
DISPLAY1 OPT+14, START1+23
EDIT OPT+20, START1+28
END START+4, START+8, START+11, START+23, START1+29
INS DISPLAY+27
LINE DISPLAY+6, DISPLAY+7, DISPLAY+9, DISPLAY+13, DISPLAY+17, DISPLAY+25, INS+2, INS+3, INS+5, INS+9
, POV2S+1, POV2S+10, DIS2S+2, DIS2S+3, DIS2S+9, VBAICD+2, VBAICD+4
OPT START+17, START+19, START+20
POV2S DISPLAY+31
VBAICD DISPLAY+29

Naked Globals

Name Field # of Occurrence
^(0 DIS2S+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA LEDT+16~*, END+3!
DFN DISPLAY+21~*
DIC START1+7*, END+3!
DIC("A" START1+8*
DIC("S" START1+9*, START1+10*
DIC(0 START1+7*
DIE END+3!
DIERR END+3!
DIK LEDT+16~*
DIR START+13!, EDIT+1!, EDIT+12!, END+5!
DIR("?" EDIT+4*, EDIT+5*, EDIT+6*, EDIT+7*, EDIT+8*, EDIT+9*
DIR("A" EDIT+3*
DIR(0 EDIT+2*
DLAYGO END+3!
DTOUT START+11, START1+13, EDIT+11, END+5!
DUOUT START+11, START1+13, EDIT+11, END+5!
ERR END+3!
I DIS2S+4~, DIS2S+6*, DIS2S+7
I1 DIS2S+4~, DIS2S+7*, DIS2S+8
I2 DIS2S+4~, DIS2S+8*, DIS2S+9
IOF DISPLAY1+1
IOSL DISPLAY1+4
L DISPLAY1+2*, DISPLAY1+4*, DISPLAY1+6*, END+4!
LINE LINE~, LINE+1
P END+4!
SCDX POV2S+6*, POV2S+7, POV2S+8, POV2S+9, END+2!
SCLN START+12, START+13!
SCOPT START+1~, START+4*, OPT+6
SCRD DIS2S+4~, DIS2S+5
SCRD( DIS2S+6, DIS2S+7
SCTUPD CTUP+2~*
SCVST START+1~, OPT+5*, OPT+6
SDABRT END+4!
SDACT INS+4*, INS+5, INS+6, END+5!
SDANS EDIT+12*, LEDT+2, LEDT+4, LEDT+9, END+6!
SDCLIN DISPLAY+11*, DISPLAY+12, END+4!
SDCNT END+6!
SDCOV INS+8*, INS+9, END+5!
SDCP INS+1*, INS+3, END+5!
SDCST END+2!
SDDATA END+6!
SDEC END+1!
SDEDIT LEDT+10~*
SDEDT OPT+1, END+1!
SDEFLG OPT+8*, OPT+10, START1+17*, START1+19, CHECK+17*, END+5!
SDFILEOK END+2!
SDFLG START+16*, START+22, CHECK+17*, END+6!
SDICD END+1!
SDIENS END+3!
SDLIST END+4!
SDLN DISPLAY+2*, DISPLAY1+3*, DISPLAY1+5, LINE+1*, END+6!
SDOE OPT+2*, OPT+4, OPT+18, START1+14*, START1+19, START1+26, CHECK+2, CHECK+4, DISPLAY+3, DISPLAY+15
, DISPLAY+31, VBAICD+3, LEDT+6, LEDT+7, LEDT+12, LEDT+13, LEDT+15, LEDT+16, LEDT+17, LEDT+19
, CTUP+2, CTUP+3, CTUP+4, END+1!
SDOEDAT CHECK+4*, CHECK+5, CHECK+7, CHECK+9, DISPLAY+11, POV2S+6, END+5!
SDOEDT OPT+1*, OPT+2, START1+14*, DISPLAY+9, INS+1, INS+4, INS+8, END+1!
SDOEX END+1!
SDOPT EDIT+2, EDIT+9, END+4!
SDOSC CHECK+12*, DISPLAY+4, END+5!
SDPASS END+1!
SDPAT OPT+12, START1+21, CHECK+7*, DISPLAY+20, DISPLAY+21, DISPLAY+24, INS+1, INS+4, INS+8, DIS2S+5
, VBAICD+3, END+1!
SDPD END+3!
SDPDX DISPLAY+31, POV2S+7, END+6!
SDPOV POV2S+3*, POV2S+6, END+1!
SDPOVSC POV2S+5*, POV2S+7, END+2!
SDPRV DISPLAY+15*, DISPLAY+16, END+4!
SDPSC POV2S+7*, POV2S+8, END+2!
SDQFLG START+16*, START+19, START+20, OPT+1, OPT+2, OPT+16, START1+5*, START1+6, START1+13*, START1+25
, DISPLAY1+3, DISPLAY1+4, EDIT+11*, END+3!
SDRFLG LEDT+4*, LEDT+19, END+3!
SDSCBDT END+6!
SDSCC LEDT+14*, LEDT+15, LEDT+19, END+1!
SDSCCR START1+9, START1+10, END+5!
SDSCDIV START+14*, CHECK+2, END+4!
SDSCDVLN START+12*, START+14, END+4!
SDSCDVSL START+12*, START+14, END+2!
SDSCEDIT START+1~*, START1+1~*
SDSCEDT END+6!
SDSCMSG OPT+18*, CHECK+5*, CHECK+9*, CHECK+10*, END+4!
SDSCPKG CHECK+14*, LEDT+11, END+2!
SDSCSRC CHECK+15*, LEDT+11, END+2!
SDSCTAT START+17, START+18*, START+19*, START+20*, OPT+1, OPT+2, END+4!
SDSCTDT START+8, OPT+1, END+1!
SDTMP DISPLAY+3*, DISPLAY+4*, DISPLAY+5*, DISPLAY+6, DISPLAY+11*, DISPLAY+12*, DISPLAY+13, DISPLAY+15*, DISPLAY+16*, DISPLAY+17
, DISPLAY+19*, DISPLAY+22*, DISPLAY+24*, DISPLAY+25, POV2S+8*, POV2S+9*, POV2S+10, END+6!
SDTYPE LEDT+19, END+3!
SDV0 OPT+4*, OPT+5, CHECK+9*, CHECK+10, CHECK+12, CHECK+14, CHECK+15, POV2S+2, LEDT+11, LEDT+14
, END+2!
SDVPOV0 POV2S+2*, POV2S+3, POV2S+5, END+3!
U OPT+4, START1+14, CHECK+2, CHECK+7, CHECK+9, DISPLAY+11, DISPLAY+12, DISPLAY+15, DISPLAY+22, DISPLAY+24
, POV2S+3, POV2S+5, POV2S+7, POV2S+8, POV2S+9, DIS2S+8
VADM DISPLAY+21~
VADM(1 DISPLAY+22
VADM(2 DISPLAY+22
VAL VBAICD+1~
X START+13!, EDIT+1!, EDIT+12!, LEDT+11*, END+5!
X1 END+5!
X2 END+5!
Y START+12, START+13!, START1+13, START1+14, VBAICD+1~, VBAICD+3*, VBAICD+4, EDIT+1!, EDIT+12!, END+5!
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