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

Package: Clinical Reminders

Routine: PXRMEXPU


Information

PXRMEXPU ;SLC/PKR - Utilities for packing and unpacking repository entries. ;12/07/2011

Source Information

Source file <PXRMEXPU.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ($$GET1,FIELD)^DID  UPDATE^DIE  $$GET1^DIQ  
Clinical Reminders 2 AWRITE^PXRMUTIL  BLDRLIST^PXRMVPTR  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Clinical Reminders 5 PXRMEXHF  PXRMEXMM  PXRMEXPD  PXRMEXU2  PXRMEXU5  

Entry Points

Name Comments DBIA/ICR reference
PTROK(PTR) ;Return true if items associated with this pointer are
CONTOFDA(DIQOUT,IENROOT) ;Convert the iens from the form
BTTABLE(DIQOUT,IENROOT,TTABLE) ;Build the DIQOUT to FDA iens translation table.
CLDIQOUT(DIQOUT) ;Clean up DIQOUT remove null entries and change .01's
UPDATE(SUCCESS,FDA,FDAIEN) ;Call to add new entries to the repository.
RMEH(FILENUM,DIQOUT,NOSTUB) ;Clear the edit history from all reminder files.

External References

Name Field # of Occurrence
$$GET1^DID CLDIQOUT+15, CLDIQOUT+16
FIELD^DID RMEH+6
UPDATE^DIE UPDATE+4
$$GET1^DIQ CLDIQOUT+26, RMEH+16
AWRITE^PXRMUTIL UPDATE+9
BLDRLIST^PXRMVPTR CLDIQOUT+24
$$FMTE^XLFDT RMEH+15
$$NOW^XLFDT RMEH+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"BTTABLE^PXRMEXPU - DIQOUT problem, do not have correct top level"
  • Line Location: BTTABLE+11
Function Call: WRITE
  • Prompt: !,"The update failed, UPDATE^DIE returned the following error message:"
  • Line Location: UPDATE+8
Function Call: WRITE
  • Prompt: !!,"Exchange File entry ",RNAME," date packed ",DATE," did not get stored!"
  • Line Location: UPDATE+12
Function Call: WRITE
  • Prompt: !,"Examine the above error message for the reason.",!
  • Line Location: UPDATE+13
Routine Call
  • DIE
  • Line Location:
    • UPDATE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( BTTABLE+5, BTTABLE+14
^PXD(811.8 - [#811.8] UPDATE+3*

Label References

Name Line Occurrences
$$PTROK CLDIQOUT+18
BTTABLE CONTOFDA+9
CLDIQOUT CONTOFDA+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATE UPDATE+6~, UPDATE+11*, UPDATE+12
DIQOUT BTTABLE~, CLDIQOUT~, CONTOFDA~, CONTOFDA+7, CONTOFDA+9, RMEH~
DIQOUT( BTTABLE+8, BTTABLE+13, BTTABLE+16, CLDIQOUT+5, CLDIQOUT+8, CLDIQOUT+10, CLDIQOUT+12!, CLDIQOUT+18!, CLDIQOUT+20!, CLDIQOUT+30*
, CLDIQOUT+33, CLDIQOUT+35*, CLDIQOUT+36!, CLDIQOUT+39*, CONTOFDA+11, CONTOFDA+13, CONTOFDA+16, CONTOFDA+17*, CONTOFDA+18!, RMEH+11!
, RMEH+14, RMEH+15*, RMEH+16*, RMEH+17*, RMEH+18*
DIQOUT("" BTTABLE+2
DUZ RMEH+16
FDA UPDATE~
FDA( UPDATE+10, UPDATE+11
FDAIEN UPDATE~
FIELD CLDIQOUT+2~, CLDIQOUT+9*, CLDIQOUT+10*, CLDIQOUT+12, CLDIQOUT+15, CLDIQOUT+16, CLDIQOUT+18, CLDIQOUT+20, CLDIQOUT+21, CLDIQOUT+22
, CLDIQOUT+24, CLDIQOUT+25, CLDIQOUT+26, CLDIQOUT+28, CLDIQOUT+30, CLDIQOUT+31, CLDIQOUT+33, CLDIQOUT+35, CLDIQOUT+36, CLDIQOUT+39
, CONTOFDA+4~, CONTOFDA+15*, CONTOFDA+16*, CONTOFDA+17
FILENUM BTTABLE+1~, BTTABLE+2*, BTTABLE+3, BTTABLE+5, BTTABLE+8, BTTABLE+9, BTTABLE+13*, BTTABLE+14, BTTABLE+16, BTTABLE+19
, CLDIQOUT+2~, CLDIQOUT+4*, CLDIQOUT+5*, CLDIQOUT+8, CLDIQOUT+10, CLDIQOUT+12, CLDIQOUT+15, CLDIQOUT+16, CLDIQOUT+18, CLDIQOUT+20
, CLDIQOUT+21, CLDIQOUT+22, CLDIQOUT+24, CLDIQOUT+25, CLDIQOUT+26, CLDIQOUT+28, CLDIQOUT+30, CLDIQOUT+31, CLDIQOUT+33, CLDIQOUT+35
, CLDIQOUT+36, CLDIQOUT+39, CONTOFDA+4~, CONTOFDA+10*, CONTOFDA+11*, CONTOFDA+13, CONTOFDA+14, CONTOFDA+16, CONTOFDA+17, CONTOFDA+18
, RMEH~, RMEH+2, RMEH+6, RMEH+14
IENROOT BTTABLE~, CONTOFDA~, CONTOFDA+9
IENROOT( BTTABLE+20*
IENS BTTABLE+1~, BTTABLE+8*, BTTABLE+9, BTTABLE+15*, BTTABLE+16*, BTTABLE+18, BTTABLE+19, BTTABLE+20, CLDIQOUT+2~, CLDIQOUT+7*
, CLDIQOUT+8*, CLDIQOUT+10, CLDIQOUT+12, CLDIQOUT+18, CLDIQOUT+20, CLDIQOUT+26, CLDIQOUT+30, CLDIQOUT+33, CLDIQOUT+35, CLDIQOUT+36
, CLDIQOUT+39, CONTOFDA+4~, CONTOFDA+12*, CONTOFDA+13*, CONTOFDA+14, CONTOFDA+16, CONTOFDA+17, CONTOFDA+18, RMEH+3~, RMEH+10*
, RMEH+11*, RMEH+14*, RMEH+15, RMEH+16, RMEH+17, RMEH+18
IENSA CONTOFDA+4~, CONTOFDA+14*, CONTOFDA+17
IENT BTTABLE+1~, BTTABLE+18*, BTTABLE+19
IND BTTABLE+1~, BTTABLE+8*, BTTABLE+17*, BTTABLE+19, BTTABLE+20
INTERNAL CLDIQOUT+2~, CLDIQOUT+26*, CLDIQOUT+27
LINE CLDIQOUT+2~, CLDIQOUT+32*, CLDIQOUT+33*
MSG UPDATE+1~, UPDATE+5
NOSTUB RMEH~, RMEH+13
PLEN CLDIQOUT+3~, CLDIQOUT+29*, CLDIQOUT+30
PREFIX CLDIQOUT+3~, CLDIQOUT+28*, CLDIQOUT+29, CLDIQOUT+30
PTR PTROK~, PTROK+3, PTROK+4
PTRTO CLDIQOUT+3~, CLDIQOUT+16*, CLDIQOUT+18, CLDIQOUT+27*, CLDIQOUT+39
RNAME UPDATE+6~, UPDATE+10*, UPDATE+12
ROOT CLDIQOUT+3~, CLDIQOUT+27*, CLDIQOUT+28
SFN RMEH+3~, RMEH+7*, RMEH+8, RMEH+11, RMEH+15, RMEH+16, RMEH+17, RMEH+18
SUCCESS UPDATE~, UPDATE+7*, UPDATE+15*
TARGET RMEH+3~
TARGET("SPECIFIER" RMEH+7
TTABLE BTTABLE~, CONTOFDA+4~, CONTOFDA+9
TTABLE( BTTABLE+9*, BTTABLE+19*, CONTOFDA+14
TYPE CLDIQOUT+3~, CLDIQOUT+6!, CONTOFDA+4~
TYPE( CLDIQOUT+15*, CLDIQOUT+16, CLDIQOUT+20, CLDIQOUT+21, CLDIQOUT+31
U CLDIQOUT+28, UPDATE+3
UP BTTABLE+1~, BTTABLE+5*, BTTABLE+7, BTTABLE+14*, BTTABLE+19
VLIST CLDIQOUT+3~, CLDIQOUT+23!, CLDIQOUT+24, CLDIQOUT+25
VPTRLIST CLDIQOUT+3~, CLDIQOUT+6!
VPTRLIST( CLDIQOUT+22, CLDIQOUT+25*, CLDIQOUT+28
WPLCNT CLDIQOUT+3~, CLDIQOUT+32*, CLDIQOUT+34*, CLDIQOUT+35
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