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 |  All
Print Page as PDF
Routine: ACHS3PPQ

Package: Contract Health Management Information System

Routine: ACHS3PPQ


Information

ACHS3PPQ ; IHS/ITSC/TPF/PMF - QUEUE THIRD PARTY PAYMENT REPORT (ALL PATIENTS) ;

Source Information

Source file <ACHS3PPQ.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS VA Utilities 4 $$DIR^XBDIR  $$C^XBFUNC  VIEWR^XBLM  EN^XBVK  
Contract Health Management Information System 3 ($$FYSEL,$$LOC,$$PB,$$USR)^ACHS  ^ACHS3PPC  ^ACHSVAR  
VA Fileman 3 ^DIC  WAIT^DICD  ^DIR  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Contract Health Management Information System 4 ACHS3PPB  ACHS3PPP  ACHS3PPT  ACHSRPT3RDPAY  

Entry Points

Name Comments DBIA/ICR reference
DIR2 ;
END ;
SELSER ;Select type of service
SELPAT ;Patient Selection
FISYR ;Select Fiscal Year
ZTLOAD ;Loads Taskman
DEVICE ;Device Selection
REPTYP ;

External References

Name Field # of Occurrence
^%ZIS DEVICE+11
HOME^%ZIS DEVICE+12, ZTLOAD+5, END+2
^%ZTLOAD ZTLOAD+3
$$FYSEL^ACHS FISYR+2
$$LOC^ACHS ACHS3PPQ+7
$$PB^ACHS DEVICE+3
$$USR^ACHS ACHS3PPQ+5
^ACHS3PPC DEVICE+16
^ACHSVAR END+2
^DIC DIR2+4
WAIT^DICD DEVICE+16
^DIR SELSER+6, SELPAT+4, REPTYP+11
$$DIR^XBDIR DEVICE+12
$$C^XBFUNC ACHS3PPQ+7
VIEWR^XBLM DEVICE+7
EN^XBVK DEVICE+7, END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!,$$C^XBFUNC("****** 3rd PARTY PAYMENT REPORT FOR "_$$LOC^ACHS_" *****",80)
  • Line Location: ACHS3PPQ+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SELSER+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SELPAT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SELPAT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DIR2+1
Function Call: WRITE
  • Prompt: *7,!!?20,"This report may take awhile to compile.",!?9," It is recommended that you QUEUE your output to a PRINTER.",!
  • Line Location: DEVICE+1
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+12
    • ZTLOAD+5
    • END+2
Routine Call
  • DIC
  • Line Location:
    • DIR2+4
Routine Call
  • DIR
  • Line Location:
    • SELSER+6
    • SELPAT+4
    • REPTYP+11
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("ACHS3PP" ACHS3PPQ+3!

Label References

Name Line Occurrences
DIR2 DIR2+8
END FISYR+3, SELSER+7, SELPAT+5, DIR2+5, REPTYP+12, DEVICE+4, DEVICE+7, DEVICE+12
FISYR SELSER+8, DEVICE+12
REPTYP SELPAT+7, DIR2+6
SELPAT REPTYP+13
SELSER SELPAT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DEVICE+3*, DEVICE+4, DEVICE+7, ZTLOAD+2*
>> %ZIS DEVICE+10*
>> ACHSFAC ACHS3PPQ+8*
>> ACHSFY FISYR+2*
ACHSPAT SELPAT+1!, DIR2+5, DIR2+6
ACHSPAT( DIR2+7*
ACHSPAT(0 SELPAT+7*, REPTYP+5, REPTYP+8, REPTYP+9
>> ACHSQIO ZTLOAD+1*
>> ACHSRTYP REPTYP+14*
ACHSSER SELSER+2!, SELSER+9*
>> ACHSUSR ACHS3PPQ+5*
DIC SELSER+2!, DIR2+2!, DIR2+3*, END+1!
DIC(0 DIR2+3*
DIR SELSER+2!, SELPAT+1!, REPTYP+1!, DEVICE+2!, END+1!
DIR("?" REPTYP+7*, REPTYP+8*, REPTYP+9*, REPTYP+10*
DIR("A" SELSER+4*, SELPAT+2*, REPTYP+6*
DIR("B" SELSER+4*, SELPAT+2*, REPTYP+6*
DIR(0 SELSER+4*, SELPAT+2*, REPTYP+4*, REPTYP+5*
DIROUT FISYR+3, SELSER+7, SELPAT+5, REPTYP+12, END+1!
DTOUT FISYR+3, SELSER+7, SELPAT+5, REPTYP+12, DEVICE+4, END+1!
DUOUT FISYR+3, SELSER+8, SELPAT+6, REPTYP+13, DEVICE+4, END+1!
DUZ(2 ACHS3PPQ+8
IO("Q" DEVICE+16, ZTLOAD+4!
IO("S" DEVICE+16
IOM ZTLOAD+1
ION ZTLOAD+1
IOSL ZTLOAD+1
IOST ZTLOAD+1
>> POP DEVICE+12
U DEVICE+4
>> Y SELSER+9, SELPAT+7, DIR2+5, DIR2+6, DIR2+7, REPTYP+14
>> ZTDESC ZTLOAD+1*
>> ZTIO ZTLOAD+1*
>> ZTRTN ZTLOAD+1*
>> ZTSAVE( ZTLOAD+2*
ZTSK END+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 |  Local Variables |  All