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

Package: Prosthetics

Routine: RMPOPS23


Information

RMPOPS23 ;HIN/RVD - HOME OXYGEN BILLING - POST TO 2319 ;5/18/99

Source Information

Source file <RMPOPS23.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 2 HOME^%ZIS  KILL^XUSCLEAN  
Prosthetics 2 (MONTH,VENDOR)^RMPOBIL0  HOSITE^RMPOUTL0  
VA FileMan 2 FILE^DICN  (,FILE)^DIE  
Registration 1 DEM^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Prosthetics 1 RMPO POST 2319  

Entry Points

Name Comments DBIA/ICR reference
PATLCK() ;Lock patient level in ^RMPO(665.72
EXIT ;
BUILD ;Build array IFCAP with patient transactions to post
UNLKPAT ;Unlock patient level in ^RMPO(665.72
F660 ;Post to file ^RMPR(660 for form 2319
POST ;main module to post billing transactions to 2319
QUIT()

External References

Name Field # of Occurrence
HOME^%ZIS POST+1
FILE^DICN F660+26
^DIE F660+30
FILE^DIE F660+55
MONTH^RMPOBIL0 POST+3
VENDOR^RMPOBIL0 POST+4
HOSITE^RMPOUTL0 POST+2
DEM^VADPT BUILD+12
KILL^XUSCLEAN EXIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Processing..."
  • Line Location: POST+6
Function Call: WRITE
  • Prompt: !,"Everything posted okay!!"
  • Line Location: POST+7
Function Call: WRITE
  • Prompt: !,PATNAM," record locked by another user"
  • Line Location: BUILD+14
Function Call: WRITE
  • Prompt: !!,"Posting to 2319 for item ",ITM," patient ",DFN," failed."
  • Line Location: F660+57
Function Call: WRITE
  • Prompt: "Posting will be done later"
  • Line Location: F660+58
Function Call: WRITE
  • Prompt: !,"Patient: ",$P(^DPT(DFN,0),U,1)," Item: ",ITM," posted to 2319."
  • Line Location: F660+60
Routine Call
  • %ZIS
  • Line Location:
    • POST+1
Routine Call
  • DIE
  • Line Location:
    • F660+30
Routine Call
  • DIE
  • Line Location:
    • F660+55

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(660 - [#660] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] F660+59, F660+60
^PRC(441 - [#441] F660+59
^RMPO( BUILD+8, BUILD+9, BUILD+17, BUILD+18, PATLCK+1, UNLKPAT+1
^RMPO(665.72 - [#665.72] F660+7, F660+8, F660+9, F660+10, F660+12
^RMPR(661 - [#661] F660+14
^RMPR(661.1 - [#661.1] F660+19, F660+35
^RMPR(665 - [#665] F660+1
^RMPR(669.9 - [#669.9] F660+3, F660+4, F660+5*, F660+6
^TMP($J POST+7, POST+8, EXIT+1!, BUILD+7!, BUILD+26*, BUILD+27, BUILD+29*, BUILD+30*, F660+11

Label References

Name Line Occurrences
$$PATLCK BUILD+14
BUILD POST+6
EXIT POST+7
F660 POST+8
UNLKPAT BUILD+31

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D660(660 F660+31*, F660+32*, F660+33*, F660+34*, F660+35*, F660+36*, F660+37*, F660+38*, F660+39*, F660+40*
, F660+41*, F660+42*, F660+43*, F660+44*, F660+45*, F660+46*, F660+47*, F660+49*, F660+50*, F660+51*
, F660+52*, F660+53*, F660+54*
>> D665A F660+1*, F660+51, F660+52
>> D6I F660+27*
>> D6X F660+27*, F660+31, F660+32, F660+33, F660+34, F660+35, F660+36, F660+37, F660+38, F660+39
, F660+40, F660+41, F660+42, F660+43, F660+44, F660+45, F660+46, F660+47, F660+49, F660+50
, F660+51, F660+52, F660+53, F660+54
DA F660+28!, F660+30*
DA(1 F660+28*, F660+29
DA(2 F660+28*, F660+29
DA(3 F660+28*, F660+29
DA(4 F660+28*, F660+29
DD F660+26!
>> DFN POST+8*, BUILD+8*, BUILD+9, BUILD+17, BUILD+18, BUILD+27, BUILD+29, BUILD+30, F660+1, F660+11
, F660+12, F660+28, F660+31, F660+57, F660+59, F660+60, PATLCK+1, UNLKPAT+1
DIC F660+25*, F660+61!
DIC(0 F660+25*
DIE F660+28!, F660+29*, F660+30*
>> DIROUT QUIT
DO F660+26!
DR F660+28!, F660+30*
DT F660+3, F660+25, F660+41
>> DTOUT QUIT
>> DUOUT QUIT
DUZ F660+50
>> ERR F660+56, F660+59
>> FCP POST+8*, BUILD+22*, BUILD+24, BUILD+26, BUILD+27, BUILD+29, BUILD+30, F660+8, F660+11
>> FIL POST+5*, BUILD+8, BUILD+9, BUILD+17, BUILD+18, PATLCK+1, UNLKPAT+1
>> ITDT BUILD+18*, BUILD+20, BUILD+21, BUILD+22
>> ITM BUILD+16*, BUILD+17*, BUILD+18, BUILD+30, F660+11*, F660+12, F660+30, F660+57, F660+60
>> ITMD F660+12*, F660+13, F660+15, F660+16, F660+17, F660+18, F660+33, F660+34, F660+35, F660+36
, F660+38, F660+46, F660+47, F660+48, F660+49, F660+54
>> ITNO BUILD+22*
>> ITOT BUILD+22*, BUILD+23, BUILD+26, BUILD+30
>> LCK BUILD+14*
>> LNAM BUILD+28*, BUILD+29
>> PATFLG BUILD+9*, BUILD+11
>> PATNAM BUILD+12*, BUILD+14, BUILD+28, BUILD+29
>> PATSSN BUILD+12*, BUILD+29
>> PAYINF F660+10*, F660+42, F660+43
>> QUIT POST+1*, POST+2, POST+3, POST+4, POST+5*, QUIT*
>> RFCPIEN F660+8*, F660+9, F660+10
>> RITIEN F660+14*, F660+59
>> RMCLEN F660+24*
>> RMCPHC F660+17*, F660+19
>> RMCPQH F660+18*, F660+21
>> RMCPRENT F660+17*, F660+22
>> RMCPSO F660+17*
>> RMCPT F660+17*, F660+20*, F660+21*, F660+22*, F660+23*, F660+24*, F660+37
>> RMCPT1 F660+19*, F660+20, F660+21, F660+22, F660+23
>> RMCPTY F660+18*, F660+20
>> RMITEM F660+13*, F660+14
>> RMPO("STA" F660+40
>> RMPODATE POST+3, POST+5, F660+7, F660+8, F660+9, F660+10, F660+12, F660+28
>> RMPOG F660+3*, F660+4*, F660+5, F660+53
>> RMPOVDR POST+4, POST+5, F660+7, F660+12, F660+28, F660+39
>> RMPOXITE POST+2, POST+5, F660+3, F660+4, F660+5, F660+6, F660+7, F660+9, F660+10, F660+12
, F660+28
RMPR EXIT+3~
RMPRSITE EXIT+3~
>> RVDT POST+5*, BUILD+8, BUILD+9, BUILD+17, BUILD+18, PATLCK+1, UNLKPAT+1
>> SITE POST+5*, BUILD+8, BUILD+9, BUILD+17, BUILD+18, PATLCK+1, UNLKPAT+1
>> SRVORD F660+9*, F660+44
>> SUSDES F660+48*, F660+49
>> TRXDT F660+7*, F660+32
U BUILD+11, BUILD+20, BUILD+21, BUILD+22, BUILD+30, F660+4, F660+5, F660+7, F660+9, F660+10
, F660+13, F660+14, F660+16, F660+17, F660+18, F660+33, F660+34, F660+35, F660+36, F660+38
, F660+42, F660+43, F660+46, F660+47, F660+48, F660+49, F660+51, F660+52, F660+54, F660+60
>> VA("BID" BUILD+12
>> VADM(1 BUILD+12
>> VDR POST+5*, BUILD+8, BUILD+9, BUILD+17, BUILD+18, PATLCK+1, UNLKPAT+1
X F660+25*, F660+61!
Y F660+26, F660+27, F660+61!
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