Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: FHXDB

Package: Dietetics

Routine: FHXDB


Information

FHXDB ; HISC/REL - Verify data base pointers ;5/14/93 15:50

Source Information

Source file <FHXDB.m>

Entry Points

Name Comments DBIA/ICR reference
PAT
Q1 ; Process verifying pointer structures
S1
U0
FP
EN
W0
P0
S0
TF
KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Line Location: PAT+0
Function Call: WRITE
  • Prompt: *7," Enter A, I or N"
  • Line Location: PAT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: Q1+1
Function Call: WRITE
  • Prompt: !!,"VERIFICATION OF DIETETIC POINTER STRUCTURES"
  • Line Location: Q1+1
Function Call: WRITE
  • Prompt: !!,"Verifying file 111 - Diets"
  • Line Location: Q1+2
Function Call: WRITE
  • Prompt: !?5,"Production diet ",N," missing from Diet ",K," - ",$P(^FH(111,K,0),"^",1)
  • Line Location: Q1+3
Function Call: WRITE
  • Prompt: !!,"Verifying file 112.6 - User Menu"
  • Line Location: Q1+4
Function Call: WRITE
  • Prompt: !!,"Verifying file 115.2 - Food Preferences"
  • Line Location: Q1+6
Function Call: WRITE
  • Prompt: !!,"Verifying file 115.7 - Dietetic Encounters"
  • Line Location: Q1+8
Function Call: WRITE
  • Prompt: !!,"Verifying file 116.2 - Production Diets"
  • Line Location: Q1+10
Function Call: WRITE
  • Prompt: !!,"Verifying file 118 - Supplemental Feedings"
  • Line Location: Q1+12
Function Call: WRITE
  • Prompt: !!,"Verifying file 118.1 - Supplemental Feeding Menu"
  • Line Location: Q1+14
Function Call: WRITE
  • Prompt: !!,"Verifying file 118.2 - Tubefeeding"
  • Line Location: Q1+16
Function Call: WRITE
  • Prompt: !!,"Verifying file 119.6 - Dietetics Ward"
  • Line Location: Q1+18
Function Call: WRITE
  • Prompt: !?5,"Supp. Feeding ",N," missing in Menu ",K," - ",$P(^FH(118,K,0),"^",1)
  • Line Location: S1+1
Function Call: WRITE
  • Prompt: !?5,"Nutrient item ",X," missing in User Menu ",K," day ",L," meal ",M," - ",$P(^FHUM(K,0),"^",1)
  • Line Location: U0+0
Function Call: WRITE
  • Prompt: !?5,"Recipe ",X," missing in Food Preference ",K," - ",$P(^FH(115.2,K,0),"^",1)
  • Line Location: FP+1
Function Call: WRITE
  • Prompt: !?5,"Recipe ",N," missing in Excluded Food Preference ",K," - ",$P(^FH(115.2,K,0),"^",1)
  • Line Location: FP+2
Function Call: WRITE
  • Prompt: !?5,"Encounter Type ",X," missing in Dietetic Encounters ",K
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?5,"Service Point ",N," missing in Ward File ",K," - ",$P(^FH(119.6,K,0),"^",1)
  • Line Location: W0+0
Function Call: WRITE
  • Prompt: !?5,"Supplemental Fdg. Site ",N," missing in Ward File ",K," - ",$P(^FH(119.6,K,0),"^",1)
  • Line Location: W0+1
Function Call: WRITE
  • Prompt: !?5,"Communication Office ",N," missing in Ward File ",K," - ",$P(^FH(119.6,K,0),"^",1)
  • Line Location: W0+2
Function Call: WRITE
  • Prompt: !?5,"Diet ",N," missing from Ward File ",K," - ",$P(^FH(119.6,K,0),"^",1)
  • Line Location: W0+3
Function Call: WRITE
  • Prompt: !?5,"Supp. Feeding ",N,"missing in Ward File ",K," - ",$P(^FH(119.6,K,0),"^",1)
  • Line Location: W0+4
Function Call: WRITE
  • Prompt: !?5,"Singular Production Diet ",N," missing in Prod. Diet ",K," - ",$P(^FH(116.2,K,0),"^",1)
  • Line Location: P0+0
Function Call: WRITE
  • Prompt: !?5,"Recipe ",X," missing in Supplemental Feeding ",K," - ",$P(^FH(118,K,0),"^",1)
  • Line Location: S0+1
Function Call: WRITE
  • Prompt: !?5,"Recipe ",X," missing in Tubefeeding ",K," - ",$P(^FH(118.2,K,0),"^",1)
  • Line Location: TF+1
Info |  Source |  Entry Points |  Interaction Calls