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

Package: Patient Representative

Routine: QACCONV0


Information

QACCONV0 ;HISC/DAD-CONVERT SERVICES ;2/10/95 11:04

Source Information

Source file <QACCONV0.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
VA FileMan 2 FILE^DICN  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
TASK ;
PRINT ;
EXIT ;
CONVERT ;
PAUSE ;
HEADER ;

External References

Name Field # of Occurrence
^%ZIS QACCONV0+14
^%ZISC EXIT+1
^%ZTLOAD QACCONV0+18
FILE^DICN CONVERT+34
^DIR PAUSE+1
$$FMTE^XLFDT PRINT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The data from the SERVICES INVOLVED multiple (745.1,15->"
  • Line Location: QACCONV0+3
Function Call: WRITE
  • Prompt: !,"745.115,.01, a pointer to the NATIONAL SERVICE file [#730])"
  • Line Location: QACCONV0+4
Function Call: WRITE
  • Prompt: !,"will be moved to the SERV/SECT INVOLVED multiple (745.1,21->"
  • Line Location: QACCONV0+5
Function Call: WRITE
  • Prompt: !,"745.121,1->745.1211,.01, a pointer to the SERVICE/SECTION file"
  • Line Location: QACCONV0+6
Function Call: WRITE
  • Prompt: !,"[#49]). The conversion may be run multiple times without adverse"
  • Line Location: QACCONV0+7
Function Call: WRITE
  • Prompt: !,"effects on the database. The SERVICES INVOLVED will be duplicated"
  • Line Location: QACCONV0+8
Function Call: WRITE
  • Prompt: !,"for each ISSUE CODE. A report will be printed showing any"
  • Line Location: QACCONV0+9
Function Call: WRITE
  • Prompt: !,"conversion problems/issues. It is recommended that you queue"
  • Line Location: QACCONV0+10
Function Call: WRITE
  • Prompt: !,"this report. If you wish to run this conversion/report at a"
  • Line Location: QACCONV0+11
Function Call: WRITE
  • Prompt: !,"later time, enter 'DO ^QACCONV0' at the M programmer prompt."
  • Line Location: QACCONV0+12
Function Call: WRITE
  • Prompt: !
  • Line Location: QACCONV0+14
Function Call: WRITE
  • Prompt: !,"Task Number: ",ZTSK
  • Line Location: QACCONV0+19
Function Call: WRITE
  • Prompt: !!,"No conversion problems found."
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !!,"Contact Number: ",QACNUMBR
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !,^TMP($J,"QACPROB",QACNUMBR,QACPROB)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !!?29,"Patient Representative",?68,"Page: ",QACPAGE
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !?28,"Service Conversion Report",?68,QACTODAY
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !?24,"* - indicates data not converted"
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,QACUNDL
  • Line Location: HEADER+6
Routine Call
  • %ZIS
  • Line Location:
    • QACCONV0+14
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(745.121 CONVERT+32
^DIC(49 - [#49] CONVERT+12, CONVERT+13
^ECC(730 - [#730] CONVERT+10
^QA(745.1 - [#745.1] TASK+2, CONVERT+1, CONVERT+2, CONVERT+8, CONVERT+9, CONVERT+26, CONVERT+29
^TMP($J TASK+1!, PRINT+4, PRINT+8, PRINT+11, PRINT+12, EXIT+4!, CONVERT+4*, CONVERT+6!, CONVERT+14*, CONVERT+18*
CONVERT+22*, CONVERT+28

Label References

Name Line Occurrences
CONVERT TASK+2
EXIT QACCONV0+14, QACCONV0+15, PRINT+4
HEADER PRINT+3, PRINT+13
PAUSE PRINT+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QACCONV0+14!*, EXIT+2!
D0 EXIT+2!, CONVERT+33*
D1 EXIT+2!, CONVERT+33*
>> DA(1 EXIT+4!, CONVERT+33*
>> DA(2 EXIT+4!, CONVERT+33*
DD EXIT+2!, CONVERT+30!
DIC EXIT+2!, CONVERT+30!, CONVERT+31*
DIC("P" CONVERT+32*
DIC(0 CONVERT+31*
DINUM EXIT+2!, CONVERT+30!
DIR EXIT+2!, PAUSE+1!
DIR(0 PAUSE+1*
DLAYGO EXIT+2!, CONVERT+32*
DO EXIT+2!, CONVERT+30!
DT PRINT+2
IO PRINT+3
IO("Q" QACCONV0+15
IOF HEADER+2
IOP QACCONV0+14!
IOSL PRINT+13
IOST PAUSE+1, HEADER+2
POP QACCONV0+14, EXIT+2!
QAC49 EXIT+2!, CONVERT+11*, CONVERT+12*, CONVERT+13, CONVERT+14, CONVERT+27*, CONVERT+28*, CONVERT+29, CONVERT+32
QAC730 EXIT+2!, CONVERT+9*, CONVERT+10, CONVERT+12, CONVERT+18, CONVERT+22
QAC730(0 CONVERT+10*, CONVERT+17, CONVERT+21
QACD0 TASK+1*, TASK+2*, EXIT+2!, CONVERT+1, CONVERT+2, CONVERT+8, CONVERT+9, CONVERT+26, CONVERT+29, CONVERT+31
CONVERT+33
QACD1 EXIT+2!, CONVERT+7*, CONVERT+8*, CONVERT+9, CONVERT+25*, CONVERT+26*, CONVERT+29, CONVERT+31, CONVERT+33
QACFOUND EXIT+3!, CONVERT+11*, CONVERT+14*, CONVERT+16, CONVERT+20
QACNUMBR PRINT+7*, PRINT+8*, PRINT+9, PRINT+11, PRINT+12, EXIT+3!, CONVERT+1*, CONVERT+4, CONVERT+18, CONVERT+22
QACPAGE PRINT+1*, EXIT+3!, HEADER+2, HEADER+3, HEADER+6*
QACPROB PRINT+10*, PRINT+11*, PRINT+12, EXIT+3!
QACQUIT PRINT+1*, PRINT+8, PRINT+11, EXIT+3!, PAUSE+1*, HEADER+1
QACTODAY PRINT+2*, EXIT+3!, HEADER+4
QACUNDL PRINT+1!*, EXIT+3!, HEADER+6
U CONVERT+1, CONVERT+9, CONVERT+10, CONVERT+13, CONVERT+32
X EXIT+3!, CONVERT+3*, CONVERT+4, CONVERT+17*, CONVERT+18, CONVERT+21*, CONVERT+22, CONVERT+32*
Y EXIT+3!, PAUSE+1
ZTDESC QACCONV0+17*, EXIT+4!
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
ZTRTN QACCONV0+16*, EXIT+4!
ZTSK QACCONV0+19, EXIT+4!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All